4 use Test::More tests => 6;
10 has lazy_weak_with_default => (
18 has weak_with_default => (
27 my $o = MyClass->new();
28 is($o->weak_with_default, undef);
29 is($o->lazy_weak_with_default, undef);
30 is($o->lazy_weak_with_default, undef);
32 MyClass->meta->make_immutable();
35 is($o->weak_with_default, undef);
36 is($o->lazy_weak_with_default, undef);
37 is($o->lazy_weak_with_default, undef);