2018-03-19 17:40:10 -04: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-25 17:13:05 -05:00
|
|
|
|
|
|
|
(defmacro test-macro []
|
|
|
|
'(setv blah 1))
|