| lib/AutoCode/ModuleFactory.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 14 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 0 | 5 | unless defined $schema |
| 30 | 18 | 0 | unless defined $isa |
| 38 | 10 | 8 | if (@isa) |
| 48 | 14 | 4 | unless grep /^$isa$/, @{"${vp}::ISA";} |
| 94 | 0 | 2 | unless defined $friend |
| 95 | 1 | 1 | unless exists $$self{$slot} |
| 100 | 1 | 1 | unless (grep {'AutoCode::Compare'->equal($_, "$self");} keys %hash) |