aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/init.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2011-10-13 12:32:13 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2011-10-13 12:32:13 +0200
commit9f8d1e5ca55ca37137adf9d89dda0080238b1baf (patch)
treef7b58b4cae33ed6726612c0bde2cd261451d1d52 /gcc/ada/init.c
parentc28f4b5c26988486a94093dadfb551a6520c2520 (diff)
downloadgcc-9f8d1e5ca55ca37137adf9d89dda0080238b1baf.zip
gcc-9f8d1e5ca55ca37137adf9d89dda0080238b1baf.tar.gz
gcc-9f8d1e5ca55ca37137adf9d89dda0080238b1baf.tar.bz2
[multiple changes]
2011-10-13 Sergey Rybin <rybin@adacore.com> * gnat_ugn.texi, vms_data.ads: Add an option to control enumeration literal casing. 2011-10-13 Nicolas Roche <roche@adacore.com> * gnatlink.adb: Ensure that -mrtp is passed when runtime name ends with 'rtp'. 2011-10-13 Ed Schonberg <schonberg@adacore.com> * sem_prag.adb (Analyze_Pragma, case Unchecked_Union): an unchecked union type can be limited. 2011-10-13 Olivier Hainque <hainque@adacore.com> * init.c (__gnat_error_handler) <VxWorks version>: Add comments on the use of the signal trampoline for PPC in the sjlj case as well. Add legitimate casts, preventing compile time warnings on the (sighandler *) profile. 2011-10-13 Yannick Moy <moy@adacore.com> * sem_aggr.adb (Resolve_Aggr_Expr): Always perform semantic analysis in Alfa mode. 2011-10-13 Ed Schonberg <schonberg@adacore.com> * sem_ch3.adb (OK_For_Limited_Init_In_05): Conditional and case expressions are legal limited return values if each one of their dependent expressions are legal. 2011-10-13 Ed Schonberg <schonberg@adacore.com> * sem_ch6.adb (Analyze_Procedure_Call_Statement): In Ada 2012 mode, if the prefix of the call is a qualified expression, rewrite as a code statement. * sem_ch13.adb (Analyze_Code_Statement): In Ada 2012 mode, the code statement is legal if it is a rewriting of a procedure call. 2011-10-13 Ed Schonberg <schonberg@adacore.com> * exp_aggr.adb (Flatten): If a component association has a box, assume that aggregate is not static. (Safe_Aggregate): If a component association in a non-limited aggregate has a box, assume that it cannot be expanded in place. 2011-10-13 Vincent Celier <celier@adacore.com> * prj-conf.adb (Get_Or_Create_Configuration_File): Call Process_Project_Tree_Phase_1 with Packages_To_Check. (Process_Project_And_Apply_Config): Ditto * prj-part.ads, prj-part.adb, prj-pars.ads, prj-pars.adb (Parse): Remove default for argument Packages_To_Check. * prj-proc.adb (Recursive_Process): New argument Packages_To_Check. (Process): Ditto. (Process_Project_Tree_Phase_1): Ditto. (Recursive_Project.Process_Aggregated_Projects): Call Prj.Part.Parse and Process_Project_Tree_Phase_1 with Packages_To_Check. * prj-proc.ads (Process): New argument Packages_To_Check (Process_Project_Tree_Phase_1): Ditto From-SVN: r179902
Diffstat (limited to 'gcc/ada/init.c')
-rw-r--r--gcc/ada/init.c11
1 files changed, 8 insertions, 3 deletions
diff --git a/gcc/ada/init.c b/gcc/ada/init.c
index 9b24395..7eee3bf 100644
--- a/gcc/ada/init.c
+++ b/gcc/ada/init.c
@@ -2015,12 +2015,17 @@ __gnat_error_handler (int sig, void *si, struct sigcontext *sc)
sigprocmask (SIG_SETMASK, &mask, NULL);
#if defined (__PPC__)
- /* We process signals through a Call Frame Info trampoline, voiding
- the need for myriads of fallback_frame_state variants. */
+ /* On PowerPC, we process signals through a Call Frame Info trampoline,
+ voiding the need for myriads of fallback_frame_state variants in the
+ ZCX runtime. We have no simple way to distinguish ZCX from SJLJ here,
+ so we do this for SJLJ as well even though this is not necessary.
+ This only incurs a few extra instructions and a tiny amount of extra
+ stack usage. */
#include "sigtramp.h"
- __gnat_sigtramp (sig, si, sc, &__gnat_map_signal);
+ __gnat_sigtramp (sig, (void *)si, (void *)sc,
+ (sighandler_t *)&__gnat_map_signal);
#else
__gnat_map_signal (sig, si, sc);