From f9c8c973df0b2328b52802be178f6041cf69af39 Mon Sep 17 00:00:00 2001 From: charlet Date: Mon, 14 Oct 2013 13:53:02 +0000 Subject: 2013-10-14 Robert Dewar * exp_attr.adb (Find_Stream_Subprogram): Optimize Storage_Array stream handling. (Find_Stream_Subprogram): Optimize Stream_Element_Array stream handling * rtsfind.ads: Add entry for Stream_Element_Array Add entries for RE_Storage_Array subprograms Add entries for RE_Stream_Element_Array subprograms * s-ststop.ads, s-ststop.adb: Add processing for System.Storage_Array. Add processing for Ada.Stream_Element_Array. 2013-10-14 Tristan Gingold * a-except-2005.ads, a-except-2005.adb: (Get_Exception_Machine_Occurrence): New function. * raise-gcc.c (__gnat_unwind_exception_size): New constant. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@203560 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/a-except-2005.adb | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'gcc/ada/a-except-2005.adb') diff --git a/gcc/ada/a-except-2005.adb b/gcc/ada/a-except-2005.adb index 3453eae90ab..29ecf391d80 100644 --- a/gcc/ada/a-except-2005.adb +++ b/gcc/ada/a-except-2005.adb @@ -861,6 +861,16 @@ package body Ada.Exceptions is -- in case we do not want any exception tracing support. This is -- why this package is separated. + -------------------------------------- + -- Get_Exception_Machine_Occurrence -- + -------------------------------------- + + function Get_Exception_Machine_Occurrence (X : Exception_Occurrence) + return System.Address is + begin + return X.Machine_Occurrence; + end Get_Exception_Machine_Occurrence; + ----------- -- Image -- ----------- -- cgit v1.2.1 From c86972c8f02ab3a717b2d7bb54bf2882d27d4929 Mon Sep 17 00:00:00 2001 From: charlet Date: Tue, 15 Oct 2013 10:29:47 +0000 Subject: 2013-10-15 Robert Dewar * sem_prag.adb, exp_ch11.adb, a-except-2005.adb, a-except-2005.ads: Minor reformatting. 2013-10-15 Eric Botcazou * targparm.ads: Fix minor typo in comment. 2013-10-15 Ed Schonberg * lib-xref.adb: handle full views that are derived from private types. * sem_util.adb (Build_Elaboration_Entity): Do nothing in ASIS mode: the elaboration entity is not in the source, and plays no role in semantic analysis. Minor reformatting. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@203594 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/a-except-2005.adb | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'gcc/ada/a-except-2005.adb') diff --git a/gcc/ada/a-except-2005.adb b/gcc/ada/a-except-2005.adb index 29ecf391d80..b47f167be77 100644 --- a/gcc/ada/a-except-2005.adb +++ b/gcc/ada/a-except-2005.adb @@ -865,8 +865,9 @@ package body Ada.Exceptions is -- Get_Exception_Machine_Occurrence -- -------------------------------------- - function Get_Exception_Machine_Occurrence (X : Exception_Occurrence) - return System.Address is + function Get_Exception_Machine_Occurrence + (X : Exception_Occurrence) return System.Address + is begin return X.Machine_Occurrence; end Get_Exception_Machine_Occurrence; -- cgit v1.2.1