Source
clojure/contrib/pprint/utilities.clj:37
top
(defn consume [func initial-context]
(loop [context initial-context
acc []]
(let [[result new-context] (apply func [context])]
(if (not result)
[acc new-context]
(recur new-context (conj acc result))))))
Comments top
No comments for consume. Log in to add a comment.