X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Flib%2Fstd%2FRandom.lhs;h=09ba145892d4f447b7916ea24e1205f23af6f22a;hb=e921b2e307532e0f30eefa88b11a124be592bde4;hp=9bf845e0bce162dd35364b64a7ca6baff2a754ae;hpb=f7989a6dea8c43352f363117d9bb07439953ccdc;p=ghc-hetmet.git

diff --git a/ghc/lib/std/Random.lhs b/ghc/lib/std/Random.lhs
index 9bf845e..09ba145 100644
--- a/ghc/lib/std/Random.lhs
+++ b/ghc/lib/std/Random.lhs
@@ -29,17 +29,18 @@ module Random
 	) where
 
 #ifndef __HUGS__
-import CPUTime (getCPUTime)
-import PrelST
-import PrelRead
-import PrelShow
-import PrelNum		-- So we get fromInt, toInt
-import PrelIOBase
-import PrelNumExtra ( float2Double, double2Float )
-import PrelBase
-import PrelArr
-import Time (getClockTime, ClockTime(..))
+import PrelGHC		( RealWorld )
+import PrelNum		( fromInt )
+import PrelShow		( showSignedInt, showSpace )
+import PrelRead		( readDec )
+import PrelIOBase	( unsafePerformIO, stToIO )
+import PrelArr		( MutableVar, newVar, readVar, writeVar )
+import PrelReal		( toInt )
+import CPUTime		( getCPUTime )
+import PrelFloat	( float2Double, double2Float )
+import Time		( getClockTime, ClockTime(..) )
 #endif
+
 import Char ( isSpace, chr, ord )
 \end{code}