diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-07-29 13:24:47 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-07-29 13:24:47 +0000 |
commit | 1e4f3cfbad4bd20be4853c7cf733acd34f0a4416 (patch) | |
tree | 542aa6635d05a7788fedc10cb0cc8f14ab489077 /gcc/ada/a-except-2005.adb | |
parent | 26279d919aa3157c141cf78f3914df5ca11f851a (diff) | |
download | gcc-1e4f3cfbad4bd20be4853c7cf733acd34f0a4416.tar.gz |
2014-07-29 Robert Dewar <dewar@adacore.com>
* gnat_ugn.texi: Add section on Wide_Wide_Character encodings.
* erroutc.adb (Output_Error_Msgs): Take wide characters into
account in computing position of error flags.
* sinput.adb (Get_Column_Number): Take wide characters into
account.
2014-07-29 Ed Schonberg <schonberg@adacore.com>
* par-ch3.adb (P_Access_Type_Definition): The subtype indication
in an access type definition can carry a null_exclusion indicator.
* sem_ch3.adb (Access_Type_Declaration): If the subtype indication
carries a null_exclusion indicator, verify that the subtype
indication denotes an access type, and create a null-excluding
subtype for it.
* sinfo.ads, sinfo.adb: New attribute Null_Excluding_Subtype,
defined on N_Access_To_Object_Definition to indicate that the
subtype indication carries a null_exclusion indicator.
2014-07-29 Hristian Kirtchev <kirtchev@adacore.com>
* exp_ch6.adb (Add_Extra_Actual): Do not construct
the extra actual by name, generate a reference instead.
2014-07-29 Arnaud Charlet <charlet@adacore.com>
* sem_prag.adb (Analyze_Pragma): Do not crash analyzing
Allow_Integer_Address if already set.
* a-except-2005.adb (Rcheck_PE_Stream_Operation_Not_Allowed):
Fix order, for consistency with Rmsg_xx declarations.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@213172 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-except-2005.adb')
-rw-r--r-- | gcc/ada/a-except-2005.adb | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gcc/ada/a-except-2005.adb b/gcc/ada/a-except-2005.adb index 52de66f2187..ab29b0988f6 100644 --- a/gcc/ada/a-except-2005.adb +++ b/gcc/ada/a-except-2005.adb @@ -403,6 +403,9 @@ package body Ada.Exceptions is -- These routines raise a specific exception with a reason message -- attached. The parameters are the file name and line number in each -- case. The names are defined by Exp_Ch11.Get_RT_Exception_Name. + -- Note that these routines should be declared in the same order as the + -- corresponding Rmsg_xx constants below, this is needed by the + -- .NET runtime (see exceptmsg.awk script). procedure Rcheck_CE_Access_Check (File : System.Address; Line : Integer); @@ -462,8 +465,6 @@ package body Ada.Exceptions is (File : System.Address; Line : Integer); procedure Rcheck_PE_Potentially_Blocking_Operation (File : System.Address; Line : Integer); - procedure Rcheck_PE_Stream_Operation_Not_Allowed - (File : System.Address; Line : Integer); procedure Rcheck_PE_Stubbed_Subprogram_Called (File : System.Address; Line : Integer); procedure Rcheck_PE_Unchecked_Union_Restriction @@ -476,6 +477,8 @@ package body Ada.Exceptions is (File : System.Address; Line : Integer); procedure Rcheck_SE_Object_Too_Large (File : System.Address; Line : Integer); + procedure Rcheck_PE_Stream_Operation_Not_Allowed + (File : System.Address; Line : Integer); procedure Rcheck_CE_Access_Check_Ext (File : System.Address; Line, Column : Integer); |