X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FDriverPhases.hs;h=5efb46f2ba9a033fd856c38ad757ed95cbdf2eec;hb=6a65049a2b80e42ec44ebd775be98a70101ac495;hp=875c9f65a7a337c1ed4abf2b01474270a49a02e0;hpb=0a4c03a87095fa6440fa89369daa8f3ea727cf7f;p=ghc-hetmet.git

diff --git a/compiler/main/DriverPhases.hs b/compiler/main/DriverPhases.hs
index 875c9f6..5efb46f 100644
--- a/compiler/main/DriverPhases.hs
+++ b/compiler/main/DriverPhases.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
+
 -----------------------------------------------------------------------------
 --  $Id: DriverPhases.hs,v 1.38 2005/05/17 11:01:59 simonmar Exp $
 --
@@ -183,10 +190,6 @@ phaseInputExt SplitAs     	  = "split_s"   -- not really generated
 phaseInputExt CmmCpp	  	  = "cmm"
 phaseInputExt Cmm	  	  = "cmmcpp"
 phaseInputExt StopLn          	  = "o"
-#ifdef ILX
-phaseInputExt Ilx2Il      	  = "ilx"
-phaseInputExt Ilasm       	  = "il"
-#endif
 
 haskellish_src_suffixes      = haskellish_user_src_suffixes ++
 			       [ "hspp", "hscpp", "hcr", "cmm" ]