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