From 835a1c84ed6817455b0b76aafac4ac69a4b6d5c2 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 8 Jul 2006 15:24:24 +0000 Subject: #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. --- rts/Profiling.c | 2 -- 1 file changed, 2 deletions(-) (limited to 'rts/Profiling.c') 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 -- cgit v1.2.1