set!
(define (eval-set! exp env) ; exp = (set! var body)
  (let* ((var (cadr exp))
         (body (caddr exp))
         (value (base-eval body env)))
    (set!-value! var value env))) ; env の var を value に書き換える。

一覧 前へ 次へ