Clojure的模板可變參數宏

Question

我嘗試下面的代碼（瞭解宏）：

(require '[clojure.template :as temp]) 

(defn fna [x] (println "a" x) x) 
(defn fnb [x] (println "b" x) x) 

(temp/apply-template '[& fns] 
        '(fn [payload] (-> payload fns)) 
        '[fna fnb]) 
;; returns (fn [payload] (-> payload fnb)) 

我被輸出驚訝，因爲我期待：

(fn [payload] (-> payload fna fnb)) 

爲什麼產生這個輸出，以及實現上述目標的方法是什麼？我在文檔中特別提到：

argv是一個參數列表，如在defn中。

注：它可以寫成像這樣，但我想了解如何使用模板：

(defmacro wrap-fn-> [& fns] 
    `(fn [~'x#] 
    (-> ~'x 
     ~@fns))) 

Answer 1

在這裏的例子

• https://clojure.github.io/clojure/clojure.template-api.html
• https://clojuredocs.org/clojure.template/apply-template

不顯示使用「休息參數」，如[& fns]。我認爲那是你出錯的地方。試試這個：

(println 
    (temp/apply-template 
    '[x y] 
    '(fn [payload] (-> payload x y)) 
    '[fna fnb])) 

=> (fn [payload] (-> payload fna fnb)) 

順便說一句，我從來沒有見過clojure.template在使用之前 - 它看起來像一個非常專業的工具。