Time.hs 805 Bytes
Newer Older
1
{-# LANGUAGE CPP #-}
2
3
4
#if __GLASGOW_HASKELL__ >= 709
{-# LANGUAGE Safe #-}
#elif __GLASGOW_HASKELL__ >= 701
dterei's avatar
dterei committed
5
6
7
{-# LANGUAGE Trustworthy #-}
#endif

8
module Time (
9
        ClockTime,
10
11
12
13
14
15
16
17
18
        Month(January,February,March,April,May,June,
              July,August,September,October,November,December),
        Day(Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday),
        CalendarTime(CalendarTime, ctYear, ctMonth, ctDay, ctHour, ctMin,
                     ctSec, ctPicosec, ctWDay, ctYDay, ctTZName, ctTZ, ctIsDST),
        TimeDiff(TimeDiff, tdYear, tdMonth, tdDay, tdHour,
                 tdMin, tdSec, tdPicosec),
        getClockTime, addToClockTime, diffClockTimes,
        toCalendarTime, toUTCTime, toClockTime,
19
        calendarTimeToString, formatCalendarTime
20
    ) where
21
22

import System.Time