From: panne <unknown>
Date: Thu, 9 Mar 2000 13:33:01 +0000 (+0000)
Subject: [project @ 2000-03-09 13:33:01 by panne]
X-Git-Tag: Approximately_9120_patches~5029
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=8967a36a95943687920eb41e5a3d126f52b2737e;p=ghc-hetmet.git

[project @ 2000-03-09 13:33:01 by panne]
Changed an #ifdef so that the Prelude can be builit again by GHC.
---

diff --git a/ghc/lib/std/Random.lhs b/ghc/lib/std/Random.lhs
index 889d423..2d61fc2 100644
--- a/ghc/lib/std/Random.lhs
+++ b/ghc/lib/std/Random.lhs
@@ -38,8 +38,7 @@ import PrelArr		( MutableVar, newVar, readVar, writeVar )
 import PrelReal		( toInt )
 import PrelFloat	( float2Double, double2Float )
 import Time		( getClockTime, ClockTime(..) )
-#endif
-import CPUTime		( getCPUTime )
+#else
 import Prelude
 import privileged Prelude
 			( IORef
@@ -48,9 +47,10 @@ import privileged Prelude
 			, writeIORef
 			, unsafePerformIO
 			)
+#endif
 
-
-import Char ( isSpace, chr, ord )
+import CPUTime		( getCPUTime )
+import Char		( isSpace, chr, ord )
 \end{code}
 
 \begin{code}