line |
true |
false |
branch |
132
|
4383 |
145 |
if $$e[0] eq 'note_on' |
145
|
2320 |
17 |
unless $$e[0] eq 'note_off' |
203
|
23 |
0 |
$_[0] ? : |
205
|
23 |
0 |
unless defined $require_sanity |
210
|
23 |
0 |
if $require_sanity |
258
|
23 |
1 |
if ($$args{'strict'}) |
269
|
1341 |
4293 |
unless MIDI::Tweaks::is_channel_event($_) |
270
|
4260 |
33 |
if (defined $chan) { } |
271
|
2 |
4258 |
if ($$_[2] != $chan) |
281
|
1 |
32 |
if ($channel_seen[$chan]) |
291
|
2095 |
2198 |
if (MIDI::Tweaks::is_note_on($_)) { } |
|
2095 |
103 |
elsif (MIDI::Tweaks::is_note_off($_)) { } |
292
|
1 |
2094 |
if (defined $$noteon[$$_[3]]) { } |
302
|
2093 |
2 |
if (defined $$noteon[$$_[3]]) { } |
312
|
2448 |
1 |
unless defined $$noteon[$i] |
319
|
2 |
22 |
if ($fail) |
320
|
0 |
2 |
if $strict eq 'warn' |
384
|
0 |
8 |
if $track->channel == 10 |
416
|
23 |
0 |
ref $_[1] eq 'HASH' ? : |
418
|
0 |
23 |
if ($$options_r{'flat'}) |
439
|
23 |
0 |
if ($$options_r{'dump_tracks'}) { } |
444
|
56 |
0 |
if (ref $track) { } |
479
|
0 |
0 |
if $$e[0] eq 'track_name' |
497
|
16 |
4 |
unless is_channel_event($e) |
517
|
0 |
51 |
if ($$self{'_tweaky_abstime'}) |
518
|
0 |
0 |
unless $force |
546
|
0 |
65 |
unless ($$self{'_tweaky_abstime'}) |
547
|
0 |
0 |
unless $force |
553
|
0 |
7128 |
if $$e[1] < $time |
579
|
1 |
698 |
if $$e[1] < $time |
613
|
16 |
0 |
if ref $_[0] eq 'HASH' |
616
|
0 |
16 |
unless ref $mapper eq 'CODE' |
619
|
1 |
15 |
if delete $$opts{'copy'} |
645
|
0 |
8 |
unless ref $args eq 'HASH' |
654
|
8 |
0 |
if ($$args{'int'}) |
658
|
72 |
64 |
if (is_note_event($_[0])) |
660
|
0 |
72 |
unless $_[0][3] >= 0 and $_[0][3] <= 127 |
664
|
4 |
60 |
if ($_[0][0] eq 'key_signature') |
669
|
0 |
4 |
if $f >= 6 |
670
|
0 |
4 |
if $f < -6 |
681
|
0 |
8 |
unless $mapper_func |
711
|
0 |
3 |
unless ref $args eq 'HASH' |
717
|
2 |
1 |
if ($$args{'value'}) { } |
|
1 |
0 |
elsif ($$args{'ratio'}) { } |
719
|
0 |
2 |
unless $value >= 0 and $value <= 127 |
723
|
40 |
18 |
unless is_note_on($_[0]) |
730
|
20 |
9 |
unless is_note_on($_[0]) |
732
|
0 |
9 |
if $_[0][4] > 127 |
736
|
0 |
3 |
unless $mapper_func |
761
|
0 |
4 |
unless ref $args eq 'HASH' |
767
|
2 |
2 |
if ($$args{'value'}) { } |
|
2 |
0 |
elsif ($$args{'ratio'}) { } |
771
|
33 |
3 |
unless $_[0][0] eq 'set_tempo' |
778
|
33 |
3 |
unless $_[0][0] eq 'set_tempo' |
783
|
0 |
4 |
unless $mapper_func |
806
|
0 |
1 |
unless ref $args eq 'HASH' |
812
|
0 |
1 |
if ($$args{'value'}) { } |
|
1 |
0 |
elsif ($$args{'ratio'}) { } |
814
|
0 |
0 |
unless $value >= 0 and $value <= 127 |
819
|
0 |
0 |
unless $_[0][0] eq 'control_change' and $_[0][3] == 7 |
828
|
29 |
1 |
unless $_[0][0] eq 'control_change' and $_[0][3] == 7 |
831
|
0 |
1 |
if $_[0][4] > 127 |
835
|
0 |
1 |
unless $mapper_func |
866
|
0 |
1 |
unless ref $args eq 'HASH' |
872
|
1 |
0 |
if ($$args{'pitch'}) |
874
|
0 |
1 |
unless $split >= 0 and $split <= 127 |
878
|
0 |
1 |
if %$args |
881
|
0 |
1 |
unless $$track{'_tweaky_abstime'} |
888
|
11 |
18 |
unless (is_note_event($_)) |
895
|
12 |
6 |
if ($$_[3] >= $split) { } |
942
|
0 |
3 |
unless $$track{'_tweaky_abstime'} |
955
|
24 |
70 |
if $$this_event[0] =~ /^lyric$/ |
958
|
0 |
70 |
unless (@hi == @lo) |
963
|
18 |
34 |
unless (is_note_event($this_event) and @events and &$eqtimes($this_event, $next_event)) |
971
|
20 |
14 |
if (is_note_on($this_event) and is_note_on($next_event) or is_note_off($this_event) and is_note_off($next_event)) { } |
980
|
12 |
8 |
if ($$this_event[3] > $$next_event[3]) { } |
1042
|
0 |
3 |
unless $$track{'_tweaky_abstime'} |
1056
|
27 |
77 |
if $$this_event[0] =~ /^lyric$/ |
1058
|
0 |
77 |
unless (@hi == @md and @md == @lo) |
1066
|
60 |
17 |
if (is_note_event($this_event)) { } |
1068
|
11 |
49 |
if (is_note_on($this_event) and @events and is_note_on($next_event) and &$eqtimes($this_event, $next_event)) { } |
|
11 |
38 |
elsif (is_note_off($this_event) and @events and is_note_off($next_event) and &$eqtimes($this_event, $next_event)) { } |
1071
|
3 |
8 |
if (is_note_on($events[1]) and &$eqtimes($this_event, $events[1])) { } |
1101
|
3 |
8 |
if (is_note_off($events[1]) and &$eqtimes($this_event, $events[1])) { } |