diff options
| author | Rich Hickey <richhickey@gmail.com> | 2011-02-02 10:04:58 -0500 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2011-02-02 10:04:58 -0500 |
| commit | d93ef6293bbcc6059e6da77dbf6ed26167f36cdb (patch) | |
| tree | ac5822d45aa027f5accaa07208693c09df21c966 /test | |
| parent | 13d9404b5227f3b9e8f86371d211be890e5302a9 (diff) | |
Revert "keys and vals check for instanceof Map"
breaks subseq
This reverts commit 13d9404b5227f3b9e8f86371d211be890e5302a9.
Diffstat (limited to 'test')
| -rw-r--r-- | test/clojure/test_clojure/data_structures.clj | 22 |
1 files changed, 10 insertions, 12 deletions
diff --git a/test/clojure/test_clojure/data_structures.clj b/test/clojure/test_clojure/data_structures.clj index 08d0ee38..7679b2b6 100644 --- a/test/clojure/test_clojure/data_structures.clj +++ b/test/clojure/test_clojure/data_structures.clj @@ -440,12 +440,11 @@ (deftest test-keys - (are [x] (thrown? Exception (keys x)) - ;; other than map data structures - () - [] - #{} - "") + (are [x y] (= x y) ; other than map data structures + (keys ()) nil + (keys []) nil + (keys #{}) nil + (keys "") nil ) (are [x y] (= x y) ; (class {:a 1}) => clojure.lang.PersistentArrayMap @@ -465,12 +464,11 @@ (deftest test-vals - (are [x] (thrown? Exception (vals x)) - ;; other than map data structures - () - [] - #{} - "") + (are [x y] (= x y) ; other than map data structures + (vals ()) nil + (vals []) nil + (vals #{}) nil + (vals "") nil ) (are [x y] (= x y) ; (class {:a 1}) => clojure.lang.PersistentArrayMap |