[perl #56228] Perl6 gramar bug

[via RT]

# New Ticket Created by  luben karavelov 
# Please include the string:  [perl #56228]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=56228 >


There is some parse error for this simpe case:
==code
use v6;

sub ok ($num){
    $num;
}

for 1..5000 {
    ok($_);
}
==cut

The error message is : 

Statement not terminated properly at line 7, near "{ \n    ok("
current instr.: 'parrot;PGE::Util;die' pc 120 
(runtime/parrot/library/PGE/Util.pir:82)
called from Sub 'parrot;Perl6::Grammar;eat_terminator' pc 20925 
(src/gen_grammar.pir:2814)
called from Sub 'parrot;Perl6::Grammar;statementlist' pc 19938 
(src/gen_grammar.pir:2451)
called from Sub 'parrot;Perl6::Grammar;statement_block' pc 17795 
(src/gen_grammar.pir:1651)
called from Sub 'parrot;Perl6::Grammar;TOP' pc 14067 (src/gen_grammar.pir:225)


if we add some statement before the "for" it compiles. For example this is OK:

==code
use v6;

sub ok ($num){
    $num;
}
;
for 1..5000 {
    ok($_);
}
==cut

Best regards
luben