X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Futils%2FBag.lhs;h=2e50e00f8845f69e4d70080361bd978aa1d1b7d5;hb=7eb5e29b4a7b6fef55512bc7bf3308e712ca3eba;hp=d315c42074172c3c4cd2c8b77b9dc5d90049d23e;hpb=046ee54f048ddd721dcee41916d6a6f68db3b15b;p=ghc-hetmet.git

diff --git a/compiler/utils/Bag.lhs b/compiler/utils/Bag.lhs
index d315c42..2e50e00 100644
--- a/compiler/utils/Bag.lhs
+++ b/compiler/utils/Bag.lhs
@@ -6,6 +6,13 @@
 Bag: an unordered collection with duplicates
 
 \begin{code}
+{-# OPTIONS -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/Commentary/CodingStyle#Warnings
+-- for details
+
 module Bag (
 	Bag,	-- abstract type