diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2021-02-16 16:53:37 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@well-typed.com> | 2021-03-01 23:39:03 -0500 |
| commit | 23c7a9f24aec8492ec3b13d744509279365a89e1 (patch) | |
| tree | 333c914986a62630c2a387d7029a4ebde133d051 | |
| parent | 857423a91cd65dc7bfdc93cfbacb8063df05d09b (diff) | |
| download | haskell-wip/prof-flavour.tar.gz | |
ghc-heap: Fix profiled buildwip/prof-flavour
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 |