diff options
author | Kai Tietz <ktietz@redhat.com> | 2013-04-23 21:17:29 +0200 |
---|---|---|
committer | Kai Tietz <ktietz@gcc.gnu.org> | 2013-04-23 21:17:29 +0200 |
commit | 4a8043c4e02c8c2517424722ba3055a159b93e87 (patch) | |
tree | 08512fd8352b43f943aa0e2f706096c2bc447e7f /gcc/ada | |
parent | d70a81dddc916c55892c5b73bed2138b71bd5945 (diff) | |
download | gcc-4a8043c4e02c8c2517424722ba3055a159b93e87.zip gcc-4a8043c4e02c8c2517424722ba3055a159b93e87.tar.gz gcc-4a8043c4e02c8c2517424722ba3055a159b93e87.tar.bz2 |
re PR target/55445 (Always defined __SEH__ when build from trunk)
PR target/55445
* raise-gcc.c (__SEH__): Additional check that
SjLj isn't active.
From-SVN: r198205
Diffstat (limited to 'gcc/ada')
-rw-r--r-- | gcc/ada/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/ada/raise-gcc.c | 6 |
2 files changed, 9 insertions, 3 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 3992484..0e2a7e9 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2013-04-23 Kai Tietz <ktietz@redhat.com> + + PR target/55445 + * raise-gcc.c (__SEH__): Additional check that + SjLj isn't active. + 2013-04-23 Eric Botcazou <ebotcazou@adacore.com> Pascal Obry <obry@adacore.com> diff --git a/gcc/ada/raise-gcc.c b/gcc/ada/raise-gcc.c index 42c5a5c..a428642 100644 --- a/gcc/ada/raise-gcc.c +++ b/gcc/ada/raise-gcc.c @@ -1019,7 +1019,7 @@ extern void __gnat_notify_unhandled_exception (struct Exception_Occurrence *); #ifdef __USING_SJLJ_EXCEPTIONS__ #define PERSONALITY_FUNCTION __gnat_personality_sj0 -#elif defined(__SEH__) +#elif defined (__SEH__) #define PERSONALITY_FUNCTION __gnat_personality_imp #else #define PERSONALITY_FUNCTION __gnat_personality_v0 @@ -1056,7 +1056,7 @@ typedef int version_arg_t; typedef _Unwind_Action phases_arg_t; #endif -#ifdef __SEH__ +#if defined (__SEH__) && !defined (__USING_SJLJ_EXCEPTIONS__) static #endif _Unwind_Reason_Code @@ -1222,7 +1222,7 @@ __gnat_Unwind_ForcedUnwind (_Unwind_Exception *e, #endif } -#ifdef __SEH__ +#if defined (__SEH__) && !defined (__USING_SJLJ_EXCEPTIONS__) #define STATUS_USER_DEFINED (1U << 29) |