link-vertex-formats ( program-handle formats -- )

Vocabulary

gpu.shaders.private

Inputs

program-handle	an object
formats	an object

Outputs

None

Definition

USING: accessors gpu.shaders kernel opengl.gl sequences ;

IN: gpu.shaders.private

: link-vertex-formats ( program-handle formats -- )
    [ vertex-format-attributes [ name>> ] map sift ] map
    concat swap [ ] curry
    [ 2dip swap glBindAttribLocation ] curry each-index ;