summaryrefslogtreecommitdiff
path: root/rts/RtsStartup.c
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-10-24 19:51:15 -0400
committerBen Gamari <ben@smart-cactus.org>2020-11-01 12:58:36 -0500
commit5c2e6bced838b7d7617af2bfb272889a9af16a76 (patch)
tree919af25048be5c7c42a31bb33d0a932db52036e3 /rts/RtsStartup.c
parentb1dda15324bf08dcd6265e066577c18d4f3f061d (diff)
downloadhaskell-wip/tsan/stats.tar.gz
rts: Tear down stats_mutex after exitHeapProfilingwip/tsan/stats
Since the latter wants to call getRTSStats.
Diffstat (limited to 'rts/RtsStartup.c')
-rw-r--r--rts/RtsStartup.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c
index a3dddb03f5..a20dc3d04a 100644
--- a/rts/RtsStartup.c
+++ b/rts/RtsStartup.c
@@ -575,6 +575,10 @@ hs_exit_(bool wait_foreign)
if (is_io_mng_native_p())
hs_restoreConsoleCP();
#endif
+
+ /* tear down statistics subsystem */
+ stat_exit();
+
/* free hash table storage */
exitHashTable();