STD tracking: handles trait verb followed by noun, not EXPR.

rakudo · May 5, 2009 · 53f7059 · 53f7059
1 parent c77bd19
commit 53f7059
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/parser/actions.pm b/src/parser/actions.pm
@@ -879,7 +879,7 @@ method trait_auxiliary($/) {
 method trait_verb($/) {
     my $sym := ~$<sym>;
     my $value;
-    if $sym eq 'handles' { $value := $<EXPR>.ast; }
+    if $sym eq 'handles' { $value := $<noun>.ast; }
     else { $value := $<typename>.ast; }
     make PAST::Op.new( :name('infix:,'), 'trait_verb:' ~ $sym, $value );
 }

diff --git a/src/parser/grammar.pg b/src/parser/grammar.pg
@@ -455,7 +455,7 @@ rule trait_auxiliary {
 rule trait_verb {
     [
     | $<sym>=[of|returns] <typename>
-    | $<sym>=[handles] <EXPR>
+    | $<sym>=[handles] <noun>
     ]
     {*}
 }