# New Ticket Created by  Wenzel Peppmeyer 
# Please include the string:  [perl #127414]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=127414 >


my $a is default(Failure.new); say $a;

# OUTPUT«===SORRY!===␤Failed»

# The backtrace is actually there.

try { my $a is default(Failure.new); say $a; CATCH { default { say 
.backtrace.Str } } }

# OUTPUT«  in any  at src/Perl6/World.nqp line 2004␤  in any [...]

# expected, same as:

my $a = Failure.new; say $a;

# OUTPUT«Failed␤␤Actually thrown at:␤  in block <unit> at /tmp/DBSBIIaXxc line 
1␤»

Reply via email to