Branch Coverage

blib/lib/Music/RhythmSet.pm
Criterion Covered Total %
branch 32 32 100.0


line true false branch
26 3 8 if (exists $args->{'voicel'})
29 2 1 unless defined $args->{'voicel'} and ref $args->{'voicel'} eq "ARRAY"
41 1 14 unless @rest
46 2 14 unless defined $ref and ref $ref eq "HASH"
78 4 6 unless defined $param{$cb} and ref $param{$cb} eq "CODE"
107 1 6 if $measure >= $param{'max'}
116 1 6 if ($bstr eq ($curpat_str[$id] // ""))
151 2 12 unless defined $str and length $str
154 2 10 if ($param{'sep'}) { }
165 5 16 if $line =~ /^\s*(?:#|$)/u
169 10 6 if ($line =~ /^ (?\d{1,10}) $param{'sep'} (?\d{1,3}) $param{'sep'} (?[x.]{1,256}) $param{'sep'} (?\d{1,5}) \s*(?:[#].*)? $/ax) { }
183 8 2 if ($#$voices == 0 or $+{'id'} == $#$voices + 1) { }
1 1 elsif ($+{'id'} > $#$voices) { }
200 9 1 if defined $newplay[$id]
220 7 13 if exists $param{$pram} and not exists $param{'voice'}[$id]{$pram}
239 5 35 if exists $param{$pram} and not exists $param{'track'}[$id]{$pram}