higepon https://blog.hatena.ne.jp/higepon/ higepon blog https://higepon.hatenablog.com/ scheme On Lispで、マッチングを勉強しようと思ったら acond2 にあたった。 ので勉強しますよ。 aif まずは、間違いバージョンから。 (define-syntax aif (syntax-rules () ((_ a b c ...) (let ((it a)) (if it b c ...))))) (aif 3 (display it) (display "not 3")) Gauche で実行すると「unbound variable: it」と怒られます。 Ruiさんに教えていただいて気づいたのですが、hygienicなマクロなので当然ですね。 なので正解は以下の通り。 (defi… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fhigepon.hatenablog.com%2Fentry%2F20070323%2F1174659350" title=" アナフォリックマクロ1 - On Lisp - higepon blog" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-03-23 23:15:50 rich https://higepon.hatenablog.com/entry/20070323/1174659350 1.0 100%