send-buffer ( buffer -- buffer )

Vocabulary

synth.buffers

Inputs

buffer

an object

Outputs

buffer

an object

Definition

USING: accessors combinators kernel openal ;

IN: synth.buffers

: send-buffer ( buffer -- buffer )
    {
        [ gen-buffer dup [ >>id ] dip ]
        [ buffer-format ]
        [ buffer-data ]
        [ sample-freq>> alBufferData ]
    } cleave ;