diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2017-11-21 18:04:34 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2017-11-21 20:19:07 -0500 |
commit | 763ecacd3d4b0e9fcd4a8053a38722f89b488981 (patch) | |
tree | c974b93f30278a28e7ad94852adbf083a5d08f32 | |
parent | 2ca2259925cfef1a4b3cbcf8b0ce291064c5280f (diff) | |
download | haskell-763ecacd3d4b0e9fcd4a8053a38722f89b488981.tar.gz |
rts: Move libdwPrintBacktrace to public interface
Reviewers: erikd, simonmar
Reviewed By: simonmar
Subscribers: rwbarton, thomie
Differential Revision: https://phabricator.haskell.org/D4194
-rw-r--r-- | includes/rts/Libdw.h | 6 | ||||
-rw-r--r-- | rts/Libdw.h | 3 |
2 files changed, 6 insertions, 3 deletions
diff --git a/includes/rts/Libdw.h b/includes/rts/Libdw.h index 391847552e..d7bd55d06e 100644 --- a/includes/rts/Libdw.h +++ b/includes/rts/Libdw.h @@ -8,6 +8,9 @@ #pragma once +// for FILE +#include <stdio.h> + // Chunk capacity // This is rather arbitrary #define BACKTRACE_CHUNK_SZ 256 @@ -89,3 +92,6 @@ Backtrace *libdwGetBacktrace(LibdwSession *session); /* Lookup Location information for the given address. * Returns 0 if successful, 1 if address could not be found. */ int libdwLookupLocation(LibdwSession *session, Location *loc, StgPtr pc); + +/* Pretty-print a backtrace to the given FILE */ +void libdwPrintBacktrace(LibdwSession *session, FILE *file, Backtrace *bt); diff --git a/rts/Libdw.h b/rts/Libdw.h index d737745c02..5fd1c9522c 100644 --- a/rts/Libdw.h +++ b/rts/Libdw.h @@ -23,9 +23,6 @@ LibdwSession *libdwInit(void); /* Free a session */ void libdwFree(LibdwSession *session); -/* Pretty-print a backtrace to std*/ -void libdwPrintBacktrace(LibdwSession *session, FILE *file, Backtrace *bt); - // Traverse backtrace in order of outer-most to inner-most frame #define FOREACH_FRAME_INWARDS(pc, bt) \ BacktraceChunk *_chunk; \ |