update to current master againwip/T13904

1 files changed, 3 insertions, 2 deletions

diff --git a/rts/Hpc.c b/rts/Hpc.c
index 7575e34ce0..9ba9b04b61 100644
--- a/rts/Hpc.c
+++ b/rts/Hpc.c
@@ -13,6 +13,7 @@
 #include <ctype.h>
 #include <string.h>
 #include <assert.h>
+#include <fs_rts.h>
 
 #if defined(HAVE_SYS_TYPES_H)
 #include <sys/types.h>
@@ -233,7 +234,7 @@ startupHpc(void)
     sprintf(tixFilename, "%s.tix", prog_name);
   }
 
-  if (init_open(fopen(tixFilename,"r"))) {
+  if (init_open(__rts_fopen(tixFilename,"r"))) {
     readTix();
   }
 }
@@ -387,7 +388,7 @@ exitHpc(void) {
   // not clober the .tix file.
 
   if (hpc_pid == getpid()) {
-    FILE *f = fopen(tixFilename,"w");
+    FILE *f = __rts_fopen(tixFilename,"w");
     writeTix(f);
   }