X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FStaticFlags.hs;h=41ff6670474eb851b03b679851bdbe5b5e159d1f;hb=ea9beba7cf9a1a3b4e8ad588828130088d8dd7fc;hp=7200c35dca920d58cc6bb1f020e2bda8cc787396;hpb=fc85319dfd71f7a642c1858fcdfa4b3d2a10acda;p=ghc-hetmet.git

diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs
index 7200c35..41ff667 100644
--- a/compiler/main/StaticFlags.hs
+++ b/compiler/main/StaticFlags.hs
@@ -36,7 +36,6 @@ module StaticFlags (
 	opt_DictsStrict,
 	opt_IrrefutableTuples,
 	opt_Parallel,
-	opt_RuntimeTypes,
 
 	-- optimisation opts
 	opt_NoMethodSharing, 
@@ -75,7 +74,7 @@ module StaticFlags (
 
 import CmdLineParser
 import Config
-import FastString	( FastString, mkFastString )
+import FastString
 import Util
 import Maybes		( firstJust )
 import Panic
@@ -334,8 +333,6 @@ opt_HistorySize :: Int
 opt_HistorySize			= lookup_def_int "-fhistory-size" 20
 opt_OmitBlackHoling :: Bool
 opt_OmitBlackHoling		= lookUp  FSLIT("-dno-black-holing")
-opt_RuntimeTypes :: Bool
-opt_RuntimeTypes		= lookUp  FSLIT("-fruntime-types")
 
 -- Simplifier switches
 opt_SimplNoPreInlining :: Bool