gcc/c-common.h

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