diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2015-10-31 16:39:57 +0100 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2015-10-31 20:24:57 +0100 |
| commit | e2a78eec37ccabea9c1269fd408a0e692d9c927f (patch) | |
| tree | 00207e36d41a725baf1662a2ac71f317dbb85f21 /rts/posix/Signals.c | |
| parent | 6bef55c6b561080c5ddff73f2c501e40acee86ef (diff) | |
| download | haskell-e2a78eec37ccabea9c1269fd408a0e692d9c927f.tar.gz | |
Signals: Ensure libdw session is freed
Diffstat (limited to 'rts/posix/Signals.c')
| -rw-r--r-- | rts/posix/Signals.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/posix/Signals.c b/rts/posix/Signals.c index 89195e2efd..247feba69e 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 |