
2 Feb
2005
2 Feb
'05
2:24 a.m.
In article
It looks like we may need three types here:
* one for TAI
* one for POSIX time, which is a broken encoding of UTC
* one for correct encoding of UTC
This is the sort of thing I mean: newtype TAITime = TAITime Integer deriving (...) newtype POSIXTime = POSIXTime Integer deriving (...) newtype DiffTime = DiffTime Integer deriving (...) type JulianDay = Integer data UTCTime = UTCTime JulianDay DiffTime getCurrentTime :: IO POSIXTime posixToUTCTime :: POSIXTime -> UTCTime -- Ashley Yakeley, Seattle WA