Branch Coverage

blib/lib/MIDI/Music.pm
Criterion Covered Total %
branch 1 108 0.9


line true false branch
20 0 0 if $constname eq 'constant'
21 0 0 @_ ? :
22 0 0 if ($! != 0)
23 0 0 if ($! =~ /Invalid/) { }
40 0 1 if $$mm{'_initialized'}
126 0 0 if (eval 'require MIDI') { }
137 0 0 unless $format == 2
160 0 0 if ($midifile) { }
162 0 0 unless ($mm->_loadmidifile($midifile))
172 0 0 unless ($$mm{'_initialized'})
174 0 0 unless ($mm->init('mode', 1))
180 0 0 unless ($mm->_playloaded)
211 0 0 unless ($mm->playevents($events))
227 0 0 if $data
240 0 0 if (@{$events;})
247 0 0 if ($$event[0] == &EV_CHN_VOICE) { }
0 0 elsif ($$event[0] == &EV_CHN_COMMON) { }
0 0 elsif ($$event[0] == &EV_SYSEX) { }
0 0 elsif ($$event[0] == &EV_TIMING) { }
0 0 elsif ($$event[0] == &EV_SEQ_LOCAL) { }
0 0 elsif ($$event[0] == &EV_SYSTEM) { }
249 0 0 if ($$event[2] == &MIDI_NOTEON) { }
0 0 elsif ($$event[2] == &MIDI_NOTEOFF) { }
0 0 elsif ($$event[2] == &MIDI_KEY_PRESSURE) { }
282 0 0 if ($$event[2] == &MIDI_CHN_PRESSURE) { }
0 0 elsif ($$event[2] == &MIDI_PGM_CHANGE) { }
0 0 elsif ($$event[2] == &MIDI_CTL_CHANGE) { }
0 0 elsif ($$event[2] == &MIDI_PITCH_BEND) { }
336 0 0 if ($$event[1] == &TMR_START) { }
0 0 elsif ($$event[1] == &TMR_STOP) { }
0 0 elsif ($$event[1] == &TMR_CONTINUE) { }
0 0 elsif ($$event[1] == &TMR_WAIT_ABS) { }
0 0 elsif ($$event[1] == &TMR_WAIT_REL) { }
0 0 elsif ($$event[1] == &TMR_ECHO) { }
0 0 elsif ($$event[1] == &TMR_TEMPO) { }
0 0 elsif ($$event[1] == &TMR_SPP) { }
0 0 elsif ($$event[1] == &TMR_TIMESIG) { }
378 0 0 if ($$event[2] == 240) { }
0 0 elsif ($$event[2] == 241) { }
0 0 elsif ($$event[2] == 242) { }
0 0 elsif ($$event[2] == 243) { }
0 0 elsif ($$event[2] == 244) { }
0 0 elsif ($$event[2] == 245) { }
0 0 elsif ($$event[2] == 246) { }
0 0 elsif ($$event[2] == 247) { }
0 0 elsif ($$event[2] == 248) { }
0 0 elsif ($$event[2] == 249) { }
0 0 elsif ($$event[2] == 250) { }
0 0 elsif ($$event[2] == 251) { }
0 0 elsif ($$event[2] == 252) { }
0 0 elsif ($$event[2] == 253) { }
0 0 elsif ($$event[2] == 254) { }
0 0 elsif ($$event[2] == 255) { }
424 0 0 if @{$ev_decoded;}