[wxhaskell-users] WxHaskell do not terminate properly

[Mads <mad...@ya...>]

Hi all

I created, compile, and executed the following program:

	-- Compile with ghc -fglasgow-exts --make NonModalDialogTest.hs -o NonMo=
dalDialogTest
=09
	module Main where
	import Graphics.UI.WX
	main =3D start $ do
	         f <- frame [ text :=3D "Some program" ]
	         d <- dialog f [ text :=3D "Some dialog" ]
	         set d [ visible :=3D True ]

it worked fine. It brought up two empty windows and when I closed the
windows the program terminated properly. However when I make the
following changes (see comments for changed lines):

	-- Compile with ghc -fglasgow-exts --make NonModalDialogTest.hs -o NonMo=
dalDialogTest

	module Main where
	import Graphics.UI.WX
	main =3D start $ do
	         f <- frame [ text :=3D "Some program" ]
	         w <- get f parent                       -- added line
	         d <- dialog w [ text :=3D "Some dialog" ] -- changed f to w
	         set d [ visible :=3D True ]

the program also brings up two windows. However when I close the windows
the program do _not_ terminate properly - It just hangs. I have to
manually ctrl-c ctrl-c in the shell, to terminate the program.

Why do the program not terminate properly? Is it a bug in WxHaskell?

I am using Debian Linux, ghc 6.4, and WxHaskell 0.9.4. My WxHaskell runs
on top of GTK.

/Mads Lindstr=F8m