diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-07-12 12:30:29 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-07-12 12:30:29 +0200 |
| commit | d9819bbd70137cde670497826160c6ae964454a7 (patch) | |
| tree | 04a8e86ff3e86b38d6ad932ef1f19194fec3232d /gcc/ada/tracebak.c | |
| parent | 2ed5b74848f711b62fb30cfa324377217534411a (diff) | |
| download | gcc-d9819bbd70137cde670497826160c6ae964454a7.zip gcc-d9819bbd70137cde670497826160c6ae964454a7.tar.gz gcc-d9819bbd70137cde670497826160c6ae964454a7.tar.bz2 | |
[multiple changes]
2012-07-12 Ed Schonberg <schonberg@adacore.com>
* exp_aggr.adb (Convert_To_Positional): Increase acceptable size
of static aggregate when Static_Elaboration_Desired is requested.
Add a warning if the request cannot be satisfied either because
some components or some array bounds are non-static.
2012-07-12 Thomas Quinot <quinot@adacore.com>
* exp_pakd.adb: Minor reformatting.
2012-07-12 Tristan Gingold <gingold@adacore.com>
* tracebak.c: Fix warnings.
* raise-gcc.c (__gnat_adjust_context): New function
(__gnat_personality_seh0): Call __gnat_adjust_context to adjust
PC in machine frame for exceptions that occur in the current
function.
2012-07-12 Thomas Quinot <quinot@adacore.com>
* g-bytswa.adb, g-bytswa.ads, s-bytswa.adb, s-bytswa.ads, Makefile.rtl:
Move GNAT.Byte_Swapping to System (with a renaming under GNAT)
so that it is usable in expanded code.
2012-07-12 Tristan Gingold <gingold@adacore.com>
* s-osinte-hpux.ads: Increase alternate stack size on hpux.
From-SVN: r189434
Diffstat (limited to 'gcc/ada/tracebak.c')
| -rw-r--r-- | gcc/ada/tracebak.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/tracebak.c b/gcc/ada/tracebak.c index 01a9e75..2c8335d 100644 --- a/gcc/ada/tracebak.c +++ b/gcc/ada/tracebak.c @@ -143,7 +143,7 @@ __gnat_backtrace (void **array, if (!RuntimeFunction) { /* In case of failure, assume this is a leaf function. */ - context.Rip = *(ULONG64 **) context.Rsp; + context.Rip = *(ULONG64 *) context.Rsp; context.Rsp += 8; } else @@ -170,7 +170,7 @@ __gnat_backtrace (void **array, && (void *)context.Rip <= exclude_max) continue; - array[i++] = context.Rip - 2; + array[i++] = (void *)(context.Rip - 2); if (i >= size) break; } |