@neil.barrett16

(def log-ch (chan 25))

(defn sink!!
  "applies f to every value taken from chan" 
  [ch f] 
  (thread
    (loop [] 
      (when-some [v (<! ch)] 
        (f v)
        (recur)))))

(sink!! log-ch prn)

try to avoid banging on atoms, especially with reset!

@ghadi If I used when-let above, would putting false on the ch terminate the loop?

Is that a standard 'poison pill' when you don't want to close the channel?

false is a valid value to transmit through a chan, so when-some preserves that. The only invalid value is nil, which is what the chan yields when it is closed

and you can't put nil on a chan yourself