Excellent, thank you Marc your advice worked perfectly.

For reference the corrected code reads:

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

Dave,


On 31/07/07, Marc A. Ziegert <[EMAIL PROTECTED]> wrote:
> in old glut, the main loop was the core of the single threaded program. 
> exiting it did mean to exit the program completely.
> in freeglut, you have alternatives. but for compatibility, it defaults to the 
> old behaviour.
>
> <http://haskell.org/ghc/docs/latest/html/libraries/GLUT/Graphics-UI-GLUT-Begin.html#v%3AExit>
>
> - marc
>
>
> Am Dienstag, 31. Juli 2007 19:16 schrieb 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
> > _______________________________________________
> > Haskell-Cafe mailing list
> > Haskell-Cafe@haskell.org
> > http://www.haskell.org/mailman/listinfo/haskell-cafe
> >
>
>
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to