Following some well-known OpenGL Haskell tutorial, I've made my first HOpenGL program. Here's the code:
import Graphics.Rendering.OpenGL
import Graphics.UI.GLUT
main = do
(progname, _) <- getArgsAndInitialize
createWindow "Hello World"
displayCallback $= clear [ ColorBuffer ]
mainLoop
It compiles and runs, but window is simply not shown - upon "maximize" command, you can see it for some fractions of second, and then it minimizes. May this issue be connected to my ATI Radeon video card?
P.S. OS is Ubuntu 10.10, program compiled with GHC 7.0.3.