diff options
Diffstat (limited to 'axis.hs')
-rw-r--r-- | axis.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -396,7 +396,7 @@ textBand videoSurface videoClipRect (SDL.Rect _ y _ h) font text = do | |||
396 | return () | 396 | return () |
397 | return () | 397 | return () |
398 | 398 | ||
399 | --parseSDLEvents :: Set.Set SDL.SDLKey -> Set.Set SDL.Event -> IO (Set.Set SDL.Keysym.SDLKey, Set.Set SDL.Event) | 399 | parseSDLEvents :: Set.Set SDLKey -> (Int, Int) -> IO (Set.Set SDLKey, (Int, Int)) |
400 | parseSDLEvents keysDown others = do | 400 | parseSDLEvents keysDown others = do |
401 | event <- SDL.pollEvent | 401 | event <- SDL.pollEvent |
402 | case event of | 402 | case event of |