From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 7871) id A21403857C4F; Mon, 28 Nov 2022 12:03:58 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org A21403857C4F DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1669637038; bh=Dku0lW2X4OXMIiartTqcDYPmquuZsddoKruVdgkl0O4=; h=From:To:Subject:Date:From; b=TydQ9uC80Mgr/mab8vuA5YCiFMRPiVglS4u4AVqzR/h1F59D0UHtebKHMf1HgRTcC hspaHBan9jjAoVCssMmR5BdSibO9P+RnKZbWXDi61DtocXYpCHqLQiSp6XPR2+bplA ey0tboakrS220ru8fpEaCBZDGOTyfFEk8+Q+/fz8= MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset="utf-8" From: Marc Poulhi?s To: gcc-cvs@gcc.gnu.org Subject: [gcc r13-4359] ada: Add PIE support to backtraces on Linux X-Act-Checkin: gcc X-Git-Author: Eric Botcazou X-Git-Refname: refs/heads/master X-Git-Oldrev: 83e8d37fe39d7c1afce19b61bbc2dd828fa37c6f X-Git-Newrev: f2b30a724e6bf7ff8e591b176967d596cee7648e Message-Id: <20221128120358.A21403857C4F@sourceware.org> Date: Mon, 28 Nov 2022 12:03:58 +0000 (GMT) List-Id: https://gcc.gnu.org/g:f2b30a724e6bf7ff8e591b176967d596cee7648e commit r13-4359-gf2b30a724e6bf7ff8e591b176967d596cee7648e Author: Eric Botcazou Date: Fri Nov 25 23:11:27 2022 +0100 ada: Add PIE support to backtraces on Linux gcc/ada/ * adaint.c [Linux]: Include . (__gnat_get_executable_load_address) [Linux]: Enable. Diff: --- 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 +#elif defined (__linux__) +#include #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)