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