[project @ 2002-05-09 13:28:30 by simonmar]

Add a type signature for getClockTime

diff --git a/System/Time.hsc b/System/Time.hsc
index 32a677f..6d8a800 100644 (file)
--- a/System/Time.hsc
+++ b/System/Time.hsc
@@ -199,6 +199,7 @@ noTimeDiff = TimeDiff 0 0 0 0 0 0 0
 -- -----------------------------------------------------------------------------
 -- getClockTime returns the current time in its internal representation.
 
+getClockTime :: IO ClockTime
 #if HAVE_GETTIMEOFDAY
 getClockTime = do
   allocaBytes (#const sizeof(struct timeval)) $ \ p_timeval -> do