* [COMMITTED] ada: Add PIE support to backtraces on Linux
@ 2022-11-28 12:04 Marc Poulhiès
0 siblings, 0 replies; only message in thread
From: Marc Poulhiès @ 2022-11-28 12:04 UTC (permalink / raw)
To: gcc-patches; +Cc: Eric Botcazou
From: Eric Botcazou <ebotcazou@adacore.com>
gcc/ada/
* adaint.c [Linux]: Include <link.h>.
(__gnat_get_executable_load_address) [Linux]: Enable.
Tested on x86_64-pc-linux-gnu, committed on master.
---
gcc/ada/adaint.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 199dbe0e405..d2604ca9b77 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -3524,6 +3524,8 @@ __gnat_cpu_set (int cpu, size_t count ATTRIBUTE_UNUSED, cpu_set_t *set)
#if defined (__APPLE__)
#include <mach-o/dyld.h>
+#elif defined (__linux__)
+#include <link.h>
#endif
const void *
@@ -3532,10 +3534,8 @@ __gnat_get_executable_load_address (void)
#if defined (__APPLE__)
return _dyld_get_image_header (0);
-#elif 0 && defined (__linux__)
- /* Currently disabled as it needs at least -ldl. */
+#elif defined (__linux__)
struct link_map *map = _r_debug.r_map;
-
return (const void *)map->l_addr;
#elif defined (_WIN32)
--
2.34.1
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2022-11-28 12:04 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-11-28 12:04 [COMMITTED] ada: Add PIE support to backtraces on Linux Marc Poulhiès
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).