# setq2 is a setq which assigns a val to two symbols in one go

arc> (mac setq2 (v1 v2 x) `(do (= ,v1 ,x) (= ,v2 ,x)))
#3(tagged mac #<procedure: setq2>)
arc> (setq2 a b 3)
3
arc> a
3
arc> b
3