Hi,
On 5 Apr., 13:08, Ken Wesson <[email protected]> wrote:
> This seems to contradict the test results I posted earlier. Perhaps it
> is behaving differently on your system -- what is your Clojure
> version? Maybe some issue with locals clearing?
Clojure 1.2 running on Windows with JDK 1.6.0_24.
> In any event, where in my code are you claiming a reference is being
> held? If you continue to stand by your claim, point to the exact spot.
(defn partition-by [f s]
(lazy-seq
(let [s (seq s)]
(if s
(let [fs (map f s)
eq (cons true (map = fs (rest fs)))
eqs (seq (map list eq s))
step (fn step [eqs]
(lazy-seq
(let [eqs (seq eqs)]
(if eqs
(cons
(lazy-seq
(cons (second (first eqs))
(map second (take-while first (rest
eqs)))))
(step (drop-while first (rest
eqs))))))))] ; <- The drop-while marks the spot. There is a call to
seq missing here.
(step eqs))))))
Sincerely
Meikel
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to [email protected]
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
