diff options
author | Ben Gamari <ben@smart-cactus.org> | 2021-02-16 16:53:37 -0500 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-03 08:12:40 -0500 |
commit | 5c4dcc3e3735544bcc7c1bccbe7fd9e5db908c23 (patch) | |
tree | cf231947db3cca549dac124742b03a69dba18a3c | |
parent | e81f2e4e466cfefca9cae425a148030711a5b15f (diff) | |
download | haskell-5c4dcc3e3735544bcc7c1bccbe7fd9e5db908c23.tar.gz |
ghc-heap: Fix profiled build
Previously a255b4e38918065ac028789872e53239ac30ae1a failed to update the
non-profiling codepath.
-rw-r--r-- | libraries/ghc-heap/GHC/Exts/Heap/ProfInfo/PeekProfInfo_ProfilingEnabled.hsc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/ghc-heap/GHC/Exts/Heap/ProfInfo/PeekProfInfo_ProfilingEnabled.hsc b/libraries/ghc-heap/GHC/Exts/Heap/ProfInfo/PeekProfInfo_ProfilingEnabled.hsc index 964b1f0b45..e6619c359c 100644 --- a/libraries/ghc-heap/GHC/Exts/Heap/ProfInfo/PeekProfInfo_ProfilingEnabled.hsc +++ b/libraries/ghc-heap/GHC/Exts/Heap/ProfInfo/PeekProfInfo_ProfilingEnabled.hsc @@ -165,8 +165,8 @@ import Foreign import GHC.Exts.Heap.ProfInfo.Types -peekStgTSOProfInfo :: Ptr a -> IO (Maybe StgTSOProfInfo) -peekStgTSOProfInfo _ = return Nothing +peekStgTSOProfInfo :: (Ptr b -> IO (Maybe CostCentreStack)) -> Ptr a -> IO (Maybe StgTSOProfInfo) +peekStgTSOProfInfo _ _ = return Nothing peekTopCCS :: Ptr a -> IO (Maybe CostCentreStack) peekTopCCS _ = return Nothing |