;;;; gl.scm (module gl * (import scheme (chicken base) (chicken foreign) bind) (cond-expand (msvc #> #define WIN32_LEAN_AND_MEAN 1 #include #include "glprocs/GL/gl.h" #include "glprocs/GL/glprocs.h" <#) (else #> #ifdef C_MACOSX #include #else #include #endif <#)) (bind-rename/pattern "^(GL_|gl)" "gl:") (bind-options export-constants: #t) (bind #<