Ticket #7629: Try1.hs

File Try1.hs, 175 bytes (added by wgmitchener, 15 months ago)

Program that crashes

Line 
1module Try1 where
2
3import Graphics.UI.Gtk
4   
5main = do
6 
7  initGUI
8 
9  timeoutAddFull (putStrLn "tick" >> return True) priorityDefaultIdle 2000
10 
11  mainGUI
12 
13  return ()