setq
(scan* 'foo) を動かなくなったのを修正。
型宣言付けただけなのに・・・