@@ -68,8 +68,9 @@ data Transition =
6868 Transition
6969 {transTime :: Integer, -- ^ Unix timestamp indicating the time
7070 -- when the clocks change
71− transIndex :: Int} -- ^ 0-based index in the list of @TtInfo@
71+ transIndex :: Int -- ^ 0-based index in the list of @TtInfo@
7272 -- that describes the new time
73+ }
7374 deriving (Eq, Show)
7475
7576-- | A @TransitionType@ is historical information about whether the
@@ -94,7 +95,8 @@ data TtInfo abbr =
9495 -- in seconds
9596 tt_isdst :: Bool, -- ^ True if local clocks are summer time
9697 tt_ttype :: TransitionType,
97− tt_abbr :: abbr} -- ^ The timezone abbreviation string.
98+ tt_abbr :: abbr -- ^ The timezone abbreviation string.
99+ }
98100 deriving (Eq, Show)
99101
100102-- | Olson timezone files can contain leap second specifications, though
@@ -103,6 +105,7 @@ data LeapInfo =
103105 LeapInfo
104106 {leapTime :: Integer, -- ^ A Unix timestamp indicating the time
105107 -- that the leap second occurred
106− leapOffset :: Int} -- ^ The new total offset of UTC from UT1
108+ leapOffset :: Int -- ^ The new total offset of UTC from UT1
107109 -- after this leap second
110+ }
108111 deriving (Eq, Show)