summaryrefslogtreecommitdiff
path: root/rts/Profiling.c
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2006-07-08 15:24:24 +0000
committerIan Lynagh <igloo@earth.li>2006-07-08 15:24:24 +0000
commit835a1c84ed6817455b0b76aafac4ac69a4b6d5c2 (patch)
tree47fafd4605fa0632cbdb0ecca4ae1fbf2ebc7367 /rts/Profiling.c
parent6e0c3f50e131f502577a61b09a339af295de9d23 (diff)
downloadhaskell-835a1c84ed6817455b0b76aafac4ac69a4b6d5c2.tar.gz
#807: Removed double fclose of prof_file
prof_file was being fclose'd in both gen_XML_logfile and hs_exit, leading to glibc complaining of a double free.
Diffstat (limited to 'rts/Profiling.c')
-rw-r--r--rts/Profiling.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/rts/Profiling.c b/rts/Profiling.c
index 33301a91c1..96a94e4e2e 100644
--- a/rts/Profiling.c
+++ b/rts/Profiling.c
@@ -882,8 +882,6 @@ gen_XML_logfile( void )
reportCCS_XML(pruneCCSTree(CCS_MAIN));
fprintf(prof_file, " 0\n");
-
- fclose(prof_file);
}
static void