CTime problem

On Tue, 17 May 2005 00:27:55 -0700, Bulat Ziganshin <bulatz at HotPOP.com>
wrote:
> modificationTime :: Ptr CStat -> IO ClockTime
> modificationTime stat = do
> mtime <- st_mtime stat
> let realToInteger = round . realToFrac :: Real a => a -> Integer
> return (TOD (realToInteger (mtime :: CTime)) 0)
Eek, don't round time, truncate it. It doesn't become 10 o'clock until
the minute hand moves all the way back to the twelve. The minute doesn't
advance until the second hand moves all the way to the next minute. This
is true for any level of precision with time.
Dave