X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FnativeGen%2FNCGMonad.hs;h=e5da5a5ebc71e004bc2b65d161faca1df6bb8cd7;hb=33770e2e376005ff14a1d16b89f32b0d474425e2;hp=02491d1d2e312a8f400e056d003335976f6173aa;hpb=81b2276ff9434d97aff683218c34c86479a8d868;p=ghc-hetmet.git

diff --git a/compiler/nativeGen/NCGMonad.hs b/compiler/nativeGen/NCGMonad.hs
index 02491d1..e5da5a5 100644
--- a/compiler/nativeGen/NCGMonad.hs
+++ b/compiler/nativeGen/NCGMonad.hs
@@ -1,3 +1,10 @@
+{-# 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
+
 -- -----------------------------------------------------------------------------
 --
 -- (c) The University of Glasgow 1993-2004
@@ -18,7 +25,7 @@ module NCGMonad (
   
 #include "HsVersions.h"
 
-import Cmm		( BlockId(..) )
+import BlockId
 import CLabel		( CLabel, mkAsmTempLabel )
 import MachRegs
 import MachOp		( MachRep )