diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-17 11:06:20 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-17 11:06:20 +0200 |
| commit | ba4a2f78eeb327397844448956bcc7abd5729050 (patch) | |
| tree | 756c6f16bfba7fb26f0b99204170088a8412a739 /gcc/ada/types.ads | |
| parent | 78246a6e7541ef1c2008e68e54c941d694926fcd (diff) | |
| download | gcc-ba4a2f78eeb327397844448956bcc7abd5729050.zip gcc-ba4a2f78eeb327397844448956bcc7abd5729050.tar.gz gcc-ba4a2f78eeb327397844448956bcc7abd5729050.tar.bz2 | |
[multiple changes]
2009-04-17 Pascal Obry <obry@adacore.com>
* initialize.c: Set gnat_argv with UTF-8 encoded strings on Windows.
* adaint.h, argv.c, bindgen.adb: Reverted to previous version.
2009-04-17 Robert Dewar <dewar@adacore.com>
* a-except.adb, a-except-2005.adb: Add PE_Address_Of_Intrinsic
* sem_attr.adb (Analyze_Attribute, case Address): Use
PE_Address_Of_Intrinsic.
* types.ads: Add PE_Address_Of_Intrinsic
* types.h: Add PE_Address_Of_Intrinsic
From-SVN: r146226
Diffstat (limited to 'gcc/ada/types.ads')
| -rw-r--r-- | gcc/ada/types.ads | 37 |
1 files changed, 19 insertions, 18 deletions
diff --git a/gcc/ada/types.ads b/gcc/ada/types.ads index 94b037e..3b89ab2 100644 --- a/gcc/ada/types.ads +++ b/gcc/ada/types.ads @@ -787,24 +787,25 @@ package Types is PE_Access_Before_Elaboration, -- 14 PE_Accessibility_Check_Failed, -- 15 - PE_All_Guards_Closed, -- 16 - PE_Current_Task_In_Entry_Body, -- 17 - PE_Duplicated_Entry_Address, -- 18 - PE_Explicit_Raise, -- 19 - PE_Finalize_Raised_Exception, -- 20 - PE_Implicit_Return, -- 21 - PE_Misaligned_Address_Value, -- 22 - PE_Missing_Return, -- 23 - PE_Overlaid_Controlled_Object, -- 24 - PE_Potentially_Blocking_Operation, -- 25 - PE_Stubbed_Subprogram_Called, -- 26 - PE_Unchecked_Union_Restriction, -- 27 - PE_Non_Transportable_Actual, -- 28 - - SE_Empty_Storage_Pool, -- 29 - SE_Explicit_Raise, -- 30 - SE_Infinite_Recursion, -- 31 - SE_Object_Too_Large); -- 32 + PE_Address_Of_Intrinsic, -- 16 + PE_All_Guards_Closed, -- 17 + PE_Current_Task_In_Entry_Body, -- 18 + PE_Duplicated_Entry_Address, -- 19 + PE_Explicit_Raise, -- 20 + PE_Finalize_Raised_Exception, -- 21 + PE_Implicit_Return, -- 22 + PE_Misaligned_Address_Value, -- 23 + PE_Missing_Return, -- 24 + PE_Overlaid_Controlled_Object, -- 25 + PE_Potentially_Blocking_Operation, -- 26 + PE_Stubbed_Subprogram_Called, -- 27 + PE_Unchecked_Union_Restriction, -- 28 + PE_Non_Transportable_Actual, -- 29 + + SE_Empty_Storage_Pool, -- 30 + SE_Explicit_Raise, -- 31 + SE_Infinite_Recursion, -- 32 + SE_Object_Too_Large); -- 33 subtype RT_CE_Exceptions is RT_Exception_Code range CE_Access_Check_Failed .. |