Just remembered that I did give an example in the README, a port of braveclojure's hotdog machine.
(defn hot-dog-machine > [in out hot-dogs-left] > (when (> hot-dogs-left 0) > (go<! [input in] > (if (= 3 input) > (go>! [out "hot dog"] > (hot-dog-machine in out (dec hot-dogs-left))) > (go>! [out "wilted lettuce"] > (hot-dog-machine in out hot-dogs-left)))))) > > (let [in (chan) > out (chan) > _ (hot-dog-machine in out 2)] > (>!! in "pocket lint") > (println (<!! out)) > > (>!! in 3) > (println (<!! out)) > > (>!! in 3) > (println (<!! out))); => wilted lettuce; => hotdog; => hotdog > > -- You received this message because you are subscribed to the Google Groups "Clojure" group. To post to this group, send email to clojure@googlegroups.com Note that posts from new members are moderated - please be patient with your first post. To unsubscribe from this group, send email to clojure+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/clojure?hl=en --- You received this message because you are subscribed to the Google Groups "Clojure" group. To unsubscribe from this group and stop receiving emails from it, send an email to clojure+unsubscr...@googlegroups.com. For more options, visit https://groups.google.com/d/optout.
