renderImage :: Int -> Int -> Image -> ScreenSurface -> Maybe SDL.Rect -> IO Bool
renderImage x y src dst clip = SDL.blitSurface src clip dst (Just $ SDL.Rect x y 0 0)
renderImage :: Int -> Int -> Image -> ScreenSurface -> Maybe SDL.Rect -> IO Bool
renderImage x y src dst clip = SDL.blitSurface src clip dst (Just $ SDL.Rect x y 0 0)
renderImage x y src dst clip = SDL.blitSurface src clip dst (Just $ SDL.Rect x y 0 0)