    (< (: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)))))
+             (until-unsuccessful #(s/explain-str :fspec-fn-test/minus my-minus)))))
 
     (is (= (pf "-- Function spec failed -----------
 

-------------------------
Detected 1 error\n"
           (binding [s/*explain-out* (expound/custom-printer {:print-specs? false})]
             (until-unsuccessful (s/explain-str (s/coll-of (s/fspec :args (s/cat :x int?) :ret int?))
                                                [:foo])))))
    (testing "set ifn / ret failure"
      (is (= "-- Function spec failed -----------



-------------------------
Detected 1 error\n")
           (until-unsuccessful #(expound/expound-str :fspec-ret-test/plus my-plus))))

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

