[htoolkit-cvs] port/src/Port Timer.hs,1.2,1.3

[<kr_...@us...>]

Update of /cvsroot/htoolkit/port/src/Port
In directory sc8-pr-cvs1:/tmp/cvs-serv9449/port/src/Port

Modified Files:
	Timer.hs 
Log Message:
Rename osEnableTimer to osSetTimerEnabled and osIsTimerEnabled to osGetTimerEnabled


Index: Timer.hs
===================================================================
RCS file: /cvsroot/htoolkit/port/src/Port/Timer.hs,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Timer.hs	26 Mar 2003 02:19:57 -0000	1.2
--- Timer.hs	14 Apr 2003 17:49:52 -0000	1.3
***************
*** 17,21 ****
  	( createTimer, destroyTimer
  	, setTimerInterval, getTimerInterval
! 	, enableTimer, isTimerEnabled
  	, getAllTimerHandles, destroyAllTimers
  	) where
--- 17,21 ----
  	( createTimer, destroyTimer
  	, setTimerInterval, getTimerInterval
! 	, setTimerEnabled,  getTimerEnabled
  	, getAllTimerHandles, destroyAllTimers
  	) where
***************
*** 41,48 ****
  
  -- | Enable\/disable timer
! foreign import ccall "osEnableTimer" enableTimer :: TimerHandle -> Bool -> IO ()
  
  -- | Returns True when the timer is enabled.
! foreign import ccall "osIsTimerEnabled" isTimerEnabled :: TimerHandle -> IO Bool
  
  -- Destroy all timers (called by quit).
--- 41,48 ----
  
  -- | Enable\/disable timer
! foreign import ccall "osSetTimerEnabled" setTimerEnabled :: TimerHandle -> Bool -> IO ()
  
  -- | Returns True when the timer is enabled.
! foreign import ccall "osGetTimerEnabled" getTimerEnabled :: TimerHandle -> IO Bool
  
  -- Destroy all timers (called by quit).