From: simonpj@microsoft.com <unknown>
Date: Thu, 28 Oct 2010 14:25:48 +0000 (+0000)
Subject: Remove -ds-multi-tyvar static flag
X-Git-Tag: 2010-11-18~58
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=fb9d21af24d076b12abb9e22251aa327f82e8ea8;p=ghc-hetmet.git

Remove -ds-multi-tyvar static flag

It was always secret, and has now vanished as silently as it came
---

diff --git a/compiler/main/StaticFlagParser.hs b/compiler/main/StaticFlagParser.hs
index 7d499e6..f7ad41f 100644
--- a/compiler/main/StaticFlagParser.hs
+++ b/compiler/main/StaticFlagParser.hs
@@ -177,7 +177,6 @@ isStaticFlag f =
     "dno-black-holing",
     "fno-state-hack",
     "fsimple-list-literals",
-    "fno-ds-multi-tyvar",
     "fruntime-types",
     "fno-pre-inlining",
     "fexcess-precision",
diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs
index 6e9e333..5a43eb6 100644
--- a/compiler/main/StaticFlags.hs
+++ b/compiler/main/StaticFlags.hs
@@ -39,7 +39,6 @@ module StaticFlags (
 	opt_Parallel,
 
 	-- optimisation opts
-	opt_DsMultiTyVar,
 	opt_NoStateHack,
         opt_SimpleListLiterals,
 	opt_CprOff,
@@ -227,11 +226,6 @@ opt_IrrefutableTuples		= lookUp  (fsLit "-firrefutable-tuples")
 opt_Parallel :: Bool
 opt_Parallel			= lookUp  (fsLit "-fparallel")
 
--- optimisation opts
-opt_DsMultiTyVar :: Bool
-opt_DsMultiTyVar		= not (lookUp (fsLit "-fno-ds-multi-tyvar"))
-	-- On by default
-
 opt_SimpleListLiterals :: Bool
 opt_SimpleListLiterals	        = lookUp  (fsLit "-fsimple-list-literals")