Condition Coverage

blib/lib/Music/RhythmSet/Voice.pm
Criterion Covered Total %
condition 101 101 100.0


and 3 conditions

line !l l&&!r l&&r condition
30 35 2 9 exists $args->{'pattern'} and exists $args->{'ttl'}
35 1 1 5 defined $args->{'pattern'} and ref $args->{'pattern'} eq "ARRAY"
2 1 4 defined $args->{'pattern'} and ref $args->{'pattern'} eq "ARRAY" and @{$args->{'pattern'}}
59 1 1 20 defined $next and ref $next eq "CODE"
67 1 1 18 defined $param{'pattern'} and ref $param{'pattern'} eq "ARRAY"
2 1 17 defined $param{'pattern'} and ref $param{'pattern'} eq "ARRAY" and @{$param{'pattern'}}
109 1 1 4 ref $pat eq "ARRAY" and @$pat
128 1 1 9 defined $str and length $str
173 1 1 8 defined $replay and ref $replay eq "ARRAY"
2 1 7 defined $replay and ref $replay eq "ARRAY" and @$replay
215 1 1 13 defined $replay and ref $replay eq "ARRAY"
2 1 12 defined $replay and ref $replay eq "ARRAY" and @$replay
280 8 4 7 $delay and $onsets
12 4 3 $delay and $onsets and $ttl > 1
319 10 15 10 $param{'sustain'} and $events->[$i][0] eq "note_off"
15 8 2 $param{'notext'} and $events->[$i][0] eq "text_event"
325 9 2 1 $events->[$j][0] eq "text_event" and $events->[$j][1] > 0
373 1 1 8 defined $replay and ref $replay eq "ARRAY"
2 1 7 defined $replay and ref $replay eq "ARRAY" and @$replay

or 2 conditions

line l !l condition
50 21 7 $count // 1
130 2 7 $param{'rs'} //= "\n"
178 2 5 $param{'dur'} //= 16
179 3 4 $param{'note'} //= "c"
180 3 4 $param{'rest'} //= "r"
182 5 2 $self->id // ""
184 6 1 $param{'maxm'} // '18446744073709551615'
221 3 9 $param{'chan'} //= 0
222 3 9 $param{'dur'} //= 20
223 1 11 $param{'note'} //= 60
224 1 11 $param{'tempo'} //= 500000
225 1 11 $param{'velo'} //= 90
231 5 7 $self->id // ""
233 9 3 $param{'maxm'} // '18446744073709551615'
378 1 6 $param{'divisor'} //= 1
379 3 4 $param{'rs'} //= "\n"
380 3 4 $param{'sep'} //= "\t"
383 6 1 $self->id // ""
384 5 2 $param{'maxm'} // '18446744073709551615'

or 3 conditions

line l !l&&r !l&&!r condition
95 3 1 6 $param{'newid'} //= $self->id
316 1 2 9 $param{'sustain'} or $param{'notext'}