2009-07-01から1日間の記事一覧
4.51 ;;;; exercise4.51 ;;parmanent-set! (define (permanent-assignment? exp) (tagged-list? exp 'permanent-set!)) (define (analyze-permanent-assignment exp) (let ((var (assignment-variable exp)) (vproc (analyze (assignment-value exp)))) (lam…