2018-03-19 22:40:10 +01:00
|
|
|
(defmacro thread-set-ab []
|
|
|
|
|
(defn f [&rest args] (.join "" (+ (, "a") args)))
|
|
|
|
|
(setv variable (HySymbol (-> "b" (f))))
|
|
|
|
|
`(setv ~variable 2))
|
|
|
|
|
|
|
|
|
|
(defmacro threadtail-set-cd []
|
|
|
|
|
(defn f [&rest args] (.join "" (+ (, "c") args)))
|
|
|
|
|
(setv variable (HySymbol (->> "d" (f))))
|
|
|
|
|
`(setv ~variable 5))
|
2018-07-26 00:13:05 +02:00
|
|
|
|
|
|
|
|
(defmacro test-macro []
|
|
|
|
|
'(setv blah 1))
|
