[Haskell-beginners] GTK + Reactive
Bas van Dijk
v.dijk.bas at gmail.com
Mon Nov 24 19:28:15 EST 2008
CCing this to the Reactive mailinglist.
See: http://www.haskell.org/mailman/listinfo/reactive
Bas
On Mon, Nov 24, 2008 at 1:00 PM, Levi Stephen <levi.stephen at gmail.com> wrote:
> Hi,
>
> I'm trying to set up a simple program combining Reactive and GTK. I have the
> program below so far, but mainQuit is never called. After looking at a
> couple of adapters I tried adding the commented out line, but this didn't
> work for me.
>
> I'm sure I've probably missed something, but I'm not sure what.
>
> Thanks,
> Levi
>
> main = do
> initGUI
>
> clock <- makeClock
>
> (windowDestroy, sink) <- makeEvent clock
>
> w <- windowNew
> w `onDestroy` sink ()
> widgetShowAll w
>
> -- forkE (tSync clock) $ quitOnDestroy windowDestroy
>
> mainGUI
>
> quitOnDestroy :: Event () -> Event (IO ())
> quitOnDestroy e = fmap (const mainQuit) e
>
> tSync :: Clock TimeT-> ITime -> IO ()
> tSync clock t = sleepPast (cGetTime clock) (exact t)
>
>
> _______________________________________________
> Beginners mailing list
> Beginners at haskell.org
> http://www.haskell.org/mailman/listinfo/beginners
>
>
More information about the Beginners
mailing list