aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStuart Sierra <mail@stuartsierra.com>2009-01-16 15:47:35 +0000
committerStuart Sierra <mail@stuartsierra.com>2009-01-16 15:47:35 +0000
commit25b6bd086d1a4a9ec53bbf8a6db3c74cb6a01601 (patch)
treec709c5d50f20ce8afb0a03bfc5d93c4185d8938a
parenta8c5a717258b3328a7a1f2d42f8283a046cc71c3 (diff)
test_is/tests.clj: added test for Java method call (to be fixed)
-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 0dc8eedf..f846b699 100644
--- a/src/clojure/contrib/test_is/tests.clj
+++ b/src/clojure/contrib/test_is/tests.clj
@@ -47,6 +47,10 @@
(deftest can-catch-unexpected-exceptions
(is (= 1 (throw (Exception.))) "Should error"))
+(deftest can-test-method-call
+ (is (.startsWith "abc" "a") "Should pass")
+ (is (.startsWith "abc" "d") "Should fail"))
+
;; Here, we create an alternate version of test-is/report, that
;; compares the event with the message. The alternate calls the