# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #111768] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=111768 >
<Tene> masak: I don't recall if I followed up... is https://gist.github.com/1955491 sufficiently golfed for a bug report? <masak> Tene: looks like. kudos. <Tene> If you remove the actions, it parses fine. <Tene> Looks like it fails with a different error in newer rakudo. <masak> r: grammar Foo { token e { 'a' <e> { make 'a' ~ $<e>.ast } | ';' { make ';' } } }; my $m = Foo.parse("aaaa;", :rule('e')); say $m.gist; say $m.ast <p6eval> rakudo fee891: OUTPUT«Method 'message' not found for invocant of class 'Any'» <masak> r: grammar Foo { token e { 'a' <e> | ';' } }; my $m = Foo.parse("aaaa;", :rule('e')); say $m.gist; say $m.ast <p6eval> rakudo fee891: OUTPUT«=> <aaaa;> e => <aaa;> e => <aa;> e => <a;> e => <;>Any()» * masak submits rakudobug
