Branch Coverage

blib/lib/MIDI/Event.pm
Criterion Covered Total %
branch 110 252 43.6


line true false branch
243 0 0 ref $_[0] ? :
252 0 0 unless ref $events_r
294 15 0 ref $_[1] eq 'HASH' ? :
296 0 15 unless (ref $data_r eq 'SCALAR')
302 0 15 if (defined $$options_r{'exclude'}) { }
303 0 0 if (ref $$options_r{'exclude'} eq 'ARRAY') { }
308 0 0 if $$options_r{'exclude'}
316 0 15 if (defined $$options_r{'include'})
317 0 0 if (ref $$options_r{'include'} eq 'ARRAY') { }
323 0 0 if $$options_r{'include'}
330 0 15 if $MIDI::Event::Debug
334 0 15 if (defined $$options_r{'event_callback'})
335 0 0 if (ref $$options_r{'event_callback'} eq 'CODE') { }
342 0 15 if (defined $$options_r{'exclusive_event_callback'})
343 0 0 if (ref $$options_r{'exclusive_event_callback'} eq 'CODE') { }
353 0 15 if ($MIDI::Event::Debug)
354 0 0 if ($MIDI::Event::Debug == 1) { }
444 1679 79 if ($first_byte < 240) { }
79 0 elsif ($first_byte == 255) { }
0 0 elsif ($first_byte == 240 or $first_byte == 247) { }
0 0 elsif ($first_byte == 242) { }
0 0 elsif ($first_byte == 243) { }
0 0 elsif ($first_byte == 246) { }
0 0 elsif ($first_byte > 240) { }
445 927 752 if ($first_byte >= 128) { }
446 0 927 if $MIDI::Event::Debug > 2
451 0 752 if ($event_code == -1)
452 0 0 if $MIDI::Event::Debug
461 11 1668 if ($command == 192 or $command == 208) { }
476 485 1194 if ($command == 128) { }
1181 13 elsif ($command == 144) { }
0 13 elsif ($command == 160) { }
2 11 elsif ($command == 176) { }
11 0 elsif ($command == 192) { }
0 0 elsif ($command == 208) { }
0 0 elsif ($command == 224) { }
477 0 485 if $exclude{'note_off'}
486 0 1181 if $exclude{'note_on'}
494 0 0 if $exclude{'key_after_touch'}
502 0 2 if $exclude{'control_change'}
510 0 11 if $exclude{'patch_change'}
518 0 0 if $exclude{'channel_after_touch'}
526 0 0 if $exclude{'pitch_wheel_change'}
544 0 79 if ($command == 0) { }
33 46 elsif ($command == 1) { }
2 44 elsif ($command == 2) { }
10 34 elsif ($command == 3) { }
6 28 elsif ($command == 4) { }
0 28 elsif ($command == 5) { }
0 28 elsif ($command == 6) { }
0 28 elsif ($command == 7) { }
0 28 elsif ($command == 8) { }
0 28 elsif ($command == 9) { }
0 28 elsif ($command == 10) { }
0 28 elsif ($command == 11) { }
0 28 elsif ($command == 12) { }
0 28 elsif ($command == 13) { }
0 28 elsif ($command == 14) { }
0 28 elsif ($command == 15) { }
15 13 elsif ($command == 47) { }
9 4 elsif ($command == 81) { }
2 2 elsif ($command == 84) { }
2 0 elsif ($command == 88) { }
0 0 elsif ($command == 89) { }
0 0 elsif ($command == 127) { }
734 0 0 $first_byte == 240 ? :
840 15 1743 if (@E and $E[0] eq 'end_track')
843 15 0 unless (defined $$options_r{'no_eot_magic'} and $$options_r{'no_eot_magic'})
845 8 7 if ($E[1] > 0) { }
856 0 1758 if (@E and exists $exclude{$E[0]}) { }
857 0 0 if ($MIDI::Event::Debug)
862 0 1758 if ($MIDI::Event::Debug)
866 1751 7 if (@E)
867 0 1751 if ($exclusive_event_callback) { }
870 0 1751 if $event_callback
918 15 1743 if $eot
941 2 0 ref $_[1] eq 'HASH' ? :
945 0 2 unless ref $events_r
951 0 2 if ref $$options_r{'unknown_callback'} eq 'CODE'
954 2 0 unless ($$options_r{'never_add_eot'})
956 2 0 if (@events) { }
958 2 0 unless ($$last[0] eq 'end_track')
959 0 2 if ($$last[0] eq 'text_event' and length $$last[2] == 0) { }
961 0 0 if ($$options_r{'no_eot_magic'}) { }
990 0 271 unless ref $event_r
993 0 271 unless @E
996 0 271 unless length $event
1002 265 6 if ($event eq 'note_on' or $event eq 'note_off' or $event eq 'control_change' or $event eq 'key_after_touch' or $event eq 'patch_change' or $event eq 'channel_after_touch' or $event eq 'pitch_wheel_change') { }
1015 132 133 if ($event eq 'note_off') { }
132 1 elsif ($event eq 'note_on') { }
0 1 elsif ($event eq 'key_after_touch') { }
0 1 elsif ($event eq 'control_change') { }
1 0 elsif ($event eq 'patch_change') { }
0 0 elsif ($event eq 'channel_after_touch') { }
0 0 elsif ($event eq 'pitch_wheel_change') { }
1046 0 265 $maybe_running_status && $status == $last_status ? :
1062 0 6 if ($event eq 'raw_meta_event') { }
2 4 elsif ($event eq 'text_event') { }
0 4 elsif ($event eq 'copyright_text_event') { }
0 4 elsif ($event eq 'track_name') { }
0 4 elsif ($event eq 'instrument_name') { }
0 4 elsif ($event eq 'lyric') { }
0 4 elsif ($event eq 'marker') { }
0 4 elsif ($event eq 'cue_point') { }
0 4 elsif ($event eq 'text_event_08') { }
0 4 elsif ($event eq 'text_event_09') { }
0 4 elsif ($event eq 'text_event_0a') { }
0 4 elsif ($event eq 'text_event_0b') { }
0 4 elsif ($event eq 'text_event_0c') { }
0 4 elsif ($event eq 'text_event_0d') { }
0 4 elsif ($event eq 'text_event_0e') { }
0 4 elsif ($event eq 'text_event_0f') { }
2 2 elsif ($event eq 'end_track') { }
2 0 elsif ($event eq 'set_tempo') { }
0 0 elsif ($event eq 'smpte_offset') { }
0 0 elsif ($event eq 'time_signature') { }
0 0 elsif ($event eq 'key_signature') { }
0 0 elsif ($event eq 'sequencer_specific') { }
0 0 elsif ($event eq 'sysex_f0') { }
0 0 elsif ($event eq 'sysex_f7') { }
0 0 elsif ($event eq 'song_position') { }
0 0 elsif ($event eq 'song_select') { }
0 0 elsif ($event eq 'tune_request') { }
0 0 elsif ($event eq 'raw_data') { }
1133 0 0 if ($unknown_callback) { }
1144 6 0 if length $event_data