14
Poniższy kod nie zachowuje się tak, jak bym się spodziewał.Jak utworzyć makro definiujące dwie funkcje w clojure
; given a function name, its args and body, create 2 versions:
; i.e., (double-it foo []) should create 2 functions: foo and foo*
(defmacro double-it
[fname args & body]
`(defn ~fname ~args [email protected])
`(defn ~(symbol (str fname "*")) ~args [email protected]))
Powyższy kod nie tworzy dwóch funkcji, jak można się spodziewać. Tworzy tylko ostatni.
user=> (double-it deez [a b] (str b a))
#'user/deez*
Jak uzyskać pojedyncze makro do zdefiniowania dwóch funkcji?