From: stolz <unknown>
Date: Fri, 30 Aug 2002 13:27:42 +0000 (+0000)
Subject: [project @ 2002-08-30 13:27:42 by stolz]
X-Git-Tag: nhc98-1-18-release~887
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=816340dce8a917f598461c143a21b00eeb10022c;p=haskell-directory.git

[project @ 2002-08-30 13:27:42 by stolz]
Haddock-ise.
---

diff --git a/System/CPUTime.hsc b/System/CPUTime.hsc
index e5a8a45..77a8e24 100644
--- a/System/CPUTime.hsc
+++ b/System/CPUTime.hsc
@@ -28,14 +28,10 @@ import Data.Ratio
 #include "HsBase.h"
 
 -- -----------------------------------------------------------------------------
--- Computation `getCPUTime' returns the number of picoseconds CPU time
+-- |Computation 'getCPUTime' returns the number of picoseconds CPU time
 -- used by the current program.  The precision of this result is
 -- implementation-dependent.
 
--- The `cpuTimePrecision' constant is the smallest measurable difference
--- in CPU time that the implementation can record, and is given as an
--- integral number of picoseconds.
-
 getCPUTime :: IO Integer
 getCPUTime = do
 
@@ -111,6 +107,10 @@ foreign import ccall unsafe "GetProcessTimes" getProcessTimes :: Ptr HANDLE -> P
 
 #endif /* not _WIN32 */
 
+-- |The 'cpuTimePrecision' constant is the smallest measurable difference
+-- in CPU time that the implementation can record, and is given as an
+-- integral number of picoseconds.
+
 cpuTimePrecision :: Integer
 cpuTimePrecision = round ((1000000000000::Integer) % fromIntegral (clockTicks))