Commit ab4a9f1b authored by Simon Marlow's avatar Simon Marlow
Browse files

FIX BUILD (on 32-bit platforms): hs_hpc_module() type mismatch

parent ed99161b
...@@ -186,8 +186,8 @@ static void hpc_init(void) { ...@@ -186,8 +186,8 @@ static void hpc_init(void) {
int int
hs_hpc_module(char *modName, hs_hpc_module(char *modName,
unsigned int modCount, StgWord32 modCount,
unsigned int modHashNo, StgWord32 modHashNo,
StgWord64 *tixArr) { StgWord64 *tixArr) {
HpcModuleInfo *tmpModule, *lastModule; HpcModuleInfo *tmpModule, *lastModule;
unsigned int i; unsigned int i;
...@@ -284,8 +284,8 @@ writeTix(FILE *f) { ...@@ -284,8 +284,8 @@ writeTix(FILE *f) {
} }
fprintf(f," TixModule \"%s\" %u %u [", fprintf(f," TixModule \"%s\" %u %u [",
tmpModule->modName, tmpModule->modName,
tmpModule->hashNo, (nat)tmpModule->hashNo,
tmpModule->tickCount); (nat)tmpModule->tickCount);
debugTrace(DEBUG_hpc,"%s: %u (offset=%u) (hash=%u)\n", debugTrace(DEBUG_hpc,"%s: %u (offset=%u) (hash=%u)\n",
tmpModule->modName, tmpModule->modName,
tmpModule->tickCount, tmpModule->tickCount,
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment