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


m: use nqp; class Foo is Int { method new ($v) { 
nqp::p6bindattrinvres(self.bless, Int, q|$!value|, 
nqp::getattr(nqp::decont($v), Int, q|$!value|)) } };  my Foo $x .= new: 42; say 
$x; say $x.WHAT;
rakudo-moar bb4579: OUTPUT: «(signal SEGV)»

Reply via email to