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