1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
-----------------------------------------------------------------------------
-- |
-- Module : Graphics.UI.SDL.Time
-- Copyright : (c) David Himmelstrup 2005
-- License : BSD-like
--
-- Maintainer : lemmih@gmail.com
-- Stability : provisional
-- Portability : portable
--
-----------------------------------------------------------------------------
module Graphics.UI.SDL.Time where
import Foreign
-- Uint32 SDL_GetTicks(void);
foreign import ccall unsafe "SDL_GetTicks" getTicks :: IO Word32
-- void SDL_Delay(Uint32 ms);
foreign import ccall unsafe "SDL_Delay" delay :: Word32 -> IO ()
|
