aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/scos.h
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/scos.h')
-rw-r--r--gcc/ada/scos.h28
1 files changed, 12 insertions, 16 deletions
diff --git a/gcc/ada/scos.h b/gcc/ada/scos.h
index 4fb396c..bda373b 100644
--- a/gcc/ada/scos.h
+++ b/gcc/ada/scos.h
@@ -45,16 +45,14 @@ struct SCO_Unit_Table_Entry
typedef struct SCO_Unit_Table_Entry *SCO_Unit_Table_Type;
-/* The following depends on the fact that The_Instance.Table
- is the first component. */
-extern SCO_Unit_Table_Type scos__sco_unit_table__the_instance;
-#define SCO_Unit_Table scos__sco_unit_table__the_instance
+extern SCO_Unit_Table_Type scos__sco_unit_table__table;
+#define SCO_Unit_Table scos__sco_unit_table__table
-extern Int scos__sco_unit_table__first(void);
-#define SCO_Unit_Table_First scos__sco_unit_table__first
+extern Int scos__sco_unit_table__min;
+#define SCO_Unit_Table_Min scos__sco_unit_table__min
-extern Int scos__sco_unit_table__last(void);
-#define SCO_Unit_Table_Last scos__sco_unit_table__last
+extern Int scos__sco_unit_table__last_val;
+#define SCO_Unit_Table_Last_Val scos__sco_unit_table__last_val
/* SCOs table: */
@@ -76,16 +74,14 @@ struct SCO_Table_Entry
typedef struct SCO_Table_Entry *SCO_Table_Type;
-/* The following depends on the fact that The_Instance.Table
- is the first component. */
-extern SCO_Table_Type scos__sco_table__the_instance;
-#define SCO_Table scos__sco_table__the_instance
+extern SCO_Table_Type scos__sco_table__table;
+#define SCO_Table scos__sco_table__table
-extern Int scos__sco_table__first(void);
-#define SCO_Table_First scos__sco_table__first
+extern Int scos__sco_table__min;
+#define SCO_Table_Min scos__sco_table__min
-extern Int scos__sco_table__last(void);
-#define SCO_Table_Last scos__sco_table__last
+extern Int scos__sco_table__last_val;
+#define SCO_Table_Last_Val scos__sco_table__last_val
#ifdef __cplusplus
}