experiment a bit with backtrace printing

inpsired by a discussion with masak++, [Coke]++ and a few others
rakudo · Feb 8, 2012 · ef61a32 · ef61a32
1 parent 15dc125
commit ef61a32
Showing 1 changed file with 2 additions and 7 deletions.
diff --git a/src/core/Exception.pm b/src/core/Exception.pm
@@ -10,7 +10,7 @@ my class Exception {
         self.?message.Str // 'Something went wrong'
     }
     multi method gist(Exception:D:) {
-        self.?message ~ "\n" ~ $.backtrace;
+        self.?message ~ "\n" ~ $.backtrace.concise;
     }
 
     method throw() is hidden_from_backtrace {
@@ -80,15 +80,10 @@ do {
             my $e := EXCEPTION($ex);
             my Mu $err := pir::getstderr__P();
 
-            if X::Comp.ACCEPTS($e) {
+            if X::Comp.ACCEPTS($e) || is_runtime($ex.backtrace) {
                 $err.print: $e.gist;
                 $err.print: "\n";
             }
-            elsif is_runtime($ex.backtrace) {
-                $err.print: $e;
-                $err.print: "\n";
-                $err.print: Backtrace.new($e);
-            }
             else {
                 $err.print: "===SORRY!===\n";
                 $err.print: $ex;