get-remaining-vorbis-header-packet ( player -- ? )

Vocabulary

audio.vorbis.private

Inputs

player

an object

Outputs

?

an object

Definition

USING: accessors audio.vorbis combinators kernel math ogg ;

IN: audio.vorbis.private

: get-remaining-vorbis-header-packet ( player -- ? )
    [ stream-state>> ] [ packet>> ] bi ogg_stream_packetout {
        { [ dup 0 < ] [ vorbis-error ] }
        { [ dup zero? ] [ drop f ] }
        [ drop t ]
    } cond ;