18 has foo => (is => 'ro');
26 { our $TODO; local $TODO = "role accessors don't satisfy other role requires";
27 ::is( ::exception { with 'Foo' }, undef, 'requirements are satisfied properly' );
37 has bar => (is => 'ro');
46 has baz => (is => 'ro');
53 { our $TODO; local $TODO = "role accessors don't satisfy other role requires";
54 ::is( ::exception { with qw(Bar Baz) }, undef, 'requirements are satisfied properly' );