Pre: Fix bad symbol.

This commit is contained in:
Nick Alexander 2016-07-15 12:45:35 -07:00
parent b545ddc0e1
commit 04e772a5bc

View file

@ -24,14 +24,14 @@
[datomish.util]])))
#?(:clj
(defn pair-channel->lazy-seq
(defn pair-channel->lazy-seq
"Returns a blocking lazy sequence of items taken from the provided channel."
[channel]
(lazy-seq
(when-let [v (clojure.core.async/<!! channel)]
(if (second v)
(cons v nil)
(cons v (channel->lazy-seq channel)))))))
(cons v (pair-channel->lazy-seq channel)))))))
#?(:clj
(defn run-to-pair-seq