add exception for token blorst

This will make "PRE ;" not die with a dubious error message.
rakudo · Apr 10, 2013 · 460c2ad · 460c2ad
1 parent 7776447
commit 460c2ad
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -1298,7 +1298,7 @@ grammar Perl6::Grammar is HLL::Grammar does STD {
     }
 
     token blorst {
-        \s <.ws> [ <?[{]> <block> | <statement> ]
+        \s <.ws> [ <?[{]> <block> | <![;]> <statement> || <.missing: 'block or statement'> ]
     }
 
     ## Statement modifiers