以下の内容はhttps://rokujyouhitoma.hatenablog.com/entry/2013/02/26/223924より取得しました。


書籍"Land of Lisp"を買った話と早速2章2.4

表紙があれだと評判のLand of Lispを購入しました。Common Lispでサンプルをまんま試すのはCommonLisp先生に気が引けるので、Iolanguageで挑戦しようと思います(後半のマクロどう実現しよう...)

いけるところまでIolanguageで前進!

2章2.4

small := 1
big := 100
ash := method(number, shift, if(shift >= 0, number << shift, number >> - shift))
guess_my_number := method(ash (small + big, - 1))
smaller := method(big = guess_my_number - 1; guess_my_number)
bigger := method(small = guess_my_number - 1; guess_my_number)
start-over関数の定義
start_over = method(small = 1; big = 100; guess_my_number)

一言

翻訳者のshiroさんがサンプルをschemeに書き直してました。




以上の内容はhttps://rokujyouhitoma.hatenablog.com/entry/2013/02/26/223924より取得しました。
このページはhttp://font.textar.tv/のウェブフォントを使用してます

不具合報告/要望等はこちらへお願いします。
モバイルやる夫Viewer Ver0.14