# New Ticket Created by Moritz Lenz
# Please include the string: [perl #57584]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=57584 >
Since the pdd25cx merge you can't test for the truthness of an exception in
$!
r29995:
$ ../../parrot perl6.pbc -e 'try { die 1; }; say $!'
1
$ ../../parrot perl6.pbc -e 'try { die 1; }; say ?$!'
get_bool() not implemented in class 'Exception'
current instr.: 'prefix:?' pc 14051 (src/gen_builtins.pir:9009)
$ ../../parrot perl6.pbc -e 'try { die 1; }; say +$!'
get_number() not implemented in class 'Exception'
...
This error makes t/spec/S12-class/attributes.t fail
--
Moritz Lenz
http://moritz.faui2k3.org/ | http://perl-6.de/