| blib/lib/Tangence/Class.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 7 | 14 | 50.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 151 | 4 | 155 | 296 | not @supers and $self->perlname ne "Tangence::Object" |
| line | l | !l | condition |
|---|---|---|---|
| 95 | 12 | 0 | delete $params{'dim'} || 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 43 | 0 | 38 | 0 | $CLASSES{$name} //= $class->new(%args) |
| 136 | 19 | 0 | 0 | $CLASSES{$name} // croak("Unknown Tangence::Class for '${name}'") |
| 142 | 335 | 0 | 0 | $CLASSES{$name} // croak("Unknown Tangence::Class for '${perlname}'") |