Override FAILGOAL in HLL::Grammar and get it to delegate to panic, so…

… we get a line number.
Raku · Jun 9, 2012 · ea9ceea · ea9ceea
1 parent 7176d14
commit ea9ceea
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/src/HLL/Grammar.pm b/src/HLL/Grammar.pm
@@ -321,6 +321,14 @@ of the match.
         @args.push('"');
         nqp::die(nqp::join('', @args))
     }
+
+    method FAILGOAL($goal) {
+        my $sub := Q:PIR {
+            %r = getinterp
+            %r = %r['sub';1]
+        };
+        self.panic("Unable to parse ", ~$sub, ", couldn't find final $goal");
+    }
 
 
 =begin