X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FndpFlatten%2FFlattenInfo.hs;h=00b65d773ae970d4433f5a035a7cd0c5cb21c756;hb=6a05ec5ef5373f61b7f9f5bdc344483417fa801b;hp=f759242455f00026b9c72246ac7e3653817a184e;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/compiler/ndpFlatten/FlattenInfo.hs b/compiler/ndpFlatten/FlattenInfo.hs
index f759242..00b65d7 100644
--- a/compiler/ndpFlatten/FlattenInfo.hs
+++ b/compiler/ndpFlatten/FlattenInfo.hs
@@ -18,6 +18,13 @@
 --- TODO ----------------------------------------------------------------------
 --
 
+{-# 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 FlattenInfo (
   namesNeededForFlattening
 ) where