Skip to content
Chris Petersen edited this page Oct 16, 2014 · 1 revision

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)
)
Clone this wiki locally