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
29 35 2 9 exists $args->{'pattern'} and exists $args->{'ttl'}
34 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'}}
57 1 1 20 defined $next and ref $next eq "CODE"
65 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'}}
106 1 1 4 ref $pat eq "ARRAY" and @$pat
124 1 1 9 defined $str and length $str
168 1 1 8 defined $replay and ref $replay eq "ARRAY"
2 1 7 defined $replay and ref $replay eq "ARRAY" and @$replay
209 1 1 13 defined $replay and ref $replay eq "ARRAY"
2 1 12 defined $replay and ref $replay eq "ARRAY" and @$replay
277 8 4 7 $delay and $onsets
12 4 3 $delay and $onsets and $ttl > 1
316 11 15 10 $param{'sustain'} and $events->[$i][0] eq "note_off"
15 9 2 $param{'notext'} and $events->[$i][0] eq "text_event"
322 9 2 1 $events->[$j][0] eq "text_event" and $events->[$j][1] > 0
368 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
48 21 7 $count // 1
126 2 7 $param{'rs'} //= "\n"
173 2 5 $param{'dur'} //= 16
174 3 4 $param{'note'} //= "c"
175 3 4 $param{'rest'} //= "r"
177 5 2 $self->id // ""
179 6 1 $param{'maxm'} // '18446744073709551615'
215 3 9 $param{'chan'} //= 0
216 3 9 $param{'dur'} //= 20
217 1 11 $param{'note'} //= 60
218 1 11 $param{'tempo'} //= 500000
219 1 11 $param{'velo'} //= 90
225 5 7 $self->id // ""
227 9 3 $param{'maxm'} // '18446744073709551615'
373 1 6 $param{'divisor'} //= 1
374 3 4 $param{'rs'} //= "\n"
375 3 4 $param{'sep'} //= "\t"
378 6 1 $self->id // ""
379 5 2 $param{'maxm'} // '18446744073709551615'

or 3 conditions

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