 
 -------------------------
 Detected 1 error\n")
-           (until-unsuccessful (expound/expound-str (s/coll-of :fspec-ret-test/plus) [my-plus]))))))
+           (until-unsuccessful #(expound/expound-str (s/coll-of :fspec-ret-test/plus) [my-plus]))))))
 
 (s/def :fspec-fn-test/minus (s/fspec
                              :args (s/cat :x int? :y int?)

   (< (:ret %) (-> % :args :x)))"
                  :cljs "(fn [%] (< (:ret %) (-> % :args :x)))"))
           (binding [s/*explain-out* (expound/custom-printer {:print-specs? false})]
             (until-unsuccessful (s/explain-str (s/coll-of :fspec-fn-test/minus) [my-minus])))))))

(deftest ifn-fspec-test
  (testing "keyword ifn / ret failure"

   (< (:ret %) (-> % :args :x)))"
                  :cljs "(fn [%] (< (:ret %) (-> % :args :x)))"))
           (binding [s/*explain-out* (expound/custom-printer {:print-specs? false})]
             (until-unsuccessful #(s/explain-str :fspec-fn-test/minus my-minus)))))

    (is (= (pf "-- Function spec failed -----------

