On Dec 6, 2008, at 6:21 PM, Paul Mooser wrote:
(defn splode [index-path]
(with-local-vars [doc-count 0]
(doseq [document (filter my-filter-pred (document-seq index-
path))]
(var-set doc-count (inc @doc-count)))
'done))
The fn in question is likely the one in the macro expansion of the lazy-cons inside filter. As a next step, I would try replacing the call to "doseq" with the equivalent loop/recur:
(loop [document (filter my-filter-pred (document-seq index-path))] (var-set doc-count (inc !doc-count)) (recur (filter my-filter-pred (document-seq index-path)))) This will rule in our out a problem with doseq. --Steve
smime.p7s
Description: S/MIME cryptographic signature
