blib/lib/Music/Canon.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 19 | 41 | 46.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
166 | 85 | 0 | 0 | blessed $e and $e->can('pitch') |
255 | 271 | 0 | 0 | blessed $obj and $obj->can('pitch') |
270 | 41 | 226 | 4 | defined $prev_in and $pitch == $prev_in |
331 | 41 | 112 | 114 | defined $prev_in and $pitch - $prev_in < 0 |
437 | 17 | 0 | 0 | not defined $output_pitch and $self->has_modal_out |
470 | 0 | 0 | 65 | looks_like_number $n and $n =~ /^[+]?[0-9]+$/ |
510 | 0 | 0 | 6 | looks_like_number $n and $n =~ /^[+]?[0-9]+$/ |
line | l | !l | condition |
---|---|---|---|
184 | 0 | 0 | $self->pitchnum($trans) // die("pitchnum failed to parse '${trans}'\n") |
230 | 18 | 0 | $self->pitchnum($self->modal_in) // die(q[pitchnum could not convert modal_in '], $self->modal_in, "' to a pitch number\n") |
235 | 18 | 0 | $self->pitchnum($self->modal_out) // die(q[pitchnum could not convert modal_out '], $self->modal_out, "' to a pitch number\n") |
290 | 1 | 0 | $self->pitchnum($trans) // die('pitchnum failed to parse ' . $self->transpose . "\n") |
431 | 17 | 0 | $self->pitchnum($input_pitch) // die("pitchnum failed to parse $input_pitch\n") |
442 | 17 | 0 | $self->pitchnum($output_pitch) // die("pitchnum failed to parse $output_pitch\n") |
537 | 40 | 0 | &sum(@$ref) // 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
460 | 22 | 0 | 0 | defined $asc or defined $dsc |
555 | 0 | 0 | 272 | not defined $scale or ref $scale ne 'ARRAY' |