diff options
author | Matthew Pickering <matthewtpickering@gmail.com> | 2020-12-21 09:15:45 +0000 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-02-27 07:59:33 -0500 |
commit | 966a768e9b99e72c9d98a1c971427044888d6de9 (patch) | |
tree | ac7773fcf7bf854790609846e20b3001ca7a12d1 /libraries | |
parent | 98dd09afdebe8d5b6def4c3b11a4c0495df47de4 (diff) | |
download | haskell-966a768e9b99e72c9d98a1c971427044888d6de9.tar.gz |
Remove the -xt heap profiling option
It should be left to tooling to perform the filtering to remove these
specific closure types from the profile if desired.
Fixes #16795
Diffstat (limited to 'libraries')
-rw-r--r-- | libraries/base/GHC/RTS/Flags.hsc | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/libraries/base/GHC/RTS/Flags.hsc b/libraries/base/GHC/RTS/Flags.hsc index b23ae34165..2130ee1aaa 100644 --- a/libraries/base/GHC/RTS/Flags.hsc +++ b/libraries/base/GHC/RTS/Flags.hsc @@ -288,7 +288,6 @@ data ProfFlags = ProfFlags { doHeapProfile :: DoHeapProfile , heapProfileInterval :: RtsTime -- ^ time between samples , heapProfileIntervalTicks :: Word -- ^ ticks between samples (derived) - , includeTSOs :: Bool , showCCSOnException :: Bool , maxRetainerSetSize :: Word , ccsLength :: Word @@ -585,8 +584,6 @@ getProfFlags = do <*> #{peek PROFILING_FLAGS, heapProfileInterval} ptr <*> #{peek PROFILING_FLAGS, heapProfileIntervalTicks} ptr <*> (toBool <$> - (#{peek PROFILING_FLAGS, includeTSOs} ptr :: IO CBool)) - <*> (toBool <$> (#{peek PROFILING_FLAGS, showCCSOnException} ptr :: IO CBool)) <*> #{peek PROFILING_FLAGS, maxRetainerSetSize} ptr <*> #{peek PROFILING_FLAGS, ccsLength} ptr |