[commit: packages/time] format-widths, improve-leapseconds, master, posix-perf, tasty, wip/travis: difftime doc seconds (cdfb558)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/time

On branches: format-widths,improve-leapseconds,master,posix-perf,tasty,wip/travis
Link       : http://git.haskell.org/packages/time.git/commitdiff/cdfb558a851f8e91658a066692d711b484047f18

>---------------------------------------------------------------

commit cdfb558a851f8e91658a066692d711b484047f18
Author: Ashley Yakeley <ashley at semantic.org>
Date:   Fri Jul 8 04:28:21 2005 -0700

    difftime doc seconds
    
    darcs-hash:20050708112821-ac6dd-ce19449da430dad80f8cb0375be757416fc495bf


>---------------------------------------------------------------

cdfb558a851f8e91658a066692d711b484047f18
 System/Time/Clock/Scale.hs | 2 ++
 System/Time/Clock/UTC.hs   | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/System/Time/Clock/Scale.hs b/System/Time/Clock/Scale.hs
index 3150dbc..2cb56e7 100644
--- a/System/Time/Clock/Scale.hs
+++ b/System/Time/Clock/Scale.hs
@@ -21,6 +21,8 @@ type ModJulianDay = Integer
 type ModJulianDate = Rational
 
 -- | This is a length of time, as measured by a clock.
+-- Conversion functions will treat it as seconds.
+-- It has an accuracy of 10^-12 s.
 newtype DiffTime = MkDiffTime Pico deriving (Eq,Ord)
 
 instance Enum DiffTime where
diff --git a/System/Time/Clock/UTC.hs b/System/Time/Clock/UTC.hs
index 3c59fdd..1cdf8d2 100644
--- a/System/Time/Clock/UTC.hs
+++ b/System/Time/Clock/UTC.hs
@@ -39,6 +39,8 @@ instance Ord UTCTime where
 		cmp -> cmp
 
 -- | This is a length of time, as measured by UTC.
+-- Conversion functions will treat it as seconds.
+-- It has an accuracy of 10^-12 s.
 -- It ignores leap-seconds, so it's not necessarily a fixed amount of clock time.
 -- For instance, 23:00 UTC + 2 hours of UTCDiffTime = 01:00 UTC (+ 1 day),
 -- regardless of whether a leap-second intervened.