Parrot 1.6.0 がリリースされてダイナミックスコープが使えるようになった♪
.sub foo .local pmc var var = box "foo value" .lex 'var', var say var bar() say var.end.sub bar .local pmc var var = find_dynamic_lex 'var' say var $P1 = box "new value" store_dynamic_lex 'var', $P1.end
0 件のコメント:
コメントを投稿