X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FnativeGen%2FRegisterAlloc.hs;fp=compiler%2FnativeGen%2FRegisterAlloc.hs;h=36a098e1b24e873ef4f3fa71a08907086b6b3ce3;hb=046ee54f048ddd721dcee41916d6a6f68db3b15b;hp=bbab5180e7cc951f61dc1514f5d41d9e322f390b;hpb=5199290f732017432869c9939934871e62c50b74;p=ghc-hetmet.git

diff --git a/compiler/nativeGen/RegisterAlloc.hs b/compiler/nativeGen/RegisterAlloc.hs
index bbab518..36a098e 100644
--- a/compiler/nativeGen/RegisterAlloc.hs
+++ b/compiler/nativeGen/RegisterAlloc.hs
@@ -100,13 +100,13 @@ import UniqSupply
 import Outputable
 
 #ifndef DEBUG
-import Maybe		( fromJust )
+import Data.Maybe	( fromJust )
 #endif
-import Maybe		( fromMaybe )
-import List		( nub, partition, mapAccumL, groupBy )
-import Monad		( when )
-import DATA_WORD
-import DATA_BITS
+import Data.Maybe	( fromMaybe )
+import Data.List	( nub, partition, mapAccumL, groupBy )
+import Control.Monad	( when )
+import Data.Word
+import Data.Bits
 
 -- -----------------------------------------------------------------------------
 -- Some useful types