opt_Parallel,
-- optimisation opts
+ opt_PassCaseBndrToJoinPoints,
opt_DsMultiTyVar,
opt_NoStateHack,
+ opt_SimpleListLiterals,
opt_SpecInlineJoinPoints,
opt_CprOff,
opt_SimplNoPreInlining,
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")
+opt_SimpleListLiterals :: Bool
+opt_SimpleListLiterals = lookUp (fsLit "-fsimple-list-literals")
+
opt_NoStateHack :: Bool
opt_NoStateHack = lookUp (fsLit "-fno-state-hack")
+
opt_CprOff :: Bool
opt_CprOff = lookUp (fsLit "-fcpr-off")
-- Switch off CPR analysis in the new demand analyser