diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-10-14 14:55:37 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-10-14 14:55:37 +0200 |
| commit | 055416a8d14d5d741fcbf42b1f1396241737e4e6 (patch) | |
| tree | 58f96edfea51ed0342052cff99b6789fb2c30a39 /gcc/ada/adaint.c | |
| parent | 39d3009fafe3a4d3660f25ef803c9f266496fa53 (diff) | |
| download | gcc-055416a8d14d5d741fcbf42b1f1396241737e4e6.zip gcc-055416a8d14d5d741fcbf42b1f1396241737e4e6.tar.gz gcc-055416a8d14d5d741fcbf42b1f1396241737e4e6.tar.bz2 | |
[multiple changes]
2013-10-14 Hristian Kirtchev <kirtchev@adacore.com>
* sem_prag.adb (Analyze_Depends_In_Decl_Part,
Analyze_Global_In_Decl_Part,
Analyze_Pre_Post_Condition_In_Decl_Part): Install the subprogram
and its formals only when it is not already installed.
* sem_util.adb (Is_Refined_State): A state is refined when it
has a non-empty list of constituents.
2013-10-14 Tristan Gingold <gingold@adacore.com>
* adaint.c: Disable __gnat_get_executable_load_address for linux.
* exp_prag.adb: Add comment in Expand_Pragma_Import_Export_Exception.
From-SVN: r203532
Diffstat (limited to 'gcc/ada/adaint.c')
| -rw-r--r-- | gcc/ada/adaint.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 5b261af..2651fd0 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -3941,7 +3941,8 @@ __gnat_get_executable_load_address (void) #if defined (__APPLE__) return _dyld_get_image_header (0); -#elif defined (__linux__) +#elif 0 && defined (__linux__) + /* Currently disabled as it needs at least -ldl. */ struct link_map *map = _r_debug.r_map; return (const void *)map->l_addr; |