From 897bcbf84da1b217503e86910ac27255106fc026 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Tue, 8 May 2007 10:45:51 +0000 Subject: [PATCH] FIX: #1227 (biographical profiling broken) We were freeing the hash table storage with exitHashTable() before calling endProfiling(), which uses hash tables. --- rts/RtsStartup.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c index 1d0fec5..f0b39d6 100644 --- a/rts/RtsStartup.c +++ b/rts/RtsStartup.c @@ -459,9 +459,6 @@ hs_exit(void) freeThreadLabelTable(); #endif - /* free hash table storage */ - exitHashTable(); - #ifdef RTS_GTK_FRONTPANEL if (RtsFlags.GcFlags.frontpanel) { stopFrontPanel(); @@ -489,6 +486,9 @@ hs_exit(void) shutdownAsyncIO(); #endif + /* free hash table storage */ + exitHashTable(); + // Finally, free all our storage freeStorage(); -- 1.7.10.4