diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 13:20:09 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 13:20:09 +0000 |
| commit | 719b8d3eb09c657ee5a0ad57666035954c8d164d (patch) | |
| tree | 39361a5755bcb3bd0cba43f0fae7414de9b2893a /gcc/ada/tracebak.c | |
| parent | fd68eaab3678112594a8ad686aba36d941f28a2c (diff) | |
| download | gcc-719b8d3eb09c657ee5a0ad57666035954c8d164d.tar.gz | |
2011-08-04 Hristian Kirtchev <kirtchev@adacore.com>
* exp_ch7.adb (Build_Raise_Statement): Remove the specialized
processing for .NET/JVM. These targets can now benefit from
Raise_From_Controlled_Operation and they share the same processing with
standard targets.
(Establish_Transient_Scope): Remove the restriction for .NET/JVM.
These targets need transient scopes in order to properly finalize short
lived controlled objects.
(Make_Handler_For_Ctrl_Operation): Remove the specialized processing for
NET/JVM. These targets can now benefit from
Raise_From_Controlled_Operation and they share the same processing with
standard targets.
2011-08-04 Geert Bosch <bosch@adacore.com>
* tracebak.c (STOP_FRAME): Stop at any next pointer outside the stack
2011-08-04 Ed Schonberg <schonberg@adacore.com>
* exp_aggr.adb (Has_Visible_Private_Ancestor): subsidiary routine to
Expand_Record_Aggregate, to determine whether aggregate must be
expanded into assignments. This is the case if the ancestor part is
private, regarless of the setting of the flag Has_Private_Ancestor.
2011-08-04 Ed Falis <falis@adacore.com>
* vxaddr2line.adb: Add support for e500v2 and for Linux hosts
2011-08-04 Bob Duff <duff@adacore.com>
* sinfo.ads: Fix comment.
2011-08-04 Steve Baird <baird@adacore.com>
* bindgen.adb (Get_Ada_Main_Name): If CodePeer_Mode is set, then
choose a package name in much the same way as is
done for JGNAT when VM_Target /= No_VM, except that
a slightly more distinctive prefix string is used.
2011-08-04 Emmanuel Briot <briot@adacore.com>
* makeutl.adb (Complete_Mains): no longer accept unit names on the
gnatmake command line.
This behavior was never documented (and was supported only because of
an early bug in the code). This case might lead to ambiguous cases
(between unit names and truncated base names without suffixes).
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177379 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/tracebak.c')
| -rw-r--r-- | gcc/ada/tracebak.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/tracebak.c b/gcc/ada/tracebak.c index 2e292857e61..eedc715a2e5 100644 --- a/gcc/ada/tracebak.c +++ b/gcc/ada/tracebak.c @@ -339,7 +339,8 @@ struct layout #define STOP_FRAME(CURRENT, TOP_STACK) \ (IS_BAD_PTR((long)(CURRENT)) \ || IS_BAD_PTR((long)(CURRENT)->return_address) \ - || (CURRENT)->return_address == 0|| (CURRENT)->next == 0 \ + || (CURRENT)->return_address == 0 \ + || (void *) ((CURRENT)->next) < (TOP_STACK) \ || (void *) (CURRENT) < (TOP_STACK)) #define BASE_SKIP (1+FRAME_LEVEL) |