comparison gcc/ada/fe.h @ 145:1830386684a0

gcc-9.2.0
author anatofuz
date Thu, 13 Feb 2020 11:34:05 +0900
parents 84e7813d76e9
children
comparison
equal deleted inserted replaced
131:84e7813d76e9 145:1830386684a0
4 * * 4 * *
5 * FE * 5 * FE *
6 * * 6 * *
7 * C Header File * 7 * C Header File *
8 * * 8 * *
9 * Copyright (C) 1992-2018, Free Software Foundation, Inc. * 9 * Copyright (C) 1992-2019, 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- *
27 * GNAT was originally developed by the GNAT team at New York University. * 27 * GNAT was originally developed by the GNAT team at New York University. *
28 * Extensive contributions were provided by Ada Core Technologies Inc. * 28 * Extensive contributions were provided by Ada Core Technologies Inc. *
29 * * 29 * *
30 ****************************************************************************/ 30 ****************************************************************************/
31 31
32 /* This file contains declarations to access front-end functions and variables 32 /* This is the C header that contains the declarations of Ada subprograms and
33 used by gigi. 33 variables used by gigi and not declared in other C header files. It was
34 created manually from Ada specifications. The original Ada declarations
35 in these specifications must be marked with:
36
37 "WARNING: There is a matching C declaration of this <entity_kind> in fe.h"
38
39 where <entity_kind> is either "subprogram" or "variable" or "type".
34 40
35 WARNING: functions taking String_Pointer parameters must abide by the rule 41 WARNING: functions taking String_Pointer parameters must abide by the rule
36 documented alongside the definition of String_Pointer in types.h. */ 42 documented alongside the definition of String_Pointer in types.h. */
37 43
38 #ifdef __cplusplus 44 #ifdef __cplusplus
39 extern "C" { 45 extern "C" {
40 #endif 46 #endif
41 47
42 /* atree: */ 48 /* atree: */
43 49
44 #define Serious_Errors_Detected atree__serious_errors_detected 50 #define Serious_Errors_Detected atree__serious_errors_detected
51
52 extern Nat Serious_Errors_Detected;
45 53
46 /* comperr: */ 54 /* comperr: */
47 55
48 #define Compiler_Abort comperr__compiler_abort 56 #define Compiler_Abort comperr__compiler_abort
57
49 extern int Compiler_Abort (String_Pointer, String_Pointer, Boolean) ATTRIBUTE_NORETURN; 58 extern int Compiler_Abort (String_Pointer, String_Pointer, Boolean) ATTRIBUTE_NORETURN;
50
51 /* csets: */
52
53 #define Fold_Lower(C) csets__fold_lower[C]
54 #define Fold_Upper(C) csets__fold_upper[C]
55 extern char Fold_Lower[], Fold_Upper[];
56 59
57 /* debug: */ 60 /* debug: */
58 61
59 #define Debug_Flag_Dot_R debug__debug_flag_dot_r 62 #define Debug_Flag_Dot_R debug__debug_flag_dot_r
60 #define Debug_Flag_NN debug__debug_flag_nn 63 #define Debug_Flag_NN debug__debug_flag_nn
64
61 extern Boolean Debug_Flag_Dot_R; 65 extern Boolean Debug_Flag_Dot_R;
62 extern Boolean Debug_Flag_NN; 66 extern Boolean Debug_Flag_NN;
63 67
64 /* einfo: */ 68 /* einfo: */
65 69
79 extern void Set_Mechanism (Entity_Id, Mechanism_Type); 83 extern void Set_Mechanism (Entity_Id, Mechanism_Type);
80 extern void Set_Normalized_First_Bit (Entity_Id, Uint); 84 extern void Set_Normalized_First_Bit (Entity_Id, Uint);
81 extern void Set_Normalized_Position (Entity_Id, Uint); 85 extern void Set_Normalized_Position (Entity_Id, Uint);
82 extern void Set_RM_Size (Entity_Id, Uint); 86 extern void Set_RM_Size (Entity_Id, Uint);
83 87
84 #define Is_Entity_Name einfo__is_entity_name 88 #define Is_Entity_Name einfo__is_entity_name
89
85 extern Boolean Is_Entity_Name (Node_Id); 90 extern Boolean Is_Entity_Name (Node_Id);
86 91
87 #define Get_Attribute_Definition_Clause einfo__get_attribute_definition_clause 92 #define Get_Attribute_Definition_Clause einfo__get_attribute_definition_clause
93
88 extern Node_Id Get_Attribute_Definition_Clause (Entity_Id, unsigned char); 94 extern Node_Id Get_Attribute_Definition_Clause (Entity_Id, unsigned char);
89 95
90 /* errout: */ 96 /* errout: */
91 97
92 #define Error_Msg_N errout__error_msg_n 98 #define Error_Msg_N errout__error_msg_n
93 #define Error_Msg_NE errout__error_msg_ne 99 #define Error_Msg_NE errout__error_msg_ne
94 #define Set_Identifier_Casing errout__set_identifier_casing 100 #define Set_Identifier_Casing errout__set_identifier_casing
95 101
96 extern void Error_Msg_N (String_Pointer, Node_Id); 102 extern void Error_Msg_N (String_Pointer, Node_Id);
97 extern void Error_Msg_NE (String_Pointer, Node_Id, Entity_Id); 103 extern void Error_Msg_NE (String_Pointer, Node_Id, Entity_Id);
98 extern void Set_Identifier_Casing (Char *, const Char *); 104 extern void Set_Identifier_Casing (Char *, const Char *);
99 105
100 /* err_vars: */ 106 /* err_vars: */
101 107
102 #define Error_Msg_Node_2 err_vars__error_msg_node_2 108 #define Error_Msg_Uint_1 err_vars__error_msg_uint_1
103 #define Error_Msg_Uint_1 err_vars__error_msg_uint_1 109 #define Error_Msg_Uint_2 err_vars__error_msg_uint_2
104 #define Error_Msg_Uint_2 err_vars__error_msg_uint_2 110
105 111 extern Uint Error_Msg_Uint_1;
106 extern Entity_Id Error_Msg_Node_2; 112 extern Uint Error_Msg_Uint_2;
107 extern Uint Error_Msg_Uint_1;
108 extern Uint Error_Msg_Uint_2;
109 extern Nat Serious_Errors_Detected;
110 113
111 /* exp_ch11: */ 114 /* exp_ch11: */
112 115
113 #define Get_Local_Raise_Call_Entity exp_ch11__get_local_raise_call_entity 116 #define Get_Local_Raise_Call_Entity exp_ch11__get_local_raise_call_entity
114 #define Get_RT_Exception_Entity exp_ch11__get_rt_exception_entity 117 #define Get_RT_Exception_Entity exp_ch11__get_rt_exception_entity
115 #define Get_RT_Exception_Name exp_ch11__get_rt_exception_name 118 #define Get_RT_Exception_Name exp_ch11__get_rt_exception_name
116 #define Warn_If_No_Local_Raise exp_ch11__warn_if_no_local_raise 119 #define Warn_If_No_Local_Raise exp_ch11__warn_if_no_local_raise
117 120
118 extern Entity_Id Get_Local_Raise_Call_Entity (void); 121 extern Entity_Id Get_Local_Raise_Call_Entity (void);
119 extern Entity_Id Get_RT_Exception_Entity (int); 122 extern Entity_Id Get_RT_Exception_Entity (int);
120 extern void Get_RT_Exception_Name (int); 123 extern void Get_RT_Exception_Name (int);
121 extern void Warn_If_No_Local_Raise (int); 124 extern void Warn_If_No_Local_Raise (int);
122 125
123 /* exp_code: */ 126 /* exp_code: */
124 127
125 #define Asm_Input_Constraint exp_code__asm_input_constraint 128 #define Asm_Input_Constraint exp_code__asm_input_constraint
126 #define Asm_Input_Value exp_code__asm_input_value 129 #define Asm_Input_Value exp_code__asm_input_value
127 #define Asm_Output_Constraint exp_code__asm_output_constraint 130 #define Asm_Output_Constraint exp_code__asm_output_constraint
128 #define Asm_Output_Variable exp_code__asm_output_variable 131 #define Asm_Output_Variable exp_code__asm_output_variable
129 #define Asm_Template exp_code__asm_template 132 #define Asm_Template exp_code__asm_template
130 #define Clobber_Get_Next exp_code__clobber_get_next 133 #define Clobber_Get_Next exp_code__clobber_get_next
131 #define Clobber_Setup exp_code__clobber_setup 134 #define Clobber_Setup exp_code__clobber_setup
132 #define Is_Asm_Volatile exp_code__is_asm_volatile 135 #define Is_Asm_Volatile exp_code__is_asm_volatile
133 #define Next_Asm_Input exp_code__next_asm_input 136 #define Next_Asm_Input exp_code__next_asm_input
134 #define Next_Asm_Output exp_code__next_asm_output 137 #define Next_Asm_Output exp_code__next_asm_output
135 #define Setup_Asm_Inputs exp_code__setup_asm_inputs 138 #define Setup_Asm_Inputs exp_code__setup_asm_inputs
136 #define Setup_Asm_Outputs exp_code__setup_asm_outputs 139 #define Setup_Asm_Outputs exp_code__setup_asm_outputs
137 140
138 extern Node_Id Asm_Input_Constraint (void); 141 extern Node_Id Asm_Input_Constraint (void);
139 extern Node_Id Asm_Input_Value (void); 142 extern Node_Id Asm_Input_Value (void);
140 extern Node_Id Asm_Output_Constraint (void); 143 extern Node_Id Asm_Output_Constraint (void);
141 extern Node_Id Asm_Output_Variable (void); 144 extern Node_Id Asm_Output_Variable (void);
148 extern void Setup_Asm_Inputs (Node_Id); 151 extern void Setup_Asm_Inputs (Node_Id);
149 extern void Setup_Asm_Outputs (Node_Id); 152 extern void Setup_Asm_Outputs (Node_Id);
150 153
151 /* exp_dbug: */ 154 /* exp_dbug: */
152 155
153 #define Get_Encoded_Name exp_dbug__get_encoded_name 156 #define Get_Encoded_Name exp_dbug__get_encoded_name
154 #define Get_External_Name exp_dbug__get_external_name 157 #define Get_External_Name exp_dbug__get_external_name
155 158 #define Get_Variant_Encoding exp_dbug__get_variant_encoding
156 extern void Get_Encoded_Name (Entity_Id); 159
157 extern void Get_External_Name (Entity_Id, Boolean, String_Pointer); 160 extern void Get_Encoded_Name (Entity_Id);
161 extern void Get_External_Name (Entity_Id, Boolean, String_Pointer);
162 extern void Get_Variant_Encoding (Entity_Id);
158 163
159 /* exp_tss: */ 164 /* exp_tss: */
160 165
161 #define Is_Init_Proc exp_tss__is_init_proc 166 #define Is_Init_Proc exp_tss__is_init_proc
162 167
163 extern Boolean Is_Init_Proc (Entity_Id); 168 extern Boolean Is_Init_Proc (Entity_Id);
164 169
165 /* exp_util: */ 170 /* exp_util: */
166 171
167 #define Is_Fully_Repped_Tagged_Type exp_util__is_fully_repped_tagged_type 172 #define Is_Fully_Repped_Tagged_Type exp_util__is_fully_repped_tagged_type
168 #define Find_Interface_Tag exp_util__find_interface_tag 173 #define Find_Interface_Tag exp_util__find_interface_tag
169 174
170 extern Boolean Is_Fully_Repped_Tagged_Type (Entity_Id); 175 extern Boolean Is_Fully_Repped_Tagged_Type (Entity_Id);
171 extern Entity_Id Find_Interface_Tag (Entity_Id, Entity_Id); 176 extern Entity_Id Find_Interface_Tag (Entity_Id, Entity_Id);
172 177
173 /* lib: */ 178 /* lib: */
174 179
175 #define Cunit lib__cunit 180 #define Cunit lib__cunit
176 #define Ident_String lib__ident_string 181 #define Ident_String lib__ident_string
177 #define In_Extended_Main_Code_Unit lib__in_extended_main_code_unit 182 #define In_Extended_Main_Code_Unit lib__in_extended_main_code_unit
178 #define In_Same_Source_Unit lib__in_same_source_unit
179 183
180 extern Node_Id Cunit (Unit_Number_Type); 184 extern Node_Id Cunit (Unit_Number_Type);
181 extern Node_Id Ident_String (Unit_Number_Type); 185 extern Node_Id Ident_String (Unit_Number_Type);
182 extern Boolean In_Extended_Main_Code_Unit (Entity_Id); 186 extern Boolean In_Extended_Main_Code_Unit (Entity_Id);
183 extern Boolean In_Same_Source_Unit (Node_Id, Node_Id);
184 187
185 /* opt: */ 188 /* opt: */
186 189
187 #define Back_End_Inlining opt__back_end_inlining 190 #define Ada_Version opt__ada_version
188 #define Exception_Extra_Info opt__exception_extra_info 191 #define Back_End_Inlining opt__back_end_inlining
189 #define Exception_Locations_Suppressed opt__exception_locations_suppressed 192 #define Debug_Generated_Code opt__debug_generated_code
190 #define Exception_Mechanism opt__exception_mechanism 193 #define Exception_Extra_Info opt__exception_extra_info
191 #define Float_Format opt__float_format 194 #define Exception_Locations_Suppressed opt__exception_locations_suppressed
192 #define Generate_SCO_Instance_Table opt__generate_sco_instance_table 195 #define Exception_Mechanism opt__exception_mechanism
193 #define GNAT_Mode opt__gnat_mode 196 #define Generate_SCO_Instance_Table opt__generate_sco_instance_table
194 #define List_Representation_Info opt__list_representation_info 197 #define GNAT_Mode opt__gnat_mode
195 #define No_Strict_Aliasing_CP opt__no_strict_aliasing 198 #define List_Representation_Info opt__list_representation_info
199 #define No_Strict_Aliasing_CP opt__no_strict_aliasing
200 #define Suppress_Checks opt__suppress_checks
201
202 typedef enum {
203 Ada_83, Ada_95, Ada_2005, Ada_2012, Ada_2020
204 } Ada_Version_Type;
196 205
197 typedef enum { 206 typedef enum {
198 Front_End_SJLJ, Back_End_ZCX, Back_End_SJLJ 207 Front_End_SJLJ, Back_End_ZCX, Back_End_SJLJ
199 } Exception_Mechanism_Type; 208 } Exception_Mechanism_Type;
200 209
210 extern Ada_Version_Type Ada_Version;
201 extern Boolean Back_End_Inlining; 211 extern Boolean Back_End_Inlining;
212 extern Boolean Debug_Generated_Code;
202 extern Boolean Exception_Extra_Info; 213 extern Boolean Exception_Extra_Info;
203 extern Boolean Exception_Locations_Suppressed; 214 extern Boolean Exception_Locations_Suppressed;
204 extern Exception_Mechanism_Type Exception_Mechanism; 215 extern Exception_Mechanism_Type Exception_Mechanism;
205 extern Char Float_Format;
206 extern Boolean Generate_SCO_Instance_Table; 216 extern Boolean Generate_SCO_Instance_Table;
207 extern Boolean GNAT_Mode; 217 extern Boolean GNAT_Mode;
208 extern Int List_Representation_Info; 218 extern Int List_Representation_Info;
209 extern Boolean No_Strict_Aliasing_CP; 219 extern Boolean No_Strict_Aliasing_CP;
210 220 extern Boolean Suppress_Checks;
211 #define ZCX_Exceptions opt__zcx_exceptions 221
212 #define SJLJ_Exceptions opt__sjlj_exceptions 222 #define ZCX_Exceptions opt__zcx_exceptions
213 #define Front_End_Exceptions opt__front_end_exceptions 223 #define SJLJ_Exceptions opt__sjlj_exceptions
214 #define Back_End_Exceptions opt__back_end_exceptions 224 #define Front_End_Exceptions opt__front_end_exceptions
215 225 #define Back_End_Exceptions opt__back_end_exceptions
216 extern Boolean ZCX_Exceptions (void); 226
217 extern Boolean SJLJ_Exceptions (void); 227 extern Boolean ZCX_Exceptions (void);
218 extern Boolean Front_End_Exceptions (void); 228 extern Boolean SJLJ_Exceptions (void);
219 extern Boolean Back_End_Exceptions (void); 229 extern Boolean Front_End_Exceptions (void);
230 extern Boolean Back_End_Exceptions (void);
220 231
221 /* restrict: */ 232 /* restrict: */
222 233
223 #define No_Exception_Handlers_Set restrict__no_exception_handlers_set 234 #define Check_Elaboration_Code_Allowed \
224 #define Check_No_Implicit_Heap_Alloc restrict__check_no_implicit_heap_alloc 235 restrict__check_elaboration_code_allowed
225 #define Check_No_Implicit_Task_Alloc restrict__check_no_implicit_task_alloc 236 #define Check_Implicit_Dynamic_Code_Allowed \
226 #define Check_No_Implicit_Protected_Alloc restrict__check_no_implicit_protected_alloc 237 restrict__check_implicit_dynamic_code_allowed
227 #define Check_Elaboration_Code_Allowed restrict__check_elaboration_code_allowed 238 #define Check_No_Implicit_Heap_Alloc \
228 #define Check_Implicit_Dynamic_Code_Allowed restrict__check_implicit_dynamic_code_allowed 239 restrict__check_no_implicit_heap_alloc
229 240 #define Check_No_Implicit_Protected_Alloc \
230 extern Boolean No_Exception_Handlers_Set (void); 241 restrict__check_no_implicit_protected_alloc
231 extern void Check_No_Implicit_Heap_Alloc (Node_Id); 242 #define Check_No_Implicit_Task_Alloc \
232 extern void Check_No_Implicit_Task_Alloc (Node_Id); 243 restrict__check_no_implicit_task_alloc
233 extern void Check_No_Implicit_Protected_Alloc (Node_Id); 244 #define No_Exception_Handlers_Set \
234 extern void Check_Elaboration_Code_Allowed (Node_Id); 245 restrict__no_exception_handlers_set
235 extern void Check_Implicit_Dynamic_Code_Allowed (Node_Id); 246
247 extern void Check_Elaboration_Code_Allowed (Node_Id);
248 extern void Check_Implicit_Dynamic_Code_Allowed (Node_Id);
249 extern void Check_No_Implicit_Heap_Alloc (Node_Id);
250 extern void Check_No_Implicit_Protected_Alloc (Node_Id);
251 extern void Check_No_Implicit_Task_Alloc (Node_Id);
252 extern Boolean No_Exception_Handlers_Set (void);
236 253
237 /* sem_aggr: */ 254 /* sem_aggr: */
238 255
239 #define Is_Others_Aggregate sem_aggr__is_others_aggregate 256 #define Is_Others_Aggregate sem_aggr__is_others_aggregate
240 257
241 extern Boolean Is_Others_Aggregate (Node_Id); 258 extern Boolean Is_Others_Aggregate (Node_Id);
242 259
243 /* sem_aux: */ 260 /* sem_aux: */
244 261
245 #define Ancestor_Subtype sem_aux__ancestor_subtype 262 #define Ancestor_Subtype sem_aux__ancestor_subtype
246 #define Constant_Value sem_aux__constant_value 263 #define Constant_Value sem_aux__constant_value
247 #define First_Discriminant sem_aux__first_discriminant 264 #define First_Discriminant sem_aux__first_discriminant
248 #define First_Stored_Discriminant sem_aux__first_stored_discriminant 265 #define First_Stored_Discriminant sem_aux__first_stored_discriminant
249 #define First_Subtype sem_aux__first_subtype 266 #define First_Subtype sem_aux__first_subtype
250 #define Is_By_Reference_Type sem_aux__is_by_reference_type 267 #define Is_By_Reference_Type sem_aux__is_by_reference_type
251 #define Is_Derived_Type sem_aux__is_derived_type 268 #define Is_Derived_Type sem_aux__is_derived_type
252 269
253 extern Entity_Id Ancestor_Subtype (Entity_Id); 270 extern Entity_Id Ancestor_Subtype (Entity_Id);
254 extern Node_Id Constant_Value (Entity_Id); 271 extern Node_Id Constant_Value (Entity_Id);
255 extern Entity_Id First_Discriminant (Entity_Id); 272 extern Entity_Id First_Discriminant (Entity_Id);
256 extern Entity_Id First_Stored_Discriminant (Entity_Id); 273 extern Entity_Id First_Stored_Discriminant (Entity_Id);
257 extern Entity_Id First_Subtype (Entity_Id); 274 extern Entity_Id First_Subtype (Entity_Id);
258 extern Boolean Is_By_Reference_Type (Entity_Id); 275 extern Boolean Is_By_Reference_Type (Entity_Id);
259 extern Boolean Is_Derived_Type (Entity_Id); 276 extern Boolean Is_Derived_Type (Entity_Id);
260 277
261 /* sem_eval: */ 278 /* sem_eval: */
262 279
263 #define Compile_Time_Known_Value sem_eval__compile_time_known_value 280 #define Compile_Time_Known_Value sem_eval__compile_time_known_value
264 #define Expr_Value sem_eval__expr_value
265 #define Expr_Value_S sem_eval__expr_value_s
266 #define Is_OK_Static_Expression sem_eval__is_ok_static_expression 281 #define Is_OK_Static_Expression sem_eval__is_ok_static_expression
267 #define Is_OK_Static_Subtype sem_eval__is_ok_static_subtype 282
268 283 extern Boolean Compile_Time_Known_Value (Node_Id);
269 extern Uint Expr_Value (Node_Id); 284 extern Boolean Is_OK_Static_Expression (Node_Id);
270 extern Node_Id Expr_Value_S (Node_Id);
271 extern Boolean Compile_Time_Known_Value (Node_Id);
272 extern Boolean Is_OK_Static_Expression (Node_Id);
273 extern Boolean Is_OK_Static_Subtype (Entity_Id);
274 285
275 /* sem_util: */ 286 /* sem_util: */
276 287
277 #define Defining_Entity sem_util__defining_entity 288 #define Defining_Entity sem_util__defining_entity
278 #define First_Actual sem_util__first_actual 289 #define First_Actual sem_util__first_actual
290 #define Is_Variable_Size_Record sem_util__is_variable_size_record
279 #define Next_Actual sem_util__next_actual 291 #define Next_Actual sem_util__next_actual
280 #define Is_Variable_Size_Record sem_util__is_variable_size_record
281 #define Requires_Transient_Scope sem_util__requires_transient_scope 292 #define Requires_Transient_Scope sem_util__requires_transient_scope
282 293
283 extern Entity_Id Defining_Entity (Node_Id); 294 extern Entity_Id Defining_Entity (Node_Id);
284 extern Node_Id First_Actual (Node_Id); 295 extern Node_Id First_Actual (Node_Id);
296 extern Boolean Is_Variable_Size_Record (Entity_Id Id);
285 extern Node_Id Next_Actual (Node_Id); 297 extern Node_Id Next_Actual (Node_Id);
286 extern Boolean Is_Variable_Size_Record (Entity_Id Id);
287 extern Boolean Requires_Transient_Scope (Entity_Id); 298 extern Boolean Requires_Transient_Scope (Entity_Id);
288 299
289 /* sinfo: */ 300 /* sinfo: */
290 301
291 #define End_Location sinfo__end_location 302 #define End_Location sinfo__end_location
292 #define Set_Has_No_Elaboration_Code sinfo__set_has_no_elaboration_code 303 #define Set_Has_No_Elaboration_Code sinfo__set_has_no_elaboration_code
293 #define Set_Present_Expr sinfo__set_present_expr 304 #define Set_Present_Expr sinfo__set_present_expr
294 305
295 extern Source_Ptr End_Location (Node_Id); 306 extern Source_Ptr End_Location (Node_Id);
296 extern void Set_Has_No_Elaboration_Code (Node_Id, Boolean); 307 extern void Set_Has_No_Elaboration_Code (Node_Id, Boolean);
297 extern void Set_Present_Expr (Node_Id, Uint); 308 extern void Set_Present_Expr (Node_Id, Uint);
298 309
310 /* sinput: */
311
312 #define Debug_Source_Name sinput__debug_source_name
313 #define Get_Column_Number sinput__get_column_number
314 #define Get_Logical_Line_Number sinput__get_logical_line_number
315 #define Get_Source_File_Index sinput__get_source_file_index
316
317 extern File_Name_Type Debug_Source_Name (Source_File_Index);
318 extern Column_Number_Type Get_Column_Number (Source_Ptr);
319 extern Line_Number_Type Get_Logical_Line_Number (Source_Ptr);
320 extern Source_File_Index Get_Source_File_Index (Source_Ptr);
321
299 /* targparm: */ 322 /* targparm: */
300 323
301 #define Backend_Overflow_Checks_On_Target targparm__backend_overflow_checks_on_target 324 #define Machine_Overflows_On_Target \
302 #define Machine_Overflows_On_Target targparm__machine_overflows_on_target 325 targparm__machine_overflows_on_target
303 #define Signed_Zeros_On_Target targparm__signed_zeros_on_target 326 #define Signed_Zeros_On_Target \
304 #define Stack_Check_Probes_On_Target targparm__stack_check_probes_on_target 327 targparm__signed_zeros_on_target
305 #define Stack_Check_Limits_On_Target targparm__stack_check_limits_on_target 328 #define Stack_Check_Limits_On_Target \
306 329 targparm__stack_check_limits_on_target
307 extern Boolean Backend_Overflow_Checks_On_Target; 330 #define Stack_Check_Probes_On_Target \
331 targparm__stack_check_probes_on_target
332
308 extern Boolean Machine_Overflows_On_Target; 333 extern Boolean Machine_Overflows_On_Target;
309 extern Boolean Signed_Zeros_On_Target; 334 extern Boolean Signed_Zeros_On_Target;
335 extern Boolean Stack_Check_Limits_On_Target;
310 extern Boolean Stack_Check_Probes_On_Target; 336 extern Boolean Stack_Check_Probes_On_Target;
311 extern Boolean Stack_Check_Limits_On_Target;
312 337
313 /* warnsw: */ 338 /* warnsw: */
314 339
315 #define Warn_On_Questionable_Layout warnsw__warn_on_questionable_layout 340 #define Warn_On_Questionable_Layout warnsw__warn_on_questionable_layout
316 341
317 extern Boolean Warn_On_Questionable_Layout; 342 extern Boolean Warn_On_Questionable_Layout;
318 343
319 #ifdef __cplusplus 344 #ifdef __cplusplus
320 } 345 }