X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Flib%2Fstd%2FDirectory.lhs;h=6ca00295fd4fd19f3314e95a96182a5fb4aed1ac;hb=e921b2e307532e0f30eefa88b11a124be592bde4;hp=a516800dee84831389345973e1a37e1c75a2521b;hpb=449deb80dde91031b86b9cb4fb183696e0139bae;p=ghc-hetmet.git

diff --git a/ghc/lib/std/Directory.lhs b/ghc/lib/std/Directory.lhs
index a516800..6ca0029 100644
--- a/ghc/lib/std/Directory.lhs
+++ b/ghc/lib/std/Directory.lhs
@@ -51,16 +51,22 @@ module Directory
    ) where
 
 #ifdef __HUGS__
-import PreludeBuiltin
+--import PreludeBuiltin
 #else
-import PrelBase
-import PrelIOBase
-import PrelHandle	
-import PrelST
-import PrelArr
+
+import Prelude		-- Just to get it in the dependencies
+
+import PrelGHC		( RealWorld, int2Word#, or#, and# )
+import PrelByteArr	( ByteArray, MutableByteArray,
+			  newWordArray, readWordArray, newCharArray,
+			  unsafeFreezeByteArray
+			)
 import PrelPack		( unpackNBytesST, packString, unpackCStringST )
-import PrelAddr
+import PrelIOBase	( stToIO,
+			  constructErrorAndFail, constructErrorAndFailWithInfo,
+			  IOError(IOError), IOErrorType(SystemError) )
 import Time             ( ClockTime(..) )
+import PrelAddr		( Addr, nullAddr, Word(..), wordToInt )
 #endif
 
 \end{code}