[Haskell-cafe] Exiting GLUT application

[Dave Tapley]

Hi everyone, I have the following skeleton GLUT code:

> import Graphics.UI.GLUT
> main = do
>     getArgsAndInitialize
>     createWindow ""
>     mainLoop

It loads into both hugs and ghci fine and when 'main' is evaluated an
empty window opens as expected.
However when closing the window (clicking the window manager's x
button) both hugs and ghci exit with the window, as opposed to
returning to the the 'Main>' prompt.

I suspect I need some callback to exit the GUI cleanly?

Cheers,
Dave