X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FHpc.c;fp=rts%2FHpc.c;h=dd67227b2388ecf608e824f9baf49cefd045f3d5;hb=b0beadabbe180e3bc729e27a5de79f9f1fc3bd0a;hp=cf75a05847a5cb8ec7708224a8fb17d49a815827;hpb=b482880da3b1a849ac8b6157ab693159cdc24998;p=ghc-hetmet.git

diff --git a/rts/Hpc.c b/rts/Hpc.c
index cf75a05..dd67227 100644
--- a/rts/Hpc.c
+++ b/rts/Hpc.c
@@ -200,7 +200,7 @@ static void hpc_init(void) {
     /* Then, try open the file
      */
     tixFilename = (char *) malloc(strlen(hpc_tixdir) + strlen(prog_name) + 12);
-    sprintf(tixFilename,"%s/%s-%d.tix",hpc_tixdir,prog_name,hpc_pid);
+    sprintf(tixFilename,"%s/%s-%d.tix",hpc_tixdir,prog_name,(int)hpc_pid);
   } else {
     tixFilename = (char *) malloc(strlen(prog_name) + 6);
     sprintf(tixFilename, "%s.tix", prog_name);