gistfile1.none

pmichaud@kiwi:~/nom$ cat x
my class Cursor does NQPCursorRole { }

my $cursor := Cursor."!cursor_init"('abc');
my $regex := anon regex { abc };
my $c = $cursor.$regex();
say $c.WHAT;
say $c.from;

pmichaud@kiwi:~/nom$ ./perl6 x
Cursor()
Can not get non-existant attribute '$!from' on class 'Cursor'
current instr.: 'nqp;NQPCursorRole;from' pc 24516 (src/stage2/QRegex.pir:7526) (src/stage2/QRegex.nqp:460)
called from Sub '_block1002' pc 201 ((file unknown):114) (x:7)
called from Sub '_block1000' pc 14 ((file unknown):21) (x:1)
called from Sub 'nqp;HLL;Compiler;_block1782' pc 34160 (src/stage2/gen/NQPHLL.pir:10782) (src/stage2/gen/NQPHLL.pm:1278)
called from Sub 'nqp;HLL;Compiler;eval' pc 34018 (src/stage2/gen/NQPHLL.pir:0) (src/stage2/gen/NQPHLL.pm:1271)
called from Sub 'nqp;HLL;Compiler;evalfiles' pc 36397 (src/stage2/gen/NQPHLL.pir:11653) (src/stage2/gen/NQPHLL.pm:1437)
called from Sub 'nqp;HLL;Compiler;_block1867' pc 35317 (src/stage2/gen/NQPHLL.pir:0) (src/stage2/gen/NQPHLL.pm:1381)
called from Sub 'nqp;HLL;Compiler;command_line' pc 35122 (src/stage2/gen/NQPHLL.pir:11160) (src/stage2/gen/NQPHLL.pm:1376)
called from Sub 'MAIN' pc 638 (src/gen/perl6.pir:231) (src/main.nqp src/gen/main-version.nqp:26)
called from Sub '_block1000' pc 100 (src/gen/perl6.pir:68) (src/main.nqp src/gen/main-version.nqp:1)
pmichaud@kiwi:~/nom$