Creates and returns a channel which contains the contents of coll,
closing when exhausted.
Source
(defnto-chan"Creates and returns a channel which contains the contents of coll,
closing when exhausted."[coll](let[c(bounded-count100coll)](if(pos?c)(let[ch(chanc)](onto-chanchcoll)ch)(let[ch(chan)](close!ch)ch))))