| line |
true |
false |
branch |
|
120
|
1 |
3026 |
if ($alt > 0) { } |
|
|
15 |
3011 |
elsif ($alt < 0) { } |
|
121
|
1 |
0 |
&any(sub {
note_to_tone($_) eq note_to_tone($note);
}
, @SHARP_ORDER[0 .. $alt - 1]) ? : |
|
123
|
10 |
5 |
&any(sub {
note_to_tone($_) eq note_to_tone($note);
}
, @FLAT_ORDER[0 .. abs($alt) - 1]) ? : |
|
138
|
83 |
4669 |
if $symbols =~ /\G\h+/cgu |
|
140
|
1 |
4668 |
if ($symbols =~ /\G(\v+)/cgu) |
|
145
|
3 |
4665 |
if ($symbols =~ / \G \# \s* ( .*? (?:\r\n|\n|\r|\v|\z) )/cgux) |
|
150
|
11 |
4654 |
if ($symbols =~ /\G(<|>)/cgu) |
|
151
|
9 |
2 |
$1 eq '>' ? : |
|
156
|
10 |
4644 |
if ($symbols =~ /\GK(b{1,7}|#{0,7})?/cgu) |
|
162
|
4643 |
1 |
if ($symbols =~ /\G ( $NOTE_NAME_RE ) ( $ACCIDENTAL_RE )? ( \d+ )? (,+|\x{2019}+|'+)?/cgux) |
|
165
|
3 |
4640 |
if ($rel_octave) |
|
166
|
1 |
2 |
$rel_octave =~ /,/u ? : |
|
169
|
1616 |
3027 |
$accidental ? : |
|
180
|
4524 |
24 |
wantarray ? : |