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 | |
| parent | 60e805dc7bd42b7b26fc8c8925bf71079729e0e6 (diff) | |
fixed distinct nil handling
| -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) #{}))) |