summaryrefslogtreecommitdiff
path: root/utils/hpc
diff options
context:
space:
mode:
Diffstat (limited to 'utils/hpc')
-rw-r--r--utils/hpc/HpcMarkup.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/hpc/HpcMarkup.hs b/utils/hpc/HpcMarkup.hs
index 46e17090f4..dff6012cb0 100644
--- a/utils/hpc/HpcMarkup.hs
+++ b/utils/hpc/HpcMarkup.hs
@@ -406,7 +406,7 @@ showTotalSummary modSummary =
showSummary (expTicked modSummary) (expTotal modSummary) ++
"</tr>\n"
-showSummary :: (Integral t) => t -> t -> String
+showSummary :: (Integral t, Show t) => t -> t -> String
showSummary ticked total =
"<td align=\"right\">" ++ showP (percent ticked total) ++ "</td>" ++
"<td>" ++ show ticked ++ "/" ++ show total ++ "</td>" ++