From fb9d21af24d076b12abb9e22251aa327f82e8ea8 Mon Sep 17 00:00:00 2001 From: "simonpj@microsoft.com" Date: Thu, 28 Oct 2010 14:25:48 +0000 Subject: [PATCH] Remove -ds-multi-tyvar static flag It was always secret, and has now vanished as silently as it came --- compiler/main/StaticFlagParser.hs | 1 - compiler/main/StaticFlags.hs | 6 ------ 2 files changed, 7 deletions(-) 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") -- 1.7.10.4