Fix error reporting.

rakudo · Oct 27, 2012 · f86d5a6 · f86d5a6
1 parent 289f960
commit f86d5a6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -97,7 +97,7 @@ role STD {
         <babble($l)>
         { my $B := $<babble><B>.ast; $lang := $B[0]; $start := $B[1]; $stop := $B[2]; }
 
-        $start <nibble($lang)> [ $stop || <.panic: "Couldn't find terminator $stop"> ]
+        $start <nibble($lang)> [ $stop || { $/.CURSOR.panic("Couldn't find terminator $stop") } ]
 
         # Figure out this when we add heredocs...
         #{ $lang<_herelang> and $¢.queue_heredoc($<nibble><nibbles>[0]<TEXT>, $lang<_herelang>) }