with-gl-shader-source-ptr ( string quot -- )

Vocabulary

opengl.shaders

Inputs

string	an object
quot	an object

Outputs

None

Definition

USING: alien.c-types alien.data io.encodings.ascii kernel libc ;

IN: opengl.shaders

: with-gl-shader-source-ptr ( string quot -- )
    swap ascii malloc-string [ void* <ref> swap call ] keep free
    ; inline