image>texture ( image -- texture )

Vocabulary

game.debug.private

Inputs

image

an object

Outputs

texture

an object

Definition

USING: accessors destructors gpu.textures kernel ;

IN: game.debug.private

:: image>texture ( image -- texture )
    image [ component-order>> ] [ component-type>> ] bi
    debug-text-texture-parameters <texture-2d> &dispose
    [ 0 image allocate-texture-image ] keep ;