X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Futils%2FListSetOps.lhs;h=976557e7e5f47daa02e6c83994eac504dbfb772c;hp=becf9e6da250f059bfb6226c4028f832b884cb17;hb=17b297d97d327620ed6bfab942f8992b2446f1bf;hpb=046ee54f048ddd721dcee41916d6a6f68db3b15b

diff --git a/compiler/utils/ListSetOps.lhs b/compiler/utils/ListSetOps.lhs
index becf9e6..976557e 100644
--- a/compiler/utils/ListSetOps.lhs
+++ b/compiler/utils/ListSetOps.lhs
@@ -5,6 +5,13 @@
 \section[ListSetOps]{Set-like operations on lists}
 
 \begin{code}
+{-# OPTIONS_GHC -w #-}
+-- The above warning supression flag is a temporary kludge.
+-- While working on this module you are encouraged to remove it and fix
+-- any warnings in the module. See
+--     http://hackage.haskell.org/trac/ghc/wiki/WorkingConventions#Warnings
+-- for details
+
 module ListSetOps (
 	unionLists, minusList, insertList,
 
@@ -24,9 +31,9 @@ module ListSetOps (
 import Outputable
 import Unique	( Unique )
 import UniqFM	( eltsUFM, emptyUFM, addToUFM_C )
-import Util	( isn'tIn, isIn, mapAccumR, sortLe )
+import Util	( isn'tIn, isIn, sortLe )
 
-import Data.List ( partition )
+import Data.List
 \end{code}