4 use Test::More tests => 2;
7 my ($parameters, %args);
11 use MooseX::Role::Parameterized;
20 ($parameters, %args) = @_;
24 ok(MyRole->meta->has_role_generator, "MyRole has a role generator");
26 my $role = MyRole->meta->generate_role(
30 isa_ok($role, 'Moose::Meta::Role', 'generate_role created a role');
32 is($parameters->length, 7);