Clojure 扩展中的额外括号

Question

(defmacro event-handler (link: argsv & body)
`(reify EventHandler (~'handle ~argsv ~@body)))

(macroexpand
'(macrolet (link: (add-handler [& body)

                       `(event-handler
                          (link: ~'this ~'e) ~@body))]
 (add-handler 1)))

结果会在 handle 之后和 (link: this e) 之前出现额外的括号（请注意）

(do (reify* (link: javafx.event.EventHandler) (handle ((link: this e) 1))))

Answer 1

评论者：oskarkv

这已在版本 0.1.5 中修复，但 GitHub 页面 https://github.com/clojure/tools.macro 表示最新版本是 0.1.2。

Answer 2

参考资料：https://clojure.atlassian.net/browse/TMACRO-7（由 alex+import 报告）