X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FnativeGen%2FRegCoalesce.hs;h=56ffe4f1058b7f0bf824c1e92c0bff62aa118896;hp=f3b19ad5aef7da17d482a5dd276bbc97533a271a;hb=17b297d97d327620ed6bfab942f8992b2446f1bf;hpb=e11fa7a5e0025460df3b8562ccbf3ffd1db68d5d

diff --git a/compiler/nativeGen/RegCoalesce.hs b/compiler/nativeGen/RegCoalesce.hs
index f3b19ad..56ffe4f 100644
--- a/compiler/nativeGen/RegCoalesce.hs
+++ b/compiler/nativeGen/RegCoalesce.hs
@@ -2,6 +2,13 @@
 -- | Register coalescing.
 --
 
+{-# 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 RegCoalesce (
 	regCoalesce,
 	slurpJoinMovs