Welcome to the CHICKEN Scheme pasting service

mingw gl added by pluizer on Tue Nov 4 20:10:08 2014

(import chicken scheme)
(use (prefix glfw3 glfw:) (prefix opengl-glew gl:) gl-math gl-utils posix)


(glfw:with-window (640 480 "Example" resizable: #f
                       context-version-major: 2
                       context-version-minor: 1)
  (gl:init)
  (gl:clear-color 1 0 0 1)
  (gl:clear (bitwise-ior gl:+color-buffer-bit+ gl:+depth-buffer-bit+))
  (glfw:poll-events)
  (glfw:swap-buffers (glfw:window))
  (sleep 2)

)
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which relatively recent Scheme report version does CHICKEN _not_ implement?
Visually impaired? Let me spell it for you (wav file) download WAV