Permalink
Browse files

Added in-place fn test of arity1 contract

  • Loading branch information...
fogus committed Jan 15, 2013
1 parent 6178cc0 commit c3ec3f5b66e2da78b372ef43fe01cc6d74eb0e92
Showing with 3 additions and 1 deletion.
  1. +3 −1 src/test/clojure/clojure/core/contracts_tests.clj
@@ -50,7 +50,7 @@
(is (thrown? Error ((partial doubler-contract-arity1 #(* 3 %)) 5)))
(is (thrown? Error ((partial doubler-contract-arity1 #(* 2 %)) -5)))))
-(deftest contract-arity1-and-isolated-fn
+(deftest test-contract-arity1-and-isolated-fn
(let [doubler-contract-arity1-and-isolated-fn
(contract doubler
"Test"
@@ -61,5 +61,7 @@
(is (thrown? Error ((partial doubler-contract-arity1-and-isolated-fn #(* 3 %)) 5)))
(is (thrown? Error ((partial doubler-contract-arity1-and-isolated-fn #(* 2 %)) -5)))))
+
+
(deftest test-regressions
(defer "regression testing"))

0 comments on commit c3ec3f5

Please sign in to comment.