add support and a test for ...

cotto · Jun 26, 2010 · 56d4bd0 · 56d4bd0
1 parent caa5ba5
commit 56d4bd0
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 0 deletions.
diff --git a/src/NQP/Actions.pm b/src/NQP/Actions.pm
@@ -311,6 +311,10 @@ method term:sym<regex_declarator>($/)   { make $<regex_declarator>.ast; }
 method term:sym<statement_prefix>($/)   { make $<statement_prefix>.ast; }
 method term:sym<lambda>($/)             { make $<pblock>.ast; }
 
+method term:sym<...>($/) {
+    make PAST::Op.new( :pirop('die'), 'Stub code executed', :node($/) );
+}
+
 method fatarrow($/) {
     my $past := $<val>.ast;
     $past.named( $<key>.Str );

diff --git a/src/NQP/Grammar.pm b/src/NQP/Grammar.pm
@@ -232,6 +232,7 @@ token term:sym<multi_declarator>   { <?before 'multi'|'proto'|'only'> <multi_dec
 token term:sym<regex_declarator>   { <regex_declarator> }
 token term:sym<statement_prefix>   { <statement_prefix> }
 token term:sym<lambda>             { <?lambda> <pblock> }
+token term:sym<...>                { <sym> <args>? }
 
 token fatarrow {
     <key=.identifier> \h* '=>' <.ws> <val=.EXPR('i=')>

diff --git a/t/nqp/52-yadda.t b/t/nqp/52-yadda.t
@@ -0,0 +1,7 @@
+# nqp
+# check that ... works
+
+say("1..1");
+
+for <> { ... }
+ok(1, 'yadda-yadda-yadda parses');