X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FCmdLineOpts.lhs;h=84c94900cc7d2420c67d5ac48a62437c98486db8;hb=957bf3756ffd56f5329a2aabe1022d6f996dd641;hp=2cb7e44fa8796dc0124dac72ddfc971492507326;hpb=e8f681e4b0294bf44ba50df80559112c769242ce;p=ghc-hetmet.git

diff --git a/ghc/compiler/main/CmdLineOpts.lhs b/ghc/compiler/main/CmdLineOpts.lhs
index 2cb7e44..84c9490 100644
--- a/ghc/compiler/main/CmdLineOpts.lhs
+++ b/ghc/compiler/main/CmdLineOpts.lhs
@@ -78,7 +78,6 @@ module CmdLineOpts (
 	opt_StgDoLetNoEscapes,
 	opt_UnfoldCasms,
 	opt_CprOff,
-        opt_UsageSPOn,
 	opt_UnboxStrictFields,
 	opt_SimplNoPreInlining,
 	opt_SimplDoEtaReduction,
@@ -186,7 +185,6 @@ data CoreToDo		-- These are diff core-to-core passes,
   | CoreDoWorkerWrapper
   | CoreDoSpecialising
   | CoreDoSpecConstr
-  | CoreDoUSPInf
   | CoreDoOldStrictness
   | CoreDoGlomBinds
   | CoreCSE
@@ -250,7 +248,6 @@ data DynFlag
    | Opt_D_dump_tc
    | Opt_D_dump_types
    | Opt_D_dump_rules
-   | Opt_D_dump_usagesp
    | Opt_D_dump_cse
    | Opt_D_dump_worker_wrapper
    | Opt_D_dump_rn_trace
@@ -269,7 +266,6 @@ data DynFlag
    | Opt_D_dump_minimal_imports
    | Opt_DoCoreLinting
    | Opt_DoStgLinting
-   | Opt_DoUSPLinting
 
    | Opt_WarnIsError		-- -Werror; makes warnings fatal
    | Opt_WarnDuplicateExports
@@ -594,7 +590,6 @@ opt_CprOff			= lookUp  FSLIT("-fcpr-off")
 opt_LiberateCaseThreshold	= lookup_def_int "-fliberate-case-threshold" (10::Int)
 opt_StgDoLetNoEscapes		= lookUp  FSLIT("-flet-no-escape")
 opt_UnfoldCasms		        = lookUp  FSLIT("-funfold-casms-in-hi-file")
-opt_UsageSPOn           	= lookUp  FSLIT("-fusagesp-on")
 opt_UnboxStrictFields		= lookUp  FSLIT("-funbox-strict-fields")
 opt_MaxWorkerArgs		= lookup_def_int "-fmax-worker-args" (10::Int)
 
@@ -671,7 +666,6 @@ isStaticHscFlag f =
 	"ffoldr-build-on",
 	"flet-no-escape",
 	"funfold-casms-in-hi-file",
-	"fusagesp-on",
 	"funbox-strict-fields",
 	"femit-extern-decls",
 	"fglobalise-toplev-names",