diff options
| -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) #{}))) |