summaryrefslogtreecommitdiff
path: root/utils/hpc/HpcOverlay.hs
diff options
context:
space:
mode:
Diffstat (limited to 'utils/hpc/HpcOverlay.hs')
-rw-r--r--utils/hpc/HpcOverlay.hs2
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