X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2Fprelude%2FForeignCall.lhs;h=e97a2415d057768bf3661653d2c41294db468b4a;hb=235edf36cc202bb21c00d0e5e05ebf076fb0542e;hp=2f44e05e1ace373eb4d450df796ff788940b5a9f;hpb=8e3b5645e0bab683444c81bbbac87e2df6799959;p=ghc-hetmet.git

diff --git a/compiler/prelude/ForeignCall.lhs b/compiler/prelude/ForeignCall.lhs
index 2f44e05..e97a241 100644
--- a/compiler/prelude/ForeignCall.lhs
+++ b/compiler/prelude/ForeignCall.lhs
@@ -4,6 +4,13 @@
 \section[Foreign]{Foreign calls}
 
 \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 ForeignCall (
 	ForeignCall(..),
 	Safety(..), playSafe, playThreadSafe,