gl-program-shaders ( program -- shaders )

Vocabulary

opengl.shaders

Inputs

program

an object

Outputs

shaders

an object

Definition

USING: alien.c-types alien.data kernel math opengl.gl sequences
;

IN: opengl.shaders

: gl-program-shaders ( program -- shaders )
    dup gl-program-shaders-length 2 * 0 int <ref>
    over uint <c-array> [ glGetAttachedShaders ] keep
    [ zero? ] reject ;