2008-11-01から1ヶ月間の記事一覧

Grassインタプリタ

id:youzさんが、CyanでGrassインタプリタを書いてくださいました。Grass interpreter for Cyan language - * *scrap*実は、私自身はCyanでこのようなちゃんとしたプログラムを書いたことがないため、今、非常に感動しています。私がこんなことを言える立場で…

L-99をCyanで その5

L-99: Ninety-Nine Lisp Problemsより。 P05 # named let def(List.reverse1)^: let(loop)^(&opt lst = self, acc): if(lst.null?()): acc else: loop(lst.cdr(), [lst.car() | acc]) # optional argument def(List.reverse2)^(&opt acc): if(.null?()): acc…

ゆの in Cyan

いまさらですが。 X = _ = 'X X.(/) = method^(_): X X.(<) = macro method^(_): print("ひだまりスケッチ×365 "); say(_); X X / _ / X < 来週も見てくださいね!

L-99をCyanで その4

L-99: Ninety-Nine Lisp Problemsより。 P04 def(List.number_of_elements1)^: if(.null?()): 0 else: 1 + .cdr().number_of_elements1() # foldlを使って def(List.number_of_elements2)^: .foldl(0)^(n, _): n + 1