OSDN Git Service

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