diff options
| author | Rich Hickey <richhickey@gmail.com> | 2009-02-16 19:13:53 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2009-02-16 19:13:53 +0000 |
| commit | 509a56a1e07c471211cba339de2c5c6d7bef4e82 (patch) | |
| tree | 6b2b3689fc7b5b61085916eb066b6cbbfd5eaa84 | |
| parent | 2a4f2a2bb19dc13d93130061bf99c2b73acffe66 (diff) | |
[lazy] straight cons call in filter
| -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 63c0f870..fbae2ab4 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -1499,7 +1499,7 @@ (let [step (fn [p c] (when-let [s (seq c)] (if (p (first s)) - (clojure.lang.Cons. (first s) (filter p (rest s))) + (cons (first s) (filter p (rest s))) (recur p (rest s)))))] (lazy-seq (step pred coll)))) |