evalable6

query

MVM_SPESH_BLOCKING=1 role R[:$a] { method !p() { ::?CLASS }; method m() { my $x; for "a".."z" -> $var { $x = self!p }; $x } }; class C1 does R[a => 1] { }; class C2 does R[a => 2] { }; C1.m for ^5; C2.m for ^5; C1.m for ^100000; say C1.m; say C2.m

result

(exit code 1) 
===SORRY!=== Error while compiling /tmp/_HHDN6A6gZ
Two terms in a row
at /tmp/_HHDN6A6gZ:1
------> MVM_SPESH_BLOCKING=1⏏ role R[:$a] { method !p() { ::?CLASS };
    expecting any of:
        infix
        infix stopper
        statement end
        statement modifier
        statement modifier loop