summaryrefslogtreecommitdiff
path: root/rts/Hpc.c
diff options
context:
space:
mode:
authorSimon Marlow <simonmar@microsoft.com>2007-10-23 13:13:51 +0000
committerSimon Marlow <simonmar@microsoft.com>2007-10-23 13:13:51 +0000
commit1322d0f3bcca779720ce9e6b9014f575435631c0 (patch)
tree44209488f2f5d10da2aa0a86e9bd38715340dd98 /rts/Hpc.c
parentab4a9f1bd7820d9308e56f645adef9a4b5d8ee76 (diff)
downloadhaskell-1322d0f3bcca779720ce9e6b9014f575435631c0.tar.gz
Fix more warnings
Diffstat (limited to 'rts/Hpc.c')
-rw-r--r--rts/Hpc.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/rts/Hpc.c b/rts/Hpc.c
index 3922d44073..014319cf23 100644
--- a/rts/Hpc.c
+++ b/rts/Hpc.c
@@ -193,7 +193,7 @@ hs_hpc_module(char *modName,
unsigned int i;
int offset = 0;
- debugTrace(DEBUG_hpc,"hs_hpc_module(%s,%d)",modName,modCount);
+ debugTrace(DEBUG_hpc,"hs_hpc_module(%s,%d)",modName,(nat)modCount);
hpc_init();
@@ -288,9 +288,9 @@ writeTix(FILE *f) {
(nat)tmpModule->tickCount);
debugTrace(DEBUG_hpc,"%s: %u (offset=%u) (hash=%u)\n",
tmpModule->modName,
- tmpModule->tickCount,
- tmpModule->hashNo,
- tmpModule->tickOffset);
+ (nat)tmpModule->tickCount,
+ (nat)tmpModule->hashNo,
+ (nat)tmpModule->tickOffset);
inner_comma = 0;
for(i = 0;i < tmpModule->tickCount;i++) {