[commit: ghc] master: Signals: Ensure libdw session is freed (e2a78ee)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/e2a78eec37ccabea9c1269fd408a0e692d9c927f/ghc

>---------------------------------------------------------------

commit e2a78eec37ccabea9c1269fd408a0e692d9c927f
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Sat Oct 31 16:39:57 2015 +0100

    Signals: Ensure libdw session is freed


>---------------------------------------------------------------

e2a78eec37ccabea9c1269fd408a0e692d9c927f
 rts/posix/Signals.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/rts/posix/Signals.c b/rts/posix/Signals.c
index 89195e2..247feba 100644
--- a/rts/posix/Signals.c
+++ b/rts/posix/Signals.c
@@ -540,6 +540,7 @@ backtrace_handler(int sig STG_UNUSED)
     Backtrace *bt = libdw_get_backtrace(session);
     libdw_print_backtrace(session, stderr, bt);
     backtrace_free(bt);
+    libdw_free(session);
 #else
     fprintf(stderr, "This build does not support backtraces.\n");
 #endif