4 use Test::More tests => 10;
18 extends 'Role::Parent';
21 } qr/Role does not currently support 'extends'/;
81 confess "Mouse::Role exports confess";
83 } qr/^Mouse::Role exports confess/;
89 my $obj = bless {} => "Impromptu::Class";
90 ::is(blessed($obj), "Impromptu::Class");