2008-02-27 マクロ Scheme よくわからなくて放置してたので,練習してみる. まずはfor. (define-syntax for (syntax-rules () ((_ (i start end) b1 ...) (let1 k end (let loop ((i start)) (if (< i k) (begin b1 ... (loop (+ i 1))))))))) (for (i 3 8) (print i)) とりあえず動いた.