[project @ 2002-03-11 13:56:49 by simonmar]

import openFileEx and IOModeEx(..)

diff --git a/ghc/compiler/utils/Binary.hs b/ghc/compiler/utils/Binary.hs
index 207394b..cea5c0f 100644 (file)
--- a/ghc/compiler/utils/Binary.hs
+++ b/ghc/compiler/utils/Binary.hs
@@ -91,6 +91,7 @@ import GHC.Real                       ( Ratio(..) )
 import GHC.Exts
 import GHC.IOBase              ( IO(..) )
 import GHC.Word                        ( Word8(..) )
+import GHC.Handle              ( openFileEx, IOModeEx(..) )
 #endif
 
 #if __GLASGOW_HASKELL__ < 503