[project @ 1998-08-14 12:59:24 by sof]

[ghc-hetmet.git] / ghc / lib / std / CPUTime.lhs

diff --git a/ghc/lib/std/CPUTime.lhs b/ghc/lib/std/CPUTime.lhs
index 12d1e87..577da56 100644 (file)
--- a/ghc/lib/std/CPUTime.lhs
+++ b/ghc/lib/std/CPUTime.lhs
@@ -43,8 +43,8 @@ getCPUTime =
                fromIntegral (I# (indexIntArray# frozen# 2#)) * 1000000000 + 
                 fromIntegral (I# (indexIntArray# frozen# 3#))) * 1000)
     else
-       fail (IOError Nothing UnsupportedOperation 
-               "getCPUTime: can't get CPU time")
+       fail (IOError Nothing UnsupportedOperation "getCPUTime"
+               "can't get CPU time")
 
 cpuTimePrecision :: Integer
 cpuTimePrecision = round ((1000000000000::Integer) %