Mercurial > hg > CbC > CbC_gcc

comparison gcc/ada/fe.h @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children 1830386684a0
comparison
equal deleted inserted replaced
111:04ced10e8804 131:84e7813d76e9
4 * * 4 * *
5 * FE * 5 * FE *
6 * * 6 * *
7 * C Header File * 7 * C Header File *
8 * * 8 * *
9 * Copyright (C) 1992-2017, Free Software Foundation, Inc. * 9 * Copyright (C) 1992-2018, Free Software Foundation, Inc. *
10 * * 10 * *
11 * GNAT is free software; you can redistribute it and/or modify it under * 11 * GNAT is free software; you can redistribute it and/or modify it under *
12 * terms of the GNU General Public License as published by the Free Soft- * 12 * terms of the GNU General Public License as published by the Free Soft- *
13 * ware Foundation; either version 3, or (at your option) any later ver- * 13 * ware Foundation; either version 3, or (at your option) any later ver- *
14 * sion. GNAT is distributed in the hope that it will be useful, but WITH- * 14 * sion. GNAT is distributed in the hope that it will be useful, but WITH- *
66 #define Set_Alignment einfo__set_alignment 66 #define Set_Alignment einfo__set_alignment
67 #define Set_Component_Bit_Offset einfo__set_component_bit_offset 67 #define Set_Component_Bit_Offset einfo__set_component_bit_offset
68 #define Set_Component_Size einfo__set_component_size 68 #define Set_Component_Size einfo__set_component_size
69 #define Set_Esize einfo__set_esize 69 #define Set_Esize einfo__set_esize
70 #define Set_Mechanism einfo__set_mechanism 70 #define Set_Mechanism einfo__set_mechanism
71 #define Set_Normalized_First_Bit einfo__set_normalized_first_bit
72 #define Set_Normalized_Position einfo__set_normalized_position
71 #define Set_RM_Size einfo__set_rm_size 73 #define Set_RM_Size einfo__set_rm_size
72 74
73 extern void Set_Alignment (Entity_Id, Uint); 75 extern void Set_Alignment (Entity_Id, Uint);
74 extern void Set_Component_Bit_Offset (Entity_Id, Uint); 76 extern void Set_Component_Bit_Offset (Entity_Id, Uint);
75 extern void Set_Component_Size (Entity_Id, Uint); 77 extern void Set_Component_Size (Entity_Id, Uint);
76 extern void Set_Esize (Entity_Id, Uint); 78 extern void Set_Esize (Entity_Id, Uint);
77 extern void Set_Mechanism (Entity_Id, Mechanism_Type); 79 extern void Set_Mechanism (Entity_Id, Mechanism_Type);
80 extern void Set_Normalized_First_Bit (Entity_Id, Uint);
81 extern void Set_Normalized_Position (Entity_Id, Uint);
78 extern void Set_RM_Size (Entity_Id, Uint); 82 extern void Set_RM_Size (Entity_Id, Uint);
79 83
80 #define Is_Entity_Name einfo__is_entity_name 84 #define Is_Entity_Name einfo__is_entity_name
81 extern Boolean Is_Entity_Name (Node_Id); 85 extern Boolean Is_Entity_Name (Node_Id);
82 86
83 #define Get_Attribute_Definition_Clause einfo__get_attribute_definition_clause 87 #define Get_Attribute_Definition_Clause einfo__get_attribute_definition_clause
84 extern Node_Id Get_Attribute_Definition_Clause (Entity_Id, char); 88 extern Node_Id Get_Attribute_Definition_Clause (Entity_Id, unsigned char);
85 89
86 /* errout: */ 90 /* errout: */
87 91
88 #define Error_Msg_N errout__error_msg_n 92 #define Error_Msg_N errout__error_msg_n
89 #define Error_Msg_NE errout__error_msg_ne 93 #define Error_Msg_NE errout__error_msg_ne
150 #define Get_External_Name exp_dbug__get_external_name 154 #define Get_External_Name exp_dbug__get_external_name
151 155
152 extern void Get_Encoded_Name (Entity_Id); 156 extern void Get_Encoded_Name (Entity_Id);
153 extern void Get_External_Name (Entity_Id, Boolean, String_Pointer); 157 extern void Get_External_Name (Entity_Id, Boolean, String_Pointer);
154 158
159 /* exp_tss: */
160
161 #define Is_Init_Proc exp_tss__is_init_proc
162
163 extern Boolean Is_Init_Proc (Entity_Id);
164
155 /* exp_util: */ 165 /* exp_util: */
156 166
157 #define Is_Fully_Repped_Tagged_Type exp_util__is_fully_repped_tagged_type 167 #define Is_Fully_Repped_Tagged_Type exp_util__is_fully_repped_tagged_type
168 #define Find_Interface_Tag exp_util__find_interface_tag
158 169
159 extern Boolean Is_Fully_Repped_Tagged_Type (Entity_Id); 170 extern Boolean Is_Fully_Repped_Tagged_Type (Entity_Id);
171 extern Entity_Id Find_Interface_Tag (Entity_Id, Entity_Id);
160 172
161 /* lib: */ 173 /* lib: */
162 174
163 #define Cunit lib__cunit 175 #define Cunit lib__cunit
164 #define Ident_String lib__ident_string 176 #define Ident_String lib__ident_string
263 /* sem_util: */ 275 /* sem_util: */
264 276
265 #define Defining_Entity sem_util__defining_entity 277 #define Defining_Entity sem_util__defining_entity
266 #define First_Actual sem_util__first_actual 278 #define First_Actual sem_util__first_actual
267 #define Next_Actual sem_util__next_actual 279 #define Next_Actual sem_util__next_actual
280 #define Is_Variable_Size_Record sem_util__is_variable_size_record
268 #define Requires_Transient_Scope sem_util__requires_transient_scope 281 #define Requires_Transient_Scope sem_util__requires_transient_scope
269 282
270 extern Entity_Id Defining_Entity (Node_Id); 283 extern Entity_Id Defining_Entity (Node_Id);
271 extern Node_Id First_Actual (Node_Id); 284 extern Node_Id First_Actual (Node_Id);
272 extern Node_Id Next_Actual (Node_Id); 285 extern Node_Id Next_Actual (Node_Id);
273 extern Boolean Requires_Transient_Scope (Entity_Id); 286 extern Boolean Is_Variable_Size_Record (Entity_Id Id);
287 extern Boolean Requires_Transient_Scope (Entity_Id);
274 288
275 /* sinfo: */ 289 /* sinfo: */
276 290
277 #define End_Location sinfo__end_location 291 #define End_Location sinfo__end_location
278 #define Set_Has_No_Elaboration_Code sinfo__set_has_no_elaboration_code 292 #define Set_Has_No_Elaboration_Code sinfo__set_has_no_elaboration_code