[CM] s7: segfault on infinitely recursive macro

[Elijah Stone]

(define-macro (f) (f))
(f) ;segfault
(letrec ((f (macro () (f)))) (f)) ;ditto

Same thing happens for define-expansion, but not for a regular function.