(wat-aro)

無職から有職者にランクアップしました

2016-01-10から1日間の記事一覧

SICP 問題 4.34

遅延対とリストを正当に印字できるようにする. consへのタグづけがどうしてもうまくいかなくてここを参考にしました. SICP Exercise 4.34 | Weiqun Zhang's Blog 前回からの変更箇所のみ (define (eval exp env) (cond ((self-evaluating? exp) exp) ((var…

SICP 問題 4.33

遅延リストの実装に合わせて,quoteを遅延リストに対応させる. (car '(a b c))で正しくaが表示できるようにする. make-lambdaの(make-quote (car obj))のところ,始め(car obj)だけにしていたら, 数字ではうまくいくのに'(a b c)だとunbound variable: a…

SICP 問題 4.32

遅延度の高い遅延リストではcar部も遅延されているので未定義の変数を使って構成するできる. ;;; M-Eval input: (define my-stream (cons x y)) ;;; M-Eval value: ok ;;; M-Eval input: my-stream ;;; M-Eval value: (compound-procedure (m) ((m x y)) <procedure-env>) </procedure-env>…