X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FDynFlags.hs;h=206b4948705280586455d8115c4f6f9338ec2198;hb=90dc9026b091be5cca5da4c6cbd3713ecc493361;hp=d0fce4af97fed40a93e7252d59c25913c5307b10;hpb=89a8960b2a270973743a2dfe4dee9fb2b25e870a;p=ghc-hetmet.git

diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs
index d0fce4a..206b494 100644
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -102,6 +102,7 @@ data DynFlag
    | Opt_D_dump_flatC
    | Opt_D_dump_foreign
    | Opt_D_dump_inlinings
+   | Opt_D_dump_rule_firings
    | Opt_D_dump_occur_anal
    | Opt_D_dump_parsed
    | Opt_D_dump_rn
@@ -155,6 +156,7 @@ data DynFlag
    | Opt_WarnDeprecations
    | Opt_WarnDodgyImports
    | Opt_WarnOrphans
+   | Opt_WarnTabs
 
    -- language opts
    | Opt_AllowOverlappingInstances
@@ -174,6 +176,7 @@ data DynFlag
    | Opt_ScopedTypeVariables
    | Opt_BangPatterns
    | Opt_IndexedTypes
+   | Opt_OverloadedStrings
 
    -- optimisation opts
    | Opt_Strictness
@@ -932,6 +935,7 @@ dynamic_flags = [
   ,  ( "ddump-flatC",        	 setDumpFlag Opt_D_dump_flatC)
   ,  ( "ddump-foreign",      	 setDumpFlag Opt_D_dump_foreign)
   ,  ( "ddump-inlinings",    	 setDumpFlag Opt_D_dump_inlinings)
+  ,  ( "ddump-rule-firings",   	 setDumpFlag Opt_D_dump_rule_firings)
   ,  ( "ddump-occur-anal",   	 setDumpFlag Opt_D_dump_occur_anal)
   ,  ( "ddump-parsed",       	 setDumpFlag Opt_D_dump_parsed)
   ,  ( "ddump-rn",           	 setDumpFlag Opt_D_dump_rn)
@@ -1030,6 +1034,7 @@ fFlags = [
   ( "warn-unused-matches",       	Opt_WarnUnusedMatches ),
   ( "warn-deprecations",         	Opt_WarnDeprecations ),
   ( "warn-orphans",	         	Opt_WarnOrphans ),
+  ( "warn-tabs",	         	Opt_WarnTabs ),
   ( "fi",				Opt_FFI ),  -- support `-ffi'...
   ( "ffi",				Opt_FFI ),  -- ...and also `-fffi'
   ( "arrows",				Opt_Arrows ), -- arrow syntax
@@ -1038,6 +1043,7 @@ fFlags = [
   ( "implicit-prelude",  		Opt_ImplicitPrelude ),
   ( "scoped-type-variables",  		Opt_ScopedTypeVariables ),
   ( "bang-patterns",	  		Opt_BangPatterns ),
+  ( "overloaded-strings",		Opt_OverloadedStrings ),
   ( "indexed-types",	  		Opt_IndexedTypes ),
   ( "monomorphism-restriction",		Opt_MonomorphismRestriction ),
   ( "mono-pat-binds",			Opt_MonoPatBinds ),