aboutsummaryrefslogtreecommitdiff
path: root/src/clojure/contrib/test_is/tests.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/clojure/contrib/test_is/tests.clj')
-rw-r--r--src/clojure/contrib/test_is/tests.clj4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/clojure/contrib/test_is/tests.clj b/src/clojure/contrib/test_is/tests.clj
index f846b699..1b80ec3c 100644
--- a/src/clojure/contrib/test_is/tests.clj
+++ b/src/clojure/contrib/test_is/tests.clj
@@ -51,6 +51,10 @@
(is (.startsWith "abc" "a") "Should pass")
(is (.startsWith "abc" "d") "Should fail"))
+(deftest can-test-anonymous-fn
+ (is (#(.startsWith % "a") "abc") "Should pass")
+ (is (#(.startsWith % "d") "abc") "Should fail"))
+
;; Here, we create an alternate version of test-is/report, that
;; compares the event with the message. The alternate calls the