Micro-optimization to desigilname.

rakudo · May 26, 2012 · 1b72f38 · 1b72f38
1 parent 5bec1f1
commit 1b72f38
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -1157,7 +1157,7 @@ grammar Perl6::Grammar is HLL::Grammar {
 
     token desigilname {
         [
-        | <?before '$' >
+        | <?[$]>
             [ <?{ $*IN_DECL }> <.typed_panic: 'X::Syntax::Variable::IndirectDeclaration'> ]?
             <variable>
         | <?before <[\@\%\&]> <sigil>* \w > <.panic: "Invalid hard reference syntax">