480e5555c9d0cbd7e1afc6da3e10c7131e508baa
[packages/time.git] / test / main / Main.hs
1 module Main where
2
3 import Test.Tasty
4 import Test.Calendar.AddDays
5 import Test.Calendar.Calendars
6 import Test.Calendar.ClipDates
7 import Test.Calendar.ConvertBack
8 import Test.Calendar.Duration
9 import Test.Calendar.Easter
10 import Test.Calendar.LongWeekYears
11 import Test.Calendar.MonthDay
12 import Test.Calendar.Valid
13 import Test.Calendar.Week
14 import Test.Clock.Conversion
15 import Test.Clock.Resolution
16 import Test.Clock.TAI
17 import Test.Format.Format
18 import Test.Format.ParseTime
19 import Test.Format.ISO8601
20 import Test.LocalTime.Time
21 import Test.LocalTime.TimeOfDay
22 import Test.LocalTime.CalendarDiffTime
23
24
25 tests :: TestTree
26 tests = testGroup "Time" [
27 testGroup "Calendar" [
28 addDaysTest,
29 testCalendars,
30 clipDates,
31 convertBack,
32 longWeekYears,
33 testMonthDay,
34 testEaster,
35 testValid,
36 testWeek,
37 testDuration
38 ],
39 testGroup "Clock" [
40 testClockConversion,
41 testResolutions,
42 testTAI
43 ],
44 testGroup "Format" [
45 testFormat,
46 testParseTime,
47 testISO8601
48 ],
49 testGroup "LocalTime" [
50 testTime,
51 testTimeOfDay,
52 testCalendarDiffTime
53 ]
54 ]
55
56 main :: IO ()
57 main = defaultMain tests