class_metaroles => { instance => ['MooseX::SomeAwesomeDBFields'] },
);
- ok ! exception {
+ is( exception {
has lazy_attr => (
is => 'ro',
isa => 'Bool',
lazy => 1,
default => sub {0},
);
- },
- "Adding lazy accessor does not use inline_slot_access";
+ }, undef, "Adding lazy accessor does not use inline_slot_access" );
- ok ! exception {
+ is( exception {
has rw_attr => (
is => 'rw',
);
- },
- "Adding read-write accessor does not use inline_slot_access";
+ }, undef, "Adding read-write accessor does not use inline_slot_access" );
- ok ! exception { __PACKAGE__->meta->make_immutable; },
- "Inling constructor does not use inline_slot_access";
+ is( exception { __PACKAGE__->meta->make_immutable; }, undef, "Inling constructor does not use inline_slot_access" );
done_testing;
}