(bind-float-vertex-attribute) ( program-instance ptr name dim gl-type normalize? stride offset -- )

Vocabulary

gpu.shaders.private

Inputs

program-instance	an object
ptr	an object
name	an object
dim	an object
gl-type	an object
normalize?	an object
stride	an object
offset	an object

Outputs

None

Definition

USING: alien gpu.shaders kernel math opengl.gl ;

IN: gpu.shaders.private

:: (bind-float-vertex-attribute)
    ( program-instance ptr name dim gl-type normalize? stride offset -- )
    program-instance name attribute-index :> idx idx 0 >= [
        idx glEnableVertexAttribArray
        idx dim gl-type normalize? stride offset ptr
        <displaced-alien> glVertexAttribPointer
    ] when ; inline