read-event ( delta type -- event )

Vocabulary

midi.private

Inputs

delta	an object
type	an object

Outputs

event

an object

Definition

USING: combinators ;

IN: midi.private

: read-event ( delta type -- event )
    {
        { 240 [ 240 read-sysex ] }
        { 247 [ 247 read-sysex ] }
        { 255 [ read-meta ] }
        [ read-message ]
    } case ;