Removing unused argument to a printf.

[ghc-hetmet.git] / rts / Hpc.c

diff --git a/rts/Hpc.c b/rts/Hpc.c
index e4323e4..14f9d80 100644 (file)
--- a/rts/Hpc.c
+++ b/rts/Hpc.c
@@ -432,7 +432,7 @@ exitHpc(void) {
   fclose(f);
 
   if (rixFile != NULL) {
-    fprintf(rixFile,"Finished\n",prog_name);
+    fprintf(rixFile,"Finished\n");
     fclose(rixFile);
   }