Branch Coverage

blib/lib/ChordPro/Output/MMA.pm
Criterion Covered Total %
branch 62 176 35.2


line true false branch
20 0 7 if @{$sb->{'songs'};} > 1
23 0 7 if (@book)
24 0 0 if $main::options->{'backend-option'}{'tidy'}
40 0 14 unless defined $meta and defined $s->{'meta'}{$meta}
63 0 7 if ($main::options->{'backend-option'}{'structure'} // "") eq "structured"
68 7 0 if defined $s->{'title'}
73 7 0 if safemeta($s, "time", "4/4") =~ m[^(\d+)/(\d+)]
74 0 7 unless ($groove)
75 0 0 if ($bpm == 3) { }
0 0 elsif ($bpm == 6) { }
76 0 0 unless $q == 8
80 0 0 unless $q == 8
97 1 6 $q == 8 && $decoda ? :
109 14 56 if ($elt->{'context'} ne $ctx)
110 7 7 if $ctx
111 7 7 if $ctx = $elt->{'context'}
114 14 56 if ($elt->{'type'} eq "empty")
116 0 14 if $s->{'structure'} eq "structured"
121 0 56 if ($elt->{'type'} eq "colb")
126 0 56 if ($elt->{'type'} eq "newpage")
131 21 35 if ($elt->{'type'} eq "gridline")
136 59 346 $_->{'class'} eq 'chord' ? :
144 9 12 if ($decoda and $q == 4)
152 0 21 if (@a % ($bpm + 1))
168 7 49 if ($a[0] eq "." and $a[1] eq ".")
179 174 66 $cur eq '.' ? :
180 66 174 unless $cur eq "."
185 0 56 unless $c =~ /\S/
188 14 42 if ($prev eq $c or $st == 1) { }
192 0 35 $rept > 1 ? :
35 7 if $rept
201 0 56 unless (is_bar(shift @a))
206 0 21 $rept > 1 ? :
214 7 28 if ($elt->{'type'} =~ /^comment(?:_italic|_box)?$/)
215 0 7 if $tidy
217 0 7 if ($elt->{'chords'})
221 0 0 if $elt->{'chords'}[$_] ne ""
227 0 7 if $tidy
233 0 0 if ($elt->{'type'} eq "songline")
238 0 0 if ($elt->{'type'} eq "tabline")
243 0 0 if ($elt->{'type'} eq "chorus")
244 0 0 if $tidy
247 0 0 if ($e->{'type'} eq "empty")
251 0 0 if ($e->{'type'} eq "songline")
257 0 0 if $tidy
261 0 0 if ($elt->{'type'} eq "tab")
262 0 0 if $tidy
266 0 0 if $tidy
270 0 0 if ($elt->{'type'} eq "verse")
271 0 0 if $tidy
274 0 0 if ($e->{'type'} eq "empty")
276 0 0 if $s->{'structure'} eq "structured"
279 0 0 if ($e->{'type'} eq "songline")
283 0 0 if ($e->{'type'} eq "comment")
287 0 0 if ($e->{'type'} eq "comment_italic")
293 0 0 if $tidy
297 0 0 if ($elt->{'type'} eq "image")
303 0 0 unless /\s/
310 0 0 if ($elt->{'type'} eq "set")
314 0 0 if ($elt->{'type'} eq "control")
321 0 7 if $ctx
331 0 0 if ($single_space and not $elt->{'chords'} && join('', @{$elt->{'chords'};}) =~ /\S/)
338 0 0 unless ($elt->{'chords'})
342 0 0 if (my $f = $main::config->{'settings'}{'inline-chords'})
343 0 0 unless $f =~ /^[^%]*\%s[^%]*$/
358 0 0 if $d > 0
359 0 0 if $d < 0
362 0 0 $chords_under ? :
369 0 1 if $_ eq "|:" or $_ eq "{" or $_ eq ":|" or $_ eq "}" or $_ eq ":|:" or $_ eq "}{" or $_ eq "|" or $_ eq "||" or $_ eq "|."
381 0 9 if $main::config->{'debug'}{'mma'}
388 0 24 if ($carry)
389 0 0 if ($a[0] eq '.') { }
403 1 87 if ($a0 ne "." and $a1 ne ".")
404 1 0 if (@a > 1 and $a[0] eq '.' and $a[1] eq '.') { }
421 1 87 if ($a0 eq '.' and $a1 ne '.') { }
1 86 elsif ($a1 ne '.') { }
429 0 1 if (@a > 1 and is_bar($a[0]) and $a[1] eq '.') { }
0 1 elsif (@a > 0 and $a[0] eq '.') { }
0 1 elsif (not @a) { }
450 24 0 if (is_bar($a[0])) { }
464 7 0 if $groove
467 0 0 if ($bpm == 3) { }
0 0 elsif ($bpm == 6) { }
468 0 0 unless $q == 8
472 0 0 unless $q == 8
482 0 0 if ($bpm == 3 and $q == 4) { }
0 0 elsif ($bpm == 3 and $q == 8) { }
0 0 elsif ($bpm == 6 and $q == 8) { }