diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-16 12:29:14 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-16 12:29:14 +0000 |
| commit | c7f78e2dbe96d695f903c24e924fff5a619f0bd8 (patch) | |
| tree | 36eca1fbafa5d71c98adccf5a4a896b086d8474d /gcc/ada/s-osinte-darwin.ads | |
| parent | 437991c26e282a913f80ad42b75b7256fabaa985 (diff) | |
| download | gcc-c7f78e2dbe96d695f903c24e924fff5a619f0bd8.tar.gz | |
2009-04-16 Ed Schonberg <schonberg@adacore.com>
* sprint.adb (Write_Itype): If the itype is an array subtype, preserve
the original location of the index expressions and the index subtypes,
to prevent spurious out-of-scope references in gigi.
2009-04-16 Tristan Gingold <gingold@adacore.com>
* init.c, s-osinte-darwin.ads, system-darwin-x86_64.ads:
Add support for stack checking on darwin.
2009-04-16 Vincent Celier <celier@adacore.com>
* prj-attr.adb: New attribute Runtime_Source_Dir
* prj-nmsc.adb (Process_Project_Level_Array_Attributes): Process
attribute Runtime_Source_Dir.
(Check_Naming_Schemes): Give default values to out parameters to avoid
invalid data.
* prj.ads (Language_Config): New component Runtime_Source_Dir
* snames.ads-tmpl: New standard name Runtime_Source_Dir
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146177 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-osinte-darwin.ads')
| -rw-r--r-- | gcc/ada/s-osinte-darwin.ads | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/s-osinte-darwin.ads b/gcc/ada/s-osinte-darwin.ads index f8c67117c79..c880c0087c3 100644 --- a/gcc/ada/s-osinte-darwin.ads +++ b/gcc/ada/s-osinte-darwin.ads @@ -279,10 +279,11 @@ package System.OS_Interface is pragma Import (C, sigaltstack, "sigaltstack"); Alternate_Stack : aliased System.Address; - -- This is a dummy definition, never used (Alternate_Stack_Size is null) + pragma Import (C, Alternate_Stack, "__gnat_alternate_stack"); + -- The alternate signal stack for stack overflows - Alternate_Stack_Size : constant := 0; - -- No alternate signal stack is used on this platform + Alternate_Stack_Size : constant := 64 * 1024; + -- This must be in keeping with init.c:__gnat_alternate_stack Stack_Base_Available : constant Boolean := False; -- Indicates whether the stack base is available on this target. This |