diff options
author | Rich Hickey <richhickey@gmail.com> | 2009-02-12 22:35:56 +0000 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2009-02-12 22:35:56 +0000 |
commit | 4392a605a331d37e4d6c01c147eb9500eb58a0df (patch) | |
tree | 758a91d371bd8bbb0f73ead01d6d6d760434b6cc /src | |
parent | 60e805dc7bd42b7b26fc8c8925bf71079729e0e6 (diff) |
fixed distinct nil handling
Diffstat (limited to 'src')
-rw-r--r-- | src/clj/clojure/core.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index aba99ab4..b4ccd791 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -2913,7 +2913,7 @@ [coll] (let [step (fn step [[f & r :as xs] seen] (when xs - (if (seen f) (recur r seen) + (if (contains? seen f) (recur r seen) (lazy-cons f (step r (conj seen f))))))] (step (seq coll) #{}))) |