clojure - Clojure 宏中的文本替换功能，如 C 的#define

Question

我想写一个宏

(defmacro params [] 'a 'b 'c)

在这样的地方会用到

;; without macro
(fnc a b c)

;; with macro
(fnc params) => (fnc a b c)

如果你看到这可以通过 C 的#define 轻松完成，这只是一个文本替换

但这只会返回一个 'c

Answer 1

我不太确定为什么您想这样做，但在 clojure 中通常会使用以下惯用语:

(defmacro with-params
  [params fncall]
  `~(concat fncall params))

(defn myfn [x y z]
  (spyx :myfn [x y z]))

(let [a 1
      b 2
      c 3]
  (println :with-params)
  (with-params [a b c]
    (myfn))

结果:

:with-params
:myfn [x y z] => [1 2 3]

但是，如果您想对代码进行硬编码以始终使用参数 a、b 和 c，您可以这样做:

(defmacro with-params-abc
  [fncall]
  `~(concat fncall '[a b c]))

(println :with-params-abc)
(with-params-abc
  (myfn))

结果:

:with-params-abc
:myfn [x y z] => [1 2 3]