#scheme-jp(wide系 IRCチャンネル)でのネタふりで、ファイルの読み込みを学んでみました。 Schemeは port を介して入出力するようです。 面白いのが read の戻り値がS式だということです。(これはひらっちさんから教えてもらいました。) なのでファイルの中身がS式だといろいろと面白いことが出来そうなので作ってみました。 まず data.scm を用意します。 (list 1 2 3 4 5 6 7 8 9) (list 1 1 1 1 1 1 1 1 1) 次はプログラム本体です。 data.scmを読み込んで、read した S式のlistの要素を sum して表示します。 (define (sum l) (if (null? l) 0 (+ (car l) (sum (cdr l))))) (call-with-input-file "data.scm" (l
![関数型言語の勉強にSICPを読もう - (35) 3章 - 小休止 外の世界とつながろうファイルを読む - higepon blog](https://cdn-ak-scissors.b.st-hatena.com/image/square/988f90172ef53b77eb2425d7ee9ddebe67b5aa2d/height=288;version=1;width=512/http%3A%2F%2Fimages-jp.amazon.com%2Fimages%2FP%2F489471163X.09.MZZZZZZZ.jpg)