メモ

  • 地味なテストを追加中。
  • クロージャの別の例。普通に動く。嬉しい。
(run-program '(let ((make-adder (lambda (n)
                                  (lambda (x) (+ n x)))))
                (let ((add1 (funcall make-adder 1))
                      (add5 (funcall make-adder 5)))
                  (- (funcall add1 3) (funcall add5 2)))))
"-3\n"
  • が、クロージャの例として有名な counter はまだ動かせない。そもそも set! がまだないので。