summaryrefslogtreecommitdiff
path: root/rts/ProfHeap.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/ProfHeap.c')
-rw-r--r--rts/ProfHeap.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/ProfHeap.c b/rts/ProfHeap.c
index 1023f7ccbe..cc99e37fdc 100644
--- a/rts/ProfHeap.c
+++ b/rts/ProfHeap.c
@@ -385,7 +385,7 @@ initHeapProfiling(void)
sprintf(hp_filename, "%s.hp", prog);
/* open the log file */
- if ((hp_file = __rts_fopen(hp_filename, "w")) == NULL) {
+ if ((hp_file = __rts_fopen(hp_filename, "w+")) == NULL) {
debugBelch("Can't open profiling report file %s\n",
hp_filename);
RtsFlags.ProfFlags.doHeapProfile = 0;