diff options
Diffstat (limited to 'utils/hpc/HpcOverlay.hs')
-rw-r--r-- | utils/hpc/HpcOverlay.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/hpc/HpcOverlay.hs b/utils/hpc/HpcOverlay.hs index b303b2cfec..5424c10faf 100644 --- a/utils/hpc/HpcOverlay.hs +++ b/utils/hpc/HpcOverlay.hs @@ -133,7 +133,7 @@ processModule modName modContents (Mix _ _ hash _ entries) locals globals = do | n <- [0..(length entries - 1)] ] - return $ TixModule modName hash (length tixs') tixs' + return $ TixModule modName hash (tickCountsFromList (length entries) tixs') qualifier :: HpcPos -> Maybe Qualifier -> Bool qualifier _ Nothing = True |