From 948f3e353c980e9a617aa1ef3d7544063c1e9443 Mon Sep 17 00:00:00 2001
From: Sebastian Graf <sebastian.graf@kit.edu>
Date: Tue, 18 Jan 2022 18:33:30 +0100
Subject: [PATCH] Rename Opt_D_dump_stranal to Opt_D_dump_dmdanal
... and Opt_D_dump_str_signatures to Opt_D_dump_dmd_signatures
---
compiler/GHC/Core/Opt/Pipeline.hs | 2 +-
compiler/GHC/Driver/Config/Core/Lint.hs | 2 +-
compiler/GHC/Driver/Flags.hs | 4 ++--
compiler/GHC/Driver/Session.hs | 4 ++--
4 files changed, 6 insertions(+), 6 deletions(-)
diff --git a/compiler/GHC/Core/Opt/Pipeline.hs b/compiler/GHC/Core/Opt/Pipeline.hs
index 3c5ac7b6bfd7..2260e2818243 100644
--- a/compiler/GHC/Core/Opt/Pipeline.hs
+++ b/compiler/GHC/Core/Opt/Pipeline.hs
@@ -567,7 +567,7 @@ dmdAnal logger before_ww dflags fam_envs rules binds = do
, dmd_max_worker_args = maxWorkerArgs dflags
}
binds_plus_dmds = dmdAnalProgram opts fam_envs rules binds
- Logger.putDumpFileMaybe logger Opt_D_dump_str_signatures "Strictness signatures" FormatText $
+ Logger.putDumpFileMaybe logger Opt_D_dump_dmd_signatures "Demand signatures" FormatText $
dumpIdInfoOfProgram (hasPprDebug dflags) (ppr . zapDmdEnvSig . dmdSigInfo) binds_plus_dmds
-- See Note [Stamp out space leaks in demand analysis] in GHC.Core.Opt.DmdAnal
seqBinds binds_plus_dmds `seq` return binds_plus_dmds
diff --git a/compiler/GHC/Driver/Config/Core/Lint.hs b/compiler/GHC/Driver/Config/Core/Lint.hs
index 1e9e3a13afd6..5decc11fc316 100644
--- a/compiler/GHC/Driver/Config/Core/Lint.hs
+++ b/compiler/GHC/Driver/Config/Core/Lint.hs
@@ -83,7 +83,7 @@ coreDumpFlag CoreLiberateCase = Just Opt_D_dump_liberate_case
coreDumpFlag CoreDoStaticArgs = Just Opt_D_dump_static_argument_transformation
coreDumpFlag CoreDoCallArity = Just Opt_D_dump_call_arity
coreDumpFlag CoreDoExitify = Just Opt_D_dump_exitify
-coreDumpFlag (CoreDoDemand {}) = Just Opt_D_dump_stranal
+coreDumpFlag (CoreDoDemand {}) = Just Opt_D_dump_dmdanal
coreDumpFlag CoreDoCpr = Just Opt_D_dump_cpranal
coreDumpFlag CoreDoWorkerWrapper = Just Opt_D_dump_worker_wrapper
coreDumpFlag CoreDoSpecialising = Just Opt_D_dump_spec
diff --git a/compiler/GHC/Driver/Flags.hs b/compiler/GHC/Driver/Flags.hs
index 4fda2f1835b2..0aadea7c3d38 100644
--- a/compiler/GHC/Driver/Flags.hs
+++ b/compiler/GHC/Driver/Flags.hs
@@ -118,8 +118,8 @@ data DumpFlag
| Opt_D_dump_stg_final -- ^ Final STG (before cmm gen)
| Opt_D_dump_call_arity
| Opt_D_dump_exitify
- | Opt_D_dump_stranal
- | Opt_D_dump_str_signatures
+ | Opt_D_dump_dmdanal
+ | Opt_D_dump_dmd_signatures
| Opt_D_dump_cpranal
| Opt_D_dump_cpr_signatures
| Opt_D_dump_tc
diff --git a/compiler/GHC/Driver/Session.hs b/compiler/GHC/Driver/Session.hs
index 93841ff1c337..90028bf947d2 100644
--- a/compiler/GHC/Driver/Session.hs
+++ b/compiler/GHC/Driver/Session.hs
@@ -1462,9 +1462,9 @@ dynamic_flags_deps = [
, make_ord_flag defGhcFlag "ddump-exitify"
(setDumpFlag Opt_D_dump_exitify)
, make_ord_flag defGhcFlag "ddump-stranal"
- (setDumpFlag Opt_D_dump_stranal)
+ (setDumpFlag Opt_D_dump_dmdanal)
, make_ord_flag defGhcFlag "ddump-str-signatures"
- (setDumpFlag Opt_D_dump_str_signatures)
+ (setDumpFlag Opt_D_dump_dmd_signatures)
, make_ord_flag defGhcFlag "ddump-cpranal"
(setDumpFlag Opt_D_dump_cpranal)
, make_ord_flag defGhcFlag "ddump-cpr-signatures"
--
GitLab