clojure - Clojure当宏

Question

我正在浏览clojure源，对when宏的定义方式感到惊讶:

user=> (source when)
(defmacro when
  "Evaluates test. If logical true, evaluates body in an implicit do."
  {:added "1.0"}
  [test & body]
  (list 'if test (cons 'do body)))
nil
user=>

我期望它写成这样的东西:

(defmacro when [test & body] `(if ~test (do ~@body)))

为什么实际的宏以这种不太常见的方式编写？

Answer 1

core.clj是从上到下构建的，首先从Java提供的功能开始，然后逐步构建Clojure的所有要求。定义when时，语法引用尚不存在。when宏在core.clj的line 456上定义，并且直到line 682. the when宏用于定义语法引用时，语法引用的要求才可用