From @masak

<cog> rn​: grammar G { token TOP() { <lit('a')> }; token lit($s) { $s
} }; say G.parse​: 'a'
<p6eval> niecza v24-18-gaf64300​: OUTPUT«#<match from(0) to(1) text(a)
pos([].list) named({"lit" => #<match from(0) to(1) text(a)
pos([].list) named({}.hash)>}.hash)>␤»
<p6eval> ..rakudo b3fc32​: OUTPUT«｢a｣␤ lit => ｢a｣␤␤»
<cog> rn​: grammar G { token TOP() { <lit 'a'> }; token lit($s) { $s
} }; say G.parse​: 'a'
<p6eval> niecza v24-18-gaf64300​: OUTPUT«#<match from(0) to(1) text(a)
pos([].list) named({"lit" => #<match from(0) to(1) text(a)
pos([].list) named({}.hash)>}.hash)>␤»
<p6eval> ..rakudo b3fc32​: OUTPUT«Unmarshallable foreign language value
passed for parameter '$s' [...]
<cog> so that's a rakudo bug
* masak submits rakudobug

From @usev6

This runs fine on Moar and JVM, but still fails on Parrot​:

$ perl6-m -e 'grammar G { token TOP() { <lit "a"> }; token lit($s) { $s } }; say ~G.parse​: "a";'
a

$ perl6-j -e 'grammar G { token TOP() { <lit "a"> }; token lit($s) { $s } }; say ~G.parse​: "a";'
a

$ perl6-p -e 'grammar G { token TOP() { <lit "a"> }; token lit($s) { $s } }; say ~G.parse​: "a";'
Unmarshallable foreign language value passed for parameter '$s'
  in regex lit at -e​:1
  in regex TOP at -e​:1
  in method parse at gen/parrot/CORE.setting​:13987
  in block <unit> at -e​:1

I added a test (fudged 'todo' for parrot) to S05-grammar/parse_and_parsefile.t with the following commit​: Raku/roast@f2f0ea1719

@usev6 - Status changed from 'new' to 'open'

From @usev6

Probably related to ticket https://rt-archive.perl.org/perl6/Ticket/Display.html?id=121833

From @usev6

Since support for Parrot was suspended with Rakudo Star Release 2015.02, I'm closing this "parrot only" ticket.

I added the ticket to a list of closed ticket living in the Mu repository​: https://github.com/perl6/mu/blob/master/misc/rt.perl.org/tickets_closed_parrot_only.txt.

In case support for Parrot will be restored in some future release the listed tickets can be checked and re-opened as appropriate.

@usev6 - Status changed from 'open' to 'rejected'