implement NYI messages for six different phasers

rakudo · Jul 19, 2010 · 2f4733e · 2f4733e
1 parent cf5f19a
commit 2f4733e
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -478,6 +478,18 @@ token statement_prefix:sym<BEGIN> { <sym> <blorst> }
 token statement_prefix:sym<CHECK> { <sym> <blorst> }
 token statement_prefix:sym<INIT>  { <sym> <blorst> }
 token statement_prefix:sym<END>   { <sym> <blorst> }
+token statement_prefix:sym<FIRST> { <sym> <blorst>
+        <.panic("FIRST phaser not yet implemented")> }
+token statement_prefix:sym<LAST>  { <sym> <blorst>
+        <.panic("LAST phaser not yet implemented")> }
+token statement_prefix:sym<ENTER> { <sym> <blorst>
+        <.panic("ENTER phaser not yet implemented")> }
+token statement_prefix:sym<LEAVE> { <sym> <blorst>
+        <.panic("LEAVE phaser not yet implemented")> }
+token statement_prefix:sym<PRE> { <sym> <blorst>
+        <.panic("PRE phaser not yet implemented")> }
+token statement_prefix:sym<POST> { <sym> <blorst>
+        <.panic("POST phaser not yet implemented")> }
 token statement_prefix:sym<sink>  { <sym> <blorst> }
 token statement_prefix:sym<try>   { <sym> <blorst> }
 token statement_prefix:sym<gather>{ <sym> <blorst> }