X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2FnativeGen%2FRegSpillClean.hs;fp=compiler%2FnativeGen%2FRegSpillClean.hs;h=47ded0846ec30caa79cbc6428894308b0e4f86d4;hb=873dc895ab9c059fa80c34d43e13228c5049ae9d;hp=ea36a5e511250d2a1ccdfcee2d2064e8bbd9ed59;hpb=ed3d36bc20f08a90938f4d33d3494007d46bd7db;p=ghc-hetmet.git

diff --git a/compiler/nativeGen/RegSpillClean.hs b/compiler/nativeGen/RegSpillClean.hs
index ea36a5e..47ded08 100644
--- a/compiler/nativeGen/RegSpillClean.hs
+++ b/compiler/nativeGen/RegSpillClean.hs
@@ -39,9 +39,10 @@ import UniqFM
 import Unique
 import State
 import Outputable
+import Util
 
 import Data.Maybe
-import Data.List
+import Data.List        ( nub )
 
 -- | Clean out unneeded spill/reloads from this top level thing.
 cleanSpills :: LiveCmmTop -> LiveCmmTop