X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FHpc.c;h=00b5a3d6c0f9e0ed05d40623fe2fddbc7c3f0109;hb=661c97c65e5fa47177502e592bb763f752b487ac;hp=dd67227b2388ecf608e824f9baf49cefd045f3d5;hpb=b0beadabbe180e3bc729e27a5de79f9f1fc3bd0a;p=ghc-hetmet.git diff --git a/rts/Hpc.c b/rts/Hpc.c index dd67227..00b5a3d 100644 --- a/rts/Hpc.c +++ b/rts/Hpc.c @@ -36,13 +36,6 @@ static pid_t hpc_pid = 0; // pid of this process at hpc-boot time. static FILE *tixFile; // file being read/written static int tix_ch; // current char -// This is a cruel hack, we should completely redesign the format specifier handling in the RTS. -#if SIZEOF_LONG == 8 -#define PRIuWORD64 "lu" -#else -#define PRIuWORD64 "llu" -#endif - HpcModuleInfo *modules = 0; HpcModuleInfo *nextModule = 0; int totalTixes = 0; // total number of tix boxes. @@ -333,7 +326,7 @@ writeTix(FILE *f) { } if (tmpModule->tixArr) { - fprintf(f,"%" PRIuWORD64,tmpModule->tixArr[i]); + fprintf(f,"%" FMT_Word64,tmpModule->tixArr[i]); } else { fprintf(f,"0"); }