Gaucheでマクロの練習
うーん、取りあえず作ってみた。
(define-syntax mymacro (syntax-rules () ((mymacro a1) (begin (print "last one.") (print a1))) ((mymacro a1 a2 ...) (begin (print a1) (mymacro a2 ...))))) (mymacro 1) (mymacro 1 2 3)
実行結果は以下。
last one. 1 1 2 last one. 3