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