Common Lispのloopマクロは大変気持ち悪いので好きになりそうです。 一度じゃ覚えられないだろうからメモ。

特に意味はありません。 むしゃくしゃしてやった。 (defmacro var (name dummy= v) (when (not (eq '= dummy=)) (error "!!!")) `(setf ,name ,v) ) (var a = 256) (var b = (expt 2 8))