Be  less eager to set macro-form in macex1.
See macex docs for info on on-binding."
[x &opt on-binding]
- (setdyn :macro-form x)
-
(when on-binding
(when (symbol? x)
(break (on-binding x))))
(def m? (entry :macro))
(cond
s (s t)
- m? (m ;(tuple/slice t 1))
+ m? (do (setdyn :macro-form t) (m ;(tuple/slice t 1)))
(tuple/slice (map recur t))))
(def ret
