Restore backtrace handling.

rakudo · Jun 17, 2010 · cca4a84 · cca4a84
1 parent e3eb608
commit cca4a84
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/src/Perl6/Compiler.pir b/src/Perl6/Compiler.pir
@@ -191,12 +191,12 @@ Perl6::Compiler - Perl6 compiler
     .return (module)
 .end
 
-#.sub 'backtrace' :method
-#    .param pmc exception
-#    $P0 = get_hll_global ['Perl6'], 'BacktracePrinter'
-#    $S0 = $P0.'backtrace_for'(exception)
-#    .return ($S0)
-#.end
+.sub 'backtrace' :method
+    .param pmc exception
+    $P0 = get_hll_global ['Perl6'], 'BacktracePrinter'
+    $S0 = $P0.'backtrace_for'(exception)
+    .return ($S0)
+.end
 
 .sub 'main' :main
     .param pmc args_str