summaryrefslogtreecommitdiff
path: root/rts/RtsStartup.c
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2015-10-22 22:17:11 +0200
committerBen Gamari <ben@smart-cactus.org>2015-11-23 17:46:52 +0100
commit6fbf22da47a18145daf59c8f262f46af2cb8cefb (patch)
tree9f228c335d4bc175eb503ec42890e34cf1ee4b13 /rts/RtsStartup.c
parenta3a8ce6e60466cb3742506c7d7bfa1a5b1012728 (diff)
downloadhaskell-6fbf22da47a18145daf59c8f262f46af2cb8cefb.tar.gz
rts: Add LibdwPool, a pool for libdw sessions
Differential Revision: https://phabricator.haskell.org/D1198#40948
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 ac4460e329..bd6a6ae14a 100644
--- a/rts/RtsStartup.c
+++ b/rts/RtsStartup.c
@@ -34,6 +34,7 @@
#include "Globals.h"
#include "FileLock.h"
#include "LinkerInternals.h"
+#include "LibdwPool.h"
#if defined(PROFILING)
# include "ProfHeap.h"
@@ -164,6 +165,9 @@ hs_init_ghc(int *argc, char **argv[], RtsConfig rts_config)
initTracing();
#endif
+ /* Initialise libdw session pool */
+ libdwPoolInit();
+
/* initialise scheduler data structures (needs to be done before
* initStorage()).
*/