[project @ 2002-08-29 15:44:11 by simonmar]
[ghc-hetmet.git] / ghc / compiler / main / BinIface.hs
index e9e1694..cb8a570 100644 (file)
@@ -7,6 +7,8 @@
 
 module BinIface ( writeBinIface ) where
 
+#include "HsVersions.h"
+
 import HscTypes
 import BasicTypes
 import NewDemand
@@ -28,14 +30,12 @@ import CmdLineOpts  ( opt_IgnoreIfacePragmas, opt_HiVersion )
 import StringBuffer    ( hGetStringBuffer )
 import Panic
 import SrcLoc
-
 import Binary
 
-import IOExts          ( readIORef )
-import Monad           ( when )
-import Exception       ( throwDyn )
+import DATA_IOREF      ( readIORef )
+import EXCEPTION       ( throwDyn )
 
-#include "HsVersions.h"
+import Monad           ( when )
 
 -- BasicTypes
 {-! for IPName derive: Binary !-}