On Sat, Mar 07, 2009 at 06:28:29PM -0800, Vasily Chekalkin wrote: > > <bacek> std: my $c = &infix:<cmp>; say &$c(5, 42); > <p6eval> std 25744: OUTPUT«ok 00:03 48m» > <bacek> rakudo: my $c = &infix:<cmp>; say &$c(5, 42); > <p6eval> rakudo ed4cd1: OUTPUT«Statement not terminated properly at line > 1, near ":<cmp>; sa"current instr.: 'parrot;PGE;Util;die' pc 129 > (runtime/parrot/library/PGE/Util.pir:83)» > * bacek wears masak's hat
This will require some parser changes; in the meantime you can do the equivalent in PIR directly: my $c = Q:PIR { %r = find_name 'infix:cmp' }; Pm