gl3-rectf ( x1 y1 x2 y2 -- )

Vocabulary

ui.render

Inputs

x1	an object
y1	an object
x2	an object
y2	an object

Outputs

None

Definition

USING: opengl.gl ;

IN: ui.render

:: gl3-rectf ( x1 y1 x2 y2 -- )
    {
        { x1 y1 }
        { x2 y1 }
        { x2 y2 }
        { x1 y1 }
        { x2 y2 }
        { x1 y2 }
    } make-position-vertices upload-vertices
    GL_TRIANGLES 0 6 glDrawArrays ;