[perl #62704] Rakudo stores a grammar in $/ after .parse

[Carl Mäsak via RT]

On Sat Jan 24 08:42:32 2009, masak wrote:
> r35957:
> 
> $ perl6 -e 'grammar G { regex TOP { ^ } }; G.parse(""); say $/.WHAT;
> say $/ ~~ Match'
> G
> 0
> 
> What I usually expect in $/ is a Match object that I can query for
> matched tokens. I don't know how to do that with a G object; neither
> does Rakudo.

Turns out this isn't .parse-specific:

$ perl6 -e 'grammar G { regex TOP { ^ <token>* $ }; regex token { <foo>
| <bar> }; regex foo { foo }; regex bar { bar } }; "foobar" ~~
/<G::TOP>/ or die "AOUCH"; say .WHAT for $<G::TOP><token>'
G
G

I'd like for these to be Match objects, as well.