| blib/lib/Perl6/Roles.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 10 | 11 | 90.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 74 | 7 | 1 | 3 | $conflict and $conflict ne $r |
| line | l | !l | condition |
|---|---|---|---|
| 20 | 35 | 11 | $does{$r} ||= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 46 | 1 | 1 | 40 | @isa > 1 or $isa[0] ne 'Perl6::Roles' |
| 100 | 20 | 0 | 1 | $parent->does($role) or _check_isa($parent, $role) |