SICP 読み (365) 5.5 翻訳系 - yamanetoshi's diary

と、ゆー事で再開。とりあえず apply と list と map は primitive-procedures に盛り込んであります。 問題 5.50 一応前回コンパイルしたソレは取ってあるんでリストで持っておく事に。と思ったら駄目だ。面倒だけどケツにスペース付けた出力を無理矢理リストに。 (add-load-path ".") (load "load-eceval-compiler") (load "ch5-compiler") (define true #t) (define false #f) (let f ((l (statements (compile '(begin (define apply-in-underlying-scheme apply) ;; 中略 ))) (cond ((not (null? l)) (display (car l)) (display " ")

[natsutan]

今月も応援中