(clear-integer-color-attachment) ( type value -- )

Vocabulary

gpu.framebuffers.private

Inputs

type	an object
value	an object

Outputs

None

Definition

USING: gpu.private ;

IN: gpu.framebuffers.private

HOOK: (clear-integer-color-attachment) gpu-api ( type value -- )

Methods

USING: combinators gpu.framebuffers.private gpu.private kernel
opengl.gl sequences ;

M: opengl-2 (clear-integer-color-attachment)
    4 0 pad-tail first4 swap {
        { int-type [ glClearColorIiEXT ] }
        { uint-type [ glClearColorIuiEXT ] }
    } case GL_COLOR_BUFFER_BIT glClear ;


USING: alien.c-types alien.data combinators
gpu.framebuffers.private gpu.private kernel opengl.gl sequences
;

M: opengl-3 (clear-integer-color-attachment)
    [ GL_COLOR 0 ] dip 4 0 pad-tail swap {
        { int-type [ int >c-array glClearBufferiv ] }
        { uint-type [ uint >c-array glClearBufferuiv ] }
    } case ;