Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

Merge pull request #4 from FROGGS/master

move $( ~ ) into variable token
  • Loading branch information...
commit 7551b8f9d52635372f708679d7475678a84c6d8b 2 parents 7deb9d7 + da06458
Larry Wall authored February 05, 2013

Showing 1 changed file with 1 addition and 4 deletions. Show diff stats Hide diff stats

  1. 5  STD.pm6
5  STD.pm6
@@ -2472,7 +2472,7 @@ grammar P6 is STD {
2472 2472
             | <sigil> <index=.decint> [<?{ $*IN_DECL }> <.panic: "Cannot declare a numeric variable">]?
2473 2473
             # Note: $() can also parse as contextualizer in an expression; should have same effect
2474 2474
             | <sigil> <?before '<'> <postcircumfix> [<?{ $*IN_DECL }> <.panic: "Cannot declare a match variable">]?
2475  
-            | <sigil> <?before '('> <postcircumfix> [<?{ $*IN_DECL }> <.panic: "Cannot declare a contextualizer">]?
  2475
+            | :dba('contextualizer') <sigil> '(' ~ ')' <semilist> { $*LEFTSIGIL ||= $<sigil>.Str } <O(|%term)> [<?{ $*IN_DECL }> <.panic: "Cannot declare a contextualizer">]?
2476 2476
             | <sigil> <?{ $*IN_DECL }>
2477 2477
             | <?> {
2478 2478
                 if $*QSIGIL {
@@ -3190,9 +3190,6 @@ grammar P6 is STD {
3190 3190
         <O(|%term)>
3191 3191
     }
3192 3192
 
3193  
-    token circumfix:sigil
3194  
-        { :dba('contextualizer') <sigil> '(' ~ ')' <semilist> { $*LEFTSIGIL ||= $<sigil>.Str } <O(|%term)> }
3195  
-
3196 3193
     token circumfix:sym<( )>
3197 3194
         { :dba('parenthesized expression') '(' ~ ')' <semilist> <O(|%term)> }
3198 3195
 

0 notes on commit 7551b8f

Please sign in to comment.
Something went wrong with that request. Please try again.