diff options
| author | Rich Hickey <richhickey@gmail.com> | 2010-04-05 11:23:55 -0400 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2010-04-05 11:23:55 -0400 |
| commit | c733148ba0fb3ff7bbab133f5375422972e62d08 (patch) | |
| tree | 0cbe5723116e143f0d1105d712fba09067eaf12a /src/clj | |
| parent | e6e39d5931fbdf3dfa68cd2d059b8e26ce45c965 (diff) | |
catch duplicate set keys for literals and hash-set calls.
Diffstat (limited to 'src/clj')
| -rw-r--r-- | src/clj/clojure/core.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index b5909407..1508a76c 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -289,7 +289,7 @@ "Returns a new hash set with supplied keys." ([] #{}) ([& keys] - (clojure.lang.PersistentHashSet/create keys))) + (clojure.lang.PersistentHashSet/createWithCheck keys))) (defn sorted-map "keyval => key val @@ -2773,7 +2773,7 @@ (defn set "Returns a set of the distinct elements of coll." - [coll] (apply hash-set coll)) + [coll] (clojure.lang.PersistentHashSet/create #^clojure.lang.ISeq (seq coll))) (defn #^{:private true} filter-key [keyfn pred amap] |