parse-events ( data -- events )

Vocabulary

midi.private

Inputs

data

an object

Outputs

events

an object

Definition

USING: io io.encodings.binary io.streams.byte-array
io.streams.peek kernel sequences ;

IN: midi.private

: parse-events ( data -- events )
    binary <byte-reader> <peek-stream> [
        f
        [ peek1 [ read-event-header ] [ f f ] if dup ]
        [ read-event ] produce 3nip
    ] with-input-stream ;