diff options
Diffstat (limited to 'compiler/main/StaticFlags.hs')
| -rw-r--r-- | compiler/main/StaticFlags.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs index 99f3f84ccd..026273e7e1 100644 --- a/compiler/main/StaticFlags.hs +++ b/compiler/main/StaticFlags.hs @@ -41,6 +41,7 @@ module StaticFlags ( opt_Parallel, -- optimisation opts + opt_PassCaseBndrToJoinPoints, opt_DsMultiTyVar, opt_NoStateHack, opt_SimpleListLiterals, @@ -225,6 +226,9 @@ opt_DsMultiTyVar :: Bool opt_DsMultiTyVar = not (lookUp (fsLit "-fno-ds-multi-tyvar")) -- On by default +opt_PassCaseBndrToJoinPoints :: Bool +opt_PassCaseBndrToJoinPoints = lookUp (fsLit "-fpass-case-bndr-to-join-points") + opt_SpecInlineJoinPoints :: Bool opt_SpecInlineJoinPoints = lookUp (fsLit "-fspec-inline-join-points") |