tex-image ( image bitmap -- )

Vocabulary

opengl.textures.private

Inputs

image	an object
bitmap	an object

Outputs

None

Definition

USING: accessors opengl.gl opengl.textures sequences ;

IN: opengl.textures.private

:: tex-image ( image bitmap -- )
    image image-format :> ( internal-format format type )
    GL_TEXTURE_2D 0 internal-format image dim>>
    adjust-texture-dim first2 0 format type bitmap glTexImage2D
    ;