alter-var-root

(alter-var-root v f & args)

原子性地修改 var v 的值，新值由 v 的旧值和给定的 args 应用到函数 f 得出。

查看源码

user=> (def v 10)
#'user/v

user=> (alter-var-root (var v) + 1)     ; (var v) 等同于 #'v
11

user=> v
11

讨论

comments powered by Disqus