]>
Commit | Line | Data |
---|---|---|
7f4edbcb | 1 | /* Definitions for c-common.c. |
517cbe13 JL |
2 | Copyright (C) 1987, 1993, 1994, 1995, 1997, 1998, |
3 | 1999, 2000 Free Software Foundation, Inc. | |
7f4edbcb BS |
4 | |
5 | This file is part of GNU CC. | |
6 | ||
7 | GNU CC is free software; you can redistribute it and/or modify | |
8 | it under the terms of the GNU General Public License as published by | |
9 | the Free Software Foundation; either version 2, or (at your option) | |
10 | any later version. | |
11 | ||
12 | GNU CC is distributed in the hope that it will be useful, | |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | GNU General Public License for more details. | |
16 | ||
17 | You should have received a copy of the GNU General Public License | |
18 | along with GNU CC; see the file COPYING. If not, write to | |
19 | the Free Software Foundation, 59 Temple Place - Suite 330, | |
20 | Boston, MA 02111-1307, USA. */ | |
21 | ||
0e5921e8 ZW |
22 | #ifndef GCC_C_COMMON_H |
23 | #define GCC_C_COMMON_H | |
24 | ||
8f17b5c5 MM |
25 | #include "splay-tree.h" |
26 | ||
f2c5f623 BC |
27 | /* Usage of TREE_LANG_FLAG_?: |
28 | 0: COMPOUND_STMT_NO_SCOPE (in COMPOUND_STMT). | |
29 | TREE_NEGATED_INT (in INTEGER_CST). | |
30 | IDENTIFIER_MARKED (used by search routines). | |
31 | SCOPE_BEGIN_P (in SCOPE_STMT) | |
32 | DECL_PRETTY_FUNCTION_P (in VAR_DECL) | |
33 | NEW_FOR_SCOPE_P (in FOR_STMT) | |
34 | 1: C_DECLARED_LABEL_FLAG (in LABEL_DECL) | |
35 | STMT_IS_FULL_EXPR_P (in _STMT) | |
36 | 2: STMT_LINENO_FOR_FN_P (in _STMT) | |
37 | 3: SCOPE_NO_CLEANUPS_P (in SCOPE_STMT) | |
38 | 4: SCOPE_PARTIAL_P (in SCOPE_STMT) | |
39 | */ | |
40 | ||
0e5921e8 ZW |
41 | /* Reserved identifiers. This is the union of all the keywords for C, |
42 | C++, and Objective C. All the type modifiers have to be in one | |
43 | block at the beginning, because they are used as mask bits. There | |
44 | are 27 type modifiers; if we add many more we will have to redesign | |
45 | the mask mechanism. */ | |
f09f1de5 MM |
46 | |
47 | enum rid | |
48 | { | |
0e5921e8 ZW |
49 | /* Modifiers: */ |
50 | /* C, in empirical order of frequency. */ | |
51 | RID_STATIC = 0, | |
52 | RID_UNSIGNED, RID_LONG, RID_CONST, RID_EXTERN, | |
53 | RID_REGISTER, RID_TYPEDEF, RID_SHORT, RID_INLINE, | |
54 | RID_VOLATILE, RID_SIGNED, RID_AUTO, RID_RESTRICT, | |
55 | ||
56 | /* C extensions */ | |
57 | RID_BOUNDED, RID_UNBOUNDED, RID_COMPLEX, | |
58 | ||
59 | /* C++ */ | |
60 | RID_FRIEND, RID_VIRTUAL, RID_EXPLICIT, RID_EXPORT, RID_MUTABLE, | |
61 | ||
62 | /* ObjC */ | |
63 | RID_IN, RID_OUT, RID_INOUT, RID_BYCOPY, RID_BYREF, RID_ONEWAY, | |
64 | ||
65 | /* C */ | |
66 | RID_INT, RID_CHAR, RID_FLOAT, RID_DOUBLE, RID_VOID, | |
67 | RID_ENUM, RID_STRUCT, RID_UNION, RID_IF, RID_ELSE, | |
68 | RID_WHILE, RID_DO, RID_FOR, RID_SWITCH, RID_CASE, | |
69 | RID_DEFAULT, RID_BREAK, RID_CONTINUE, RID_RETURN, RID_GOTO, | |
70 | RID_SIZEOF, | |
71 | ||
72 | /* C extensions */ | |
73 | RID_ASM, RID_TYPEOF, RID_ALIGNOF, RID_ATTRIBUTE, RID_VA_ARG, | |
74 | RID_EXTENSION, RID_IMAGPART, RID_REALPART, RID_LABEL, RID_PTRBASE, | |
75 | RID_PTREXTENT, RID_PTRVALUE, | |
76 | ||
77 | /* C++ */ | |
78 | RID_BOOL, RID_WCHAR, RID_CLASS, | |
79 | RID_PUBLIC, RID_PRIVATE, RID_PROTECTED, | |
80 | RID_TEMPLATE, RID_NULL, RID_CATCH, | |
81 | RID_DELETE, RID_FALSE, RID_NAMESPACE, | |
82 | RID_NEW, RID_OPERATOR, RID_THIS, | |
83 | RID_THROW, RID_TRUE, RID_TRY, | |
84 | RID_TYPENAME, RID_TYPEID, RID_USING, | |
85 | ||
86 | /* casts */ | |
87 | RID_CONSTCAST, RID_DYNCAST, RID_REINTCAST, RID_STATCAST, | |
88 | ||
89 | /* alternate spellings */ | |
90 | RID_AND, RID_AND_EQ, RID_NOT, RID_NOT_EQ, | |
91 | RID_OR, RID_OR_EQ, RID_XOR, RID_XOR_EQ, | |
92 | RID_BITAND, RID_BITOR, RID_COMPL, | |
93 | ||
94 | /* Objective C */ | |
95 | RID_ID, RID_AT_ENCODE, RID_AT_END, | |
96 | RID_AT_CLASS, RID_AT_ALIAS, RID_AT_DEFS, | |
97 | RID_AT_PRIVATE, RID_AT_PROTECTED, RID_AT_PUBLIC, | |
98 | RID_AT_PROTOCOL, RID_AT_SELECTOR, RID_AT_INTERFACE, | |
99 | RID_AT_IMPLEMENTATION, | |
100 | ||
101 | RID_MAX, | |
102 | ||
103 | RID_FIRST_MODIFIER = RID_STATIC, | |
104 | RID_LAST_MODIFIER = RID_ONEWAY | |
f09f1de5 MM |
105 | }; |
106 | ||
f09f1de5 MM |
107 | /* The elements of `ridpointers' are identifier nodes for the reserved |
108 | type names and storage classes. It is indexed by a RID_... value. */ | |
109 | extern tree *ridpointers; | |
110 | ||
7f4edbcb BS |
111 | /* Standard named or nameless data types of the C compiler. */ |
112 | ||
113 | enum c_tree_index | |
114 | { | |
7f4edbcb BS |
115 | CTI_WCHAR_TYPE, |
116 | CTI_SIGNED_WCHAR_TYPE, | |
117 | CTI_UNSIGNED_WCHAR_TYPE, | |
c5ab7f91 | 118 | CTI_WINT_TYPE, |
3c786c69 | 119 | CTI_C_SIZE_TYPE, /* For format checking only. */ |
cd732418 JM |
120 | CTI_SIGNED_SIZE_TYPE, /* For format checking only. */ |
121 | CTI_UNSIGNED_PTRDIFF_TYPE, /* For format checking only. */ | |
b15ad712 JM |
122 | CTI_INTMAX_TYPE, |
123 | CTI_UINTMAX_TYPE, | |
7f4edbcb BS |
124 | CTI_WIDEST_INT_LIT_TYPE, |
125 | CTI_WIDEST_UINT_LIT_TYPE, | |
126 | ||
7f4edbcb BS |
127 | CTI_CHAR_ARRAY_TYPE, |
128 | CTI_WCHAR_ARRAY_TYPE, | |
129 | CTI_INT_ARRAY_TYPE, | |
130 | CTI_STRING_TYPE, | |
131 | CTI_CONST_STRING_TYPE, | |
132 | ||
7f4edbcb BS |
133 | CTI_BOOLEAN_TYPE, |
134 | CTI_BOOLEAN_TRUE, | |
135 | CTI_BOOLEAN_FALSE, | |
136 | CTI_DEFAULT_FUNCTION_TYPE, | |
137 | CTI_VOID_LIST, | |
138 | ||
139 | CTI_VOID_FTYPE, | |
140 | CTI_VOID_FTYPE_PTR, | |
141 | CTI_INT_FTYPE_INT, | |
142 | CTI_PTR_FTYPE_SIZETYPE, | |
7aba5a5f CD |
143 | |
144 | CTI_G77_INTEGER_TYPE, | |
145 | CTI_G77_UINTEGER_TYPE, | |
146 | CTI_G77_LONGINT_TYPE, | |
147 | CTI_G77_ULONGINT_TYPE, | |
148 | ||
63ad61ed ZW |
149 | /* These are not types, but we have to look them up all the time. */ |
150 | CTI_FUNCTION_ID, | |
151 | CTI_PRETTY_FUNCTION_ID, | |
152 | CTI_FUNC_ID, | |
153 | ||
ae499cce MM |
154 | CTI_VOID_ZERO, |
155 | ||
7f4edbcb BS |
156 | CTI_MAX |
157 | }; | |
158 | ||
7f4edbcb BS |
159 | #define wchar_type_node c_global_trees[CTI_WCHAR_TYPE] |
160 | #define signed_wchar_type_node c_global_trees[CTI_SIGNED_WCHAR_TYPE] | |
161 | #define unsigned_wchar_type_node c_global_trees[CTI_UNSIGNED_WCHAR_TYPE] | |
c5ab7f91 | 162 | #define wint_type_node c_global_trees[CTI_WINT_TYPE] |
3c786c69 | 163 | #define c_size_type_node c_global_trees[CTI_C_SIZE_TYPE] |
cd732418 JM |
164 | #define signed_size_type_node c_global_trees[CTI_SIGNED_SIZE_TYPE] |
165 | #define unsigned_ptrdiff_type_node c_global_trees[CTI_UNSIGNED_PTRDIFF_TYPE] | |
b15ad712 JM |
166 | #define intmax_type_node c_global_trees[CTI_INTMAX_TYPE] |
167 | #define uintmax_type_node c_global_trees[CTI_UINTMAX_TYPE] | |
7f4edbcb BS |
168 | #define widest_integer_literal_type_node c_global_trees[CTI_WIDEST_INT_LIT_TYPE] |
169 | #define widest_unsigned_literal_type_node c_global_trees[CTI_WIDEST_UINT_LIT_TYPE] | |
170 | ||
7f4edbcb BS |
171 | #define boolean_type_node c_global_trees[CTI_BOOLEAN_TYPE] |
172 | #define boolean_true_node c_global_trees[CTI_BOOLEAN_TRUE] | |
173 | #define boolean_false_node c_global_trees[CTI_BOOLEAN_FALSE] | |
174 | ||
7f4edbcb BS |
175 | #define char_array_type_node c_global_trees[CTI_CHAR_ARRAY_TYPE] |
176 | #define wchar_array_type_node c_global_trees[CTI_WCHAR_ARRAY_TYPE] | |
177 | #define int_array_type_node c_global_trees[CTI_INT_ARRAY_TYPE] | |
178 | #define string_type_node c_global_trees[CTI_STRING_TYPE] | |
179 | #define const_string_type_node c_global_trees[CTI_CONST_STRING_TYPE] | |
180 | ||
181 | #define default_function_type c_global_trees[CTI_DEFAULT_FUNCTION_TYPE] | |
182 | #define void_list_node c_global_trees[CTI_VOID_LIST] | |
183 | #define void_ftype c_global_trees[CTI_VOID_FTYPE] | |
184 | #define void_ftype_ptr c_global_trees[CTI_VOID_FTYPE_PTR] | |
185 | #define int_ftype_int c_global_trees[CTI_INT_FTYPE_INT] | |
186 | #define ptr_ftype_sizetype c_global_trees[CTI_PTR_FTYPE_SIZETYPE] | |
187 | ||
7aba5a5f CD |
188 | /* g77 integer types, which which must be kept in sync with f/com.h */ |
189 | #define g77_integer_type_node c_global_trees[CTI_G77_INTEGER_TYPE] | |
190 | #define g77_uinteger_type_node c_global_trees[CTI_G77_UINTEGER_TYPE] | |
191 | #define g77_longint_type_node c_global_trees[CTI_G77_LONGINT_TYPE] | |
192 | #define g77_ulongint_type_node c_global_trees[CTI_G77_ULONGINT_TYPE] | |
193 | ||
63ad61ed ZW |
194 | #define function_id_node c_global_trees[CTI_FUNCTION_ID] |
195 | #define pretty_function_id_node c_global_trees[CTI_PRETTY_FUNCTION_ID] | |
196 | #define func_id_node c_global_trees[CTI_FUNC_ID] | |
197 | ||
ae499cce MM |
198 | /* A node for `((void) 0)'. */ |
199 | #define void_zero_node c_global_trees[CTI_VOID_ZERO] | |
200 | ||
ab76ca54 MM |
201 | extern tree c_global_trees[CTI_MAX]; |
202 | ||
8f17b5c5 MM |
203 | /* Mark which labels are explicitly declared. |
204 | These may be shadowed, and may be referenced from nested functions. */ | |
205 | #define C_DECLARED_LABEL_FLAG(label) TREE_LANG_FLAG_1 (label) | |
206 | ||
ab76ca54 MM |
207 | typedef enum c_language_kind |
208 | { | |
209 | clk_c, /* A dialect of C: K&R C, ANSI/ISO C89, C2000, | |
210 | etc. */ | |
211 | clk_cplusplus, /* ANSI/ISO C++ */ | |
212 | clk_objective_c /* Objective C */ | |
213 | } | |
214 | c_language_kind; | |
215 | ||
ae499cce MM |
216 | /* Information about a statement tree. */ |
217 | ||
218 | struct stmt_tree_s { | |
219 | /* The last statement added to the tree. */ | |
220 | tree x_last_stmt; | |
221 | /* The type of the last expression statement. (This information is | |
222 | needed to implement the statement-expression extension.) */ | |
223 | tree x_last_expr_type; | |
224 | /* In C++, Non-zero if we should treat statements as full | |
225 | expressions. In particular, this variable is no-zero if at the | |
226 | end of a statement we should destroy any temporaries created | |
227 | during that statement. Similarly, if, at the end of a block, we | |
228 | should destroy any local variables in this block. Normally, this | |
229 | variable is non-zero, since those are the normal semantics of | |
230 | C++. | |
231 | ||
232 | However, in order to represent aggregate initialization code as | |
233 | tree structure, we use statement-expressions. The statements | |
234 | within the statement expression should not result in cleanups | |
235 | being run until the entire enclosing statement is complete. | |
236 | ||
237 | This flag has no effect in C. */ | |
238 | int stmts_are_full_exprs_p; | |
239 | }; | |
240 | ||
241 | typedef struct stmt_tree_s *stmt_tree; | |
242 | ||
243 | /* Global state pertinent to the current function. Some C dialects | |
244 | extend this structure with additional fields. */ | |
245 | ||
246 | struct language_function { | |
247 | /* While we are parsing the function, this contains information | |
248 | about the statement-tree that we are building. */ | |
249 | struct stmt_tree_s x_stmt_tree; | |
8f17b5c5 MM |
250 | /* The stack of SCOPE_STMTs for the current function. */ |
251 | tree x_scope_stmt_stack; | |
252 | /* Nonzero if __FUNCTION__ and its ilk have been declared in this | |
253 | function. */ | |
254 | int x_function_name_declared_p; | |
ae499cce MM |
255 | }; |
256 | ||
257 | /* When building a statement-tree, this is the last statement added to | |
258 | the tree. */ | |
259 | ||
260 | #define last_tree (current_stmt_tree ()->x_last_stmt) | |
261 | ||
262 | /* The type of the last expression-statement we have seen. */ | |
263 | ||
264 | #define last_expr_type (current_stmt_tree ()->x_last_expr_type) | |
265 | ||
8f17b5c5 MM |
266 | /* LAST_TREE contains the last statement parsed. These are chained |
267 | together through the TREE_CHAIN field, but often need to be | |
268 | re-organized since the parse is performed bottom-up. This macro | |
269 | makes LAST_TREE the indicated SUBSTMT of STMT. */ | |
270 | ||
271 | #define RECHAIN_STMTS(stmt, substmt) \ | |
272 | do { \ | |
273 | substmt = TREE_CHAIN (stmt); \ | |
274 | TREE_CHAIN (stmt) = NULL_TREE; \ | |
275 | last_tree = stmt; \ | |
276 | } while (0) | |
277 | ||
278 | /* Language-specific hooks. */ | |
279 | ||
280 | extern int (*lang_statement_code_p) PARAMS ((enum tree_code)); | |
281 | extern void (*lang_expand_stmt) PARAMS ((tree)); | |
282 | extern void (*lang_expand_decl_stmt) PARAMS ((tree)); | |
283 | extern void (*lang_expand_function_end) PARAMS ((void)); | |
284 | ||
ae499cce MM |
285 | /* The type of a function that walks over tree structure. */ |
286 | ||
287 | typedef tree (*walk_tree_fn) PARAMS ((tree *, | |
288 | int *, | |
289 | void *)); | |
290 | ||
291 | extern stmt_tree current_stmt_tree PARAMS ((void)); | |
8f17b5c5 | 292 | extern tree *current_scope_stmt_stack PARAMS ((void)); |
ae499cce | 293 | extern void begin_stmt_tree PARAMS ((tree *)); |
56cb9733 | 294 | extern tree add_stmt PARAMS ((tree)); |
8f17b5c5 MM |
295 | extern void add_decl_stmt PARAMS ((tree)); |
296 | extern tree add_scope_stmt PARAMS ((int, int)); | |
ae499cce MM |
297 | extern void finish_stmt_tree PARAMS ((tree *)); |
298 | ||
299 | extern int statement_code_p PARAMS ((enum tree_code)); | |
ae499cce MM |
300 | extern tree walk_stmt_tree PARAMS ((tree *, |
301 | walk_tree_fn, | |
302 | void *)); | |
54f7877c | 303 | extern void prep_stmt PARAMS ((tree)); |
54f7877c | 304 | extern void expand_stmt PARAMS ((tree)); |
8f17b5c5 | 305 | extern void mark_stmt_tree PARAMS ((void *)); |
ae499cce | 306 | |
8f17b5c5 MM |
307 | /* Extra information associated with a DECL. Other C dialects extend |
308 | this structure in various ways. The C front-end only uses this | |
309 | structure for FUNCTION_DECLs; all other DECLs have a NULL | |
310 | DECL_LANG_SPECIFIC field. */ | |
56cb9733 | 311 | |
8f17b5c5 MM |
312 | struct c_lang_decl { |
313 | /* In a FUNCTION_DECL, this is DECL_SAVED_TREE. */ | |
314 | tree saved_tree; | |
315 | }; | |
316 | ||
317 | /* In a FUNCTION_DECL, the saved representation of the body of the | |
318 | entire function. Usually a COMPOUND_STMT, but in C++ this may also | |
319 | be a RETURN_INIT, CTOR_INITIALIZER, or TRY_BLOCK. */ | |
320 | #define DECL_SAVED_TREE(NODE) \ | |
321 | (((struct c_lang_decl *) DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))) \ | |
322 | ->saved_tree) | |
323 | ||
324 | extern void c_mark_lang_decl PARAMS ((struct c_lang_decl *)); | |
56cb9733 | 325 | |
ab76ca54 MM |
326 | /* The variant of the C language being processed. Each C language |
327 | front-end defines this variable. */ | |
328 | ||
329 | extern c_language_kind c_language; | |
330 | ||
331 | /* Nonzero means give string constants the type `const char *', rather | |
332 | than `char *'. */ | |
333 | ||
334 | extern int flag_const_strings; | |
335 | ||
336 | /* Warn about *printf or *scanf format/argument anomalies. */ | |
337 | ||
338 | extern int warn_format; | |
339 | ||
2683ed8d BS |
340 | /* Warn about possible violations of sequence point rules. */ |
341 | ||
342 | extern int warn_sequence_point; | |
343 | ||
74ff4629 JM |
344 | /* Warn about functions which might be candidates for format attributes. */ |
345 | ||
346 | extern int warn_missing_format_attribute; | |
347 | ||
ab76ca54 MM |
348 | /* Nonzero means do some things the same way PCC does. */ |
349 | ||
350 | extern int flag_traditional; | |
351 | ||
b8458e3e JM |
352 | /* Nonzero means enable C89 Amendment 1 features, other than digraphs. */ |
353 | ||
354 | extern int flag_isoc94; | |
355 | ||
ab76ca54 MM |
356 | /* Nonzero means use the ISO C99 dialect of C. */ |
357 | ||
358 | extern int flag_isoc99; | |
359 | ||
530d0ba5 NB |
360 | /* Nonzero means accept digraphs. */ |
361 | ||
362 | extern int flag_digraphs; | |
363 | ||
93e2382f JM |
364 | /* Nonzero means environment is hosted (i.e., not freestanding) */ |
365 | ||
366 | extern int flag_hosted; | |
367 | ||
368 | /* Nonzero means add default format_arg attributes for functions not | |
369 | in ISO C. */ | |
370 | ||
371 | extern int flag_noniso_default_format_attributes; | |
372 | ||
6bcedb4e MM |
373 | /* Nonzero means don't recognize any builtin functions. */ |
374 | ||
375 | extern int flag_no_builtin; | |
376 | ||
377 | /* Nonzero means don't recognize the non-ANSI builtin functions. | |
378 | -ansi sets this. */ | |
379 | ||
380 | extern int flag_no_nonansi_builtin; | |
381 | ||
0a7394bc MM |
382 | /* If non-NULL, dump the tree structure for the entire translation |
383 | unit to this file. */ | |
384 | ||
385 | extern const char *flag_dump_translation_unit; | |
386 | ||
ab76ca54 MM |
387 | /* Nonzero means warn about suggesting putting in ()'s. */ |
388 | ||
389 | extern int warn_parentheses; | |
390 | ||
391 | /* Warn if a type conversion is done that might have confusing results. */ | |
392 | ||
393 | extern int warn_conversion; | |
394 | ||
395 | /* C types are partitioned into three subsets: object, function, and | |
396 | incomplete types. */ | |
397 | #define C_TYPE_OBJECT_P(type) \ | |
398 | (TREE_CODE (type) != FUNCTION_TYPE && TYPE_SIZE (type)) | |
399 | ||
400 | #define C_TYPE_INCOMPLETE_P(type) \ | |
401 | (TREE_CODE (type) != FUNCTION_TYPE && TYPE_SIZE (type) == 0) | |
402 | ||
403 | #define C_TYPE_FUNCTION_P(type) \ | |
404 | (TREE_CODE (type) == FUNCTION_TYPE) | |
405 | ||
0a7394bc MM |
406 | /* Return the qualifiers that apply to this type. In C++, that means |
407 | descending through array types. Note that this macro evaluates its | |
408 | arguments mor than once. */ | |
409 | #define C_TYPE_QUALS(TYPE) \ | |
410 | (TYPE_QUALS ((TREE_CODE (TYPE) == ARRAY_TYPE \ | |
411 | && c_language == clk_cplusplus) \ | |
412 | ? strip_array_types (TYPE) : TYPE)) | |
413 | ||
ab76ca54 MM |
414 | /* For convenience we define a single macro to identify the class of |
415 | object or incomplete types. */ | |
416 | #define C_TYPE_OBJECT_OR_INCOMPLETE_P(type) \ | |
417 | (!C_TYPE_FUNCTION_P (type)) | |
418 | ||
419 | /* Record in each node resulting from a binary operator | |
420 | what operator was specified for it. */ | |
421 | #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp)) | |
422 | ||
2ce07e2d NS |
423 | /* Pointer to function to generate the VAR_DECL for __FUNCTION__ etc. |
424 | ID is the identifier to use, NAME is the string. | |
425 | TYPE_DEP indicates whether it depends on type of the function or not | |
426 | (i.e. __PRETTY_FUNCTION__). */ | |
427 | ||
428 | extern tree (*make_fname_decl) PARAMS ((tree, const char *, int)); | |
429 | ||
6e090c76 KG |
430 | extern void declare_function_name PARAMS ((void)); |
431 | extern void decl_attributes PARAMS ((tree, tree, tree)); | |
432 | extern void init_function_format_info PARAMS ((void)); | |
3f80e6ac | 433 | extern void check_function_format PARAMS ((int *, tree, tree, tree)); |
6e090c76 | 434 | extern void c_apply_type_quals_to_decl PARAMS ((int, tree)); |
7f4edbcb BS |
435 | /* Print an error message for invalid operands to arith operation CODE. |
436 | NOP_EXPR is used as a special case (see truthvalue_conversion). */ | |
6e090c76 KG |
437 | extern void binary_op_error PARAMS ((enum tree_code)); |
438 | extern void c_expand_expr_stmt PARAMS ((tree)); | |
8f17b5c5 MM |
439 | extern void c_expand_start_cond PARAMS ((tree, int)); |
440 | extern void c_finish_then PARAMS ((void)); | |
6e090c76 | 441 | extern void c_expand_start_else PARAMS ((void)); |
8f17b5c5 | 442 | extern void c_finish_else PARAMS ((void)); |
6e090c76 | 443 | extern void c_expand_end_cond PARAMS ((void)); |
7f4edbcb | 444 | /* Validate the expression after `case' and apply default promotions. */ |
6e090c76 | 445 | extern tree check_case_value PARAMS ((tree)); |
7f4edbcb | 446 | /* Concatenate a list of STRING_CST nodes into one STRING_CST. */ |
6e090c76 KG |
447 | extern tree combine_strings PARAMS ((tree)); |
448 | extern void constant_expression_warning PARAMS ((tree)); | |
449 | extern tree convert_and_check PARAMS ((tree, tree)); | |
450 | extern void overflow_warning PARAMS ((tree)); | |
451 | extern void unsigned_conversion_warning PARAMS ((tree, tree)); | |
ab76ca54 | 452 | |
7f4edbcb BS |
453 | /* Read the rest of the current #-directive line. */ |
454 | #if USE_CPPLIB | |
6e090c76 | 455 | extern char *get_directive_line PARAMS ((void)); |
7f4edbcb BS |
456 | #define GET_DIRECTIVE_LINE() get_directive_line () |
457 | #else | |
6e090c76 | 458 | extern char *get_directive_line PARAMS ((FILE *)); |
7f4edbcb BS |
459 | #define GET_DIRECTIVE_LINE() get_directive_line (finput) |
460 | #endif | |
461 | ||
462 | /* Subroutine of build_binary_op, used for comparison operations. | |
463 | See if the operands have both been converted from subword integer types | |
464 | and, if so, perhaps change them both back to their original type. */ | |
6e090c76 | 465 | extern tree shorten_compare PARAMS ((tree *, tree *, tree *, enum tree_code *)); |
7f4edbcb BS |
466 | /* Prepare expr to be an argument of a TRUTH_NOT_EXPR, |
467 | or validate its data type for an `if' or `while' statement or ?..: exp. */ | |
6e090c76 KG |
468 | extern tree truthvalue_conversion PARAMS ((tree)); |
469 | extern tree type_for_mode PARAMS ((enum machine_mode, int)); | |
470 | extern tree type_for_size PARAMS ((unsigned, int)); | |
7f4edbcb | 471 | |
50e60bc3 ZW |
472 | extern unsigned int min_precision PARAMS ((tree, int)); |
473 | ||
474 | /* Add qualifiers to a type, in the fashion for C. */ | |
475 | extern tree c_build_qualified_type PARAMS ((tree, int)); | |
476 | ||
7f4edbcb BS |
477 | /* Build tree nodes and builtin functions common to both C and C++ language |
478 | frontends. */ | |
6bcedb4e | 479 | extern void c_common_nodes_and_builtins PARAMS ((void)); |
d3707adb | 480 | |
6e090c76 | 481 | extern tree build_va_arg PARAMS ((tree, tree)); |
7e8176d7 | 482 | |
c530479e RH |
483 | /* Nonzero if the type T promotes to itself. |
484 | ANSI C states explicitly the list of types that promote; | |
485 | in particular, short promotes to int even if they have the same width. */ | |
486 | #define C_PROMOTING_INTEGER_TYPE_P(t) \ | |
487 | (TREE_CODE ((t)) == INTEGER_TYPE \ | |
488 | && (TYPE_MAIN_VARIANT (t) == char_type_node \ | |
489 | || TYPE_MAIN_VARIANT (t) == signed_char_type_node \ | |
490 | || TYPE_MAIN_VARIANT (t) == unsigned_char_type_node \ | |
491 | || TYPE_MAIN_VARIANT (t) == short_integer_type_node \ | |
492 | || TYPE_MAIN_VARIANT (t) == short_unsigned_type_node)) | |
493 | ||
6e090c76 KG |
494 | extern int self_promoting_args_p PARAMS ((tree)); |
495 | extern tree simple_type_promotes_to PARAMS ((tree)); | |
0a7394bc | 496 | extern tree strip_array_types PARAMS ((tree)); |
d7e7759d | 497 | |
ae499cce MM |
498 | /* These macros provide convenient access to the various _STMT nodes. */ |
499 | ||
500 | /* Nonzero if this statement should be considered a full-expression, | |
501 | i.e., if temporaries created during this statement should have | |
502 | their destructors run at the end of this statement. (In C, this | |
503 | will always be false, since there are no destructors.) */ | |
504 | #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE)) | |
35b1567d BC |
505 | |
506 | /* IF_STMT accessors. These give access to the condtion of the if | |
507 | statement, the then block of the if statement, and the else block | |
508 | of the if stsatement if it exists. */ | |
d7e7759d BC |
509 | #define IF_COND(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 0) |
510 | #define THEN_CLAUSE(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 1) | |
511 | #define ELSE_CLAUSE(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 2) | |
35b1567d BC |
512 | |
513 | /* WHILE_STMT accessors. These give access to the condtion of the | |
514 | while statement and the body of the while statement, respectively. */ | |
d7e7759d BC |
515 | #define WHILE_COND(NODE) TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0) |
516 | #define WHILE_BODY(NODE) TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1) | |
35b1567d BC |
517 | |
518 | /* DO_STMT accessors. These give access to the condition of the do | |
519 | statement and the body of the do statement, respectively. */ | |
d7e7759d BC |
520 | #define DO_COND(NODE) TREE_OPERAND (DO_STMT_CHECK (NODE), 0) |
521 | #define DO_BODY(NODE) TREE_OPERAND (DO_STMT_CHECK (NODE), 1) | |
35b1567d BC |
522 | |
523 | /* RETURN_STMT accessor. This gives the expression associated with a | |
524 | return statement. */ | |
d7e7759d | 525 | #define RETURN_EXPR(NODE) TREE_OPERAND (RETURN_STMT_CHECK (NODE), 0) |
35b1567d BC |
526 | |
527 | /* EXPR_STMT accessor. This gives the expression associated with an | |
528 | expression statement. */ | |
d7e7759d | 529 | #define EXPR_STMT_EXPR(NODE) TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0) |
35b1567d BC |
530 | |
531 | /* FOR_STMT accessors. These give access to the init statement, | |
532 | condition, update expression, and body of the for statement, | |
533 | respectively. */ | |
d7e7759d BC |
534 | #define FOR_INIT_STMT(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 0) |
535 | #define FOR_COND(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 1) | |
536 | #define FOR_EXPR(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 2) | |
537 | #define FOR_BODY(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 3) | |
35b1567d BC |
538 | |
539 | /* SWITCH_STMT accessors. These give access to the condition and body | |
540 | of the switch statement, respectively. */ | |
d7e7759d BC |
541 | #define SWITCH_COND(NODE) TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0) |
542 | #define SWITCH_BODY(NODE) TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1) | |
35b1567d BC |
543 | |
544 | /* CASE_LABEL accessors. These give access to the high and low values | |
545 | of a case label, respectively. */ | |
d7e7759d BC |
546 | #define CASE_LOW(NODE) TREE_OPERAND (CASE_LABEL_CHECK (NODE), 0) |
547 | #define CASE_HIGH(NODE) TREE_OPERAND (CASE_LABEL_CHECK (NODE), 1) | |
56cb9733 | 548 | #define CASE_LABEL_DECL(NODE) TREE_OPERAND (CASE_LABEL_CHECK (NODE), 2) |
35b1567d BC |
549 | |
550 | /* GOTO_STMT accessor. This gives access to the label associated with | |
551 | a goto statement. */ | |
d7e7759d | 552 | #define GOTO_DESTINATION(NODE) TREE_OPERAND (GOTO_STMT_CHECK (NODE), 0) |
35b1567d BC |
553 | |
554 | /* COMPOUND_STMT accessor. This gives access to the TREE_LIST of | |
555 | statements assocated with a compound statement. The result is the | |
556 | first statement in the list. Succeeding nodes can be acccessed by | |
557 | calling TREE_CHAIN on a node in the list. */ | |
d7e7759d | 558 | #define COMPOUND_BODY(NODE) TREE_OPERAND (COMPOUND_STMT_CHECK (NODE), 0) |
35b1567d BC |
559 | |
560 | /* ASM_STMT accessors. ASM_STRING returns a STRING_CST for the | |
561 | instruction (e.g., "mov x, y"). ASM_OUTPUTS, ASM_INPUTS, and | |
562 | ASM_CLOBBERS represent the outputs, inputs, and clobbers for the | |
563 | statement. */ | |
d7e7759d BC |
564 | #define ASM_CV_QUAL(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 0) |
565 | #define ASM_STRING(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 1) | |
566 | #define ASM_OUTPUTS(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 2) | |
567 | #define ASM_INPUTS(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 3) | |
568 | #define ASM_CLOBBERS(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 4) | |
35b1567d BC |
569 | |
570 | /* DECL_STMT accessor. This gives access to the DECL associated with | |
571 | the given declaration statement. */ | |
d7e7759d | 572 | #define DECL_STMT_DECL(NODE) TREE_OPERAND (DECL_STMT_CHECK (NODE), 0) |
35b1567d BC |
573 | |
574 | /* STMT_EXPR accessor. */ | |
d7e7759d | 575 | #define STMT_EXPR_STMT(NODE) TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0) |
35b1567d BC |
576 | |
577 | /* LABEL_STMT accessor. This gives access to the label associated with | |
578 | the given label statement. */ | |
d7e7759d BC |
579 | #define LABEL_STMT_LABEL(NODE) TREE_OPERAND (LABEL_STMT_CHECK (NODE), 0) |
580 | ||
581 | /* Nonzero if this SCOPE_STMT is for the beginning of a scope. */ | |
582 | #define SCOPE_BEGIN_P(NODE) \ | |
583 | (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE))) | |
584 | ||
585 | /* Nonzero if this SCOPE_STMT is for the end of a scope. */ | |
586 | #define SCOPE_END_P(NODE) \ | |
587 | (!SCOPE_BEGIN_P (SCOPE_STMT_CHECK (NODE))) | |
588 | ||
589 | /* The BLOCK containing the declarations contained in this scope. */ | |
590 | #define SCOPE_STMT_BLOCK(NODE) \ | |
591 | (TREE_OPERAND (SCOPE_STMT_CHECK (NODE), 0)) | |
592 | ||
593 | /* Nonzero for a SCOPE_STMT if there were no variables in this scope. */ | |
594 | #define SCOPE_NULLIFIED_P(NODE) \ | |
595 | (SCOPE_STMT_BLOCK ((NODE)) == NULL_TREE) | |
596 | ||
597 | /* Nonzero for a SCOPE_STMT which represents a lexical scope, but | |
598 | which should be treated as non-existant from the point of view of | |
599 | running cleanup actions. */ | |
600 | #define SCOPE_NO_CLEANUPS_P(NODE) \ | |
601 | (TREE_LANG_FLAG_3 (SCOPE_STMT_CHECK (NODE))) | |
602 | ||
603 | /* Nonzero for a SCOPE_STMT if this statement is for a partial scope. | |
604 | For example, in: | |
605 | ||
606 | S s; | |
607 | l: | |
608 | S s2; | |
609 | goto l; | |
610 | ||
611 | there is (implicitly) a new scope after `l', even though there are | |
612 | no curly braces. In particular, when we hit the goto, we must | |
613 | destroy s2 and then re-construct it. For the implicit scope, | |
614 | SCOPE_PARTIAL_P will be set. */ | |
615 | #define SCOPE_PARTIAL_P(NODE) \ | |
616 | (TREE_LANG_FLAG_4 (SCOPE_STMT_CHECK (NODE))) | |
617 | ||
618 | /* Nonzero for an ASM_STMT if the assembly statement is volatile. */ | |
619 | #define ASM_VOLATILE_P(NODE) \ | |
620 | (ASM_CV_QUAL (ASM_STMT_CHECK (NODE)) != NULL_TREE) | |
621 | ||
622 | /* The line-number at which a statement began. But if | |
623 | STMT_LINENO_FOR_FN_P does holds, then this macro gives the | |
624 | line number for the end of the current function instead. */ | |
625 | #define STMT_LINENO(NODE) \ | |
626 | (TREE_COMPLEXITY ((NODE))) | |
627 | ||
628 | /* If non-zero, the STMT_LINENO for NODE is the line at which the | |
629 | function ended. */ | |
630 | #define STMT_LINENO_FOR_FN_P(NODE) \ | |
631 | (TREE_LANG_FLAG_2 ((NODE))) | |
c7d87c0a | 632 | |
f2c5f623 BC |
633 | /* Nonzero if we want the new ISO rules for pushing a new scope for `for' |
634 | initialization variables. */ | |
635 | #define NEW_FOR_SCOPE_P(NODE) (TREE_LANG_FLAG_0 (NODE)) | |
c7d87c0a BC |
636 | |
637 | #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM, | |
638 | ||
639 | enum c_tree_code { | |
640 | C_DUMMY_TREE_CODE = LAST_AND_UNUSED_TREE_CODE, | |
641 | #include "c-common.def" | |
642 | LAST_C_TREE_CODE | |
643 | }; | |
644 | ||
645 | #undef DEFTREECODE | |
646 | ||
647 | extern void add_c_tree_codes PARAMS ((void)); | |
f2c5f623 | 648 | extern void genrtl_do_pushlevel PARAMS ((void)); |
f2c5f623 BC |
649 | extern void genrtl_goto_stmt PARAMS ((tree)); |
650 | extern void genrtl_expr_stmt PARAMS ((tree)); | |
651 | extern void genrtl_decl_stmt PARAMS ((tree)); | |
652 | extern void genrtl_if_stmt PARAMS ((tree)); | |
653 | extern void genrtl_while_stmt PARAMS ((tree)); | |
654 | extern void genrtl_do_stmt PARAMS ((tree)); | |
655 | extern void genrtl_return_stmt PARAMS ((tree)); | |
656 | extern void genrtl_for_stmt PARAMS ((tree)); | |
657 | extern void genrtl_break_stmt PARAMS ((void)); | |
658 | extern void genrtl_continue_stmt PARAMS ((void)); | |
659 | extern void genrtl_scope_stmt PARAMS ((tree)); | |
660 | extern void genrtl_switch_stmt PARAMS ((tree)); | |
56cb9733 | 661 | extern void genrtl_case_label PARAMS ((tree)); |
4cf88f57 | 662 | extern void genrtl_compound_stmt PARAMS ((tree)); |
f2c5f623 BC |
663 | extern void genrtl_asm_stmt PARAMS ((tree, tree, |
664 | tree, tree, | |
665 | tree)); | |
666 | extern void genrtl_decl_cleanup PARAMS ((tree, tree)); | |
667 | extern int stmts_are_full_exprs_p PARAMS ((void)); | |
f2c5f623 BC |
668 | extern int anon_aggr_type_p PARAMS ((tree)); |
669 | ||
670 | /* For a VAR_DECL that is an anonymous union, these are the various | |
671 | sub-variables that make up the anonymous union. */ | |
672 | #define DECL_ANON_UNION_ELEMS(NODE) DECL_ARGUMENTS ((NODE)) | |
673 | ||
0a7394bc MM |
674 | /* In a FIELD_DECL, nonzero if the decl was originally a bitfield. */ |
675 | #define DECL_C_BIT_FIELD(NODE) \ | |
676 | (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) == 1) | |
677 | #define SET_DECL_C_BIT_FIELD(NODE) \ | |
678 | (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 1) | |
679 | #define CLEAR_DECL_C_BIT_FIELD(NODE) \ | |
680 | (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 0) | |
681 | ||
f2c5f623 BC |
682 | extern void emit_local_var PARAMS ((tree)); |
683 | extern void make_rtl_for_local_static PARAMS ((tree)); | |
684 | extern tree expand_cond PARAMS ((tree)); | |
f2c5f623 | 685 | extern void c_expand_return PARAMS ((tree)); |
f2c5f623 | 686 | extern void do_case PARAMS ((tree, tree)); |
0dfdeca6 | 687 | extern tree build_stmt PARAMS ((enum tree_code, ...)); |
56cb9733 | 688 | extern tree build_case_label PARAMS ((tree, tree, tree)); |
0dfdeca6 BC |
689 | extern tree build_continue_stmt PARAMS ((void)); |
690 | extern tree build_break_stmt PARAMS ((void)); | |
691 | extern tree build_return_stmt PARAMS ((tree)); | |
f2c5f623 BC |
692 | |
693 | #define COMPOUND_STMT_NO_SCOPE(NODE) TREE_LANG_FLAG_0 (NODE) | |
694 | ||
695 | extern void c_expand_asm_operands PARAMS ((tree, tree, tree, tree, int, const char *, int)); | |
ab76ca54 MM |
696 | |
697 | /* These functions must be defined by each front-end which implements | |
698 | a variant of the C language. They are used in c-common.c. */ | |
699 | ||
700 | extern tree build_unary_op PARAMS ((enum tree_code, | |
701 | tree, int)); | |
702 | extern tree build_binary_op PARAMS ((enum tree_code, | |
703 | tree, tree, int)); | |
704 | extern int lvalue_p PARAMS ((tree)); | |
705 | extern tree default_conversion PARAMS ((tree)); | |
706 | ||
707 | /* Given two integer or real types, return the type for their sum. | |
708 | Given two compatible ANSI C types, returns the merged type. */ | |
709 | ||
710 | extern tree common_type PARAMS ((tree, tree)); | |
44835fdd MM |
711 | |
712 | extern tree expand_tree_builtin PARAMS ((tree, tree, tree)); | |
0e5921e8 | 713 | |
56cb9733 MM |
714 | extern tree decl_constant_value PARAMS ((tree)); |
715 | ||
0e5921e8 ZW |
716 | /* Hook currently used only by the C++ front end to reset internal state |
717 | after entering or leaving a header file. */ | |
718 | extern void extract_interface_info PARAMS ((void)); | |
719 | ||
8f17b5c5 MM |
720 | extern void mark_c_language_function PARAMS ((struct language_function *)); |
721 | ||
722 | extern int case_compare PARAMS ((splay_tree_key, | |
723 | splay_tree_key)); | |
724 | ||
725 | extern tree c_add_case_label PARAMS ((splay_tree, | |
726 | tree, tree, | |
727 | tree)); | |
728 | ||
c70eaeaf KG |
729 | extern tree build_function_call PARAMS ((tree, tree)); |
730 | ||
67673f5c MM |
731 | /* If this variable is defined to a non-NULL value, it will be called |
732 | after the file has been completely parsed. The argument will be | |
733 | the GLOBAL_NAMESPACE in C++, or the list of top-level declarations | |
734 | in C. */ | |
735 | extern void (*back_end_hook) PARAMS ((tree)); | |
736 | ||
8f17b5c5 MM |
737 | #ifdef RTX_CODE |
738 | ||
739 | extern struct rtx_def *c_expand_expr PARAMS ((tree, rtx, | |
740 | enum machine_mode, | |
741 | enum expand_modifier)); | |
742 | ||
743 | extern int c_safe_from_p PARAMS ((rtx, tree)); | |
744 | ||
745 | #endif | |
746 | ||
0a7394bc MM |
747 | /* In dump.c */ |
748 | ||
749 | typedef struct dump_info *dump_info_p; | |
750 | ||
751 | /* A callback function used dump language-specific parts of tree | |
752 | nodes. Returns non-zero if it does not want the usual dumping of | |
753 | the second argument. */ | |
754 | ||
755 | typedef int (*dump_tree_fn) PARAMS ((dump_info_p, tree)); | |
756 | ||
757 | extern dump_tree_fn lang_dump_tree; | |
758 | ||
759 | extern void dump_node_to_file PARAMS ((tree, const char *)); | |
760 | ||
0e5921e8 ZW |
761 | /* Information recorded about each file examined during compilation. */ |
762 | ||
763 | struct c_fileinfo | |
764 | { | |
765 | int time; /* Time spent in the file. */ | |
766 | short interface_only; /* Flags - used only by C++ */ | |
767 | short interface_unknown; | |
768 | }; | |
769 | ||
770 | struct c_fileinfo *get_fileinfo PARAMS ((const char *)); | |
771 | extern void dump_time_statistics PARAMS ((void)); | |
772 | ||
773 | #endif | |
67673f5c MM |
774 | |
775 |