glCoreInit - part-cw/lambdanative GitHub Wiki
(glCoreInit)
OpenGL initialization. This sets up the OpenGL rendering pipeline.
Note: This should not be called by a user directly!
Example
Example 1: As used in (glgui-render g1 . gx)
(define (glgui-render g1 . gx)
(glCoreInit)
(glPushMatrix)
(cond
((fx= glgui:rotate 1)
(glRotatef -90. 0. 0. 1.) (glTranslatef (flo (- app:height)) 0. 0.))
((fx= glgui:rotate 2)
(glRotatef 90. 0. 0. 1.) (glTranslatef 0. (flo (- app:width)) 0.))
((fx= glgui:rotate 3)
(glRotatef 180. 0. 0. 1.) (glTranslatef (flo (- app:width)) (flo (- app:height)) 0.))
)
(apply glgui-renderloop (append (list g1) gx))
(glPopMatrix)
)