gcc/c-common.h

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