diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-17 11:30:39 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-17 11:30:39 +0200 |
| commit | 618fb570b9d2a668d6d217ad486379ad0e1370b6 (patch) | |
| tree | dc9767c938b339ff6ffccf318357c7538dcffd5f /gcc/ada/init.c | |
| parent | 93bcda233f11648dbf583a9f0e50af387594d78a (diff) | |
| download | gcc-618fb570b9d2a668d6d217ad486379ad0e1370b6.zip gcc-618fb570b9d2a668d6d217ad486379ad0e1370b6.tar.gz gcc-618fb570b9d2a668d6d217ad486379ad0e1370b6.tar.bz2 | |
[multiple changes]
2009-04-17 Gary Dismukes <dismukes@adacore.com>
* par-ch6.adb (P_Subprogram): Overriding indicators should be allowed
on protected subprogram bodies, so exclude the case where Pf_Flags is
Pf_Decl_Pbod from the error check.
* par-ch9.adb (P_Protected_Operation_Items): Permit overriding
indicators on subprograms in protected bodies, and proceed with parsing
the subprogram.
* sem_ch6.adb (Verify_Overriding_Indicator): Exclude protected
subprograms from the check for primitiveness on subprograms with
overriding indicators.
(Check_Overriding_Indicator): Include protected subprograms in the
style check for missing overriding indicators.
2009-04-17 Tristan Gingold <gingold@adacore.com>
* init.c: Fix stack checking for x86 Darwin.
2009-04-17 Vincent Celier <celier@adacore.com>
* prj-attr.adb: New project level attribute Object_File_Suffix
(<language>).
* prj-nmsc.adb (Add_Source): Use the object file suffix to get the
object file name
(Process_Compiler): Process attribute Object_File_Suffix
* prj.adb (Object_Name): Use suffix Object_File_Suffix instead of
platform suffix, when specified.
* prj.ads (Language_Config): New component Object_File_Suffix,
defaulted to No_Name.
(Object_Name): New parameter Object_File_Suffix, defaulted to No_Name
* snames.ads-tmpl: New standard name Object_File_Suffix
From-SVN: r146228
Diffstat (limited to 'gcc/ada/init.c')
| -rw-r--r-- | gcc/ada/init.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/init.c b/gcc/ada/init.c index 7ac5a26..59aabf2 100644 --- a/gcc/ada/init.c +++ b/gcc/ada/init.c @@ -2144,7 +2144,7 @@ __gnat_error_handler (int sig, siginfo_t * si, void * uc) { case SIGSEGV: case SIGBUS: - if (__gnat_is_stack_guard ((mach_vm_address_t)si->si_addr)) + if (__gnat_is_stack_guard ((unsigned long)si->si_addr)) { exception = &storage_error; msg = "stack overflow"; |