[project @ 2000-10-27 14:45:18 by simonmar]

fix some obvious bogons

ghc/compiler/main/DriverFlags.hs

 -----------------------------------------------------------------------------
--- $Id: DriverFlags.hs,v 1.10 2000/10/27 11:48:55 sewardj Exp $
+-- $Id: DriverFlags.hs,v 1.11 2000/10/27 14:45:18 simonmar Exp $
 --
 -- Driver flags
 --
@@ -328,61 +328,61 @@ dynamic_flags = [
 	------ Debugging ----------------------------------------------------
   ,  ( "dstg-stats",	NoArg (writeIORef v_StgStats True) )
 
-  ,  ( "ddump_all",         	 NoArg (setDynFlag Opt_D_dump_all) )
-  ,  ( "ddump_most",         	 NoArg (setDynFlag Opt_D_dump_most) )
-  ,  ( "ddump_absC",         	 NoArg (setDynFlag Opt_D_dump_absC) )
-  ,  ( "ddump_asm",          	 NoArg (setDynFlag Opt_D_dump_asm) )
-  ,  ( "ddump_cpranal",      	 NoArg (setDynFlag Opt_D_dump_cpranal) )
-  ,  ( "ddump_deriv",        	 NoArg (setDynFlag Opt_D_dump_deriv) )
-  ,  ( "ddump_ds",           	 NoArg (setDynFlag Opt_D_dump_ds) )
-  ,  ( "ddump_flatC",        	 NoArg (setDynFlag Opt_D_dump_flatC) )
-  ,  ( "ddump_foreign",      	 NoArg (setDynFlag Opt_D_dump_foreign) )
-  ,  ( "ddump_inlinings",    	 NoArg (setDynFlag Opt_D_dump_inlinings) )
-  ,  ( "ddump_occur_anal",   	 NoArg (setDynFlag Opt_D_dump_occur_anal) )
-  ,  ( "ddump_parsed",       	 NoArg (setDynFlag Opt_D_dump_parsed) )
-  ,  ( "ddump_realC",        	 NoArg (setDynFlag Opt_D_dump_realC) )
-  ,  ( "ddump_rn",           	 NoArg (setDynFlag Opt_D_dump_rn) )
-  ,  ( "ddump_simpl",        	 NoArg (setDynFlag Opt_D_dump_simpl) )
-  ,  ( "ddump_simpl_iterations", NoArg (setDynFlag Opt_D_dump_simpl_iterations) )
-  ,  ( "ddump_spec",         	 NoArg (setDynFlag Opt_D_dump_spec) )
-  ,  ( "ddump_stg",          	 NoArg (setDynFlag Opt_D_dump_stg) )
-  ,  ( "ddump_stranal",      	 NoArg (setDynFlag Opt_D_dump_stranal) )
-  ,  ( "ddump_tc",           	 NoArg (setDynFlag Opt_D_dump_tc) )
-  ,  ( "ddump_types",        	 NoArg (setDynFlag Opt_D_dump_types) )
-  ,  ( "ddump_rules",        	 NoArg (setDynFlag Opt_D_dump_rules) )
-  ,  ( "ddump_usagesp",      	 NoArg (setDynFlag Opt_D_dump_usagesp) )
-  ,  ( "ddump_cse",          	 NoArg (setDynFlag Opt_D_dump_cse) )
-  ,  ( "ddump_worker_wrapper",   NoArg (setDynFlag Opt_D_dump_worker_wrapper) )
-  ,  ( "dshow_passes",           NoArg (setDynFlag Opt_D_show_passes) )
-  ,  ( "ddump_rn_trace",         NoArg (setDynFlag Opt_D_dump_rn_trace) )
-  ,  ( "ddump_rn_stats",         NoArg (setDynFlag Opt_D_dump_rn_stats) )
-  ,  ( "ddump_stix",             NoArg (setDynFlag Opt_D_dump_stix) )
-  ,  ( "ddump_simpl_stats",      NoArg (setDynFlag Opt_D_dump_simpl_stats) )
-  ,  ( "dsource_stats",          NoArg (setDynFlag Opt_D_source_stats) )
-  ,  ( "dverbose_core2core",     NoArg (setDynFlag Opt_D_verbose_core2core) )
-  ,  ( "dverbose_stg2stg",       NoArg (setDynFlag Opt_D_verbose_stg2stg) )
-  ,  ( "ddump_hi_diffs",         NoArg (setDynFlag Opt_D_dump_hi_diffs) )
-  ,  ( "ddump_minimal_imports",  NoArg (setDynFlag Opt_D_dump_minimal_imports) )
-  ,  ( "DoCoreLinting",       	 NoArg (setDynFlag Opt_DoCoreLinting) )
-  ,  ( "DoStgLinting",        	 NoArg (setDynFlag Opt_DoStgLinting) )
-  ,  ( "DoUSPLinting",        	 NoArg (setDynFlag Opt_DoUSPLinting) )
+  ,  ( "ddump-all",         	 NoArg (setDynFlag Opt_D_dump_all) )
+  ,  ( "ddump-most",         	 NoArg (setDynFlag Opt_D_dump_most) )
+  ,  ( "ddump-absC",         	 NoArg (setDynFlag Opt_D_dump_absC) )
+  ,  ( "ddump-asm",          	 NoArg (setDynFlag Opt_D_dump_asm) )
+  ,  ( "ddump-cpranal",      	 NoArg (setDynFlag Opt_D_dump_cpranal) )
+  ,  ( "ddump-deriv",        	 NoArg (setDynFlag Opt_D_dump_deriv) )
+  ,  ( "ddump-ds",           	 NoArg (setDynFlag Opt_D_dump_ds) )
+  ,  ( "ddump-flatC",        	 NoArg (setDynFlag Opt_D_dump_flatC) )
+  ,  ( "ddump-foreign",      	 NoArg (setDynFlag Opt_D_dump_foreign) )
+  ,  ( "ddump-inlinings",    	 NoArg (setDynFlag Opt_D_dump_inlinings) )
+  ,  ( "ddump-occur-anal",   	 NoArg (setDynFlag Opt_D_dump_occur_anal) )
+  ,  ( "ddump-parsed",       	 NoArg (setDynFlag Opt_D_dump_parsed) )
+  ,  ( "ddump-realC",        	 NoArg (setDynFlag Opt_D_dump_realC) )
+  ,  ( "ddump-rn",           	 NoArg (setDynFlag Opt_D_dump_rn) )
+  ,  ( "ddump-simpl",        	 NoArg (setDynFlag Opt_D_dump_simpl) )
+  ,  ( "ddump-simpl-iterations", NoArg (setDynFlag Opt_D_dump_simpl_iterations) )
+  ,  ( "ddump-spec",         	 NoArg (setDynFlag Opt_D_dump_spec) )
+  ,  ( "ddump-stg",          	 NoArg (setDynFlag Opt_D_dump_stg) )
+  ,  ( "ddump-stranal",      	 NoArg (setDynFlag Opt_D_dump_stranal) )
+  ,  ( "ddump-tc",           	 NoArg (setDynFlag Opt_D_dump_tc) )
+  ,  ( "ddump-types",        	 NoArg (setDynFlag Opt_D_dump_types) )
+  ,  ( "ddump-rules",        	 NoArg (setDynFlag Opt_D_dump_rules) )
+  ,  ( "ddump-usagesp",      	 NoArg (setDynFlag Opt_D_dump_usagesp) )
+  ,  ( "ddump-cse",          	 NoArg (setDynFlag Opt_D_dump_cse) )
+  ,  ( "ddump-worker-wrapper",   NoArg (setDynFlag Opt_D_dump_worker_wrapper) )
+  ,  ( "dshow-passes",           NoArg (setDynFlag Opt_D_show_passes) )
+  ,  ( "ddump-rn-trace",         NoArg (setDynFlag Opt_D_dump_rn_trace) )
+  ,  ( "ddump-rn-stats",         NoArg (setDynFlag Opt_D_dump_rn_stats) )
+  ,  ( "ddump-stix",             NoArg (setDynFlag Opt_D_dump_stix) )
+  ,  ( "ddump-simpl-stats",      NoArg (setDynFlag Opt_D_dump_simpl_stats) )
+  ,  ( "dsource-stats",          NoArg (setDynFlag Opt_D_source_stats) )
+  ,  ( "dverbose-core2core",     NoArg (setDynFlag Opt_D_verbose_core2core) )
+  ,  ( "dverbose-stg2stg",       NoArg (setDynFlag Opt_D_verbose_stg2stg) )
+  ,  ( "ddump-hi-diffs",         NoArg (setDynFlag Opt_D_dump_hi_diffs) )
+  ,  ( "ddump-minimal-imports",  NoArg (setDynFlag Opt_D_dump_minimal_imports) )
+  ,  ( "dcore-lint",       	 NoArg (setDynFlag Opt_DoCoreLinting) )
+  ,  ( "dstg-lint",        	 NoArg (setDynFlag Opt_DoStgLinting) )
+  ,  ( "dusagesp-lint",        	 NoArg (setDynFlag Opt_DoUSPLinting) )
 
 	------ Warnings ----------------------------------------------------
 
-  ,  ( "-fwarn-duplicate-exports", NoArg (setDynFlag Opt_WarnDuplicateExports) )
-  ,  ( "-fwarn-hi-shadowing",      NoArg (setDynFlag Opt_WarnHiShadows) )
-  ,  ( "-fwarn-incomplete-patterns",  NoArg (setDynFlag Opt_WarnIncompletePatterns) )
-  ,  ( "-fwarn-missing-fields",    NoArg (setDynFlag Opt_WarnMissingFields) )
-  ,  ( "-fwarn-missing-methods",   NoArg (setDynFlag Opt_WarnMissingMethods))
-  ,  ( "-fwarn-missing-signatures", NoArg (setDynFlag Opt_WarnMissingSigs) )
-  ,  ( "-fwarn-name-shadowing",    NoArg (setDynFlag Opt_WarnNameShadowing) )
-  ,  ( "-fwarn-overlapping-patterns", NoArg (setDynFlag Opt_WarnOverlappingPatterns ) )
-  ,  ( "-fwarn-simple-patterns",   NoArg (setDynFlag Opt_WarnSimplePatterns))
-  ,  ( "-fwarn-type-defaults",     NoArg (setDynFlag Opt_WarnTypeDefaults) )
-  ,  ( "-fwarn-unused-binds",      NoArg (setDynFlag Opt_WarnUnusedBinds) )
-  ,  ( "-fwarn-unused-imports",    NoArg (setDynFlag Opt_WarnUnusedImports) )
-  ,  ( "-fwarn-unused-matches",    NoArg (setDynFlag Opt_WarnUnusedMatches) )
-  ,  ( "-fwarn-deprecations",      NoArg (setDynFlag Opt_WarnDeprecations) )
+  ,  ( "fwarn-duplicate-exports", NoArg (setDynFlag Opt_WarnDuplicateExports) )
+  ,  ( "fwarn-hi-shadowing",      NoArg (setDynFlag Opt_WarnHiShadows) )
+  ,  ( "fwarn-incomplete-patterns",  NoArg (setDynFlag Opt_WarnIncompletePatterns) )
+  ,  ( "fwarn-missing-fields",    NoArg (setDynFlag Opt_WarnMissingFields) )
+  ,  ( "fwarn-missing-methods",   NoArg (setDynFlag Opt_WarnMissingMethods))
+  ,  ( "fwarn-missing-signatures", NoArg (setDynFlag Opt_WarnMissingSigs) )
+  ,  ( "fwarn-name-shadowing",    NoArg (setDynFlag Opt_WarnNameShadowing) )
+  ,  ( "fwarn-overlapping-patterns", NoArg (setDynFlag Opt_WarnOverlappingPatterns ) )
+  ,  ( "fwarn-simple-patterns",   NoArg (setDynFlag Opt_WarnSimplePatterns))
+  ,  ( "fwarn-type-defaults",     NoArg (setDynFlag Opt_WarnTypeDefaults) )
+  ,  ( "fwarn-unused-binds",      NoArg (setDynFlag Opt_WarnUnusedBinds) )
+  ,  ( "fwarn-unused-imports",    NoArg (setDynFlag Opt_WarnUnusedImports) )
+  ,  ( "fwarn-unused-matches",    NoArg (setDynFlag Opt_WarnUnusedMatches) )
+  ,  ( "fwarn-deprecations",      NoArg (setDynFlag Opt_WarnDeprecations) )
 
 	------ Machine dependant (-m<blah>) stuff ---------------------------