Clojurescript - 未捕获的错误：<!不在 (go ...) 块中使用

Question

我在 Clojurescript 中，并尝试使用 core.async 从原生 Javascript 函数（我在浏览器中）获取结果，并有条件地将其集成到地图中。

我有一个封装原生浏览器调用的函数（受Timothy Baldridge's talk on core.async 启发，感兴趣的人大约需要 34 分钟）：

(defn geolocation []
    (let [c (chan)
         cb (fn [e] (put! c (js->clj e)))]
     (if (exists? js/navigator.geolocation)
       (.getCurrentPosition js/navigator.geolocation. cb cb)
       (put! c {:error "Geolocation is not supported"}))
     c))

我可以这样使用它：

   ;; this works
   (go (.log js/console "RES1 -"  (<! (geolocation))))

   ;; this too (not sure how to print it though)
   (go (println "RES2 - "  (-> {}
                            (assoc :test (<! (geolocation))))))

   ;; this fails... why ?
   (go (println "RES3 - "  (-> {}
                               (#(when true
                                   (assoc % :test (<! (geolocation))))))))

最后一个示例失败并出现错误：Uncaught Error: <! used not in (go ...) block，尽管我认为我使用的是相同类型的结构。

我做错了什么？

注意：我从:require-macro 指令like described here 正确要求它。

Answer 1

go 宏将获取给定的主体，并将所有 <! 和 alt! 和 >! 调用转换为状态机。但是它不会进入函数：

couldn't use for loop in go block of core.async?

通过在函数边界处停止转换，我的意思是：go 块获取其主体并将其转换为状态机。对<!>! 或alts!（以及其他一些）的每次调用都被视为状态机转换，其中块的执行可以暂停。在这些点中的每一个点，机器都会变成回调并附加到通道。当此宏到达 fn 形式时，它会停止翻译。所以你只能从 go 块内部调用<!，而不是代码块内部的函数。

这是core.async 的魔力的一部分。如果没有 go 宏，core.async 代码在其他语言中看起来很像回调地狱。