Clojure:绑定(bind)与 with-redefs

Question

clojure.core 有宏 bindings和 with-redefs 。查看 clojuredocs.org 上的文档字符串和示例，它们似乎做了非常相似的事情。有什么区别以及在什么情况下应该使用哪一种？

Answer 1

Clojure 变量可以具有线程本地绑定(bind)。 binding 使用这些，而 with-redefs 实际上改变了 var 的根绑定(bind)(类似于默认值)。

另一个区别是 binding 仅适用于 :dynamic 变量，而 with-redefs 适用于所有变量。

示例:

user=> (def ^:dynamic *a* 1)
#'user/*a*
user=> (binding [*a* 2] *a*)
2
user=> (with-redefs [*a* 2] *a*)
2
user=> (binding [*a* 2] (doto (Thread. (fn [] (println "*a* is " *a*))) (.start) (.join)))
*a* is  1
#<Thread Thread[Thread-2,5,]>
user=> (with-redefs [*a* 2] (doto (Thread. (fn [] (println "*a* is " *a*))) (.start) (.join)))
*a* is  2
#<Thread Thread[Thread-3,5,]>

您可以使用(未​​记录的)binding-传送器-fn 将线程本地绑定(bind)传送到新线程中:

user=> (binding [*a* 2] (doto (Thread. (#'clojure.core/binding-conveyor-fn (fn [] (println "*a* is " *a*)))) (.start) (.join)))
*a* is  2
#<Thread Thread[Thread-5,5,]>