宏如何转换代码
(let [c1 (chan) c2 (chan)] (go (while true (let [[v ch] (alts! [c1 c2])] (println "Read" v "from" ch)))) (go (>! c1 "hi")) (go (>! c2 "there")))
这是后面的状态机。您可以在The State Machines of core.async]中阅读更多内容