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