summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2019-11-05 15:58:17 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2019-11-07 08:40:50 -0500
commit55bc378721c66679d718f12655720be8d3425d67 (patch)
tree6aacce1ae5bed6ea5b3a13d27a1734c5089234e5
parenta424229da7cdf2ffca910ee0dd2af250f62ba5c3 (diff)
downloadhaskell-55bc378721c66679d718f12655720be8d3425d67.tar.gz
FlagChecker: Add ticky flags to hashed flags
These affect output and therefore should be part of the flag hash.
-rw-r--r--compiler/iface/FlagChecker.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/compiler/iface/FlagChecker.hs b/compiler/iface/FlagChecker.hs
index 34b55e9fef..92caee658b 100644
--- a/compiler/iface/FlagChecker.hs
+++ b/compiler/iface/FlagChecker.hs
@@ -57,7 +57,11 @@ fingerprintDynFlags dflags@DynFlags{..} this_mod nameio =
-- -fprof-auto etc.
prof = if gopt Opt_SccProfilingOn dflags then fromEnum profAuto else 0
- flags = (mainis, safeHs, lang, cpp, paths, prof)
+ -- Ticky
+ ticky =
+ map (`gopt` dflags) [Opt_Ticky, Opt_Ticky_Allocd, Opt_Ticky_LNE, Opt_Ticky_Dyn_Thunk]
+
+ flags = (mainis, safeHs, lang, cpp, paths, prof, ticky)
in -- pprTrace "flags" (ppr flags) $
computeFingerprint nameio flags