[project @ 1997-05-19 00:12:10 by sof]

[ghc-hetmet.git] / ghc / compiler / nativeGen / AsmRegAlloc.lhs

diff --git a/ghc/compiler/nativeGen/AsmRegAlloc.lhs b/ghc/compiler/nativeGen/AsmRegAlloc.lhs
index b7e85f8..54af675 100644 (file)
--- a/ghc/compiler/nativeGen/AsmRegAlloc.lhs
+++ b/ghc/compiler/nativeGen/AsmRegAlloc.lhs
@@ -12,7 +12,11 @@ IMP_Ubiq(){-uitous-}
 
 import MachCode                ( SYN_IE(InstrList) )
 import MachMisc                ( Instr )
+#if __GLASGOW_HASKELL__ >= 202
+import MachRegs         hiding (Addr)
+#else
 import MachRegs
+#endif
 import RegAllocInfo
 
 import AbsCSyn         ( MagicId )