steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

add opengl.gl.gtk backend

db4
Anton Gorenko 2010-05-24 19:22:29 +06:00
parent 67df0a783f
commit c6d2f4956a
3 changed files with 16 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/opengl/gl/extensions/extensions.factor
View File

@ -7,7 +7,7 @@ ERROR: unknown-gl-platform ;
<< {
{ [ os windows? ] [ "opengl.gl.windows" ] }
{ [ os macosx? ] [ "opengl.gl.macosx" ] }
{ [ os unix? ] [ "opengl.gl.unix" ] }
{ [ os unix? ] [ "opengl.gl.gtk" ] }
[ unknown-gl-platform ]
} cond use-vocab >>

1
basis/opengl/gl/gtk/authors.txt Normal file
View File

@ -0,0 +1 @@
Anton Gorenko

14
basis/opengl/gl/gtk/gtk.factor Normal file
View File

@ -0,0 +1,14 @@
! Copyright (C) 2010 Anton Gorenko.
! See http://factorcode.org/license.txt for BSD license.
USING: alien alien.strings io.encodings.ascii
gdk.gl gdk.gl.ffi ;
IN: opengl.gl.gtk
: gl-function-context ( -- context )
gdk_gl_context_get_current ; inline
: gl-function-address ( name -- address )
ascii string>alien gdk_gl_get_proc_address ; inline
: gl-function-calling-convention ( -- str ) cdecl ; inline