diff options
Diffstat (limited to 'src/boot.clj')
-rw-r--r-- | src/boot.clj | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/boot.clj b/src/boot.clj index 4cec9172..012e3a1d 100644 --- a/src/boot.clj +++ b/src/boot.clj @@ -457,8 +457,7 @@ (take n (repeat x))) (defn iterate [f x] - (let [v (f x)] - (lazy-cons v (iterate f v)))) + (lazy-cons x (iterate f (f x)))) (defn merge [& maps] |