nihongo.pmy

(12/05 追記、コードも少し加筆)
メタプログラミングの会でk.inabaさんが発表されたプログラミング言語Polemyで、資料中の例にあったnihongoレイヤを作ってみました。
http://www.kmonos.net/repos/polemy/


とりえあず動いた。

@@nihongo = fun(x)
{
  if @value(x) == 1 then
    "いち"
  else if @value(x) == 2 then
    "に"
  else
    "まちがい"
}
@nihongo + = fun(x, y)
{
  @value(@value(@nihongo(x) ~ "たす") ~ @nihongo(y))
}
@value( 1 + 2 )
@nihongo( 1 + 2 )
exit

実行結果

Welcome to Polemy 0.1.0
>> >> >> >> >> >> >> (function:12bffe0:12b4cc0)
>> >> >> >> (function:12c5e80:12b4cc0)
>> 3
>> いちたすに
>>