aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/init.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2014-02-25 15:52:42 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2014-02-25 15:52:42 +0100
commit64e86d00889c7694172fc130726bd3123c19564c (patch)
treecd8f75809399b35744ff7080063a0f4c0edbe111 /gcc/ada/init.c
parent3684d1fc71263d05352648115737a3cf35a1764b (diff)
downloadgcc-64e86d00889c7694172fc130726bd3123c19564c.zip
gcc-64e86d00889c7694172fc130726bd3123c19564c.tar.gz
gcc-64e86d00889c7694172fc130726bd3123c19564c.tar.bz2
[multiple changes]
2014-02-25 Yannick Moy <moy@adacore.com> * sem_prag.adb: Remove obsolete reference to SPARK RM in error message. 2014-02-25 Doug Rupp <rupp@adacore.com> * init.c (HAVE_GNAT_ADJUST_CONTEXT_FOR_RAISE): Enable for ARM. (__gnat_adjust_context_for_raise): Bump the PC by 2. 2014-02-25 Ed Schonberg <schonberg@adacore.com> * par-ch3.adb (P_Basic_Declarative_Items): In the case of a misplaced IS, add a statement sequence to improper body only if one has not been parsed already. 2014-02-25 Ed Schonberg <schonberg@adacore.com> * sem_attr.adb (Analyze_Attribute, case 'Update): Check for mismatch when multidimensional array is updated with a single index. From-SVN: r208126
Diffstat (limited to 'gcc/ada/init.c')
-rw-r--r--gcc/ada/init.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/init.c b/gcc/ada/init.c
index d61086e..9ae5f56 100644
--- a/gcc/ada/init.c
+++ b/gcc/ada/init.c
@@ -452,7 +452,8 @@ void fake_linux_sigemptyset (sigset_t *set)
#endif
-#if defined (i386) || defined (__x86_64__) || defined (__ia64__)
+#if defined (i386) || defined (__x86_64__) || defined (__ia64__) \
+ || defined (__ARMEL__)
#define HAVE_GNAT_ADJUST_CONTEXT_FOR_RAISE
@@ -496,6 +497,9 @@ __gnat_adjust_context_for_raise (int signo ATTRIBUTE_UNUSED, void *ucontext)
#elif defined (__ia64__)
/* ??? The IA-64 unwinder doesn't compensate for signals. */
mcontext->sc_ip++;
+#elif defined (__ARMEL__)
+ /* ARM Bump has to be an even number because of odd/even architecture. */
+ mcontext->arm_pc+=2;
#endif
}