08/04/22 18:32:46
>>376-378
Schemeでbreakを使ってる例：
URLﾘﾝｸ(www.geocities.co.jp)
URLﾘﾝｸ(www.cs.grinnell.edu)
URLﾘﾝｸ(merd.sourceforge.net)
(letrec (
(n 100)
(loop (lambda (s)
(if (not (= n 0))
(begin (set! n (- n 1))
(newline)
(write (head s))
(loop (tail s)))))))
(loop the-states))
これで動くでしょう。breakいらないよ。