render-vertex-indexes ( primitive-mode vertex-indexes -- )

Vocabulary

gpu.render.private

Inputs

primitive-mode	an object
vertex-indexes	an object

Outputs

None

Definition

IN: gpu.render.private

GENERIC: render-vertex-indexes
    ( primitive-mode vertex-indexes -- )

Methods

USING: accessors gpu.buffers gpu.render gpu.render.private
kernel opengl.gl ;

M: index-elements render-vertex-indexes
    [ gl-primitive-mode ]
    [ [ count>> ] [ index-type>> gl-index-type ] [ ptr>> ] tri ]
    bi* index-buffer [ glDrawElements ] with-gpu-data-ptr ;


USING: accessors gpu.render gpu.render.private kernel opengl.gl
;

M: index-range render-vertex-indexes
    [ gl-primitive-mode ] [ [ start>> ] [ count>> ] bi ] bi*
    glDrawArrays ;


USING: accessors combinators gpu.render gpu.render.private
kernel opengl.gl sequences ;

M: multi-index-elements render-vertex-indexes
    [ gl-primitive-mode ] [
        {
            [ counts>> ]
            [ index-type>> gl-index-type ]
            [ ptrs>> dup length ]
            [ buffer>> ]
        } cleave
    ] bi* GL_ELEMENT_ARRAY_BUFFER swap [ handle>> ] [ 0 ] if*
    glBindBuffer glMultiDrawElements ;


USING: accessors gpu.render gpu.render.private kernel opengl.gl
sequences ;

M: multi-index-range render-vertex-indexes
    [ gl-primitive-mode ]
    [ [ starts>> ] [ counts>> dup length ] bi ] bi*
    glMultiDrawArrays ;


USING: alien gpu.render.private kernel opengl.gl sequences
specialized-arrays ;

M: specialized-array render-vertex-indexes
    GL_ELEMENT_ARRAY_BUFFER 0 glBindBuffer
    [ gl-primitive-mode ]
    [ [ length ] [ gl-array-element-type ] [ >c-ptr ] tri ] bi*
    glDrawElements ;