# New Ticket Created by "Slavik Goltser"
# Please include the string: [perl #60908]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=60908 >
if there is a grammar definition followed by an if statement, even if there
are newlines separating the two. the semi colon is required after the
grammar definition, otherwise rakudo throws an error that the statement is
not properly terminated.
grammar A {
token TOP { \w+ }
}
if ("blah" ~~ A) {
say $/;
}
[EMAIL PROTECTED]:~/code/perl6$ perl6 test.p6
Statement not terminated properly at line 5, near "{\n say $/;"
current instr.: 'parrot;PGE;Util;die' pc 129
(runtime/parrot/library/PGE/Util.pir:83)
called from Sub 'parrot;Perl6;Grammar;eat_terminator' pc 26362
(src/gen_grammar.pir:3387)
called from Sub 'parrot;Perl6;Grammar;statementlist' pc 25018
(src/gen_grammar.pir:2854)
called from Sub 'parrot;Perl6;Grammar;statement_block' pc 22454
(src/gen_grammar.pir:1847)
called from Sub 'parrot;Perl6;Grammar;TOP' pc 18348
(src/gen_grammar.pir:229)
called from Sub 'parrot;PCT;HLLCompiler;parse' pc 640
(src/PCT/HLLCompiler.pir:390)
called from Sub 'parrot;PCT;HLLCompiler;compile' pc 434
(src/PCT/HLLCompiler.pir:303)
called from Sub 'parrot;PCT;HLLCompiler;eval' pc 868
(src/PCT/HLLCompiler.pir:502)
called from Sub 'parrot;PCT;HLLCompiler;evalfiles' pc 1233
(src/PCT/HLLCompiler.pir:676)
called from Sub 'parrot;PCT;HLLCompiler;command_line' pc 1412
(src/PCT/HLLCompiler.pir:765)
called from Sub 'parrot;Perl6;Compiler;main' pc 16386 (perl6.pir:168)
[EMAIL PROTECTED]:~/code/perl6$
