🔥码云GVP开源项目 12k star Uniapp+ElementUI 功能强大 支持多语言、二开方便! 广告
### Vars [Vars](http://clojure.org/vars) 是一种可以有一个被所有线程共享的root binding并且每个线程线程还能有自己线程本地(thread-local)的值的一种引用类型。 下面的语法创建一个Var并且给它一个root binding: ``` (def <em>name</em> <em>value</em>) ``` 你可以不给它一个值的。如果你没有给它一个值,那么我们说这个Var是 "unbound". 同样的语法可以用来修改一个Var的root binding。 有两种方法可以创建一个已经存在的Var的线程本地binding(thread-local-binding): ``` (binding [<em>name</em> <em>expression</em>] <em>body</em>) (set! <em>name</em> <em>expression</em>) ; inside a binding that bound the same name ``` 关于binding宏的用法我们前面已经介绍过了. 下面的例子演示把它和 `set!` 一起使用. 用set!来修改一个由binding bind的Var的线程本地的值。 ``` (def v 1) (defn change-it [] (println "2) v =" v) ; -> 1 (def v 2) ; changes root value (println "3) v =" v) ; -> 2 (binding [v 3] ; binds a thread-local value (println "4) v =" v) ; -> 3 (set! v 4) ; changes thread-local value (println "5) v =" v)) ; -> 4 (println "6) v =" v)) ; thread-local value is gone now -> 2 (println "1) v =" v) ; -> 1 (let [thread (Thread. #(change-it))] (.start thread) (.join thread)) ; wait for thread to finish (println "7) v =" v) ; -> 2 ``` 我们一般不鼓励使用 Vars, 因为线程之间对于同一个Var的修改没有做很好的协调,比如线程A在使用一个Var的root值,然后才发现,在它使用这个值的时候,已经有一个线程B在修改这个值了。