diff options
author | scgilardi <scgilardi@gmail.com> | 2009-02-10 05:12:14 +0000 |
---|---|---|
committer | scgilardi <scgilardi@gmail.com> | 2009-02-10 05:12:14 +0000 |
commit | 7e3467ba25ad040c6728fb44a2e41c1715ec1660 (patch) | |
tree | f2e14b2d682211fa83f2bec9daa3b308799eb253 /src | |
parent | 5bb43b5212d3aca42322861c32e69535375548f2 (diff) |
fix issue 19: test-clojure/sequences: pmap regression, vector/seq equality, from Shawn Hoover
Diffstat (limited to 'src')
-rw-r--r-- | src/clojure/contrib/test_clojure/sequences.clj | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/clojure/contrib/test_clojure/sequences.clj b/src/clojure/contrib/test_clojure/sequences.clj index de58b299..83cbf4dc 100644 --- a/src/clojure/contrib/test_clojure/sequences.clj +++ b/src/clojure/contrib/test_clojure/sequences.clj @@ -275,3 +275,19 @@ #{1 2} "abc" (into-array [1 2]))) + + +;; pmap +;; +(deftest pmap-does-its-thing + ;; regression fixed in r1218; was OutOfMemoryError + (is (= '(1) (pmap inc [0])))) + + +;; equality +;; +(deftest vectors-equal-other-seqs-by-items-equality + ;; regression fixed in r1208; was not equal + (is (= '() [])) + + (is (= '(1) [1]))) |