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