gcc/c-common.h

   1 /* Definitions for c-common.c.
   2    Copyright (C) 1987, 1993, 1994, 1995, 1997, 1998,
   3    1999, 2000, 2001 Free Software Foundation, Inc.
   4
   5 This file is part of GNU CC.
   6
   7 GNU CC is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 2, or (at your option)
  10 any later version.
  11
  12 GNU CC is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GNU CC; see the file COPYING.  If not, write to
  19 the Free Software Foundation, 59 Temple Place - Suite 330,
  20 Boston, MA 02111-1307, USA.  */
  21
  22 #ifndef GCC_C_COMMON_H
  23 #define GCC_C_COMMON_H
  24
  25 #include "splay-tree.h"
  26 #include "cpplib.h"
  27
  28 /* Usage of TREE_LANG_FLAG_?:
  29    0: COMPOUND_STMT_NO_SCOPE (in COMPOUND_STMT).
  30       TREE_NEGATED_INT (in INTEGER_CST).
  31       IDENTIFIER_MARKED (used by search routines).
  32       SCOPE_BEGIN_P (in SCOPE_STMT)
  33       DECL_PRETTY_FUNCTION_P (in VAR_DECL)
  34       NEW_FOR_SCOPE_P (in FOR_STMT)
  35       ASM_INPUT_P (in ASM_STMT)
  36    1: C_DECLARED_LABEL_FLAG (in LABEL_DECL)
  37       STMT_IS_FULL_EXPR_P (in _STMT)
  38    2: STMT_LINENO_FOR_FN_P (in _STMT)
  39    3: SCOPE_NO_CLEANUPS_P (in SCOPE_STMT)
  40    4: SCOPE_PARTIAL_P (in SCOPE_STMT)
  41 */
  42
  43 /* Reserved identifiers.  This is the union of all the keywords for C,
  44    C++, and Objective C.  All the type modifiers have to be in one
  45    block at the beginning, because they are used as mask bits.  There
  46    are 27 type modifiers; if we add many more we will have to redesign
  47    the mask mechanism.  */
  48
  49 enum rid
  50 {
  51   /* Modifiers: */
  52   /* C, in empirical order of frequency. */
  53   RID_STATIC = 0,
  54   RID_UNSIGNED, RID_LONG,    RID_CONST, RID_EXTERN,
  55   RID_REGISTER, RID_TYPEDEF, RID_SHORT, RID_INLINE,
  56   RID_VOLATILE, RID_SIGNED,  RID_AUTO,  RID_RESTRICT,
  57
  58   /* C extensions */
  59   RID_BOUNDED, RID_UNBOUNDED, RID_COMPLEX,
  60
  61   /* C++ */
  62   RID_FRIEND, RID_VIRTUAL, RID_EXPLICIT, RID_EXPORT, RID_MUTABLE,
  63
  64   /* ObjC */
  65   RID_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,
  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))->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   ENUM_BITFIELD(rid) rid_code: CHAR_BIT;
 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 typedef enum c_language_kind
 240 {
 241   clk_c,           /* A dialect of C: K&R C, ANSI/ISO C89, C2000,
 242                        etc. */
 243   clk_cplusplus,   /* ANSI/ISO C++ */
 244   clk_objective_c  /* Objective C */
 245 }
 246 c_language_kind;
 247
 248 /* Information about a statement tree.  */
 249
 250 struct stmt_tree_s {
 251   /* The last statement added to the tree.  */
 252   tree x_last_stmt;
 253   /* The type of the last expression statement.  (This information is
 254      needed to implement the statement-expression extension.)  */
 255   tree x_last_expr_type;
 256   /* In C++, Non-zero if we should treat statements as full
 257      expressions.  In particular, this variable is no-zero if at the
 258      end of a statement we should destroy any temporaries created
 259      during that statement.  Similarly, if, at the end of a block, we
 260      should destroy any local variables in this block.  Normally, this
 261      variable is non-zero, since those are the normal semantics of
 262      C++.
 263
 264      However, in order to represent aggregate initialization code as
 265      tree structure, we use statement-expressions.  The statements
 266      within the statement expression should not result in cleanups
 267      being run until the entire enclosing statement is complete.
 268
 269      This flag has no effect in C.  */
 270   int stmts_are_full_exprs_p;
 271 };
 272
 273 typedef struct stmt_tree_s *stmt_tree;
 274
 275 /* Global state pertinent to the current function.  Some C dialects
 276    extend this structure with additional fields.  */
 277
 278 struct language_function {
 279   /* While we are parsing the function, this contains information
 280      about the statement-tree that we are building.  */
 281   struct stmt_tree_s x_stmt_tree;
 282   /* The stack of SCOPE_STMTs for the current function.  */
 283   tree x_scope_stmt_stack;
 284 };
 285
 286 /* When building a statement-tree, this is the last statement added to
 287    the tree.  */
 288
 289 #define last_tree (current_stmt_tree ()->x_last_stmt)
 290
 291 /* The type of the last expression-statement we have seen.  */
 292
 293 #define last_expr_type (current_stmt_tree ()->x_last_expr_type)
 294
 295 /* LAST_TREE contains the last statement parsed.  These are chained
 296    together through the TREE_CHAIN field, but often need to be
 297    re-organized since the parse is performed bottom-up.  This macro
 298    makes LAST_TREE the indicated SUBSTMT of STMT.  */
 299
 300 #define RECHAIN_STMTS(stmt, substmt)            \
 301   do {                                          \
 302     substmt = TREE_CHAIN (stmt);                \
 303     TREE_CHAIN (stmt) = NULL_TREE;              \
 304     last_tree = stmt;                           \
 305   } while (0)
 306
 307 /* Language-specific hooks.  */
 308
 309 extern int (*lang_statement_code_p)             PARAMS ((enum tree_code));
 310 extern void (*lang_expand_stmt)                 PARAMS ((tree));
 311 extern void (*lang_expand_decl_stmt)            PARAMS ((tree));
 312 extern void (*lang_expand_function_end)         PARAMS ((void));
 313
 314 /* Callback that determines if it's ok for a function to have no
 315    noreturn attribute.  */
 316 extern int (*lang_missing_noreturn_ok_p)        PARAMS ((tree));
 317
 318
 319 /* The type of a function that walks over tree structure.  */
 320
 321 typedef tree (*walk_tree_fn)                    PARAMS ((tree *,
 322                                                          int *,
 323                                                          void *));
 324
 325 extern stmt_tree current_stmt_tree              PARAMS ((void));
 326 extern tree *current_scope_stmt_stack           PARAMS ((void));
 327 extern void begin_stmt_tree                     PARAMS ((tree *));
 328 extern tree add_stmt                            PARAMS ((tree));
 329 extern void add_decl_stmt                       PARAMS ((tree));
 330 extern tree add_scope_stmt                      PARAMS ((int, int));
 331 extern void finish_stmt_tree                    PARAMS ((tree *));
 332
 333 extern int statement_code_p                     PARAMS ((enum tree_code));
 334 extern tree walk_stmt_tree                      PARAMS ((tree *,
 335                                                          walk_tree_fn,
 336                                                          void *));
 337 extern void prep_stmt                           PARAMS ((tree));
 338 extern void expand_stmt                         PARAMS ((tree));
 339 extern void mark_stmt_tree                      PARAMS ((void *));
 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   /* In a FUNCTION_DECL, this is DECL_SAVED_TREE.  */
 348   tree saved_tree;
 349 };
 350
 351 /* In a FUNCTION_DECL, the saved representation of the body of the
 352    entire function.  Usually a COMPOUND_STMT, but in C++ this may also
 353    be a RETURN_INIT, CTOR_INITIALIZER, or TRY_BLOCK.  */
 354 #define DECL_SAVED_TREE(NODE)                                               \
 355   (((struct c_lang_decl *) DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))) \
 356    ->saved_tree)
 357
 358 /* In a FUNCTION_DECL for which DECL_BUILT_IN does not hold, this is
 359      the approximate number of statements in this function.  There is
 360      no need for this number to be exact; it is only used in various
 361      heuristics regarding optimization.  */
 362 #define DECL_NUM_STMTS(NODE) \
 363   (FUNCTION_DECL_CHECK (NODE)->decl.u1.i)
 364
 365 extern void c_mark_lang_decl                    PARAMS ((struct c_lang_decl *));
 366
 367 /* The variant of the C language being processed.  Each C language
 368    front-end defines this variable.  */
 369
 370 extern c_language_kind c_language;
 371
 372 /* Nonzero means give string constants the type `const char *', rather
 373    than `char *'.  */
 374
 375 extern int flag_const_strings;
 376
 377 /* Nonzero means give `double' the same size as `float'.  */
 378
 379 extern int flag_short_double;
 380
 381 /* Nonzero means give `wchar_t' the same size as `short'.  */
 382
 383 extern int flag_short_wchar;
 384
 385 /* Warn about *printf or *scanf format/argument anomalies. */
 386
 387 extern int warn_format;
 388
 389 /* Warn about Y2K problems with strftime formats.  */
 390
 391 extern int warn_format_y2k;
 392
 393 /* Warn about excess arguments to formats.  */
 394
 395 extern int warn_format_extra_args;
 396
 397 /* Warn about non-literal format arguments.  */
 398
 399 extern int warn_format_nonliteral;
 400
 401 /* Warn about possible security problems with calls to format functions.  */
 402
 403 extern int warn_format_security;
 404
 405 /* Warn about possible violations of sequence point rules.  */
 406
 407 extern int warn_sequence_point;
 408
 409 /* Warn about functions which might be candidates for format attributes.  */
 410
 411 extern int warn_missing_format_attribute;
 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 /* Return the qualifiers that apply to this type.  In C++, that means
 468    descending through array types.  Note that this macro evaluates its
 469    arguments mor than once.  */
 470 #define C_TYPE_QUALS(TYPE)                              \
 471   (TYPE_QUALS ((TREE_CODE (TYPE) == ARRAY_TYPE          \
 472                 && c_language == clk_cplusplus)         \
 473                ? strip_array_types (TYPE) : TYPE))
 474
 475 /* For convenience we define a single macro to identify the class of
 476    object or incomplete types.  */
 477 #define C_TYPE_OBJECT_OR_INCOMPLETE_P(type) \
 478   (!C_TYPE_FUNCTION_P (type))
 479
 480 /* Record in each node resulting from a binary operator
 481    what operator was specified for it.  */
 482 #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
 483
 484 /* Pointer to function to lazily generate the VAR_DECL for __FUNCTION__ etc.
 485    ID is the identifier to use, NAME is the string.
 486    TYPE_DEP indicates whether it depends on type of the function or not
 487    (i.e. __PRETTY_FUNCTION__).  */
 488
 489 extern tree (*make_fname_decl)                  PARAMS ((tree, int));
 490
 491 extern tree identifier_global_value             PARAMS ((tree));
 492 extern void record_builtin_type                 PARAMS ((enum rid,
 493                                                          const char *, tree));
 494 extern tree build_void_list_node                PARAMS ((void));
 495 extern void start_fname_decls                   PARAMS ((void));
 496 extern void finish_fname_decls                  PARAMS ((void));
 497 extern const char *fname_as_string              PARAMS ((int));
 498 extern tree fname_decl                          PARAMS ((unsigned, tree));
 499 extern const char *fname_string                 PARAMS ((unsigned));
 500
 501 /* Flags that may be passed in the third argument of decl_attributes.  */
 502 enum attribute_flags
 503 {
 504   /* The type passed in is the type of a DECL, and any attributes that
 505      should be passed in again to be applied to the DECL rather than the
 506      type should be returned.  */
 507   ATTR_FLAG_DECL_NEXT = 1,
 508   /* The type passed in is a function return type, and any attributes that
 509      should be passed in again to be applied to the function type rather
 510      than the return type should be returned.  */
 511   ATTR_FLAG_FUNCTION_NEXT = 2,
 512   /* The type passed in is an array element type, and any attributes that
 513      should be passed in again to be applied to the array type rather
 514      than the element type should be returned.  */
 515   ATTR_FLAG_ARRAY_NEXT = 4
 516 };
 517
 518 extern tree decl_attributes                     PARAMS ((tree *, tree, int));
 519 extern void init_function_format_info           PARAMS ((void));
 520 extern void check_function_format               PARAMS ((int *, tree, tree, tree));
 521 extern void set_Wformat                         PARAMS ((int));
 522 extern void decl_handle_format_attribute        PARAMS ((tree, tree));
 523 extern void decl_handle_format_arg_attribute    PARAMS ((tree, tree));
 524 extern void c_apply_type_quals_to_decl          PARAMS ((int, tree));
 525 /* Print an error message for invalid operands to arith operation CODE.
 526    NOP_EXPR is used as a special case (see truthvalue_conversion).  */
 527 extern void binary_op_error                     PARAMS ((enum tree_code));
 528 extern tree c_expand_expr_stmt                  PARAMS ((tree));
 529 extern void c_expand_start_cond                 PARAMS ((tree, int));
 530 extern void c_finish_then                       PARAMS ((void));
 531 extern void c_expand_start_else                 PARAMS ((void));
 532 extern void c_finish_else                   PARAMS ((void));
 533 extern void c_expand_end_cond                   PARAMS ((void));
 534 /* Validate the expression after `case' and apply default promotions.  */
 535 extern tree check_case_value                    PARAMS ((tree));
 536 /* Concatenate a list of STRING_CST nodes into one STRING_CST.  */
 537 extern tree combine_strings                     PARAMS ((tree));
 538 extern void constant_expression_warning         PARAMS ((tree));
 539 extern tree convert_and_check                   PARAMS ((tree, tree));
 540 extern void overflow_warning                    PARAMS ((tree));
 541 extern void unsigned_conversion_warning         PARAMS ((tree, tree));
 542
 543 /* Read the rest of the current #-directive line.  */
 544 extern char *get_directive_line                 PARAMS ((void));
 545 #define GET_DIRECTIVE_LINE() get_directive_line ()
 546
 547 /* Subroutine of build_binary_op, used for comparison operations.
 548    See if the operands have both been converted from subword integer types
 549    and, if so, perhaps change them both back to their original type.  */
 550 extern tree shorten_compare                     PARAMS ((tree *, tree *, tree *, enum tree_code *));
 551
 552 extern unsigned int min_precision               PARAMS ((tree, int));
 553
 554 /* Add qualifiers to a type, in the fashion for C.  */
 555 extern tree c_build_qualified_type              PARAMS ((tree, int));
 556
 557 /* Build tree nodes and builtin functions common to both C and C++ language
 558    frontends.  */
 559 extern void c_common_nodes_and_builtins         PARAMS ((void));
 560
 561 extern tree build_va_arg                        PARAMS ((tree, tree));
 562
 563 extern void c_common_lang_init                  PARAMS ((void));
 564
 565 extern bool c_promoting_integer_type_p          PARAMS ((tree));
 566 extern int self_promoting_args_p                PARAMS ((tree));
 567 extern tree simple_type_promotes_to             PARAMS ((tree));
 568 extern tree strip_array_types                   PARAMS ((tree));
 569
 570 /* These macros provide convenient access to the various _STMT nodes.  */
 571
 572 /* Nonzero if this statement should be considered a full-expression,
 573    i.e., if temporaries created during this statement should have
 574    their destructors run at the end of this statement.  (In C, this
 575    will always be false, since there are no destructors.)  */
 576 #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
 577
 578 /* IF_STMT accessors. These give access to the condtion of the if
 579    statement, the then block of the if statement, and the else block
 580    of the if stsatement if it exists. */
 581 #define IF_COND(NODE)           TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
 582 #define THEN_CLAUSE(NODE)       TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
 583 #define ELSE_CLAUSE(NODE)       TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
 584
 585 /* WHILE_STMT accessors. These give access to the condtion of the
 586    while statement and the body of the while statement, respectively. */
 587 #define WHILE_COND(NODE)        TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0)
 588 #define WHILE_BODY(NODE)        TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1)
 589
 590 /* DO_STMT accessors. These give access to the condition of the do
 591    statement and the body of the do statement, respectively. */
 592 #define DO_COND(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
 593 #define DO_BODY(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
 594
 595 /* RETURN_STMT accessors. These give the expression associated with a
 596    return statement, and whether it should be ignored when expanding
 597    (as opposed to inlining).  */
 598 #define RETURN_EXPR(NODE)       TREE_OPERAND (RETURN_STMT_CHECK (NODE), 0)
 599
 600 /* EXPR_STMT accessor. This gives the expression associated with an
 601    expression statement. */
 602 #define EXPR_STMT_EXPR(NODE)    TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
 603
 604 /* FOR_STMT accessors. These give access to the init statement,
 605    condition, update expression, and body of the for statement,
 606    respectively. */
 607 #define FOR_INIT_STMT(NODE)     TREE_OPERAND (FOR_STMT_CHECK (NODE), 0)
 608 #define FOR_COND(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 1)
 609 #define FOR_EXPR(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 2)
 610 #define FOR_BODY(NODE)          TREE_OPERAND (FOR_STMT_CHECK (NODE), 3)
 611
 612 /* SWITCH_STMT accessors. These give access to the condition and body
 613    of the switch statement, respectively. */
 614 #define SWITCH_COND(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0)
 615 #define SWITCH_BODY(NODE)       TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1)
 616
 617 /* CASE_LABEL accessors. These give access to the high and low values
 618    of a case label, respectively. */
 619 #define CASE_LOW(NODE)          TREE_OPERAND (CASE_LABEL_CHECK (NODE), 0)
 620 #define CASE_HIGH(NODE)         TREE_OPERAND (CASE_LABEL_CHECK (NODE), 1)
 621 #define CASE_LABEL_DECL(NODE)   TREE_OPERAND (CASE_LABEL_CHECK (NODE), 2)
 622
 623 /* GOTO_STMT accessor. This gives access to the label associated with
 624    a goto statement. */
 625 #define GOTO_DESTINATION(NODE)  TREE_OPERAND (GOTO_STMT_CHECK (NODE), 0)
 626
 627 /* COMPOUND_STMT accessor. This gives access to the TREE_LIST of
 628    statements assocated with a compound statement. The result is the
 629    first statement in the list. Succeeding nodes can be acccessed by
 630    calling TREE_CHAIN on a node in the list. */
 631 #define COMPOUND_BODY(NODE)     TREE_OPERAND (COMPOUND_STMT_CHECK (NODE), 0)
 632
 633 /* ASM_STMT accessors. ASM_STRING returns a STRING_CST for the
 634    instruction (e.g., "mov x, y"). ASM_OUTPUTS, ASM_INPUTS, and
 635    ASM_CLOBBERS represent the outputs, inputs, and clobbers for the
 636    statement. */
 637 #define ASM_CV_QUAL(NODE)       TREE_OPERAND (ASM_STMT_CHECK (NODE), 0)
 638 #define ASM_STRING(NODE)        TREE_OPERAND (ASM_STMT_CHECK (NODE), 1)
 639 #define ASM_OUTPUTS(NODE)       TREE_OPERAND (ASM_STMT_CHECK (NODE), 2)
 640 #define ASM_INPUTS(NODE)        TREE_OPERAND (ASM_STMT_CHECK (NODE), 3)
 641 #define ASM_CLOBBERS(NODE)      TREE_OPERAND (ASM_STMT_CHECK (NODE), 4)
 642
 643 /* DECL_STMT accessor. This gives access to the DECL associated with
 644    the given declaration statement. */
 645 #define DECL_STMT_DECL(NODE)    TREE_OPERAND (DECL_STMT_CHECK (NODE), 0)
 646
 647 /* STMT_EXPR accessor. */
 648 #define STMT_EXPR_STMT(NODE)    TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
 649
 650 /* LABEL_STMT accessor. This gives access to the label associated with
 651    the given label statement. */
 652 #define LABEL_STMT_LABEL(NODE)  TREE_OPERAND (LABEL_STMT_CHECK (NODE), 0)
 653
 654 /* Nonzero if this SCOPE_STMT is for the beginning of a scope.  */
 655 #define SCOPE_BEGIN_P(NODE) \
 656   (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE)))
 657
 658 /* Nonzero if this SCOPE_STMT is for the end of a scope.  */
 659 #define SCOPE_END_P(NODE) \
 660   (!SCOPE_BEGIN_P (SCOPE_STMT_CHECK (NODE)))
 661
 662 /* The BLOCK containing the declarations contained in this scope.  */
 663 #define SCOPE_STMT_BLOCK(NODE) \
 664   (TREE_OPERAND (SCOPE_STMT_CHECK (NODE), 0))
 665
 666 /* Nonzero for a SCOPE_STMT if there were no variables in this scope.  */
 667 #define SCOPE_NULLIFIED_P(NODE) \
 668   (SCOPE_STMT_BLOCK ((NODE)) == NULL_TREE)
 669
 670 /* Nonzero for a SCOPE_STMT which represents a lexical scope, but
 671    which should be treated as non-existant from the point of view of
 672    running cleanup actions.  */
 673 #define SCOPE_NO_CLEANUPS_P(NODE) \
 674   (TREE_LANG_FLAG_3 (SCOPE_STMT_CHECK (NODE)))
 675
 676 /* Nonzero for a SCOPE_STMT if this statement is for a partial scope.
 677    For example, in:
 678
 679      S s;
 680      l:
 681      S s2;
 682      goto l;
 683
 684    there is (implicitly) a new scope after `l', even though there are
 685    no curly braces.  In particular, when we hit the goto, we must
 686    destroy s2 and then re-construct it.  For the implicit scope,
 687    SCOPE_PARTIAL_P will be set.  */
 688 #define SCOPE_PARTIAL_P(NODE) \
 689   (TREE_LANG_FLAG_4 (SCOPE_STMT_CHECK (NODE)))
 690
 691 /* Nonzero for an ASM_STMT if the assembly statement is volatile.  */
 692 #define ASM_VOLATILE_P(NODE)                    \
 693   (ASM_CV_QUAL (ASM_STMT_CHECK (NODE)) != NULL_TREE)
 694
 695 /* The line-number at which a statement began.  But if
 696    STMT_LINENO_FOR_FN_P does holds, then this macro gives the
 697    line number for the end of the current function instead.  */
 698 #define STMT_LINENO(NODE)                       \
 699   (TREE_COMPLEXITY ((NODE)))
 700
 701 /* If non-zero, the STMT_LINENO for NODE is the line at which the
 702    function ended.  */
 703 #define STMT_LINENO_FOR_FN_P(NODE)              \
 704   (TREE_LANG_FLAG_2 ((NODE)))
 705
 706 /* Nonzero if we want the new ISO rules for pushing a new scope for `for'
 707    initialization variables. */
 708 #define NEW_FOR_SCOPE_P(NODE) (TREE_LANG_FLAG_0 (NODE))
 709
 710 /* Nonzero if we want to create an ASM_INPUT instead of an
 711    ASM_OPERAND with no operands.  */
 712 #define ASM_INPUT_P(NODE) (TREE_LANG_FLAG_0 (NODE))
 713
 714 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
 715
 716 enum c_tree_code {
 717   C_DUMMY_TREE_CODE = LAST_AND_UNUSED_TREE_CODE,
 718 #include "c-common.def"
 719   LAST_C_TREE_CODE
 720 };
 721
 722 #undef DEFTREECODE
 723
 724 extern void add_c_tree_codes                    PARAMS ((void));
 725 extern void genrtl_do_pushlevel                 PARAMS ((void));
 726 extern void genrtl_goto_stmt                    PARAMS ((tree));
 727 extern void genrtl_expr_stmt                    PARAMS ((tree));
 728 extern void genrtl_decl_stmt                    PARAMS ((tree));
 729 extern void genrtl_if_stmt                      PARAMS ((tree));
 730 extern void genrtl_while_stmt                   PARAMS ((tree));
 731 extern void genrtl_do_stmt                      PARAMS ((tree));
 732 extern void genrtl_return_stmt                  PARAMS ((tree));
 733 extern void genrtl_for_stmt                     PARAMS ((tree));
 734 extern void genrtl_break_stmt                   PARAMS ((void));
 735 extern void genrtl_continue_stmt                PARAMS ((void));
 736 extern void genrtl_scope_stmt                   PARAMS ((tree));
 737 extern void genrtl_switch_stmt                  PARAMS ((tree));
 738 extern void genrtl_case_label                   PARAMS ((tree));
 739 extern void genrtl_compound_stmt                PARAMS ((tree));
 740 extern void genrtl_asm_stmt                     PARAMS ((tree, tree,
 741                                                          tree, tree,
 742                                                          tree, int));
 743 extern void genrtl_decl_cleanup                 PARAMS ((tree, tree));
 744 extern int stmts_are_full_exprs_p               PARAMS ((void));
 745 extern int anon_aggr_type_p                     PARAMS ((tree));
 746
 747 /* For a VAR_DECL that is an anonymous union, these are the various
 748    sub-variables that make up the anonymous union.  */
 749 #define DECL_ANON_UNION_ELEMS(NODE) DECL_ARGUMENTS ((NODE))
 750
 751 /* In a FIELD_DECL, nonzero if the decl was originally a bitfield.  */
 752 #define DECL_C_BIT_FIELD(NODE) \
 753   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) == 1)
 754 #define SET_DECL_C_BIT_FIELD(NODE) \
 755   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 1)
 756 #define CLEAR_DECL_C_BIT_FIELD(NODE) \
 757   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 0)
 758
 759 /* In a VAR_DECL, nonzero if the decl is a register variable with
 760    an explicit asm specification.  */
 761 #define DECL_C_HARD_REGISTER(DECL)  DECL_LANG_FLAG_4 (VAR_DECL_CHECK (DECL))
 762
 763 extern void emit_local_var                      PARAMS ((tree));
 764 extern void make_rtl_for_local_static           PARAMS ((tree));
 765 extern tree expand_cond                         PARAMS ((tree));
 766 extern tree c_expand_return                     PARAMS ((tree));
 767 extern tree do_case                             PARAMS ((tree, tree));
 768 extern tree build_stmt                          PARAMS ((enum tree_code, ...));
 769 extern tree build_case_label                    PARAMS ((tree, tree, tree));
 770 extern tree build_continue_stmt                 PARAMS ((void));
 771 extern tree build_break_stmt                    PARAMS ((void));
 772 extern tree build_return_stmt                   PARAMS ((tree));
 773
 774 #define COMPOUND_STMT_NO_SCOPE(NODE)    TREE_LANG_FLAG_0 (NODE)
 775
 776 extern void c_expand_asm_operands               PARAMS ((tree, tree, tree, tree, int, const char *, int));
 777
 778 /* These functions must be defined by each front-end which implements
 779    a variant of the C language.  They are used in c-common.c.  */
 780
 781 extern tree build_unary_op                      PARAMS ((enum tree_code,
 782                                                          tree, int));
 783 extern tree build_binary_op                     PARAMS ((enum tree_code,
 784                                                          tree, tree, int));
 785 extern int lvalue_p                             PARAMS ((tree));
 786 extern tree default_conversion                  PARAMS ((tree));
 787
 788 /* Given two integer or real types, return the type for their sum.
 789    Given two compatible ANSI C types, returns the merged type.  */
 790
 791 extern tree common_type                         PARAMS ((tree, tree));
 792
 793 extern tree expand_tree_builtin                 PARAMS ((tree, tree, tree));
 794
 795 extern tree decl_constant_value         PARAMS ((tree));
 796
 797 /* Handle increment and decrement of boolean types.  */
 798 extern tree boolean_increment                   PARAMS ((enum tree_code,
 799                                                          tree));
 800
 801 /* Hook currently used only by the C++ front end to reset internal state
 802    after entering or leaving a header file.  */
 803 extern void extract_interface_info              PARAMS ((void));
 804
 805 extern void mark_c_language_function            PARAMS ((struct language_function *));
 806
 807 extern int case_compare                         PARAMS ((splay_tree_key,
 808                                                          splay_tree_key));
 809
 810 extern tree c_add_case_label                    PARAMS ((splay_tree,
 811                                                          tree, tree,
 812                                                          tree));
 813
 814 extern tree build_function_call                 PARAMS ((tree, tree));
 815
 816 extern tree finish_label_address_expr           PARAMS ((tree));
 817
 818 /* Same function prototype, but the C and C++ front ends have
 819    different implementations.  Used in c-common.c.  */
 820 extern tree lookup_label                        PARAMS ((tree));
 821
 822 /* If this variable is defined to a non-NULL value, it will be called
 823    after the file has been completely parsed.  The argument will be
 824    the GLOBAL_NAMESPACE in C++, or the list of top-level declarations
 825    in C.  */
 826 extern void (*back_end_hook) PARAMS ((tree));
 827
 828 #ifdef RTX_CODE
 829
 830 extern struct rtx_def *c_expand_expr            PARAMS ((tree, rtx,
 831                                                          enum machine_mode,
 832                                                          enum expand_modifier));
 833
 834 extern int c_safe_from_p                        PARAMS ((rtx, tree));
 835 #endif
 836
 837 extern int c_unsafe_for_reeval                  PARAMS ((tree));
 838
 839 /* In dump.c */
 840
 841 /* Different tree dump places. */
 842 enum tree_dump_index
 843 {
 844   TDI_all,                      /* dump the whole translation unit */
 845   TDI_class,                    /* dump class heirarchy */
 846   TDI_original,                 /* dump each function before optimizing it */
 847   TDI_optimized,                /* dump each function after optimizing it */
 848   TDI_inlined,                  /* dump each function after inlining
 849                                    within it. */
 850   TDI_end
 851 };
 852
 853 /* Bit masks to control tree dumping. */
 854 #define TDF_ADDRESS     (1 << 0)        /* dump node addresses */
 855 #define TDF_SLIM        (1 << 1)        /* don't go wild following links */
 856
 857 typedef struct dump_info *dump_info_p;
 858
 859 /* A callback function used dump language-specific parts of tree
 860    nodes.  Returns non-zero if it does not want the usual dumping of
 861    the second argument.  */
 862
 863 typedef int (*dump_tree_fn) PARAMS ((dump_info_p, tree));
 864
 865 extern dump_tree_fn lang_dump_tree;
 866
 867 extern int dump_flag                    PARAMS ((dump_info_p, int, tree));
 868 extern int dump_enabled_p               PARAMS ((enum tree_dump_index));
 869 extern FILE *dump_begin                 PARAMS ((enum tree_dump_index, int *));
 870 extern void dump_end                    PARAMS ((enum tree_dump_index, FILE *));
 871 extern void dump_node                   PARAMS ((tree, int, FILE *));
 872 extern int dump_switch_p                PARAMS ((const char *));
 873 extern const char *dump_flag_name       PARAMS ((enum tree_dump_index));
 874
 875 /* Information recorded about each file examined during compilation.  */
 876
 877 struct c_fileinfo
 878 {
 879   int time;     /* Time spent in the file.  */
 880   short interface_only;         /* Flags - used only by C++ */
 881   short interface_unknown;
 882 };
 883
 884 struct c_fileinfo *get_fileinfo                 PARAMS ((const char *));
 885 extern void dump_time_statistics                PARAMS ((void));
 886
 887 #endif /* ! GCC_C_COMMON_H */