11 lines
329 B
Factor
11 lines
329 B
Factor
USING: alien alien.c-types alien.syntax kernel windows.types ;
|
|
IN: opengl.gl.windows
|
|
|
|
LIBRARY: gl
|
|
|
|
FUNCTION: HGLRC wglGetCurrentContext ( )
|
|
FUNCTION: void* wglGetProcAddress ( c-string name )
|
|
|
|
: gl-function-context ( -- context ) wglGetCurrentContext ; inline
|
|
: gl-function-address ( name -- address ) wglGetProcAddress ; inline
|