macros - 你能强制 Clojure 宏评估它的参数吗？

Question

我正在尝试定义一个包装clojure.test/deftest的辅助函数。这是我的总体想法:

(defn test-wrapper
  [name & body]
  (deftest (symbol (clojure.string/replace name #"\W" "-")) body)))

但是，由于 deftest 的第一个参数未计算，因此它会抛出异常，因为它是一种形式而不是符号。有没有办法强制表单首先评估？

Answer 1

这里更好的方法是使 test-wrapper 成为一个宏。宏不会评估它们的参数，除非您告诉它们这样做。您可以操作参数并在某些生成的代码中替换它们，如下所示:

(use 'clojure.test)

(defmacro test-wrapper
  [name & body]
  (let [test-name (symbol (clojure.string/replace name #"\W" "-"))]
    `(deftest ~test-name ~@body)))

(test-wrapper "foo bar" (is (= 1 1)))

(run-tests)