15 use Moose -traits => 'NoOpTrait';
28 is(Child->meta->name, 'Child', "correct metaclass name");
30 my $child = Child->new(attr => "ibute");
31 ok($child, "constructor works");
33 is($child->attr, "ibute", "getter inherited properly");
35 $child->attr("ition");
36 is($child->attr, "ition", "setter inherited properly");