From 4d506dbd48845dedc33fb008114c5d2aabb04a75 Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Thu, 15 Sep 2011 20:44:28 +0100
Subject: [PATCH] Follow the removal of the Show superclass of Num
---
HpcMarkup.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/HpcMarkup.hs b/HpcMarkup.hs
index 46e1709..dff6012 100644
--- a/HpcMarkup.hs
+++ b/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>" ++
--
GitLab