diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-06-06 10:50:59 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-06-06 10:50:59 +0000 |
| commit | b5d1443677d252b1ecd2165b3cc167d0c3004ce1 (patch) | |
| tree | 02d1f797c52da726b02d205f2d09fd2be6f88e40 /gcc/ada/types.h | |
| parent | b54cbc53aa994dc5984875ae17572bf681345b31 (diff) | |
| download | ppe42-gcc-b5d1443677d252b1ecd2165b3cc167d0c3004ce1.tar.gz ppe42-gcc-b5d1443677d252b1ecd2165b3cc167d0c3004ce1.zip | |
2007-04-20 Thomas Quinot <quinot@adacore.com>
* types.h, types.ads: Rename PE_Illegal_CW_Actual_E_4_18 to
PE_Non_Transportable_Actual.
(By_Descriptor_Last): New constant.
(By_Copy_Return): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125473 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/types.h')
| -rw-r--r-- | gcc/ada/types.h | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/gcc/ada/types.h b/gcc/ada/types.h index ca0148b0476..9630eba398f 100644 --- a/gcc/ada/types.h +++ b/gcc/ada/types.h @@ -6,7 +6,7 @@ * * * C Header File * * * - * Copyright (C) 1992-2006, Free Software Foundation, Inc. * + * Copyright (C) 1992-2007, Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * * terms of the GNU General Public License as published by the Free Soft- * @@ -328,6 +328,10 @@ typedef Int Mechanism_Type; #define By_Descriptor_SB (-8) #define By_Descriptor_A (-9) #define By_Descriptor_NCA (-10) +#define By_Descriptor_Last (-10) + +/* Internal to Gigi. */ +#define By_Copy_Return (-128) /* Definitions of Reason codes for Raise_xxx_Error nodes */ #define CE_Access_Check_Failed 0 @@ -359,7 +363,7 @@ typedef Int Mechanism_Type; #define PE_Potentially_Blocking_Operation 25 #define PE_Stubbed_Subprogram_Called 26 #define PE_Unchecked_Union_Restriction 27 -#define PE_Illegal_RACW_E_4_18 28 +#define PE_Non_Transportable_Actual 28 #define SE_Empty_Storage_Pool 29 #define SE_Explicit_Raise 30 |
