X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FsimplCore%2FOccurAnal.lhs;h=ae2b7b902399af3fc851682739d8b24a2dee768a;hb=12ee8b3dcf37a2f6974167886e17ae2e03c9cd72;hp=dc20fd2d0b427a2e435e73cf0275e7d18a943d17;hpb=43d903cfaafb0b41242af128c7ddbf0b649f63bd;p=ghc-hetmet.git

diff --git a/compiler/simplCore/OccurAnal.lhs b/compiler/simplCore/OccurAnal.lhs
index dc20fd2..ae2b7b9 100644
--- a/compiler/simplCore/OccurAnal.lhs
+++ b/compiler/simplCore/OccurAnal.lhs
@@ -35,8 +35,10 @@ import Digraph		( stronglyConnCompR, SCC(..) )
 import PrelNames	( buildIdKey, foldrIdKey, runSTRepIdKey, augmentIdKey )
 import Unique		( Unique )
 import UniqFM		( keysUFM, intersectsUFM )  
-import Util		( mapAndUnzip, mapAccumL )
+import Util		( mapAndUnzip )
 import Outputable
+
+import Data.List
 \end{code}