OSDN Git Service

ada:
[pf3gnuchains/gcc-fork.git] / gcc / ada / types.h
index 1d4fd67..5877f32 100644 (file)
@@ -6,7 +6,7 @@
  *                                                                          *
  *                              C Header File                               *
  *                                                                          *
- *          Copyright (C) 1992-2008, Free Software Foundation, Inc.         *
+ *          Copyright (C) 1992-2010, 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- *
@@ -359,23 +359,25 @@ typedef Int Mechanism_Type;
 
 #define PE_Access_Before_Elaboration       14
 #define PE_Accessibility_Check_Failed      15
-#define PE_All_Guards_Closed               16
-#define PE_Current_Task_In_Entry_Body      17
-#define PE_Duplicated_Entry_Address        18
-#define PE_Explicit_Raise                  19
-#define PE_Finalize_Raised_Exception       20
-#define PE_Implicit_Return                 21
-#define PE_Misaligned_Address_Value        22
-#define PE_Missing_Return                  23
-#define PE_Overlaid_Controlled_Object      24
-#define PE_Potentially_Blocking_Operation  25
-#define PE_Stubbed_Subprogram_Called       26
-#define PE_Unchecked_Union_Restriction     27
-#define PE_Non_Transportable_Actual        28
-
-#define SE_Empty_Storage_Pool              29
-#define SE_Explicit_Raise                  30
-#define SE_Infinite_Recursion              31
-#define SE_Object_Too_Large                32
-
-#define LAST_REASON_CODE                   32
+#define PE_Address_Of_Intrinsic            16
+#define PE_All_Guards_Closed               17
+#define PE_Bad_Attribute_For_Predicate     18
+#define PE_Current_Task_In_Entry_Body      19
+#define PE_Duplicated_Entry_Address        20
+#define PE_Explicit_Raise                  21
+#define PE_Finalize_Raised_Exception       22
+#define PE_Implicit_Return                 23
+#define PE_Misaligned_Address_Value        24
+#define PE_Missing_Return                  25
+#define PE_Overlaid_Controlled_Object      26
+#define PE_Potentially_Blocking_Operation  27
+#define PE_Stubbed_Subprogram_Called       28
+#define PE_Unchecked_Union_Restriction     29
+#define PE_Non_Transportable_Actual        30
+
+#define SE_Empty_Storage_Pool              31
+#define SE_Explicit_Raise                  32
+#define SE_Infinite_Recursion              33
+#define SE_Object_Too_Large                34
+
+#define LAST_REASON_CODE                   34