contrib/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 /* $FreeBSD$ */
  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
  53 enum 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.  */
 131 extern tree *ridpointers;
 132
 133 /* Standard named or nameless data types of the C compiler.  */
 134
 135 enum 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.  */
 188 struct 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
 236 extern 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
 246 typedef 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 }
 253 c_language_kind;
 254
 255 /* Information about a statement tree.  */
 256
 257 struct 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
 282 typedef 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
 287 struct 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
 322 extern int (*lang_statement_code_p)             PARAMS ((enum tree_code));
 323 extern void (*lang_expand_stmt)                 PARAMS ((tree));
 324 extern void (*lang_expand_decl_stmt)            PARAMS ((tree));
 325 extern 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.  */
 329 extern int (*lang_missing_noreturn_ok_p)        PARAMS ((tree));
 330
 331
 332 extern stmt_tree current_stmt_tree              PARAMS ((void));
 333 extern tree *current_scope_stmt_stack           PARAMS ((void));
 334 extern void begin_stmt_tree                     PARAMS ((tree *));
 335 extern tree add_stmt                            PARAMS ((tree));
 336 extern void add_decl_stmt                       PARAMS ((tree));
 337 extern tree add_scope_stmt                      PARAMS ((int, int));
 338 extern void finish_stmt_tree                    PARAMS ((tree *));
 339
 340 extern int statement_code_p                     PARAMS ((enum tree_code));
 341 extern tree walk_stmt_tree                      PARAMS ((tree *,
 342                                                          walk_tree_fn,
 343                                                          void *));
 344 extern void prep_stmt                           PARAMS ((tree));
 345 extern void expand_stmt                         PARAMS ((tree));
 346 extern void mark_stmt_tree                      PARAMS ((void *));
 347 extern void shadow_warning                      PARAMS ((const char *,
 348                                                          tree, tree));
 349 extern tree c_begin_if_stmt                     PARAMS ((void));
 350 extern tree c_begin_while_stmt                  PARAMS ((void));
 351 extern 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
 359 struct 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
 370 extern 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
 375 extern c_language_kind c_language;
 376
 377 /* Nonzero means give string constants the type `const char *', rather
 378    than `char *'.  */
 379
 380 extern int flag_const_strings;
 381
 382 /* Nonzero means give `double' the same size as `float'.  */
 383
 384 extern int flag_short_double;
 385
 386 /* Nonzero means give `wchar_t' the same size as `short'.  */
 387
 388 extern int flag_short_wchar;
 389
 390 /* Warn about *printf or *scanf format/argument anomalies.  */
 391
 392 extern int warn_format;
 393
 394 /* Warn about Y2K problems with strftime formats.  */
 395
 396 extern int warn_format_y2k;
 397
 398 /* Warn about excess arguments to formats.  */
 399
 400 extern int warn_format_extra_args;
 401
 402 /* Warn about non-literal format arguments.  */
 403
 404 extern int warn_format_nonliteral;
 405
 406 /* Warn about possible security problems with calls to format functions.  */
 407
 408 extern int warn_format_security;
 409
 410 /* Warn about possible violations of sequence point rules.  */
 411
 412 extern int warn_sequence_point;
 413
 414 /* Warn about functions which might be candidates for format attributes.  */
 415
 416 extern int warn_missing_format_attribute;
 417
 418 /* Nonzero means do not warn that K&R style main() is not a function prototype.  */
 419
 420 extern int flag_bsd_no_warn_kr_main;
 421
 422 /* Nonzero means warn about sizeof (function) or addition/subtraction
 423    of function pointers.  */
 424
 425 extern int warn_pointer_arith;
 426
 427 /* Nonzero means to warn about compile-time division by zero.  */
 428 extern int warn_div_by_zero;
 429
 430 /* Nonzero means do some things the same way PCC does.  */
 431
 432 extern int flag_traditional;
 433
 434 /* Nonzero means enable C89 Amendment 1 features.  */
 435
 436 extern int flag_isoc94;
 437
 438 /* Nonzero means use the ISO C99 dialect of C.  */
 439
 440 extern int flag_isoc99;
 441
 442 /* Nonzero means allow the BSD kernel printf enhancments.  */
 443
 444 extern int flag_bsd_format;
 445
 446 /* Nonzero means environment is hosted (i.e., not freestanding) */
 447
 448 extern int flag_hosted;
 449
 450 /* Nonzero means add default format_arg attributes for functions not
 451    in ISO C.  */
 452
 453 extern int flag_noniso_default_format_attributes;
 454
 455 /* Nonzero means don't recognize any builtin functions.  */
 456
 457 extern int flag_no_builtin;
 458
 459 /* Nonzero means don't recognize the non-ANSI builtin functions.
 460    -ansi sets this.  */
 461
 462 extern int flag_no_nonansi_builtin;
 463
 464 /* Nonzero means warn about suggesting putting in ()'s.  */
 465
 466 extern int warn_parentheses;
 467
 468 /* Warn if a type conversion is done that might have confusing results.  */
 469
 470 extern int warn_conversion;
 471
 472 /* Nonzero means warn about usage of long long,
 473    when `-pedantic' and not C99.  */
 474
 475 extern int warn_long_long;
 476
 477 /* Nonzero means the expression being parsed will never be evaluated.
 478    This is a count, since unevaluated expressions can nest.  */
 479
 480 extern int skip_evaluation;
 481
 482 /* C types are partitioned into three subsets: object, function, and
 483    incomplete types.  */
 484 #define C_TYPE_OBJECT_P(type) \
 485   (TREE_CODE (type) != FUNCTION_TYPE && TYPE_SIZE (type))
 486
 487 #define C_TYPE_INCOMPLETE_P(type) \
 488   (TREE_CODE (type) != FUNCTION_TYPE && TYPE_SIZE (type) == 0)
 489
 490 #define C_TYPE_FUNCTION_P(type) \
 491   (TREE_CODE (type) == FUNCTION_TYPE)
 492
 493 /* For convenience we define a single macro to identify the class of
 494    object or incomplete types.  */
 495 #define C_TYPE_OBJECT_OR_INCOMPLETE_P(type) \
 496   (!C_TYPE_FUNCTION_P (type))
 497
 498 /* Record in each node resulting from a binary operator
 499    what operator was specified for it.  */
 500 #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
 501
 502 /* Pointer to function to lazily generate the VAR_DECL for __FUNCTION__ etc.
 503    ID is the identifier to use, NAME is the string.
 504    TYPE_DEP indicates whether it depends on type of the function or not
 505    (i.e. __PRETTY_FUNCTION__).  */
 506
 507 extern tree (*make_fname_decl)                  PARAMS ((tree, int));
 508
 509 extern tree identifier_global_value             PARAMS ((tree));
 510 extern void record_builtin_type                 PARAMS ((enum rid,
 511                                                          const char *, tree));
 512 extern tree build_void_list_node                PARAMS ((void));
 513 extern void start_fname_decls                   PARAMS ((void));
 514 extern void finish_fname_decls                  PARAMS ((void));
 515 extern const char *fname_as_string              PARAMS ((int));
 516 extern tree fname_decl                          PARAMS ((unsigned, tree));
 517 extern const char *fname_string                 PARAMS ((unsigned));
 518
 519 extern void check_function_format               PARAMS ((int *, tree, tree));
 520 extern void set_Wformat                         PARAMS ((int));
 521 extern tree handle_format_attribute             PARAMS ((tree *, tree, tree,
 522                                                          int, bool *));
 523 extern tree handle_format_arg_attribute         PARAMS ((tree *, tree, tree,
 524                                                          int, bool *));
 525 extern void c_common_insert_default_attributes  PARAMS ((tree));
 526 extern void c_apply_type_quals_to_decl          PARAMS ((int, tree));
 527 extern tree c_sizeof                            PARAMS ((tree));
 528 extern tree c_alignof                           PARAMS ((tree));
 529 extern tree c_alignof_expr                      PARAMS ((tree));
 530 /* Print an error message for invalid operands to arith operation CODE.
 531    NOP_EXPR is used as a special case (see truthvalue_conversion).  */
 532 extern void binary_op_error                     PARAMS ((enum tree_code));
 533 extern tree c_expand_expr_stmt                  PARAMS ((tree));
 534 extern void c_expand_start_cond                 PARAMS ((tree, int, tree));
 535 extern void c_finish_then                       PARAMS ((void));
 536 extern void c_expand_start_else                 PARAMS ((void));
 537 extern void c_finish_else                   PARAMS ((void));
 538 extern void c_expand_end_cond                   PARAMS ((void));
 539 /* Validate the expression after `case' and apply default promotions.  */
 540 extern tree check_case_value                    PARAMS ((tree));
 541 /* Concatenate a list of STRING_CST nodes into one STRING_CST.  */
 542 extern tree combine_strings                     PARAMS ((tree));
 543 extern void constant_expression_warning         PARAMS ((tree));
 544 extern tree convert_and_check                   PARAMS ((tree, tree));
 545 extern void overflow_warning                    PARAMS ((tree));
 546 extern void unsigned_conversion_warning         PARAMS ((tree, tree));
 547
 548 /* Read the rest of the current #-directive line.  */
 549 extern char *get_directive_line                 PARAMS ((void));
 550 #define GET_DIRECTIVE_LINE() get_directive_line ()
 551
 552 /* Subroutine of build_binary_op, used for comparison operations.
 553    See if the operands have both been converted from subword integer types
 554    and, if so, perhaps change them both back to their original type.  */
 555 extern tree shorten_compare                     PARAMS ((tree *, tree *, tree *, enum tree_code *));
 556
 557 extern tree pointer_int_sum                     PARAMS ((enum tree_code, tree, tree));
 558 extern unsigned int min_precision               PARAMS ((tree, int));
 559
 560 /* Add qualifiers to a type, in the fashion for C.  */
 561 extern tree c_build_qualified_type              PARAMS ((tree, int));
 562
 563 /* Build tree nodes and builtin functions common to both C and C++ language
 564    frontends.  */
 565 extern void c_common_nodes_and_builtins         PARAMS ((void));
 566
 567 extern void disable_builtin_function            PARAMS ((const char *));
 568
 569 extern tree build_va_arg                        PARAMS ((tree, tree));
 570
 571 extern void c_common_init_options               PARAMS ((enum c_language_kind));
 572 extern void c_common_post_options               PARAMS ((void));
 573 extern const char *c_common_init                PARAMS ((const char *));
 574 extern void c_common_finish                     PARAMS ((void));
 575 extern HOST_WIDE_INT c_common_get_alias_set     PARAMS ((tree));
 576 extern bool c_promoting_integer_type_p          PARAMS ((tree));
 577 extern int self_promoting_args_p                PARAMS ((tree));
 578 extern tree simple_type_promotes_to             PARAMS ((tree));
 579 extern tree strip_array_types                   PARAMS ((tree));
 580
 581 /* These macros provide convenient access to the various _STMT nodes.  */
 582
 583 /* Nonzero if this statement should be considered a full-expression,
 584    i.e., if temporaries created during this statement should have
 585    their destructors run at the end of this statement.  (In C, this
 586    will always be false, since there are no destructors.)  */
 587 #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
 588
 589 /* IF_STMT accessors. These give access to the condition of the if
 590    statement, the then block of the if statement, and the else block
 591    of the if statement if it exists.  */
 592 #define IF_COND(NODE)           TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
 593 #define THEN_CLAUSE(NODE)       TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
 594 #define ELSE_CLAUSE(NODE)       TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
 595
 596 /* WHILE_STMT accessors. These give access to the condition of the
 597    while statement and the body of the while statement, respectively.  */
 598 #define WHILE_COND(NODE)        TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0)
 599 #define WHILE_BODY(NODE)        TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1)
 600
 601 /* DO_STMT accessors. These give access to the condition of the do
 602    statement and the body of the do statement, respectively.  */
 603 #define DO_COND(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
 604 #define DO_BODY(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
 605
 606 /* RETURN_STMT accessors. These give the expression associated with a
 607    return statement, and whether it should be ignored when expanding
 608    (as opposed to inlining).  */
 609 #define RETURN_EXPR(NODE)       TREE_OPERAND (RETURN_STMT_CHECK (NODE), 0)
 610
 611 /* EXPR_STMT accessor. This gives the expression associated with an
 612    expression statement.  */
 613 #define EXPR_STMT_EXPR(NODE)    TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
 614
 615 /* FOR_STMT accessors. These give access to the init statement,
 616    condition, update expression, and body of the for statement,
 617    respectively.  */
 618 #define FOR_INIT_STMT(NODE)     TREE_OPERAND (FOR_STMT_CHECK (NODE), 0)
 619 #define FOR_COND(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 1)
 620 #define FOR_EXPR(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 2)
 621 #define FOR_BODY(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 3)
 622
 623 /* SWITCH_STMT accessors. These give access to the condition, body and
 624    original condition type (before any compiler conversions)
 625    of the switch statement, respectively.  */
 626 #define SWITCH_COND(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0)
 627 #define SWITCH_BODY(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1)
 628 #define SWITCH_TYPE(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 2)
 629
 630 /* CASE_LABEL accessors. These give access to the high and low values
 631    of a case label, respectively.  */
 632 #define CASE_LOW(NODE)          TREE_OPERAND (CASE_LABEL_CHECK (NODE), 0)
 633 #define CASE_HIGH(NODE)         TREE_OPERAND (CASE_LABEL_CHECK (NODE), 1)
 634 #define CASE_LABEL_DECL(NODE)   TREE_OPERAND (CASE_LABEL_CHECK (NODE), 2)
 635
 636 /* GOTO_STMT accessor. This gives access to the label associated with
 637    a goto statement.  */
 638 #define GOTO_DESTINATION(NODE)  TREE_OPERAND (GOTO_STMT_CHECK (NODE), 0)
 639 /* True for goto created artifically by the compiler.  */
 640 #define GOTO_FAKE_P(NODE)       (TREE_LANG_FLAG_0 (GOTO_STMT_CHECK (NODE)))
 641
 642 /* COMPOUND_STMT accessor. This gives access to the TREE_LIST of
 643    statements associated with a compound statement. The result is the
 644    first statement in the list. Succeeding nodes can be accessed by
 645    calling TREE_CHAIN on a node in the list.  */
 646 #define COMPOUND_BODY(NODE)     TREE_OPERAND (COMPOUND_STMT_CHECK (NODE), 0)
 647
 648 /* ASM_STMT accessors. ASM_STRING returns a STRING_CST for the
 649    instruction (e.g., "mov x, y"). ASM_OUTPUTS, ASM_INPUTS, and
 650    ASM_CLOBBERS represent the outputs, inputs, and clobbers for the
 651    statement.  */
 652 #define ASM_CV_QUAL(NODE)       TREE_OPERAND (ASM_STMT_CHECK (NODE), 0)
 653 #define ASM_STRING(NODE)        TREE_OPERAND (ASM_STMT_CHECK (NODE), 1)
 654 #define ASM_OUTPUTS(NODE)       TREE_OPERAND (ASM_STMT_CHECK (NODE), 2)
 655 #define ASM_INPUTS(NODE)        TREE_OPERAND (ASM_STMT_CHECK (NODE), 3)
 656 #define ASM_CLOBBERS(NODE)      TREE_OPERAND (ASM_STMT_CHECK (NODE), 4)
 657
 658 /* DECL_STMT accessor. This gives access to the DECL associated with
 659    the given declaration statement.  */
 660 #define DECL_STMT_DECL(NODE)    TREE_OPERAND (DECL_STMT_CHECK (NODE), 0)
 661
 662 /* STMT_EXPR accessor.  */
 663 #define STMT_EXPR_STMT(NODE)    TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
 664
 665 /* Nonzero if this statement-expression does not have an associated scope.  */
 666 #define STMT_EXPR_NO_SCOPE(NODE) \
 667    TREE_LANG_FLAG_0 (STMT_EXPR_CHECK (NODE))
 668
 669 /* LABEL_STMT accessor. This gives access to the label associated with
 670    the given label statement.  */
 671 #define LABEL_STMT_LABEL(NODE)  TREE_OPERAND (LABEL_STMT_CHECK (NODE), 0)
 672
 673 /* COMPOUND_LITERAL_EXPR accessors.  */
 674 #define COMPOUND_LITERAL_EXPR_DECL_STMT(NODE)           \
 675   TREE_OPERAND (COMPOUND_LITERAL_EXPR_CHECK (NODE), 0)
 676 #define COMPOUND_LITERAL_EXPR_DECL(NODE)                        \
 677   DECL_STMT_DECL (COMPOUND_LITERAL_EXPR_DECL_STMT (NODE))
 678
 679 /* Nonzero if this SCOPE_STMT is for the beginning of a scope.  */
 680 #define SCOPE_BEGIN_P(NODE) \
 681   (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE)))
 682
 683 /* Nonzero if this SCOPE_STMT is for the end of a scope.  */
 684 #define SCOPE_END_P(NODE) \
 685   (!SCOPE_BEGIN_P (SCOPE_STMT_CHECK (NODE)))
 686
 687 /* The BLOCK containing the declarations contained in this scope.  */
 688 #define SCOPE_STMT_BLOCK(NODE) \
 689   (TREE_OPERAND (SCOPE_STMT_CHECK (NODE), 0))
 690
 691 /* Nonzero for a SCOPE_STMT if there were no variables in this scope.  */
 692 #define SCOPE_NULLIFIED_P(NODE) \
 693   (SCOPE_STMT_BLOCK ((NODE)) == NULL_TREE)
 694
 695 /* Nonzero for a SCOPE_STMT which represents a lexical scope, but
 696    which should be treated as non-existent from the point of view of
 697    running cleanup actions.  */
 698 #define SCOPE_NO_CLEANUPS_P(NODE) \
 699   (TREE_LANG_FLAG_3 (SCOPE_STMT_CHECK (NODE)))
 700
 701 /* Nonzero for a SCOPE_STMT if this statement is for a partial scope.
 702    For example, in:
 703
 704      S s;
 705      l:
 706      S s2;
 707      goto l;
 708
 709    there is (implicitly) a new scope after `l', even though there are
 710    no curly braces.  In particular, when we hit the goto, we must
 711    destroy s2 and then re-construct it.  For the implicit scope,
 712    SCOPE_PARTIAL_P will be set.  */
 713 #define SCOPE_PARTIAL_P(NODE) \
 714   (TREE_LANG_FLAG_4 (SCOPE_STMT_CHECK (NODE)))
 715
 716 /* Nonzero for an ASM_STMT if the assembly statement is volatile.  */
 717 #define ASM_VOLATILE_P(NODE)                    \
 718   (ASM_CV_QUAL (ASM_STMT_CHECK (NODE)) != NULL_TREE)
 719
 720 /* The VAR_DECL to clean up in a CLEANUP_STMT.  */
 721 #define CLEANUP_DECL(NODE) \
 722   TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0)
 723 /* The cleanup to run in a CLEANUP_STMT.  */
 724 #define CLEANUP_EXPR(NODE) \
 725   TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1)
 726
 727 /* The filename we are changing to as of this FILE_STMT.  */
 728 #define FILE_STMT_FILENAME_NODE(NODE) \
 729   (TREE_OPERAND (FILE_STMT_CHECK (NODE), 0))
 730 #define FILE_STMT_FILENAME(NODE) \
 731   (IDENTIFIER_POINTER (FILE_STMT_FILENAME_NODE (NODE)))
 732
 733 /* The line-number at which a statement began.  But if
 734    STMT_LINENO_FOR_FN_P does holds, then this macro gives the
 735    line number for the end of the current function instead.  */
 736 #define STMT_LINENO(NODE)                       \
 737   (TREE_COMPLEXITY ((NODE)))
 738
 739 /* If non-zero, the STMT_LINENO for NODE is the line at which the
 740    function ended.  */
 741 #define STMT_LINENO_FOR_FN_P(NODE)              \
 742   (TREE_LANG_FLAG_2 ((NODE)))
 743
 744 /* Nonzero if we want the new ISO rules for pushing a new scope for `for'
 745    initialization variables.  */
 746 #define NEW_FOR_SCOPE_P(NODE) (TREE_LANG_FLAG_0 (NODE))
 747
 748 /* Nonzero if we want to create an ASM_INPUT instead of an
 749    ASM_OPERAND with no operands.  */
 750 #define ASM_INPUT_P(NODE) (TREE_LANG_FLAG_0 (NODE))
 751
 752 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
 753
 754 enum c_tree_code {
 755   C_DUMMY_TREE_CODE = LAST_AND_UNUSED_TREE_CODE,
 756 #include "c-common.def"
 757   LAST_C_TREE_CODE
 758 };
 759
 760 #undef DEFTREECODE
 761
 762 extern void add_c_tree_codes                    PARAMS ((void));
 763 extern void genrtl_do_pushlevel                 PARAMS ((void));
 764 extern void genrtl_goto_stmt                    PARAMS ((tree));
 765 extern void genrtl_expr_stmt                    PARAMS ((tree));
 766 extern void genrtl_expr_stmt_value              PARAMS ((tree, int, int));
 767 extern void genrtl_decl_stmt                    PARAMS ((tree));
 768 extern void genrtl_if_stmt                      PARAMS ((tree));
 769 extern void genrtl_while_stmt                   PARAMS ((tree));
 770 extern void genrtl_do_stmt                      PARAMS ((tree));
 771 extern void genrtl_return_stmt                  PARAMS ((tree));
 772 extern void genrtl_for_stmt                     PARAMS ((tree));
 773 extern void genrtl_break_stmt                   PARAMS ((void));
 774 extern void genrtl_continue_stmt                PARAMS ((void));
 775 extern void genrtl_scope_stmt                   PARAMS ((tree));
 776 extern void genrtl_switch_stmt                  PARAMS ((tree));
 777 extern void genrtl_case_label                   PARAMS ((tree));
 778 extern void genrtl_compound_stmt                PARAMS ((tree));
 779 extern void genrtl_asm_stmt                     PARAMS ((tree, tree,
 780                                                          tree, tree,
 781                                                          tree, int));
 782 extern void genrtl_decl_cleanup                 PARAMS ((tree));
 783 extern int stmts_are_full_exprs_p               PARAMS ((void));
 784 extern int anon_aggr_type_p                     PARAMS ((tree));
 785
 786 /* For a VAR_DECL that is an anonymous union, these are the various
 787    sub-variables that make up the anonymous union.  */
 788 #define DECL_ANON_UNION_ELEMS(NODE) DECL_ARGUMENTS ((NODE))
 789
 790 /* In a FIELD_DECL, nonzero if the decl was originally a bitfield.  */
 791 #define DECL_C_BIT_FIELD(NODE) \
 792   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) == 1)
 793 #define SET_DECL_C_BIT_FIELD(NODE) \
 794   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 1)
 795 #define CLEAR_DECL_C_BIT_FIELD(NODE) \
 796   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 0)
 797
 798 /* In a VAR_DECL, nonzero if the decl is a register variable with
 799    an explicit asm specification.  */
 800 #define DECL_C_HARD_REGISTER(DECL)  DECL_LANG_FLAG_4 (VAR_DECL_CHECK (DECL))
 801
 802 extern void emit_local_var                      PARAMS ((tree));
 803 extern void make_rtl_for_local_static           PARAMS ((tree));
 804 extern tree expand_cond                         PARAMS ((tree));
 805 extern tree c_expand_return                     PARAMS ((tree));
 806 extern tree do_case                             PARAMS ((tree, tree));
 807 extern tree build_stmt                          PARAMS ((enum tree_code, ...));
 808 extern tree build_case_label                    PARAMS ((tree, tree, tree));
 809 extern tree build_continue_stmt                 PARAMS ((void));
 810 extern tree build_break_stmt                    PARAMS ((void));
 811 extern tree build_return_stmt                   PARAMS ((tree));
 812
 813 #define COMPOUND_STMT_NO_SCOPE(NODE)    TREE_LANG_FLAG_0 (NODE)
 814
 815 /* Used by the C++ frontend to mark the block around the member
 816    initializers and cleanups.  */
 817 #define COMPOUND_STMT_BODY_BLOCK(NODE)  TREE_LANG_FLAG_3 (NODE)
 818
 819 extern void c_expand_asm_operands               PARAMS ((tree, tree, tree, tree, int, const char *, int));
 820
 821 /* These functions must be defined by each front-end which implements
 822    a variant of the C language.  They are used in c-common.c.  */
 823
 824 extern tree build_unary_op                      PARAMS ((enum tree_code,
 825                                                          tree, int));
 826 extern tree build_binary_op                     PARAMS ((enum tree_code,
 827                                                          tree, tree, int));
 828 extern int lvalue_p                             PARAMS ((tree));
 829 extern tree default_conversion                  PARAMS ((tree));
 830
 831 /* Given two integer or real types, return the type for their sum.
 832    Given two compatible ANSI C types, returns the merged type.  */
 833
 834 extern tree common_type                         PARAMS ((tree, tree));
 835
 836 extern tree expand_tree_builtin                 PARAMS ((tree, tree, tree));
 837
 838 extern tree decl_constant_value         PARAMS ((tree));
 839
 840 /* Handle increment and decrement of boolean types.  */
 841 extern tree boolean_increment                   PARAMS ((enum tree_code,
 842                                                          tree));
 843
 844 /* Hook currently used only by the C++ front end to reset internal state
 845    after entering or leaving a header file.  */
 846 extern void extract_interface_info              PARAMS ((void));
 847
 848 extern void mark_c_language_function            PARAMS ((struct language_function *));
 849
 850 extern int case_compare                         PARAMS ((splay_tree_key,
 851                                                          splay_tree_key));
 852
 853 extern tree c_add_case_label                    PARAMS ((splay_tree,
 854                                                          tree, tree,
 855                                                          tree));
 856
 857 extern tree build_function_call                 PARAMS ((tree, tree));
 858
 859 extern tree finish_label_address_expr           PARAMS ((tree));
 860
 861 /* Same function prototype, but the C and C++ front ends have
 862    different implementations.  Used in c-common.c.  */
 863 extern tree lookup_label                        PARAMS ((tree));
 864
 865 /* enum expand_modified is in expr.h, as is the macro below.  */
 866
 867 #ifdef QUEUED_VAR
 868 extern rtx c_expand_expr            PARAMS ((tree, rtx, enum machine_mode,
 869                                              enum expand_modifier));
 870 #endif
 871
 872 extern int c_safe_from_p                        PARAMS ((rtx, tree));
 873
 874 extern int c_staticp                            PARAMS ((tree));
 875
 876 extern int c_unsafe_for_reeval                  PARAMS ((tree));
 877
 878 /* Information recorded about each file examined during compilation.  */
 879
 880 struct c_fileinfo
 881 {
 882   int time;     /* Time spent in the file.  */
 883   short interface_only;         /* Flags - used only by C++ */
 884   short interface_unknown;
 885 };
 886
 887 struct c_fileinfo *get_fileinfo                 PARAMS ((const char *));
 888 extern void dump_time_statistics                PARAMS ((void));
 889
 890 #endif /* ! GCC_C_COMMON_H */