[jfriends:00505] 第１７回読書会ソースコード

[Suzuki Hidenao <suzuki@xxxxxxxxxxxxxxxxxxxxxxxxxx>]

こんにちは。鈴木＠二村研です。

前回使用した評価器のソースコードを
あげておきました。

http://www.futamura.info.waseda.ac.jp/~suzuki/common.scm
http://www.futamura.info.waseda.ac.jp/~suzuki/eval.scm

eval.scm中に

(load "/usr/local/libdata/slib/cltime.scm")

なるものがありますが、

原子関数定義の

(define primitive-procedures
  (list (list 'car car)
        (list 'cdr cdr)
	.
	.
	.
        (list 'time get-universal-time)

この time の部分をコメントアウトすれば大丈夫です。

ただ、本家本元のページにもソースコードがありますので、

http://mitpress.mit.edu/sicp/

こちらも参考にしてください。

問題の部分と、評価器本体のプログラムを一緒に１ファイルに入れていますので、
大変見にくいとおもいますが御容赦下さい。

鈴木秀直

------------------------------------------------------------------------
　　　　　　　　　★　こっちの流行語大賞はどんなの？　　　　　　　　　　
  http://www.infoseek.co.jp/Keyword?pg=nranking_top_if.html&svx=971122