handle degenerate case of empty ${}

rakudo · Aug 22, 2015 · 769c5b3 · 769c5b3
1 parent 7d85cf9
commit 769c5b3
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Perl6/Grammar.nqp b/src/Perl6/Grammar.nqp
@@ -1917,6 +1917,7 @@ grammar Perl6::Grammar is HLL::Grammar does STD {
         <!{ $*IN_DECL }>
         <!{ $*QSIGIL }>
         <!{ $<text> ~~ / '=>' || ':'<:alpha> || '|%' / }>
+        <!{ $<text> ~~ / ^ \s* $ / }>
         <?{
             my $sigil := $<sigil>.Str;
             my $text := $<text>.Str;