X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FHpc.c;h=dd67227b2388ecf608e824f9baf49cefd045f3d5;hb=0a5613f40b0e32cf59966e6b56b807cdbe80aa7b;hp=cf75a05847a5cb8ec7708224a8fb17d49a815827;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;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);