gcc/c-common.h

   1 /* Definitions for c-common.c.
   2    Copyright (C) 1987, 1993, 1994, 1995, 1997, 1998,
   3    1999, 2000 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
  27 /* Usage of TREE_LANG_FLAG_?:
  28    0: COMPOUND_STMT_NO_SCOPE (in COMPOUND_STMT).
  29       TREE_NEGATED_INT (in INTEGER_CST).
  30       IDENTIFIER_MARKED (used by search routines).
  31       SCOPE_BEGIN_P (in SCOPE_STMT)
  32       DECL_PRETTY_FUNCTION_P (in VAR_DECL)
  33       NEW_FOR_SCOPE_P (in FOR_STMT)
  34    1: C_DECLARED_LABEL_FLAG (in LABEL_DECL)
  35       STMT_IS_FULL_EXPR_P (in _STMT)
  36    2: STMT_LINENO_FOR_FN_P (in _STMT)
  37    3: SCOPE_NO_CLEANUPS_P (in SCOPE_STMT)
  38    4: SCOPE_PARTIAL_P (in SCOPE_STMT)
  39 */
  40
  41 /* Reserved identifiers.  This is the union of all the keywords for C,
  42    C++, and Objective C.  All the type modifiers have to be in one
  43    block at the beginning, because they are used as mask bits.  There
  44    are 27 type modifiers; if we add many more we will have to redesign
  45    the mask mechanism.  */
  46
  47 enum rid
  48 {
  49   /* Modifiers: */
  50   /* C, in empirical order of frequency. */
  51   RID_STATIC = 0,
  52   RID_UNSIGNED, RID_LONG,    RID_CONST, RID_EXTERN,
  53   RID_REGISTER, RID_TYPEDEF, RID_SHORT, RID_INLINE,
  54   RID_VOLATILE, RID_SIGNED,  RID_AUTO,  RID_RESTRICT,
  55
  56   /* C extensions */
  57   RID_BOUNDED, RID_UNBOUNDED, RID_COMPLEX,
  58
  59   /* C++ */
  60   RID_FRIEND, RID_VIRTUAL, RID_EXPLICIT, RID_EXPORT, RID_MUTABLE,
  61
  62   /* ObjC */
  63   RID_IN, RID_OUT, RID_INOUT, RID_BYCOPY, RID_BYREF, RID_ONEWAY,
  64
  65   /* C */
  66   RID_INT,     RID_CHAR,   RID_FLOAT,    RID_DOUBLE, RID_VOID,
  67   RID_ENUM,    RID_STRUCT, RID_UNION,    RID_IF,     RID_ELSE,
  68   RID_WHILE,   RID_DO,     RID_FOR,      RID_SWITCH, RID_CASE,
  69   RID_DEFAULT, RID_BREAK,  RID_CONTINUE, RID_RETURN, RID_GOTO,
  70   RID_SIZEOF,
  71
  72   /* C extensions */
  73   RID_ASM,       RID_TYPEOF,   RID_ALIGNOF,  RID_ATTRIBUTE,  RID_VA_ARG,
  74   RID_EXTENSION, RID_IMAGPART, RID_REALPART, RID_LABEL,      RID_PTRBASE,
  75   RID_PTREXTENT, RID_PTRVALUE,
  76
  77   /* C++ */
  78   RID_BOOL,     RID_WCHAR,    RID_CLASS,
  79   RID_PUBLIC,   RID_PRIVATE,  RID_PROTECTED,
  80   RID_TEMPLATE, RID_NULL,     RID_CATCH,
  81   RID_DELETE,   RID_FALSE,    RID_NAMESPACE,
  82   RID_NEW,      RID_OPERATOR, RID_THIS,
  83   RID_THROW,    RID_TRUE,     RID_TRY,
  84   RID_TYPENAME, RID_TYPEID,   RID_USING,
  85
  86   /* casts */
  87   RID_CONSTCAST, RID_DYNCAST, RID_REINTCAST, RID_STATCAST,
  88
  89   /* alternate spellings */
  90   RID_AND, RID_AND_EQ, RID_NOT, RID_NOT_EQ,
  91   RID_OR,  RID_OR_EQ,  RID_XOR, RID_XOR_EQ,
  92   RID_BITAND, RID_BITOR, RID_COMPL,
  93
  94   /* Objective C */
  95   RID_ID,          RID_AT_ENCODE,    RID_AT_END,
  96   RID_AT_CLASS,    RID_AT_ALIAS,     RID_AT_DEFS,
  97   RID_AT_PRIVATE,  RID_AT_PROTECTED, RID_AT_PUBLIC,
  98   RID_AT_PROTOCOL, RID_AT_SELECTOR,  RID_AT_INTERFACE,
  99   RID_AT_IMPLEMENTATION,
 100
 101   RID_MAX,
 102
 103   RID_FIRST_MODIFIER = RID_STATIC,
 104   RID_LAST_MODIFIER = RID_ONEWAY
 105 };
 106
 107 /* The elements of `ridpointers' are identifier nodes for the reserved
 108    type names and storage classes.  It is indexed by a RID_... value.  */
 109 extern tree *ridpointers;
 110
 111 /* Standard named or nameless data types of the C compiler.  */
 112
 113 enum c_tree_index
 114 {
 115     CTI_WCHAR_TYPE,
 116     CTI_SIGNED_WCHAR_TYPE,
 117     CTI_UNSIGNED_WCHAR_TYPE,
 118     CTI_WINT_TYPE,
 119     CTI_C_SIZE_TYPE, /* For format checking only.  */
 120     CTI_SIGNED_SIZE_TYPE, /* For format checking only.  */
 121     CTI_UNSIGNED_PTRDIFF_TYPE, /* For format checking only.  */
 122     CTI_INTMAX_TYPE,
 123     CTI_UINTMAX_TYPE,
 124     CTI_WIDEST_INT_LIT_TYPE,
 125     CTI_WIDEST_UINT_LIT_TYPE,
 126
 127     CTI_CHAR_ARRAY_TYPE,
 128     CTI_WCHAR_ARRAY_TYPE,
 129     CTI_INT_ARRAY_TYPE,
 130     CTI_STRING_TYPE,
 131     CTI_CONST_STRING_TYPE,
 132
 133     CTI_BOOLEAN_TYPE,
 134     CTI_BOOLEAN_TRUE,
 135     CTI_BOOLEAN_FALSE,
 136     CTI_DEFAULT_FUNCTION_TYPE,
 137     CTI_VOID_LIST,
 138
 139     CTI_VOID_FTYPE,
 140     CTI_VOID_FTYPE_PTR,
 141     CTI_INT_FTYPE_INT,
 142     CTI_PTR_FTYPE_SIZETYPE,
 143
 144     CTI_G77_INTEGER_TYPE,
 145     CTI_G77_UINTEGER_TYPE,
 146     CTI_G77_LONGINT_TYPE,
 147     CTI_G77_ULONGINT_TYPE,
 148
 149     /* These are not types, but we have to look them up all the time.  */
 150     CTI_FUNCTION_ID,
 151     CTI_PRETTY_FUNCTION_ID,
 152     CTI_FUNC_ID,
 153
 154     CTI_VOID_ZERO,
 155
 156     CTI_MAX
 157 };
 158
 159 #define wchar_type_node                 c_global_trees[CTI_WCHAR_TYPE]
 160 #define signed_wchar_type_node          c_global_trees[CTI_SIGNED_WCHAR_TYPE]
 161 #define unsigned_wchar_type_node        c_global_trees[CTI_UNSIGNED_WCHAR_TYPE]
 162 #define wint_type_node                  c_global_trees[CTI_WINT_TYPE]
 163 #define c_size_type_node                c_global_trees[CTI_C_SIZE_TYPE]
 164 #define signed_size_type_node           c_global_trees[CTI_SIGNED_SIZE_TYPE]
 165 #define unsigned_ptrdiff_type_node      c_global_trees[CTI_UNSIGNED_PTRDIFF_TYPE]
 166 #define intmax_type_node                c_global_trees[CTI_INTMAX_TYPE]
 167 #define uintmax_type_node               c_global_trees[CTI_UINTMAX_TYPE]
 168 #define widest_integer_literal_type_node c_global_trees[CTI_WIDEST_INT_LIT_TYPE]
 169 #define widest_unsigned_literal_type_node c_global_trees[CTI_WIDEST_UINT_LIT_TYPE]
 170
 171 #define boolean_type_node               c_global_trees[CTI_BOOLEAN_TYPE]
 172 #define boolean_true_node               c_global_trees[CTI_BOOLEAN_TRUE]
 173 #define boolean_false_node              c_global_trees[CTI_BOOLEAN_FALSE]
 174
 175 #define char_array_type_node            c_global_trees[CTI_CHAR_ARRAY_TYPE]
 176 #define wchar_array_type_node           c_global_trees[CTI_WCHAR_ARRAY_TYPE]
 177 #define int_array_type_node             c_global_trees[CTI_INT_ARRAY_TYPE]
 178 #define string_type_node                c_global_trees[CTI_STRING_TYPE]
 179 #define const_string_type_node          c_global_trees[CTI_CONST_STRING_TYPE]
 180
 181 #define default_function_type           c_global_trees[CTI_DEFAULT_FUNCTION_TYPE]
 182 #define void_list_node                  c_global_trees[CTI_VOID_LIST]
 183 #define void_ftype                      c_global_trees[CTI_VOID_FTYPE]
 184 #define void_ftype_ptr                  c_global_trees[CTI_VOID_FTYPE_PTR]
 185 #define int_ftype_int                   c_global_trees[CTI_INT_FTYPE_INT]
 186 #define ptr_ftype_sizetype              c_global_trees[CTI_PTR_FTYPE_SIZETYPE]
 187
 188 /* g77 integer types, which which must be kept in sync with f/com.h */
 189 #define g77_integer_type_node           c_global_trees[CTI_G77_INTEGER_TYPE]
 190 #define g77_uinteger_type_node          c_global_trees[CTI_G77_UINTEGER_TYPE]
 191 #define g77_longint_type_node           c_global_trees[CTI_G77_LONGINT_TYPE]
 192 #define g77_ulongint_type_node          c_global_trees[CTI_G77_ULONGINT_TYPE]
 193
 194 #define function_id_node                c_global_trees[CTI_FUNCTION_ID]
 195 #define pretty_function_id_node         c_global_trees[CTI_PRETTY_FUNCTION_ID]
 196 #define func_id_node                    c_global_trees[CTI_FUNC_ID]
 197
 198 /* A node for `((void) 0)'.  */
 199 #define void_zero_node                  c_global_trees[CTI_VOID_ZERO]
 200
 201 extern tree c_global_trees[CTI_MAX];
 202
 203 /* Mark which labels are explicitly declared.
 204    These may be shadowed, and may be referenced from nested functions.  */
 205 #define C_DECLARED_LABEL_FLAG(label) TREE_LANG_FLAG_1 (label)
 206
 207 typedef enum c_language_kind
 208 {
 209   clk_c,           /* A dialect of C: K&R C, ANSI/ISO C89, C2000,
 210                        etc. */
 211   clk_cplusplus,   /* ANSI/ISO C++ */
 212   clk_objective_c  /* Objective C */
 213 }
 214 c_language_kind;
 215
 216 /* Information about a statement tree.  */
 217
 218 struct stmt_tree_s {
 219   /* The last statement added to the tree.  */
 220   tree x_last_stmt;
 221   /* The type of the last expression statement.  (This information is
 222      needed to implement the statement-expression extension.)  */
 223   tree x_last_expr_type;
 224   /* In C++, Non-zero if we should treat statements as full
 225      expressions.  In particular, this variable is no-zero if at the
 226      end of a statement we should destroy any temporaries created
 227      during that statement.  Similarly, if, at the end of a block, we
 228      should destroy any local variables in this block.  Normally, this
 229      variable is non-zero, since those are the normal semantics of
 230      C++.
 231
 232      However, in order to represent aggregate initialization code as
 233      tree structure, we use statement-expressions.  The statements
 234      within the statement expression should not result in cleanups
 235      being run until the entire enclosing statement is complete.
 236
 237      This flag has no effect in C.  */
 238   int stmts_are_full_exprs_p;
 239 };
 240
 241 typedef struct stmt_tree_s *stmt_tree;
 242
 243 /* Global state pertinent to the current function.  Some C dialects
 244    extend this structure with additional fields.  */
 245
 246 struct language_function {
 247   /* While we are parsing the function, this contains information
 248      about the statement-tree that we are building.  */
 249   struct stmt_tree_s x_stmt_tree;
 250   /* The stack of SCOPE_STMTs for the current function.  */
 251   tree x_scope_stmt_stack;
 252   /* Nonzero if __FUNCTION__ and its ilk have been declared in this
 253      function.  */
 254   int x_function_name_declared_p;
 255 };
 256
 257 /* When building a statement-tree, this is the last statement added to
 258    the tree.  */
 259
 260 #define last_tree (current_stmt_tree ()->x_last_stmt)
 261
 262 /* The type of the last expression-statement we have seen.  */
 263
 264 #define last_expr_type (current_stmt_tree ()->x_last_expr_type)
 265
 266 /* LAST_TREE contains the last statement parsed.  These are chained
 267    together through the TREE_CHAIN field, but often need to be
 268    re-organized since the parse is performed bottom-up.  This macro
 269    makes LAST_TREE the indicated SUBSTMT of STMT.  */
 270
 271 #define RECHAIN_STMTS(stmt, substmt)            \
 272   do {                                          \
 273     substmt = TREE_CHAIN (stmt);                \
 274     TREE_CHAIN (stmt) = NULL_TREE;              \
 275     last_tree = stmt;                           \
 276   } while (0)
 277
 278 /* Language-specific hooks.  */
 279
 280 extern int (*lang_statement_code_p)             PARAMS ((enum tree_code));
 281 extern void (*lang_expand_stmt)                 PARAMS ((tree));
 282 extern void (*lang_expand_decl_stmt)            PARAMS ((tree));
 283 extern void (*lang_expand_function_end)         PARAMS ((void));
 284
 285 /* The type of a function that walks over tree structure.  */
 286
 287 typedef tree (*walk_tree_fn)                    PARAMS ((tree *,
 288                                                          int *,
 289                                                          void *));
 290
 291 extern stmt_tree current_stmt_tree              PARAMS ((void));
 292 extern tree *current_scope_stmt_stack           PARAMS ((void));
 293 extern void begin_stmt_tree                     PARAMS ((tree *));
 294 extern tree add_stmt                            PARAMS ((tree));
 295 extern void add_decl_stmt                       PARAMS ((tree));
 296 extern tree add_scope_stmt                      PARAMS ((int, int));
 297 extern void finish_stmt_tree                    PARAMS ((tree *));
 298
 299 extern int statement_code_p                     PARAMS ((enum tree_code));
 300 extern tree walk_stmt_tree                      PARAMS ((tree *,
 301                                                          walk_tree_fn,
 302                                                          void *));
 303 extern void prep_stmt                           PARAMS ((tree));
 304 extern void expand_stmt                         PARAMS ((tree));
 305 extern void mark_stmt_tree                      PARAMS ((void *));
 306
 307 /* Extra information associated with a DECL.  Other C dialects extend
 308    this structure in various ways.  The C front-end only uses this
 309    structure for FUNCTION_DECLs; all other DECLs have a NULL
 310    DECL_LANG_SPECIFIC field.  */
 311
 312 struct c_lang_decl {
 313   /* In a FUNCTION_DECL, this is DECL_SAVED_TREE.  */
 314   tree saved_tree;
 315 };
 316
 317 /* In a FUNCTION_DECL, the saved representation of the body of the
 318    entire function.  Usually a COMPOUND_STMT, but in C++ this may also
 319    be a RETURN_INIT, CTOR_INITIALIZER, or TRY_BLOCK.  */
 320 #define DECL_SAVED_TREE(NODE)                                               \
 321   (((struct c_lang_decl *) DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))) \
 322    ->saved_tree)
 323
 324 extern void c_mark_lang_decl                    PARAMS ((struct c_lang_decl *));
 325
 326 /* The variant of the C language being processed.  Each C language
 327    front-end defines this variable.  */
 328
 329 extern c_language_kind c_language;
 330
 331 /* Nonzero means give string constants the type `const char *', rather
 332    than `char *'.  */
 333
 334 extern int flag_const_strings;
 335
 336 /* Warn about *printf or *scanf format/argument anomalies. */
 337
 338 extern int warn_format;
 339
 340 /* Nonzero means do some things the same way PCC does.  */
 341
 342 extern int flag_traditional;
 343
 344 /* Nonzero means enable C89 Amendment 1 features, other than digraphs.  */
 345
 346 extern int flag_isoc94;
 347
 348 /* Nonzero means use the ISO C99 dialect of C.  */
 349
 350 extern int flag_isoc99;
 351
 352 /* Nonzero means accept digraphs.  */
 353
 354 extern int flag_digraphs;
 355
 356 /* Nonzero means environment is hosted (i.e., not freestanding) */
 357
 358 extern int flag_hosted;
 359
 360 /* Nonzero means add default format_arg attributes for functions not
 361    in ISO C.  */
 362
 363 extern int flag_noniso_default_format_attributes;
 364
 365 /* Nonzero means warn about suggesting putting in ()'s.  */
 366
 367 extern int warn_parentheses;
 368
 369 /* Warn if a type conversion is done that might have confusing results.  */
 370
 371 extern int warn_conversion;
 372
 373 /* C types are partitioned into three subsets: object, function, and
 374    incomplete types.  */
 375 #define C_TYPE_OBJECT_P(type) \
 376   (TREE_CODE (type) != FUNCTION_TYPE && TYPE_SIZE (type))
 377
 378 #define C_TYPE_INCOMPLETE_P(type) \
 379   (TREE_CODE (type) != FUNCTION_TYPE && TYPE_SIZE (type) == 0)
 380
 381 #define C_TYPE_FUNCTION_P(type) \
 382   (TREE_CODE (type) == FUNCTION_TYPE)
 383
 384 /* For convenience we define a single macro to identify the class of
 385    object or incomplete types.  */
 386 #define C_TYPE_OBJECT_OR_INCOMPLETE_P(type) \
 387   (!C_TYPE_FUNCTION_P (type))
 388
 389 /* Record in each node resulting from a binary operator
 390    what operator was specified for it.  */
 391 #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
 392
 393 /* Pointer to function to generate the VAR_DECL for __FUNCTION__ etc.
 394    ID is the identifier to use, NAME is the string.
 395    TYPE_DEP indicates whether it depends on type of the function or not
 396    (i.e. __PRETTY_FUNCTION__).  */
 397
 398 extern tree (*make_fname_decl)                  PARAMS ((tree, const char *, int));
 399
 400 extern void declare_function_name               PARAMS ((void));
 401 extern void decl_attributes                     PARAMS ((tree, tree, tree));
 402 extern void init_function_format_info           PARAMS ((void));
 403 extern void check_function_format               PARAMS ((int *, tree, tree, tree));
 404 extern void c_apply_type_quals_to_decl          PARAMS ((int, tree));
 405 /* Print an error message for invalid operands to arith operation CODE.
 406    NOP_EXPR is used as a special case (see truthvalue_conversion).  */
 407 extern void binary_op_error                     PARAMS ((enum tree_code));
 408 extern void c_expand_expr_stmt                  PARAMS ((tree));
 409 extern void c_expand_start_cond                 PARAMS ((tree, int));
 410 extern void c_finish_then                       PARAMS ((void));
 411 extern void c_expand_start_else                 PARAMS ((void));
 412 extern void c_finish_else                   PARAMS ((void));
 413 extern void c_expand_end_cond                   PARAMS ((void));
 414 /* Validate the expression after `case' and apply default promotions.  */
 415 extern tree check_case_value                    PARAMS ((tree));
 416 /* Concatenate a list of STRING_CST nodes into one STRING_CST.  */
 417 extern tree combine_strings                     PARAMS ((tree));
 418 extern void constant_expression_warning         PARAMS ((tree));
 419 extern tree convert_and_check                   PARAMS ((tree, tree));
 420 extern void overflow_warning                    PARAMS ((tree));
 421 extern void unsigned_conversion_warning         PARAMS ((tree, tree));
 422
 423 /* Read the rest of the current #-directive line.  */
 424 #if USE_CPPLIB
 425 extern char *get_directive_line                 PARAMS ((void));
 426 #define GET_DIRECTIVE_LINE() get_directive_line ()
 427 #else
 428 extern char *get_directive_line                 PARAMS ((FILE *));
 429 #define GET_DIRECTIVE_LINE() get_directive_line (finput)
 430 #endif
 431
 432 /* Subroutine of build_binary_op, used for comparison operations.
 433    See if the operands have both been converted from subword integer types
 434    and, if so, perhaps change them both back to their original type.  */
 435 extern tree shorten_compare                     PARAMS ((tree *, tree *, tree *, enum tree_code *));
 436 /* Prepare expr to be an argument of a TRUTH_NOT_EXPR,
 437    or validate its data type for an `if' or `while' statement or ?..: exp. */
 438 extern tree truthvalue_conversion               PARAMS ((tree));
 439 extern tree type_for_mode                       PARAMS ((enum machine_mode, int));
 440 extern tree type_for_size                       PARAMS ((unsigned, int));
 441
 442 extern unsigned int min_precision               PARAMS ((tree, int));
 443
 444 /* Add qualifiers to a type, in the fashion for C.  */
 445 extern tree c_build_qualified_type              PARAMS ((tree, int));
 446
 447 /* Build tree nodes and builtin functions common to both C and C++ language
 448    frontends.  */
 449 extern void c_common_nodes_and_builtins         PARAMS ((int, int, int));
 450
 451 extern tree build_va_arg                        PARAMS ((tree, tree));
 452
 453 /* Nonzero if the type T promotes to itself.
 454    ANSI C states explicitly the list of types that promote;
 455    in particular, short promotes to int even if they have the same width.  */
 456 #define C_PROMOTING_INTEGER_TYPE_P(t)                           \
 457   (TREE_CODE ((t)) == INTEGER_TYPE                              \
 458    && (TYPE_MAIN_VARIANT (t) == char_type_node                  \
 459        || TYPE_MAIN_VARIANT (t) == signed_char_type_node        \
 460        || TYPE_MAIN_VARIANT (t) == unsigned_char_type_node      \
 461        || TYPE_MAIN_VARIANT (t) == short_integer_type_node      \
 462        || TYPE_MAIN_VARIANT (t) == short_unsigned_type_node))
 463
 464 extern int self_promoting_args_p                PARAMS ((tree));
 465 extern tree simple_type_promotes_to             PARAMS ((tree));
 466
 467 /* These macros provide convenient access to the various _STMT nodes.  */
 468
 469 /* Nonzero if this statement should be considered a full-expression,
 470    i.e., if temporaries created during this statement should have
 471    their destructors run at the end of this statement.  (In C, this
 472    will always be false, since there are no destructors.)  */
 473 #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
 474
 475 /* IF_STMT accessors. These give access to the condtion of the if
 476    statement, the then block of the if statement, and the else block
 477    of the if stsatement if it exists. */
 478 #define IF_COND(NODE)           TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
 479 #define THEN_CLAUSE(NODE)       TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
 480 #define ELSE_CLAUSE(NODE)       TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
 481
 482 /* WHILE_STMT accessors. These give access to the condtion of the
 483    while statement and the body of the while statement, respectively. */
 484 #define WHILE_COND(NODE)        TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0)
 485 #define WHILE_BODY(NODE)        TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1)
 486
 487 /* DO_STMT accessors. These give access to the condition of the do
 488    statement and the body of the do statement, respectively. */
 489 #define DO_COND(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
 490 #define DO_BODY(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
 491
 492 /* RETURN_STMT accessor. This gives the expression associated with a
 493    return statement. */
 494 #define RETURN_EXPR(NODE)       TREE_OPERAND (RETURN_STMT_CHECK (NODE), 0)
 495
 496 /* EXPR_STMT accessor. This gives the expression associated with an
 497    expression statement. */
 498 #define EXPR_STMT_EXPR(NODE)    TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
 499
 500 /* FOR_STMT accessors. These give access to the init statement,
 501    condition, update expression, and body of the for statement,
 502    respectively. */
 503 #define FOR_INIT_STMT(NODE)     TREE_OPERAND (FOR_STMT_CHECK (NODE), 0)
 504 #define FOR_COND(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 1)
 505 #define FOR_EXPR(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 2)
 506 #define FOR_BODY(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 3)
 507
 508 /* SWITCH_STMT accessors. These give access to the condition and body
 509    of the switch statement, respectively. */
 510 #define SWITCH_COND(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0)
 511 #define SWITCH_BODY(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1)
 512
 513 /* CASE_LABEL accessors. These give access to the high and low values
 514    of a case label, respectively. */
 515 #define CASE_LOW(NODE)          TREE_OPERAND (CASE_LABEL_CHECK (NODE), 0)
 516 #define CASE_HIGH(NODE)         TREE_OPERAND (CASE_LABEL_CHECK (NODE), 1)
 517 #define CASE_LABEL_DECL(NODE)   TREE_OPERAND (CASE_LABEL_CHECK (NODE), 2)
 518
 519 /* GOTO_STMT accessor. This gives access to the label associated with
 520    a goto statement. */
 521 #define GOTO_DESTINATION(NODE)  TREE_OPERAND (GOTO_STMT_CHECK (NODE), 0)
 522
 523 /* COMPOUND_STMT accessor. This gives access to the TREE_LIST of
 524    statements assocated with a compound statement. The result is the
 525    first statement in the list. Succeeding nodes can be acccessed by
 526    calling TREE_CHAIN on a node in the list. */
 527 #define COMPOUND_BODY(NODE)     TREE_OPERAND (COMPOUND_STMT_CHECK (NODE), 0)
 528
 529 /* ASM_STMT accessors. ASM_STRING returns a STRING_CST for the
 530    instruction (e.g., "mov x, y"). ASM_OUTPUTS, ASM_INPUTS, and
 531    ASM_CLOBBERS represent the outputs, inputs, and clobbers for the
 532    statement. */
 533 #define ASM_CV_QUAL(NODE)       TREE_OPERAND (ASM_STMT_CHECK (NODE), 0)
 534 #define ASM_STRING(NODE)        TREE_OPERAND (ASM_STMT_CHECK (NODE), 1)
 535 #define ASM_OUTPUTS(NODE)       TREE_OPERAND (ASM_STMT_CHECK (NODE), 2)
 536 #define ASM_INPUTS(NODE)        TREE_OPERAND (ASM_STMT_CHECK (NODE), 3)
 537 #define ASM_CLOBBERS(NODE)      TREE_OPERAND (ASM_STMT_CHECK (NODE), 4)
 538
 539 /* DECL_STMT accessor. This gives access to the DECL associated with
 540    the given declaration statement. */
 541 #define DECL_STMT_DECL(NODE)    TREE_OPERAND (DECL_STMT_CHECK (NODE), 0)
 542
 543 /* STMT_EXPR accessor. */
 544 #define STMT_EXPR_STMT(NODE)    TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
 545
 546 /* LABEL_STMT accessor. This gives access to the label associated with
 547    the given label statement. */
 548 #define LABEL_STMT_LABEL(NODE)  TREE_OPERAND (LABEL_STMT_CHECK (NODE), 0)
 549
 550 /* Nonzero if this SCOPE_STMT is for the beginning of a scope.  */
 551 #define SCOPE_BEGIN_P(NODE) \
 552   (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE)))
 553
 554 /* Nonzero if this SCOPE_STMT is for the end of a scope.  */
 555 #define SCOPE_END_P(NODE) \
 556   (!SCOPE_BEGIN_P (SCOPE_STMT_CHECK (NODE)))
 557
 558 /* The BLOCK containing the declarations contained in this scope.  */
 559 #define SCOPE_STMT_BLOCK(NODE) \
 560   (TREE_OPERAND (SCOPE_STMT_CHECK (NODE), 0))
 561
 562 /* Nonzero for a SCOPE_STMT if there were no variables in this scope.  */
 563 #define SCOPE_NULLIFIED_P(NODE) \
 564   (SCOPE_STMT_BLOCK ((NODE)) == NULL_TREE)
 565
 566 /* Nonzero for a SCOPE_STMT which represents a lexical scope, but
 567    which should be treated as non-existant from the point of view of
 568    running cleanup actions.  */
 569 #define SCOPE_NO_CLEANUPS_P(NODE) \
 570   (TREE_LANG_FLAG_3 (SCOPE_STMT_CHECK (NODE)))
 571
 572 /* Nonzero for a SCOPE_STMT if this statement is for a partial scope.
 573    For example, in:
 574
 575      S s;
 576      l:
 577      S s2;
 578      goto l;
 579
 580    there is (implicitly) a new scope after `l', even though there are
 581    no curly braces.  In particular, when we hit the goto, we must
 582    destroy s2 and then re-construct it.  For the implicit scope,
 583    SCOPE_PARTIAL_P will be set.  */
 584 #define SCOPE_PARTIAL_P(NODE) \
 585   (TREE_LANG_FLAG_4 (SCOPE_STMT_CHECK (NODE)))
 586
 587 /* Nonzero for an ASM_STMT if the assembly statement is volatile.  */
 588 #define ASM_VOLATILE_P(NODE)                    \
 589   (ASM_CV_QUAL (ASM_STMT_CHECK (NODE)) != NULL_TREE)
 590
 591 /* The line-number at which a statement began.  But if
 592    STMT_LINENO_FOR_FN_P does holds, then this macro gives the
 593    line number for the end of the current function instead.  */
 594 #define STMT_LINENO(NODE)                       \
 595   (TREE_COMPLEXITY ((NODE)))
 596
 597 /* If non-zero, the STMT_LINENO for NODE is the line at which the
 598    function ended.  */
 599 #define STMT_LINENO_FOR_FN_P(NODE)              \
 600   (TREE_LANG_FLAG_2 ((NODE)))
 601
 602 /* Nonzero if we want the new ISO rules for pushing a new scope for `for'
 603    initialization variables. */
 604 #define NEW_FOR_SCOPE_P(NODE) (TREE_LANG_FLAG_0 (NODE))
 605
 606 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
 607
 608 enum c_tree_code {
 609   C_DUMMY_TREE_CODE = LAST_AND_UNUSED_TREE_CODE,
 610 #include "c-common.def"
 611   LAST_C_TREE_CODE
 612 };
 613
 614 #undef DEFTREECODE
 615
 616 extern void add_c_tree_codes                    PARAMS ((void));
 617 extern void genrtl_do_pushlevel                 PARAMS ((void));
 618 extern void genrtl_goto_stmt                    PARAMS ((tree));
 619 extern void genrtl_expr_stmt                    PARAMS ((tree));
 620 extern void genrtl_decl_stmt                    PARAMS ((tree));
 621 extern void genrtl_if_stmt                      PARAMS ((tree));
 622 extern void genrtl_while_stmt                   PARAMS ((tree));
 623 extern void genrtl_do_stmt                      PARAMS ((tree));
 624 extern void genrtl_return_stmt                  PARAMS ((tree));
 625 extern void genrtl_for_stmt                     PARAMS ((tree));
 626 extern void genrtl_break_stmt                   PARAMS ((void));
 627 extern void genrtl_continue_stmt                PARAMS ((void));
 628 extern void genrtl_scope_stmt                   PARAMS ((tree));
 629 extern void genrtl_switch_stmt                  PARAMS ((tree));
 630 extern void genrtl_case_label                   PARAMS ((tree));
 631 extern void genrtl_compound_stmt                PARAMS ((tree));
 632 extern void genrtl_asm_stmt                     PARAMS ((tree, tree,
 633                                                          tree, tree,
 634                                                          tree));
 635 extern void genrtl_decl_cleanup                 PARAMS ((tree, tree));
 636 extern int stmts_are_full_exprs_p               PARAMS ((void));
 637 extern int anon_aggr_type_p                     PARAMS ((tree));
 638
 639 /* For a VAR_DECL that is an anonymous union, these are the various
 640    sub-variables that make up the anonymous union.  */
 641 #define DECL_ANON_UNION_ELEMS(NODE) DECL_ARGUMENTS ((NODE))
 642
 643 extern void emit_local_var                      PARAMS ((tree));
 644 extern void make_rtl_for_local_static           PARAMS ((tree));
 645 extern tree expand_cond                         PARAMS ((tree));
 646 extern void c_expand_return                     PARAMS ((tree));
 647 extern void do_case                             PARAMS ((tree, tree));
 648 extern tree build_stmt                          PARAMS ((enum tree_code, ...));
 649 extern tree build_case_label                    PARAMS ((tree, tree, tree));
 650 extern tree build_continue_stmt                 PARAMS ((void));
 651 extern tree build_break_stmt                    PARAMS ((void));
 652 extern tree build_return_stmt                   PARAMS ((tree));
 653
 654 #define COMPOUND_STMT_NO_SCOPE(NODE)    TREE_LANG_FLAG_0 (NODE)
 655
 656 extern void c_expand_asm_operands               PARAMS ((tree, tree, tree, tree, int, const char *, int));
 657
 658 /* These functions must be defined by each front-end which implements
 659    a variant of the C language.  They are used in c-common.c.  */
 660
 661 extern tree build_unary_op                      PARAMS ((enum tree_code,
 662                                                          tree, int));
 663 extern tree build_binary_op                     PARAMS ((enum tree_code,
 664                                                          tree, tree, int));
 665 extern int lvalue_p                             PARAMS ((tree));
 666 extern tree default_conversion                  PARAMS ((tree));
 667
 668 /* Given two integer or real types, return the type for their sum.
 669    Given two compatible ANSI C types, returns the merged type.  */
 670
 671 extern tree common_type                         PARAMS ((tree, tree));
 672
 673 extern tree expand_tree_builtin                 PARAMS ((tree, tree, tree));
 674
 675 extern tree decl_constant_value         PARAMS ((tree));
 676
 677 /* Hook currently used only by the C++ front end to reset internal state
 678    after entering or leaving a header file.  */
 679 extern void extract_interface_info              PARAMS ((void));
 680
 681 extern void mark_c_language_function            PARAMS ((struct language_function *));
 682
 683 extern int case_compare                         PARAMS ((splay_tree_key,
 684                                                          splay_tree_key));
 685
 686 extern tree c_add_case_label                    PARAMS ((splay_tree,
 687                                                          tree, tree,
 688                                                          tree));
 689
 690 extern tree build_function_call                 PARAMS ((tree, tree));
 691
 692 #ifdef RTX_CODE
 693
 694 extern struct rtx_def *c_expand_expr            PARAMS ((tree, rtx,
 695                                                          enum machine_mode,
 696                                                          enum expand_modifier));
 697
 698 extern int c_safe_from_p                        PARAMS ((rtx, tree));
 699
 700 #endif
 701
 702 /* Information recorded about each file examined during compilation.  */
 703
 704 struct c_fileinfo
 705 {
 706   int time;     /* Time spent in the file.  */
 707   short interface_only;         /* Flags - used only by C++ */
 708   short interface_unknown;
 709 };
 710
 711 struct c_fileinfo *get_fileinfo                 PARAMS ((const char *));
 712 extern void dump_time_statistics                PARAMS ((void));
 713
 714 #endif