gcc/cp/cp-tree.h

   1 /* Definitions for C++ parsing and type checking.
   2    Copyright (C) 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
   3    2000, 2001, 2002 Free Software Foundation, Inc.
   4    Contributed by Michael Tiemann (tiemann@cygnus.com)
   5
   6 This file is part of GNU CC.
   7
   8 GNU CC is free software; you can redistribute it and/or modify
   9 it under the terms of the GNU General Public License as published by
  10 the Free Software Foundation; either version 2, or (at your option)
  11 any later version.
  12
  13 GNU CC is distributed in the hope that it will be useful,
  14 but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with GNU CC; see the file COPYING.  If not, write to
  20 the Free Software Foundation, 59 Temple Place - Suite 330,
  21 Boston, MA 02111-1307, USA.  */
  22
  23 #include "function.h"
  24 #include "hashtab.h"
  25 #include "splay-tree.h"
  26 #include "varray.h"
  27
  28 #ifndef GCC_CP_TREE_H
  29 #define GCC_CP_TREE_H
  30
  31 #ifndef __GNUC__
  32 #error "You should be using 'make bootstrap' -- see installation instructions"
  33 #endif
  34
  35 #include "c-common.h"
  36
  37 struct diagnostic_context;
  38
  39 /* Usage of TREE_LANG_FLAG_?:
  40    0: BINFO_MARKED (BINFO nodes).
  41       IDENTIFIER_MARKED (IDENTIFIER_NODEs)
  42       NEW_EXPR_USE_GLOBAL (in NEW_EXPR).
  43       DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR).
  44       LOOKUP_EXPR_GLOBAL (in LOOKUP_EXPR).
  45       TREE_INDIRECT_USING (in NAMESPACE_DECL).
  46       LOCAL_BINDING_P (in CPLUS_BINDING)
  47       ICS_USER_FLAG (in _CONV)
  48       CLEANUP_P (in TRY_BLOCK)
  49       AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR)
  50       BV_USE_VCALL_INDEX_P (in the BINFO_VIRTUALS TREE_LIST)
  51       PTRMEM_OK_P (in ADDR_EXPR, OFFSET_REF)
  52       PARMLIST_ELLIPSIS_P (in PARMLIST)
  53    1: IDENTIFIER_VIRTUAL_P.
  54       TI_PENDING_TEMPLATE_FLAG.
  55       TEMPLATE_PARMS_FOR_INLINE.
  56       DELETE_EXPR_USE_VEC (in DELETE_EXPR).
  57       (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out).
  58       TYPE_BASE_CONVS_MAY_REQUIRE_CODE_P (in _TYPE).
  59       INHERITED_VALUE_BINDING_P (in CPLUS_BINDING)
  60       BASELINK_P (in TREE_LIST)
  61       ICS_ELLIPSIS_FLAG (in _CONV)
  62       BINFO_ACCESS (in BINFO)
  63    2: IDENTIFIER_OPNAME_P.
  64       TYPE_POLYMORHPIC_P (in _TYPE)
  65       ICS_THIS_FLAG (in _CONV)
  66       BINDING_HAS_LEVEL_P (in CPLUS_BINDING)
  67       BINFO_LOST_PRIMARY_P (in BINFO)
  68       TREE_PARMLIST (in TREE_LIST)
  69    3: TYPE_USES_VIRTUAL_BASECLASSES (in a class TYPE).
  70       BINFO_VTABLE_PATH_MARKED.
  71       BINFO_PUSHDECLS_MARKED.
  72       (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out).
  73       ICS_BAD_FLAG (in _CONV)
  74       FN_TRY_BLOCK_P (in TRY_BLOCK)
  75       IDENTIFIER_CTOR_OR_DTOR_P (in IDENTIFIER_NODE)
  76    4: BINFO_NEW_VTABLE_MARKED.
  77       TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR,
  78           or FIELD_DECL).
  79       NEED_TEMPORARY_P (in REF_BIND, BASE_CONV)
  80       IDENTIFIER_TYPENAME_P (in IDENTIFIER_NODE)
  81    5: C_IS_RESERVED_WORD (in IDENTIFIER_NODE)
  82    6: BINFO_ACCESS (in BINFO)
  83
  84    Usage of TYPE_LANG_FLAG_?:
  85    0: C_TYPE_FIELDS_READONLY (in RECORD_TYPE or UNION_TYPE).
  86    1: TYPE_HAS_CONSTRUCTOR.
  87    2: TYPE_HAS_DESTRUCTOR.
  88    3: TYPE_FOR_JAVA.
  89    4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR
  90    5: IS_AGGR_TYPE.
  91    6: TYPE_BUILT_IN.
  92
  93    Usage of DECL_LANG_FLAG_?:
  94    0: DECL_ERROR_REPORTED (in VAR_DECL).
  95       DECL_TEMPLATE_PARM_P (in PARM_DECL, CONST_DECL, TYPE_DECL, or TEMPLATE_DECL)
  96       DECL_LOCAL_FUNCTION_P (in FUNCTION_DECL)
  97       DECL_MUTABLE_P (in FIELD_DECL)
  98    1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL).
  99       DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL)
 100       DECL_C_BITFIELD (in FIELD_DECL)
 101    2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL).
 102       DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL)
 103    3: DECL_IN_AGGR_P.
 104    4: DECL_C_BIT_FIELD
 105    5: DECL_INTERFACE_KNOWN.
 106    6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL).
 107    7: DECL_DEAD_FOR_LOCAL (in VAR_DECL).
 108       DECL_THUNK_P (in a member FUNCTION_DECL)
 109
 110    Usage of language-independent fields in a language-dependent manner:
 111
 112    TREE_USED
 113      This field is BINFO_INDIRECT_PRIMARY_P in a BINFO.
 114
 115    TYPE_ALIAS_SET
 116      This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so
 117      forth as a substitute for the mark bits provided in `lang_type'.
 118      At present, only the six low-order bits are used.
 119
 120    TYPE_BINFO
 121      For an ENUMERAL_TYPE, this is ENUM_TEMPLATE_INFO.
 122      For a FUNCTION_TYPE or METHOD_TYPE, this is TYPE_RAISES_EXCEPTIONS
 123
 124   BINFO_VIRTUALS
 125      For a binfo, this is a TREE_LIST.  The BV_DELTA of each node
 126      gives the amount by which to adjust the `this' pointer when
 127      calling the function.  If the method is an overriden version of a
 128      base class method, then it is assumed that, prior to adjustment,
 129      the this pointer points to an object of the base class.
 130
 131      The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable
 132      index of the vcall offset for this entry.  If
 133      BV_USE_VCALL_INDEX_P then the corresponding vtable entry should
 134      use a virtual thunk, as opposed to an ordinary thunk.
 135
 136      The BV_FN is the declaration for the virtual function itself.
 137
 138    BINFO_VTABLE
 139      This is an expression with POINTER_TYPE that gives the value
 140      to which the vptr should be initialized.  Use get_vtbl_decl_for_binfo
 141      to extract the VAR_DECL for the complete vtable.
 142
 143    DECL_ARGUMENTS
 144      For a VAR_DECL this is DECL_ANON_UNION_ELEMS.
 145
 146    DECL_VINDEX
 147      This field is NULL for a non-virtual function.  For a virtual
 148      function, it is eventually set to an INTEGER_CST indicating the
 149      index in the vtable at which this function can be found.  When
 150      a virtual function is declared, but before it is known what
 151      function is overriden, this field is the error_mark_node.
 152
 153      Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is
 154      the virtual function this one overrides, and whose TREE_CHAIN is
 155      the old DECL_VINDEX.  */
 156
 157 /* Language-specific tree checkers. */
 158
 159 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
 160
 161 #define VAR_OR_FUNCTION_DECL_CHECK(NODE)                        \
 162 ({  const tree __t = (NODE);                                    \
 163     enum tree_code const __c = TREE_CODE(__t);                  \
 164     if (__c != VAR_DECL && __c != FUNCTION_DECL)                \
 165       tree_check_failed (__t, VAR_DECL, __FILE__, __LINE__,     \
 166                          __FUNCTION__);                         \
 167     __t; })
 168
 169 #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE)                   \
 170 ({  const tree __t = (NODE);                                    \
 171     enum tree_code const __c = TREE_CODE(__t);                  \
 172     if (__c != VAR_DECL                                         \
 173         && __c != FUNCTION_DECL                                 \
 174         && __c != PARM_DECL)                                    \
 175       tree_check_failed (__t, VAR_DECL, __FILE__, __LINE__,     \
 176                          __FUNCTION__);                         \
 177     __t; })
 178
 179 #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE)             \
 180 ({  const tree __t = (NODE);                                    \
 181     enum tree_code const __c = TREE_CODE(__t);                  \
 182     if (__c != VAR_DECL                                         \
 183         && __c != FUNCTION_DECL                                 \
 184         && __c != TYPE_DECL                                     \
 185         && __c != TEMPLATE_DECL)                                \
 186       tree_check_failed (__t, VAR_DECL, __FILE__, __LINE__,     \
 187                          __FUNCTION__);                         \
 188     __t; })
 189
 190 #define RECORD_OR_UNION_TYPE_CHECK(NODE)                        \
 191 ({  const tree __t = (NODE);                                    \
 192     enum tree_code const __c = TREE_CODE(__t);                  \
 193     if (__c != RECORD_TYPE && __c != UNION_TYPE)                \
 194       tree_check_failed (__t, RECORD_TYPE, __FILE__, __LINE__,  \
 195                          __FUNCTION__);                         \
 196     __t; })
 197
 198 #define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE)           \
 199 ({  const tree __t = (NODE);                                    \
 200     enum tree_code const __c = TREE_CODE(__t);                  \
 201     if (__c != BOUND_TEMPLATE_TEMPLATE_PARM)                    \
 202       tree_check_failed (__t, BOUND_TEMPLATE_TEMPLATE_PARM,     \
 203                          __FILE__, __LINE__, __FUNCTION__);     \
 204     __t; })
 205
 206 #else /* not ENABLE_TREE_CHECKING, or not gcc */
 207
 208 #define VAR_OR_FUNCTION_DECL_CHECK(NODE)                (NODE)
 209 #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE)           (NODE)
 210 #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE)     (NODE)
 211 #define RECORD_OR_UNION_TYPE_CHECK(NODE)                (NODE)
 212 #define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE)   (NODE)
 213
 214 #endif
 215
 216 \f
 217 /* ABI control.  */
 218
 219 /* Nonzero to use __cxa_atexit, rather than atexit, to register
 220    destructors for local statics and global objects.  */
 221
 222 extern int flag_use_cxa_atexit;
 223
 224 /* Nonzero means generate 'rtti' that give run-time type information.  */
 225
 226 extern int flag_rtti;
 227
 228 /* Nonzero if we want to support huge (> 2^(sizeof(short)*8-1) bytes)
 229    objects.  */
 230
 231 extern int flag_huge_objects;
 232
 233 \f
 234 /* Language-dependent contents of an identifier.  */
 235
 236 struct lang_identifier GTY(())
 237 {
 238   struct c_common_identifier c_common;
 239   tree namespace_bindings;
 240   tree bindings;
 241   tree class_value;
 242   tree class_template_info;
 243   struct lang_id2 *x;
 244 };
 245
 246 /* In an IDENTIFIER_NODE, nonzero if this identifier is actually a
 247    keyword.  C_RID_CODE (node) is then the RID_* value of the keyword,
 248    and C_RID_YYCODE is the token number wanted by Yacc.  */
 249
 250 #define C_IS_RESERVED_WORD(ID) TREE_LANG_FLAG_5 (ID)
 251
 252 extern const short rid_to_yy[RID_MAX];
 253 #define C_RID_YYCODE(ID) rid_to_yy[C_RID_CODE (ID)]
 254
 255 #define LANG_IDENTIFIER_CAST(NODE) \
 256         ((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE))
 257
 258 struct lang_id2 GTY(())
 259 {
 260   tree label_value;
 261   tree implicit_decl;
 262   tree error_locus;
 263 };
 264
 265 typedef struct flagged_type_tree_s GTY(())
 266 {
 267   tree t;
 268   int new_type_flag;
 269   tree lookups;
 270 } flagged_type_tree;
 271
 272 typedef struct template_parm_index_s GTY(())
 273 {
 274   struct tree_common common;
 275   HOST_WIDE_INT index;
 276   HOST_WIDE_INT level;
 277   HOST_WIDE_INT orig_level;
 278   tree decl;
 279 } template_parm_index;
 280
 281 struct ptrmem_cst GTY(())
 282 {
 283   struct tree_common common;
 284   /* This isn't used, but the middle-end expects all constants to have
 285      this field.  */
 286   rtx rtl;
 287   tree member;
 288 };
 289 typedef struct ptrmem_cst * ptrmem_cst_t;
 290
 291 /* Nonzero if this binding is for a local scope, as opposed to a class
 292    or namespace scope.  */
 293 #define LOCAL_BINDING_P(NODE) TREE_LANG_FLAG_0 (NODE)
 294
 295 /* Nonzero if BINDING_VALUE is from a base class of the class which is
 296    currently being defined.  */
 297 #define INHERITED_VALUE_BINDING_P(NODE) TREE_LANG_FLAG_1 (NODE)
 298
 299 /* For a binding between a name and an entity at a non-local scope,
 300    defines the scope where the binding is declared.  (Either a class
 301    _TYPE node, or a NAMESPACE_DECL.)  This macro should be used only
 302    for namespace-level bindings; on the IDENTIFIER_BINDING list
 303    BINDING_LEVEL is used instead.  */
 304 #define BINDING_SCOPE(NODE) \
 305   (((struct tree_binding*)CPLUS_BINDING_CHECK (NODE))->scope.scope)
 306
 307 /* Nonzero if NODE has BINDING_LEVEL, rather than BINDING_SCOPE.  */
 308 #define BINDING_HAS_LEVEL_P(NODE) TREE_LANG_FLAG_2 (NODE)
 309
 310 /* This is the declaration bound to the name. Possible values:
 311    variable, overloaded function, namespace, template, enumerator.  */
 312 #define BINDING_VALUE(NODE) \
 313   (((struct tree_binding*)CPLUS_BINDING_CHECK (NODE))->value)
 314
 315 /* If name is bound to a type, this is the type (struct, union, enum).  */
 316 #define BINDING_TYPE(NODE)     TREE_TYPE (NODE)
 317
 318 #define IDENTIFIER_GLOBAL_VALUE(NODE) \
 319   namespace_binding ((NODE), global_namespace)
 320 #define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \
 321   set_namespace_binding ((NODE), global_namespace, (VAL))
 322 #define IDENTIFIER_NAMESPACE_VALUE(NODE) \
 323   namespace_binding ((NODE), current_namespace)
 324 #define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \
 325   set_namespace_binding ((NODE), current_namespace, (VAL))
 326
 327 #define CLEANUP_P(NODE)         TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE))
 328
 329 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual
 330    sense of `same'.  */
 331 #define same_type_p(TYPE1, TYPE2) \
 332   comptypes ((TYPE1), (TYPE2), COMPARE_STRICT)
 333
 334 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, ignoring
 335    top-level qualifiers.  */
 336 #define same_type_ignoring_top_level_qualifiers_p(TYPE1, TYPE2) \
 337   same_type_p (TYPE_MAIN_VARIANT (TYPE1), TYPE_MAIN_VARIANT (TYPE2))
 338
 339 /* Non-zero if we are presently building a statement tree, rather
 340    than expanding each statement as we encounter it.  */
 341 #define building_stmt_tree() (last_tree != NULL_TREE)
 342
 343 /* Returns non-zero iff NODE is a declaration for the global function
 344    `main'.  */
 345 #define DECL_MAIN_P(NODE)                               \
 346    (DECL_EXTERN_C_FUNCTION_P (NODE)                     \
 347     && DECL_NAME (NODE) != NULL_TREE                    \
 348     && MAIN_NAME_P (DECL_NAME (NODE)))
 349
 350
 351 struct tree_binding GTY(())
 352 {
 353   struct tree_common common;
 354   union tree_binding_u {
 355     tree GTY ((tag ("0"))) scope;
 356     struct cp_binding_level * GTY ((tag ("1"))) level;
 357   } GTY ((desc ("BINDING_HAS_LEVEL_P ((tree)&%0)"))) scope;
 358   tree value;
 359 };
 360
 361 /* The overloaded FUNCTION_DECL. */
 362 #define OVL_FUNCTION(NODE) \
 363   (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function)
 364 #define OVL_CHAIN(NODE)      TREE_CHAIN (NODE)
 365 /* Polymorphic access to FUNCTION and CHAIN. */
 366 #define OVL_CURRENT(NODE)     \
 367   ((TREE_CODE (NODE) == OVERLOAD) ? OVL_FUNCTION (NODE) : (NODE))
 368 #define OVL_NEXT(NODE)        \
 369   ((TREE_CODE (NODE) == OVERLOAD) ? TREE_CHAIN (NODE) : NULL_TREE)
 370 /* If set, this was imported in a using declaration.
 371    This is not to confuse with being used somewhere, which
 372    is not important for this node. */
 373 #define OVL_USED(NODE)        TREE_USED (NODE)
 374
 375 struct tree_overload GTY(())
 376 {
 377   struct tree_common common;
 378   tree function;
 379 };
 380
 381 /* A `baselink' is a TREE_LIST whose TREE_PURPOSE is a BINFO
 382    indicating a particular base class, and whose TREE_VALUE is a
 383    (possibly overloaded) function from that base class.  */
 384 #define BASELINK_P(NODE) \
 385   (TREE_CODE (NODE) == TREE_LIST && TREE_LANG_FLAG_1 (NODE))
 386 #define SET_BASELINK_P(NODE) \
 387   (TREE_LANG_FLAG_1 (NODE) = 1)
 388 /* The functions referred to by the BASELINK; either a FUNCTION_DECL
 389    or an OVERLOAD.  */
 390 #define BASELINK_FUNCTIONS(NODE) \
 391   (TREE_VALUE (NODE))
 392
 393 #define WRAPPER_ZC(NODE) (((struct tree_wrapper*)WRAPPER_CHECK (NODE))->z_c)
 394
 395 struct tree_wrapper GTY(())
 396 {
 397   struct tree_common common;
 398   struct z_candidate *z_c;
 399 };
 400
 401 #define SRCLOC_FILE(NODE) (((struct tree_srcloc*)SRCLOC_CHECK (NODE))->filename)
 402 #define SRCLOC_LINE(NODE) (((struct tree_srcloc*)SRCLOC_CHECK (NODE))->linenum)
 403 struct tree_srcloc GTY(())
 404 {
 405   struct tree_common common;
 406   const char *filename;
 407   int linenum;
 408 };
 409
 410 /* Macros for access to language-specific slots in an identifier.  */
 411
 412 #define IDENTIFIER_NAMESPACE_BINDINGS(NODE)     \
 413   (LANG_IDENTIFIER_CAST (NODE)->namespace_bindings)
 414 #define IDENTIFIER_TEMPLATE(NODE)       \
 415   (LANG_IDENTIFIER_CAST (NODE)->class_template_info)
 416
 417 /* The IDENTIFIER_BINDING is the innermost CPLUS_BINDING for the
 418     identifier.  It's TREE_CHAIN is the next outermost binding.  Each
 419     BINDING_VALUE is a DECL for the associated declaration.  Thus,
 420     name lookup consists simply of pulling off the node at the front
 421     of the list (modulo oddities for looking up the names of types,
 422     and such.)  You can use BINDING_SCOPE or BINDING_LEVEL to
 423     determine the scope that bound the name.  */
 424 #define IDENTIFIER_BINDING(NODE) \
 425   (LANG_IDENTIFIER_CAST (NODE)->bindings)
 426
 427 /* The IDENTIFIER_VALUE is the value of the IDENTIFIER_BINDING, or
 428    NULL_TREE if there is no binding.  */
 429 #define IDENTIFIER_VALUE(NODE)                  \
 430   (IDENTIFIER_BINDING (NODE)                    \
 431    ? BINDING_VALUE (IDENTIFIER_BINDING (NODE))  \
 432    : NULL_TREE)
 433
 434 /* If IDENTIFIER_CLASS_VALUE is set, then NODE is bound in the current
 435    class, and IDENTIFIER_CLASS_VALUE is the value binding.  This is
 436    just a pointer to the BINDING_VALUE of one of the bindings in the
 437    IDENTIFIER_BINDINGs list, so any time that this is non-NULL so is
 438    IDENTIFIER_BINDING.  */
 439 #define IDENTIFIER_CLASS_VALUE(NODE) \
 440   (LANG_IDENTIFIER_CAST (NODE)->class_value)
 441
 442 /* TREE_TYPE only indicates on local and class scope the current
 443    type. For namespace scope, the presence of a type in any namespace
 444    is indicated with global_type_node, and the real type behind must
 445    be found through lookup. */
 446 #define IDENTIFIER_TYPE_VALUE(NODE) identifier_type_value (NODE)
 447 #define REAL_IDENTIFIER_TYPE_VALUE(NODE) TREE_TYPE (NODE)
 448 #define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = (TYPE))
 449 #define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0)
 450
 451 #define LANG_ID_FIELD(NAME, NODE)                       \
 452   (LANG_IDENTIFIER_CAST (NODE)->x                       \
 453    ? LANG_IDENTIFIER_CAST (NODE)->x->NAME : 0)
 454
 455 #define SET_LANG_ID(NODE, VALUE, NAME)                                       \
 456   (LANG_IDENTIFIER_CAST (NODE)->x == 0                                       \
 457    ? LANG_IDENTIFIER_CAST (NODE)->x                                          \
 458       = (struct lang_id2 *)ggc_alloc_cleared (sizeof (struct lang_id2)) : 0, \
 459    LANG_IDENTIFIER_CAST (NODE)->x->NAME = (VALUE))
 460
 461 #define IDENTIFIER_LABEL_VALUE(NODE) \
 462   LANG_ID_FIELD (label_value, NODE)
 463 #define SET_IDENTIFIER_LABEL_VALUE(NODE, VALUE)   \
 464   SET_LANG_ID (NODE, VALUE, label_value)
 465
 466 #define IDENTIFIER_IMPLICIT_DECL(NODE) \
 467   LANG_ID_FIELD (implicit_decl, NODE)
 468 #define SET_IDENTIFIER_IMPLICIT_DECL(NODE, VALUE) \
 469   SET_LANG_ID (NODE, VALUE, implicit_decl)
 470
 471 #define IDENTIFIER_ERROR_LOCUS(NODE) \
 472   LANG_ID_FIELD (error_locus, NODE)
 473 #define SET_IDENTIFIER_ERROR_LOCUS(NODE, VALUE) \
 474   SET_LANG_ID (NODE, VALUE, error_locus)
 475
 476 /* Nonzero if this identifier is used as a virtual function name somewhere
 477    (optimizes searches).  */
 478 #define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1 (NODE)
 479
 480 /* Nonzero if this identifier is the prefix for a mangled C++ operator
 481    name.  */
 482 #define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2 (NODE)
 483
 484 /* Nonzero if this identifier is the name of a type-conversion
 485    operator.  */
 486 #define IDENTIFIER_TYPENAME_P(NODE) \
 487   TREE_LANG_FLAG_4 (NODE)
 488
 489 /* Nonzero if this identifier is the name of a constructor or
 490    destructor.  */
 491 #define IDENTIFIER_CTOR_OR_DTOR_P(NODE) \
 492   TREE_LANG_FLAG_3 (NODE)
 493
 494 /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only.  */
 495 #define C_TYPE_FIELDS_READONLY(TYPE) TYPE_LANG_FLAG_0 (TYPE)
 496
 497 /* Store a value in that field.  */
 498 #define C_SET_EXP_ORIGINAL_CODE(EXP, CODE) \
 499   (TREE_COMPLEXITY (EXP) = (int)(CODE))
 500
 501 enum cp_tree_node_structure_enum {
 502   TS_CP_COMMON,
 503   TS_CP_GENERIC,
 504   TS_CP_IDENTIFIER,
 505   TS_CP_TPI,
 506   TS_CP_PTRMEM,
 507   TS_CP_BINDING,
 508   TS_CP_OVERLOAD,
 509   TS_CP_WRAPPER,
 510   TS_CP_SRCLOC,
 511   LAST_TS_CP_ENUM
 512 };
 513
 514 /* The resulting tree type.  */
 515 union lang_tree_node GTY((desc ("cp_tree_node_structure (&%h)")))
 516 {
 517   struct tree_common GTY ((tag ("TS_CP_COMMON"))) common;
 518   union tree_node GTY ((tag ("TS_CP_GENERIC"),
 519                         desc ("tree_node_structure (&%h)"))) generic;
 520   struct template_parm_index_s GTY ((tag ("TS_CP_TPI"))) tpi;
 521   struct ptrmem_cst GTY ((tag ("TS_CP_PTRMEM"))) ptrmem;
 522   struct tree_binding GTY ((tag ("TS_CP_BINDING"))) binding;
 523   struct tree_overload GTY ((tag ("TS_CP_OVERLOAD"))) overload;
 524   struct tree_wrapper GTY ((tag ("TS_CP_WRAPPER"))) wrapper;
 525   struct tree_srcloc GTY ((tag ("TS_CP_SRCLOC"))) srcloc;
 526   struct lang_identifier GTY ((tag ("TS_CP_IDENTIFIER"))) identifier;
 527 };
 528
 529 \f
 530 enum cp_tree_index
 531 {
 532     CPTI_JAVA_BYTE_TYPE,
 533     CPTI_JAVA_SHORT_TYPE,
 534     CPTI_JAVA_INT_TYPE,
 535     CPTI_JAVA_LONG_TYPE,
 536     CPTI_JAVA_FLOAT_TYPE,
 537     CPTI_JAVA_DOUBLE_TYPE,
 538     CPTI_JAVA_CHAR_TYPE,
 539     CPTI_JAVA_BOOLEAN_TYPE,
 540
 541     CPTI_WCHAR_DECL,
 542     CPTI_VTABLE_ENTRY_TYPE,
 543     CPTI_DELTA_TYPE,
 544     CPTI_VTABLE_INDEX_TYPE,
 545     CPTI_CLEANUP_TYPE,
 546     CPTI_VTT_PARM_TYPE,
 547
 548     CPTI_TI_DESC_TYPE,
 549     CPTI_BLTN_DESC_TYPE,
 550     CPTI_PTR_DESC_TYPE,
 551     CPTI_ARY_DESC_TYPE,
 552     CPTI_FUNC_DESC_TYPE,
 553     CPTI_ENUM_DESC_TYPE,
 554     CPTI_CLASS_DESC_TYPE,
 555     CPTI_SI_CLASS_DESC_TYPE,
 556     CPTI_VMI_CLASS_DESC_TYPE,
 557     CPTI_PTM_DESC_TYPE,
 558     CPTI_BASE_DESC_TYPE,
 559
 560     CPTI_CLASS_TYPE,
 561     CPTI_RECORD_TYPE,
 562     CPTI_UNION_TYPE,
 563     CPTI_ENUM_TYPE,
 564     CPTI_UNKNOWN_TYPE,
 565     CPTI_VTBL_TYPE,
 566     CPTI_VTBL_PTR_TYPE,
 567     CPTI_STD,
 568     CPTI_ABI,
 569     CPTI_TYPE_INFO_TYPE,
 570     CPTI_TYPE_INFO_PTR_TYPE,
 571     CPTI_ABORT_FNDECL,
 572     CPTI_GLOBAL_DELETE_FNDECL,
 573     CPTI_AGGR_TAG,
 574
 575     CPTI_ACCESS_DEFAULT,
 576     CPTI_ACCESS_PUBLIC,
 577     CPTI_ACCESS_PROTECTED,
 578     CPTI_ACCESS_PRIVATE,
 579     CPTI_ACCESS_DEFAULT_VIRTUAL,
 580     CPTI_ACCESS_PUBLIC_VIRTUAL,
 581     CPTI_ACCESS_PROTECTED_VIRTUAL,
 582     CPTI_ACCESS_PRIVATE_VIRTUAL,
 583
 584     CPTI_CTOR_IDENTIFIER,
 585     CPTI_COMPLETE_CTOR_IDENTIFIER,
 586     CPTI_BASE_CTOR_IDENTIFIER,
 587     CPTI_DTOR_IDENTIFIER,
 588     CPTI_COMPLETE_DTOR_IDENTIFIER,
 589     CPTI_BASE_DTOR_IDENTIFIER,
 590     CPTI_DELETING_DTOR_IDENTIFIER,
 591     CPTI_DELTA_IDENTIFIER,
 592     CPTI_IN_CHARGE_IDENTIFIER,
 593     CPTI_VTT_PARM_IDENTIFIER,
 594     CPTI_NELTS_IDENTIFIER,
 595     CPTI_THIS_IDENTIFIER,
 596     CPTI_PFN_IDENTIFIER,
 597     CPTI_VPTR_IDENTIFIER,
 598     CPTI_STD_IDENTIFIER,
 599
 600     CPTI_LANG_NAME_C,
 601     CPTI_LANG_NAME_CPLUSPLUS,
 602     CPTI_LANG_NAME_JAVA,
 603
 604     CPTI_EMPTY_EXCEPT_SPEC,
 605     CPTI_NULL,
 606     CPTI_JCLASS,
 607     CPTI_TERMINATE,
 608     CPTI_CALL_UNEXPECTED,
 609     CPTI_ATEXIT,
 610     CPTI_DSO_HANDLE,
 611     CPTI_DCAST,
 612
 613     CPTI_MAX
 614 };
 615
 616 extern GTY(()) tree cp_global_trees[CPTI_MAX];
 617
 618 #define java_byte_type_node             cp_global_trees[CPTI_JAVA_BYTE_TYPE]
 619 #define java_short_type_node            cp_global_trees[CPTI_JAVA_SHORT_TYPE]
 620 #define java_int_type_node              cp_global_trees[CPTI_JAVA_INT_TYPE]
 621 #define java_long_type_node             cp_global_trees[CPTI_JAVA_LONG_TYPE]
 622 #define java_float_type_node            cp_global_trees[CPTI_JAVA_FLOAT_TYPE]
 623 #define java_double_type_node           cp_global_trees[CPTI_JAVA_DOUBLE_TYPE]
 624 #define java_char_type_node             cp_global_trees[CPTI_JAVA_CHAR_TYPE]
 625 #define java_boolean_type_node          cp_global_trees[CPTI_JAVA_BOOLEAN_TYPE]
 626
 627 #define wchar_decl_node                 cp_global_trees[CPTI_WCHAR_DECL]
 628 #define vtable_entry_type               cp_global_trees[CPTI_VTABLE_ENTRY_TYPE]
 629 /* The type used to represent an offset by which to adjust the `this'
 630    pointer in pointer-to-member types.  */
 631 #define delta_type_node                 cp_global_trees[CPTI_DELTA_TYPE]
 632 /* The type used to represent an index into the vtable.  */
 633 #define vtable_index_type               cp_global_trees[CPTI_VTABLE_INDEX_TYPE]
 634
 635 #define ti_desc_type_node               cp_global_trees[CPTI_TI_DESC_TYPE]
 636 #define bltn_desc_type_node             cp_global_trees[CPTI_BLTN_DESC_TYPE]
 637 #define ptr_desc_type_node              cp_global_trees[CPTI_PTR_DESC_TYPE]
 638 #define ary_desc_type_node              cp_global_trees[CPTI_ARY_DESC_TYPE]
 639 #define func_desc_type_node             cp_global_trees[CPTI_FUNC_DESC_TYPE]
 640 #define enum_desc_type_node             cp_global_trees[CPTI_ENUM_DESC_TYPE]
 641 #define class_desc_type_node            cp_global_trees[CPTI_CLASS_DESC_TYPE]
 642 #define si_class_desc_type_node         cp_global_trees[CPTI_SI_CLASS_DESC_TYPE]
 643 #define vmi_class_desc_type_node        cp_global_trees[CPTI_VMI_CLASS_DESC_TYPE]
 644 #define ptm_desc_type_node              cp_global_trees[CPTI_PTM_DESC_TYPE]
 645 #define base_desc_type_node             cp_global_trees[CPTI_BASE_DESC_TYPE]
 646
 647 #define class_type_node                 cp_global_trees[CPTI_CLASS_TYPE]
 648 #define record_type_node                cp_global_trees[CPTI_RECORD_TYPE]
 649 #define union_type_node                 cp_global_trees[CPTI_UNION_TYPE]
 650 #define enum_type_node                  cp_global_trees[CPTI_ENUM_TYPE]
 651 #define unknown_type_node               cp_global_trees[CPTI_UNKNOWN_TYPE]
 652 #define vtbl_type_node                  cp_global_trees[CPTI_VTBL_TYPE]
 653 #define vtbl_ptr_type_node              cp_global_trees[CPTI_VTBL_PTR_TYPE]
 654 #define std_node                        cp_global_trees[CPTI_STD]
 655 #define abi_node                        cp_global_trees[CPTI_ABI]
 656 #define type_info_type_node             cp_global_trees[CPTI_TYPE_INFO_TYPE]
 657 #define type_info_ptr_type              cp_global_trees[CPTI_TYPE_INFO_PTR_TYPE]
 658 #define abort_fndecl                    cp_global_trees[CPTI_ABORT_FNDECL]
 659 #define global_delete_fndecl            cp_global_trees[CPTI_GLOBAL_DELETE_FNDECL]
 660 #define current_aggr                    cp_global_trees[CPTI_AGGR_TAG]
 661
 662 /* Define the sets of attributes that member functions and baseclasses
 663    can have.  These are sensible combinations of {public,private,protected}
 664    cross {virtual,non-virtual}.  */
 665
 666 #define access_default_node             cp_global_trees[CPTI_ACCESS_DEFAULT]
 667 #define access_public_node              cp_global_trees[CPTI_ACCESS_PUBLIC]
 668 #define access_protected_node           cp_global_trees[CPTI_ACCESS_PROTECTED]
 669 #define access_private_node             cp_global_trees[CPTI_ACCESS_PRIVATE]
 670 #define access_default_virtual_node     cp_global_trees[CPTI_ACCESS_DEFAULT_VIRTUAL]
 671 #define access_public_virtual_node      cp_global_trees[CPTI_ACCESS_PUBLIC_VIRTUAL]
 672 #define access_protected_virtual_node   cp_global_trees[CPTI_ACCESS_PROTECTED_VIRTUAL]
 673 #define access_private_virtual_node     cp_global_trees[CPTI_ACCESS_PRIVATE_VIRTUAL]
 674
 675 /* We cache these tree nodes so as to call get_identifier less
 676    frequently.  */
 677
 678 /* The name of a constructor that takes an in-charge parameter to
 679    decide whether or not to construct virtual base classes.  */
 680 #define ctor_identifier                 cp_global_trees[CPTI_CTOR_IDENTIFIER]
 681 /* The name of a constructor that constructs virtual base classes.  */
 682 #define complete_ctor_identifier        cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER]
 683 /* The name of a constructor that does not construct virtual base classes.  */
 684 #define base_ctor_identifier            cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER]
 685 /* The name of a destructor that takes an in-charge parameter to
 686    decide whether or not to destroy virtual base classes and whether
 687    or not to delete the object.  */
 688 #define dtor_identifier                 cp_global_trees[CPTI_DTOR_IDENTIFIER]
 689 /* The name of a destructor that destroys virtual base classes.  */
 690 #define complete_dtor_identifier        cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER]
 691 /* The name of a destructor that does not destroy virtual base
 692    classes.  */
 693 #define base_dtor_identifier            cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER]
 694 /* The name of a destructor that destroys virtual base classes, and
 695    then deletes the entire object.  */
 696 #define deleting_dtor_identifier        cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER]
 697 #define delta_identifier                cp_global_trees[CPTI_DELTA_IDENTIFIER]
 698 #define in_charge_identifier            cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER]
 699 /* The name of the parameter that contains a pointer to the VTT to use
 700    for this subobject constructor or destructor.  */
 701 #define vtt_parm_identifier             cp_global_trees[CPTI_VTT_PARM_IDENTIFIER]
 702 #define nelts_identifier                cp_global_trees[CPTI_NELTS_IDENTIFIER]
 703 #define this_identifier                 cp_global_trees[CPTI_THIS_IDENTIFIER]
 704 #define pfn_identifier                  cp_global_trees[CPTI_PFN_IDENTIFIER]
 705 #define vptr_identifier                 cp_global_trees[CPTI_VPTR_IDENTIFIER]
 706 /* The name of the std namespace.  */
 707 #define std_identifier                  cp_global_trees[CPTI_STD_IDENTIFIER]
 708 #define lang_name_c                     cp_global_trees[CPTI_LANG_NAME_C]
 709 #define lang_name_cplusplus             cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS]
 710 #define lang_name_java                  cp_global_trees[CPTI_LANG_NAME_JAVA]
 711
 712 /* Exception specifier used for throw().  */
 713 #define empty_except_spec               cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC]
 714
 715 /* The node for `__null'.  */
 716 #define null_node                       cp_global_trees[CPTI_NULL]
 717
 718 /* If non-NULL, a POINTER_TYPE equivalent to (java::lang::Class*). */
 719 #define jclass_node                     cp_global_trees[CPTI_JCLASS]
 720
 721 /* The declaration for `std::terminate'.  */
 722 #define terminate_node                  cp_global_trees[CPTI_TERMINATE]
 723
 724 /* The declaration for "__cxa_call_unexpected".  */
 725 #define call_unexpected_node            cp_global_trees[CPTI_CALL_UNEXPECTED]
 726
 727 /* A pointer to `std::atexit'.  */
 728 #define atexit_node                     cp_global_trees[CPTI_ATEXIT]
 729
 730 /* A pointer to `__dso_handle'.  */
 731 #define dso_handle_node                 cp_global_trees[CPTI_DSO_HANDLE]
 732
 733 /* The declaration of the dynamic_cast runtime.  */
 734 #define dynamic_cast_node               cp_global_trees[CPTI_DCAST]
 735
 736 /* The type of a destructor.  */
 737 #define cleanup_type                    cp_global_trees[CPTI_CLEANUP_TYPE]
 738
 739 /* The type of the vtt parameter passed to subobject constructors and
 740    destructors.  */
 741 #define vtt_parm_type                   cp_global_trees[CPTI_VTT_PARM_TYPE]
 742
 743 /* Global state.  */
 744
 745 struct saved_scope GTY(())
 746 {
 747   tree old_bindings;
 748   tree old_namespace;
 749   tree decl_ns_list;
 750   tree class_name;
 751   tree class_type;
 752   tree access_specifier;
 753   tree function_decl;
 754   varray_type lang_base;
 755   tree lang_name;
 756   tree template_parms;
 757   tree x_previous_class_type;
 758   tree x_previous_class_values;
 759   tree x_saved_tree;
 760   tree lookups;
 761   tree last_parms;
 762
 763   HOST_WIDE_INT x_processing_template_decl;
 764   int x_processing_specialization;
 765   int x_processing_explicit_instantiation;
 766   int need_pop_function_context;
 767
 768   struct stmt_tree_s x_stmt_tree;
 769
 770   struct cp_binding_level *class_bindings;
 771   struct cp_binding_level *bindings;
 772
 773   struct saved_scope *prev;
 774 };
 775
 776 /* The current open namespace.  */
 777
 778 #define current_namespace scope_chain->old_namespace
 779
 780 /* The stack for namespaces of current declarations. */
 781
 782 #define decl_namespace_list scope_chain->decl_ns_list
 783
 784 /* IDENTIFIER_NODE: name of current class */
 785
 786 #define current_class_name scope_chain->class_name
 787
 788 /* _TYPE: the type of the current class */
 789
 790 #define current_class_type scope_chain->class_type
 791
 792 /* When parsing a class definition, the access specifier most recently
 793    given by the user, or, if no access specifier was given, the
 794    default value appropriate for the kind of class (i.e., struct,
 795    class, or union).  */
 796
 797 #define current_access_specifier scope_chain->access_specifier
 798
 799 /* Pointer to the top of the language name stack.  */
 800
 801 #define current_lang_base scope_chain->lang_base
 802 #define current_lang_name scope_chain->lang_name
 803
 804 /* Parsing a function declarator leaves a list of parameter names
 805    or a chain or parameter decls here.  */
 806
 807 #define current_template_parms scope_chain->template_parms
 808
 809 #define processing_template_decl scope_chain->x_processing_template_decl
 810 #define processing_specialization scope_chain->x_processing_specialization
 811 #define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation
 812
 813 /* _TYPE: the previous type that was a class */
 814
 815 #define previous_class_type scope_chain->x_previous_class_type
 816
 817 /* This is a copy of the class_shadowed list of the previous class
 818    binding contour when at global scope.  It's used to reset
 819    IDENTIFIER_CLASS_VALUEs when entering another class scope (i.e. a
 820    cache miss).  */
 821
 822 #define previous_class_values scope_chain->x_previous_class_values
 823
 824 /* A list of private types mentioned, for deferred access checking.  */
 825
 826 #define type_lookups scope_chain->lookups
 827
 828 extern GTY(()) struct saved_scope *scope_chain;
 829
 830 struct unparsed_text;
 831
 832 /* Global state pertinent to the current function.  */
 833
 834 struct language_function GTY(())
 835 {
 836   struct c_language_function base;
 837
 838   tree x_dtor_label;
 839   tree x_current_class_ptr;
 840   tree x_current_class_ref;
 841   tree x_eh_spec_block;
 842   tree x_in_charge_parm;
 843   tree x_vtt_parm;
 844   tree x_return_value;
 845
 846   int returns_value;
 847   int returns_null;
 848   int returns_abnormally;
 849   int in_function_try_handler;
 850   int x_expanding_p;
 851
 852   struct named_label_use_list *x_named_label_uses;
 853   struct named_label_list *x_named_labels;
 854   struct cp_binding_level *bindings;
 855   varray_type x_local_names;
 856
 857   const char *cannot_inline;
 858   struct unparsed_text *unparsed_inlines;
 859 };
 860
 861 /* The current C++-specific per-function global variables.  */
 862
 863 #define cp_function_chain (cfun->language)
 864
 865 /* In a destructor, the point at which all derived class destroying
 866    has been done, just before any base class destroying will be done.  */
 867
 868 #define dtor_label cp_function_chain->x_dtor_label
 869
 870 /* When we're processing a member function, current_class_ptr is the
 871    PARM_DECL for the `this' pointer.  The current_class_ref is an
 872    expression for `*this'.  */
 873
 874 #define current_class_ptr \
 875   (cfun ? cp_function_chain->x_current_class_ptr : NULL_TREE)
 876 #define current_class_ref \
 877   (cfun ? cp_function_chain->x_current_class_ref : NULL_TREE)
 878
 879 /* The EH_SPEC_BLOCK for the exception-specifiers for the current
 880    function, if any.  */
 881
 882 #define current_eh_spec_block cp_function_chain->x_eh_spec_block
 883
 884 /* The `__in_chrg' parameter for the current function.  Only used for
 885    constructors and destructors.  */
 886
 887 #define current_in_charge_parm cp_function_chain->x_in_charge_parm
 888
 889 /* The `__vtt_parm' parameter for the current function.  Only used for
 890    constructors and destructors.  */
 891
 892 #define current_vtt_parm cp_function_chain->x_vtt_parm
 893
 894 /* Set to 0 at beginning of a function definition, set to 1 if
 895    a return statement that specifies a return value is seen.  */
 896
 897 #define current_function_returns_value cp_function_chain->returns_value
 898
 899 /* Set to 0 at beginning of a function definition, set to 1 if
 900    a return statement with no argument is seen.  */
 901
 902 #define current_function_returns_null cp_function_chain->returns_null
 903
 904 /* Set to 0 at beginning of a function definition, set to 1 if
 905    a call to a noreturn function is seen.  */
 906
 907 #define current_function_returns_abnormally \
 908   cp_function_chain->returns_abnormally
 909
 910 /* Non-zero if we should generate RTL for functions that we process.
 911    When this is zero, we just accumulate tree structure, without
 912    interacting with the back end.  */
 913
 914 #define expanding_p cp_function_chain->x_expanding_p
 915
 916 /* Non-zero if we are in the semantic analysis phase for the current
 917    function.  */
 918
 919 #define doing_semantic_analysis_p() (!expanding_p)
 920
 921 #define in_function_try_handler cp_function_chain->in_function_try_handler
 922
 923 /* Expression always returned from function, or error_mark_node
 924    otherwise, for use by the automatic named return value optimization.  */
 925
 926 #define current_function_return_value \
 927   (cp_function_chain->x_return_value)
 928
 929 extern GTY(()) tree global_namespace;
 930
 931 #define ansi_opname(CODE) \
 932   (operator_name_info[(int) (CODE)].identifier)
 933 #define ansi_assopname(CODE) \
 934   (assignment_operator_name_info[(int) (CODE)].identifier)
 935
 936 /* Nonzero means `$' can be in an identifier.  */
 937
 938 extern int dollars_in_ident;
 939
 940 /* Nonzero means don't recognize the keyword `asm'.  */
 941
 942 extern int flag_no_asm;
 943
 944 /* Nonzero means don't recognize any extended keywords.  */
 945
 946 extern int flag_no_gnu_keywords;
 947
 948 /* Nonzero means recognize the named operators from C++98.  */
 949
 950 extern int flag_operator_names;
 951
 952 /* For environments where you can use GNU binutils (as, ld in particular).  */
 953
 954 extern int flag_gnu_binutils;
 955
 956 /* Nonzero means warn about implicit declarations.  */
 957
 958 extern int warn_implicit;
 959
 960 /* Nonzero means warn when all ctors or dtors are private, and the class
 961    has no friends.  */
 962
 963 extern int warn_ctor_dtor_privacy;
 964
 965 /* Nonzero means warn about deprecated conversion from string constant to
 966    `char *'.  */
 967
 968 extern int warn_write_strings;
 969
 970 /* Nonzero means warn about multiple (redundant) decls for the same single
 971    variable or function.  */
 972
 973 extern int warn_redundant_decls;
 974
 975 /* Warn if initializer is not completely bracketed.  */
 976
 977 extern int warn_missing_braces;
 978
 979 /* Warn about comparison of signed and unsigned values.  */
 980
 981 extern int warn_sign_compare;
 982
 983 /* Warn about testing equality of floating point numbers. */
 984
 985 extern int warn_float_equal;
 986
 987 /* Warn about a subscript that has type char.  */
 988
 989 extern int warn_char_subscripts;
 990
 991 /* Nonzero means warn about pointer casts that can drop a type qualifier
 992    from the pointer target type.  */
 993
 994 extern int warn_cast_qual;
 995
 996 /* Nonzero means warn about non virtual destructors in classes that have
 997    virtual functions.  */
 998
 999 extern int warn_nonvdtor;
1000
1001 /* Non-zero means warn when we convert a pointer to member function
1002    into a pointer to (void or function).  */
1003
1004 extern int warn_pmf2ptr;
1005
1006 /* Nonzero means warn about violation of some Effective C++ style rules.  */
1007
1008 extern int warn_ecpp;
1009
1010 /* Nonzero means warn where overload resolution chooses a promotion from
1011    unsigned to signed over a conversion to an unsigned of the same size.  */
1012
1013 extern int warn_sign_promo;
1014
1015 /* Non-zero means warn when an old-style cast is used.  */
1016
1017 extern int warn_old_style_cast;
1018
1019 /* Non-zero means warn when the compiler will reorder code.  */
1020
1021 extern int warn_reorder;
1022
1023 /* Non-zero means warn about deprecated features.  */
1024
1025 extern int warn_deprecated;
1026
1027 /* Nonzero means to treat bitfields as unsigned unless they say `signed'.  */
1028
1029 extern int flag_signed_bitfields;
1030
1031 /* INTERFACE_ONLY nonzero means that we are in an "interface"
1032    section of the compiler.  INTERFACE_UNKNOWN nonzero means
1033    we cannot trust the value of INTERFACE_ONLY.  If INTERFACE_UNKNOWN
1034    is zero and INTERFACE_ONLY is zero, it means that we are responsible
1035    for exporting definitions that others might need.  */
1036 extern int interface_only, interface_unknown;
1037
1038 /* Nonzero means we should attempt to elide constructors when possible.  */
1039
1040 extern int flag_elide_constructors;
1041
1042 /* Nonzero means that member functions defined in class scope are
1043    inline by default.  */
1044
1045 extern int flag_default_inline;
1046
1047 /* Nonzero means generate separate instantiation control files and juggle
1048    them at link time.  */
1049 extern int flag_use_repository;
1050
1051 /* Nonzero if we want to issue diagnostics that the standard says are not
1052    required.  */
1053 extern int flag_optional_diags;
1054
1055 /* Nonzero means output .vtable_{entry,inherit} for use in doing vtable gc.  */
1056 extern int flag_vtable_gc;
1057
1058 /* Nonzero means make the default pedwarns warnings instead of errors.
1059    The value of this flag is ignored if -pedantic is specified.  */
1060 extern int flag_permissive;
1061
1062 /* Nonzero means to implement standard semantics for exception
1063    specifications, calling unexpected if an exception is thrown that
1064    doesn't match the specification.  Zero means to treat them as
1065    assertions and optimize accordingly, but not check them.  */
1066 extern int flag_enforce_eh_specs;
1067
1068 /* Nonzero if we want to obey access control semantics.  */
1069
1070 extern int flag_access_control;
1071
1072 /* Nonzero if we want to check the return value of new and avoid calling
1073    constructors if it is a null pointer.  */
1074
1075 extern int flag_check_new;
1076
1077 \f
1078 /* C++ language-specific tree codes.  */
1079 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
1080 enum cplus_tree_code {
1081   CP_DUMMY_TREE_CODE = LAST_C_TREE_CODE,
1082 #include "cp-tree.def"
1083   LAST_CPLUS_TREE_CODE
1084 };
1085 #undef DEFTREECODE
1086
1087 enum languages { lang_c, lang_cplusplus, lang_java };
1088
1089 /* Macros to make error reporting functions' lives easier.  */
1090 #define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE)))
1091 #define TYPE_LINKAGE_IDENTIFIER(NODE) \
1092   (TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (NODE)))
1093 #define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
1094 #define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
1095
1096 #define TYPE_ASSEMBLER_NAME_STRING(NODE) \
1097   (IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (TYPE_NAME  (NODE))))
1098 #define TYPE_ASSEMBLER_NAME_LENGTH(NODE) \
1099   (IDENTIFIER_LENGTH (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE))))
1100
1101 /* Nonzero if NODE has no name for linkage purposes.  */
1102 #define TYPE_ANONYMOUS_P(NODE) \
1103   (TAGGED_TYPE_P (NODE) && ANON_AGGRNAME_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
1104
1105 /* The _DECL for this _TYPE.  */
1106 #define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
1107
1108 /* Nonzero if T is a class (or struct or union) type.  Also nonzero
1109    for template type parameters, typename types, and instantiated
1110    template template parameters.  Despite its name,
1111    this macro has nothing to do with the definition of aggregate given
1112    in the standard.  Think of this macro as MAYBE_CLASS_TYPE_P.  */
1113 #define IS_AGGR_TYPE(T)                                 \
1114   (TREE_CODE (T) == TEMPLATE_TYPE_PARM                  \
1115    || TREE_CODE (T) == TYPENAME_TYPE                    \
1116    || TREE_CODE (T) == TYPEOF_TYPE                      \
1117    || TREE_CODE (T) == BOUND_TEMPLATE_TEMPLATE_PARM     \
1118    || TYPE_LANG_FLAG_5 (T))
1119
1120 /* Set IS_AGGR_TYPE for T to VAL.  T must be a class, struct, or
1121    union type.  */
1122 #define SET_IS_AGGR_TYPE(T, VAL) \
1123   (TYPE_LANG_FLAG_5 (T) = (VAL))
1124
1125 /* Nonzero if T is a class type.  Zero for template type parameters,
1126    typename types, and so forth.  */
1127 #define CLASS_TYPE_P(T) \
1128   (IS_AGGR_TYPE_CODE (TREE_CODE (T)) && IS_AGGR_TYPE (T))
1129
1130 #define IS_AGGR_TYPE_CODE(T)    ((T) == RECORD_TYPE || (T) == UNION_TYPE)
1131 #define IS_AGGR_TYPE_2(TYPE1, TYPE2) \
1132   (TREE_CODE (TYPE1) == TREE_CODE (TYPE2)       \
1133    && IS_AGGR_TYPE (TYPE1) && IS_AGGR_TYPE (TYPE2))
1134 #define TAGGED_TYPE_P(T) \
1135   (CLASS_TYPE_P (T) || TREE_CODE (T) == ENUMERAL_TYPE)
1136 #define IS_OVERLOAD_TYPE(T) TAGGED_TYPE_P (T)
1137
1138 /* In a *_TYPE, nonzero means a built-in type.  */
1139 #define TYPE_BUILT_IN(NODE) TYPE_LANG_FLAG_6 (NODE)
1140
1141 /* True if this a "Java" type, defined in 'extern "Java"'. */
1142 #define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3 (NODE)
1143
1144 /* Nonzero if this type is const-qualified.  */
1145 #define CP_TYPE_CONST_P(NODE)                           \
1146   ((cp_type_quals (NODE) & TYPE_QUAL_CONST) != 0)
1147
1148 /* Nonzero if this type is volatile-qualified.  */
1149 #define CP_TYPE_VOLATILE_P(NODE)                        \
1150   ((cp_type_quals (NODE) & TYPE_QUAL_VOLATILE) != 0)
1151
1152 /* Nonzero if this type is restrict-qualified.  */
1153 #define CP_TYPE_RESTRICT_P(NODE)                        \
1154   ((cp_type_quals (NODE) & TYPE_QUAL_RESTRICT) != 0)
1155
1156 /* Nonzero if this type is const-qualified, but not
1157    volatile-qualified.  Other qualifiers are ignored.  This macro is
1158    used to test whether or not it is OK to bind an rvalue to a
1159    reference.  */
1160 #define CP_TYPE_CONST_NON_VOLATILE_P(NODE)                              \
1161   ((cp_type_quals (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE))      \
1162    == TYPE_QUAL_CONST)
1163
1164 #define FUNCTION_ARG_CHAIN(NODE) \
1165   TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE)))
1166
1167 /* Given a FUNCTION_DECL, returns the first TREE_LIST out of TYPE_ARG_TYPES
1168    which refers to a user-written parameter.  */
1169 #define FUNCTION_FIRST_USER_PARMTYPE(NODE) \
1170   skip_artificial_parms_for ((NODE), TYPE_ARG_TYPES (TREE_TYPE (NODE)))
1171
1172 /* Similarly, but for DECL_ARGUMENTS.  */
1173 #define FUNCTION_FIRST_USER_PARM(NODE) \
1174   skip_artificial_parms_for ((NODE), DECL_ARGUMENTS (NODE))
1175
1176 #define PROMOTES_TO_AGGR_TYPE(NODE, CODE)       \
1177   (((CODE) == TREE_CODE (NODE)                  \
1178     && IS_AGGR_TYPE (TREE_TYPE (NODE)))         \
1179    || IS_AGGR_TYPE (NODE))
1180
1181 /* Nonzero iff TYPE is derived from PARENT. Ignores accessibility and
1182    ambiguity issues.  */
1183 #define DERIVED_FROM_P(PARENT, TYPE) \
1184   lookup_base ((TYPE), PARENT, ba_any, NULL)
1185 /* Nonzero iff TYPE is uniquely derived from PARENT. Ignores
1186    accessibility.  */
1187 #define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) \
1188   lookup_base ((TYPE), (PARENT), ba_ignore | ba_quiet, NULL)
1189 /* Nonzero iff TYPE is accessible in the current scope and uniquely
1190    derived from PARENT.  */
1191 #define ACCESSIBLY_UNIQUELY_DERIVED_P(PARENT, TYPE) \
1192   lookup_base ((TYPE), (PARENT), ba_check | ba_quiet, NULL)
1193 /* Nonzero iff TYPE is publicly & uniquely derived from PARENT.  */
1194 #define PUBLICLY_UNIQUELY_DERIVED_P(PARENT, TYPE) \
1195   lookup_base ((TYPE), (PARENT),  ba_not_special | ba_quiet, NULL)
1196 \f
1197 /* This is a few header flags for 'struct lang_type'.  Actually,
1198    all but the first are used only for lang_type_class; they
1199    are put in this structure to save space.  */
1200 struct lang_type_header GTY(())
1201 {
1202   unsigned is_lang_type_class : 1;
1203
1204   unsigned has_type_conversion : 1;
1205   unsigned has_init_ref : 1;
1206   unsigned has_default_ctor : 1;
1207   unsigned uses_multiple_inheritance : 1;
1208   unsigned const_needs_init : 1;
1209   unsigned ref_needs_init : 1;
1210   unsigned has_const_assign_ref : 1;
1211 };
1212
1213 /* This structure provides additional information above and beyond
1214    what is provide in the ordinary tree_type.  In the past, we used it
1215    for the types of class types, template parameters types, typename
1216    types, and so forth.  However, there can be many (tens to hundreds
1217    of thousands) of template parameter types in a compilation, and
1218    there's no need for this additional information in that case.
1219    Therefore, we now use this data structure only for class types.
1220
1221    In the past, it was thought that there would be relatively few
1222    class types.  However, in the presence of heavy use of templates,
1223    many (i.e., thousands) of classes can easily be generated.
1224    Therefore, we should endeavor to keep the size of this structure to
1225    a minimum.  */
1226 struct lang_type_class GTY(())
1227 {
1228   struct lang_type_header h;
1229
1230   unsigned char align;
1231
1232   unsigned has_mutable : 1;
1233   unsigned com_interface : 1;
1234   unsigned non_pod_class : 1;
1235   unsigned nearly_empty_p : 1;
1236   unsigned user_align : 1;
1237   unsigned has_assign_ref : 1;
1238   unsigned has_new : 1;
1239   unsigned has_array_new : 1;
1240
1241   unsigned gets_delete : 2;
1242   unsigned has_call_overloaded : 1;
1243   unsigned has_array_ref_overloaded : 1;
1244   unsigned has_arrow_overloaded : 1;
1245   unsigned interface_only : 1;
1246   unsigned interface_unknown : 1;
1247   unsigned needs_virtual_reinit : 1;
1248
1249   unsigned marks: 6;
1250   unsigned vec_new_uses_cookie : 1;
1251   unsigned declared_class : 1;
1252
1253   unsigned being_defined : 1;
1254   unsigned redefined : 1;
1255   unsigned debug_requested : 1;
1256   unsigned use_template : 2;
1257   unsigned got_semicolon : 1;
1258   unsigned ptrmemfunc_flag : 1;
1259   unsigned was_anonymous : 1;
1260
1261   unsigned has_real_assign_ref : 1;
1262   unsigned has_const_init_ref : 1;
1263   unsigned has_complex_init_ref : 1;
1264   unsigned has_complex_assign_ref : 1;
1265   unsigned has_abstract_assign_ref : 1;
1266   unsigned non_aggregate : 1;
1267   unsigned is_partial_instantiation : 1;
1268   unsigned java_interface : 1;
1269
1270   unsigned anon_aggr : 1;
1271   unsigned non_zero_init : 1;
1272
1273   /* When adding a flag here, consider whether or not it ought to
1274      apply to a template instance if it applies to the template.  If
1275      so, make sure to copy it in instantiate_class_template!  */
1276
1277   /* There are some bits left to fill out a 32-bit word.  Keep track
1278      of this by updating the size of this bitfield whenever you add or
1279      remove a flag.  */
1280   unsigned dummy : 6;
1281
1282   int vsize;
1283
1284   tree primary_base;
1285   tree vfields;
1286   tree vbases;
1287   tree tags;
1288   tree size;
1289   tree size_unit;
1290   tree pure_virtuals;
1291   tree friend_classes;
1292   tree rtti;
1293   tree methods;
1294   tree template_info;
1295   tree befriending_classes;
1296 };
1297
1298 struct lang_type_ptrmem GTY(())
1299 {
1300   struct lang_type_header h;
1301   tree record;
1302 };
1303
1304 struct lang_type GTY(())
1305 {
1306   union lang_type_u
1307   {
1308     struct lang_type_header GTY((tag ("2"))) h;
1309     struct lang_type_class  GTY((tag ("1"))) c;
1310     struct lang_type_ptrmem GTY((tag ("0"))) ptrmem;
1311   } GTY((desc ("%h.h.is_lang_type_class"))) u;
1312 };
1313
1314 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
1315
1316 #define LANG_TYPE_CLASS_CHECK(NODE)                             \
1317 ({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);           \
1318     if (! lt->u.h.is_lang_type_class)                           \
1319       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);     \
1320     &lt->u.c; })
1321
1322 #define LANG_TYPE_PTRMEM_CHECK(NODE)                            \
1323 ({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);           \
1324     if (lt->u.h.is_lang_type_class)                             \
1325       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);     \
1326     &lt->u.ptrmem; })
1327
1328 #else
1329
1330 #define LANG_TYPE_CLASS_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.c)
1331 #define LANG_TYPE_PTRMEM_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.ptrmem)
1332
1333 #endif /* ENABLE_TREE_CHECKING */
1334
1335 /* Indicates whether or not (and how) a template was expanded for this class.
1336      0=no information yet/non-template class
1337      1=implicit template instantiation
1338      2=explicit template specialization
1339      3=explicit template instantiation  */
1340 #define CLASSTYPE_USE_TEMPLATE(NODE) \
1341   (LANG_TYPE_CLASS_CHECK (NODE)->use_template)
1342
1343 /* Fields used for storing information before the class is defined.
1344    After the class is defined, these fields hold other information.  */
1345
1346 /* List of friends which were defined inline in this class definition.  */
1347 #define CLASSTYPE_INLINE_FRIENDS(NODE) CLASSTYPE_PURE_VIRTUALS (NODE)
1348
1349 /* Nonzero for _CLASSTYPE means that operator delete is defined.  */
1350 #define TYPE_GETS_DELETE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->gets_delete)
1351 #define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
1352
1353 /* Nonzero if `new NODE[x]' should cause the allocation of extra
1354    storage to indicate how many array elements are in use.  */
1355 #define TYPE_VEC_NEW_USES_COOKIE(NODE)                  \
1356   (CLASS_TYPE_P (NODE)                                  \
1357    && LANG_TYPE_CLASS_CHECK (NODE)->vec_new_uses_cookie)
1358
1359 /* Nonzero means that this _CLASSTYPE node defines ways of converting
1360    itself to other types.  */
1361 #define TYPE_HAS_CONVERSION(NODE) \
1362   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_type_conversion)
1363
1364 /* Nonzero means that this _CLASSTYPE node overloads operator=(X&).  */
1365 #define TYPE_HAS_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_assign_ref)
1366 #define TYPE_HAS_CONST_ASSIGN_REF(NODE) \
1367   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_const_assign_ref)
1368
1369 /* Nonzero means that this _CLASSTYPE node has an X(X&) constructor.  */
1370 #define TYPE_HAS_INIT_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->h.has_init_ref)
1371 #define TYPE_HAS_CONST_INIT_REF(NODE) \
1372   (LANG_TYPE_CLASS_CHECK (NODE)->has_const_init_ref)
1373
1374 /* Nonzero if this class defines an overloaded operator new.  (An
1375    operator new [] doesn't count.)  */
1376 #define TYPE_HAS_NEW_OPERATOR(NODE) \
1377   (LANG_TYPE_CLASS_CHECK (NODE)->has_new)
1378
1379 /* Nonzero if this class defines an overloaded operator new[].  */
1380 #define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \
1381   (LANG_TYPE_CLASS_CHECK (NODE)->has_array_new)
1382
1383 /* Nonzero means that this type is being defined.  I.e., the left brace
1384    starting the definition of this type has been seen.  */
1385 #define TYPE_BEING_DEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->being_defined)
1386 /* Nonzero means that this type has been redefined.  In this case, if
1387    convenient, don't reprocess any methods that appear in its redefinition.  */
1388 #define TYPE_REDEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->redefined)
1389
1390 /* The is the basetype that contains NODE's rtti.  */
1391 #define CLASSTYPE_RTTI(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->rtti)
1392
1393 /* Nonzero means that this _CLASSTYPE node overloads operator().  */
1394 #define TYPE_OVERLOADS_CALL_EXPR(NODE) \
1395   (LANG_TYPE_CLASS_CHECK (NODE)->has_call_overloaded)
1396
1397 /* Nonzero means that this _CLASSTYPE node overloads operator[].  */
1398 #define TYPE_OVERLOADS_ARRAY_REF(NODE) \
1399   (LANG_TYPE_CLASS_CHECK (NODE)->has_array_ref_overloaded)
1400
1401 /* Nonzero means that this _CLASSTYPE node overloads operator->.  */
1402 #define TYPE_OVERLOADS_ARROW(NODE) \
1403   (LANG_TYPE_CLASS_CHECK (NODE)->has_arrow_overloaded)
1404
1405 /* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses
1406    multiple inheritance.  If this is 0 for the root of a type
1407    hierarchy, then we can use more efficient search techniques.  */
1408 #define TYPE_USES_MULTIPLE_INHERITANCE(NODE) \
1409   (LANG_TYPE_CLASS_CHECK (NODE)->h.uses_multiple_inheritance)
1410
1411 /* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses
1412    virtual base classes.  If this is 0 for the root of a type
1413    hierarchy, then we can use more efficient search techniques.  */
1414 #define TYPE_USES_VIRTUAL_BASECLASSES(NODE) (TREE_LANG_FLAG_3 (NODE))
1415
1416 /* Vector member functions defined in this class.  Each element is
1417    either a FUNCTION_DECL, a TEMPLATE_DECL, or an OVERLOAD.  All
1418    functions with the same name end up in the same slot.  The first
1419    two elements are for constructors, and destructors, respectively.
1420    All template conversion operators to innermost template dependent
1421    types are overloaded on the next slot, if they exist.  Note, the
1422    names for these functions will not all be the same.  The
1423    non-template conversion operators & templated conversions to
1424    non-innermost template types are next, followed by ordinary member
1425    functions.  There may be empty entries at the end of the vector.
1426    The conversion operators are unsorted. The ordinary member
1427    functions are sorted, once the class is complete.  */
1428 #define CLASSTYPE_METHOD_VEC(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->methods)
1429
1430 /* The slot in the CLASSTYPE_METHOD_VEC where constructors go.  */
1431 #define CLASSTYPE_CONSTRUCTOR_SLOT 0
1432
1433 /* The slot in the CLASSTYPE_METHOD_VEC where destructors go.  */
1434 #define CLASSTYPE_DESTRUCTOR_SLOT 1
1435
1436 /* The first slot in the CLASSTYPE_METHOD_VEC where conversion
1437    operators can appear.  */
1438 #define CLASSTYPE_FIRST_CONVERSION_SLOT 2
1439
1440 /* A FUNCTION_DECL or OVERLOAD for the constructors for NODE.  These
1441    are the constructors that take an in-charge parameter.  */
1442 #define CLASSTYPE_CONSTRUCTORS(NODE) \
1443   (TREE_VEC_ELT (CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_CONSTRUCTOR_SLOT))
1444
1445 /* A FUNCTION_DECL for the destructor for NODE.  These are the
1446    destructors that take an in-charge parameter.  */
1447 #define CLASSTYPE_DESTRUCTORS(NODE) \
1448   (TREE_VEC_ELT (CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_DESTRUCTOR_SLOT))
1449
1450 /* Mark bits for depth-first and breath-first searches.  */
1451
1452 /* Get the value of the Nth mark bit.  */
1453 #define CLASSTYPE_MARKED_N(NODE, N)                             \
1454   (((CLASS_TYPE_P (NODE) ? LANG_TYPE_CLASS_CHECK (NODE)->marks  \
1455      : ((unsigned) TYPE_ALIAS_SET (NODE))) & (1 << (N))) != 0)
1456
1457 /* Set the Nth mark bit.  */
1458 #define SET_CLASSTYPE_MARKED_N(NODE, N)                         \
1459   (CLASS_TYPE_P (NODE)                                          \
1460    ? (void) (LANG_TYPE_CLASS_CHECK (NODE)->marks |= (1 << (N))) \
1461    : (void) (TYPE_ALIAS_SET (NODE) |= (1 << (N))))
1462
1463 /* Clear the Nth mark bit.  */
1464 #define CLEAR_CLASSTYPE_MARKED_N(NODE, N)                       \
1465   (CLASS_TYPE_P (NODE)                                          \
1466    ? (void) (LANG_TYPE_CLASS_CHECK (NODE)->marks &= ~(1 << (N)))        \
1467    : (void) (TYPE_ALIAS_SET (NODE) &= ~(1 << (N))))
1468
1469 /* Get the value of the mark bits.  */
1470 #define CLASSTYPE_MARKED(NODE) CLASSTYPE_MARKED_N (NODE, 0)
1471 #define CLASSTYPE_MARKED2(NODE) CLASSTYPE_MARKED_N (NODE, 1)
1472 #define CLASSTYPE_MARKED3(NODE) CLASSTYPE_MARKED_N (NODE, 2)
1473 #define CLASSTYPE_MARKED4(NODE) CLASSTYPE_MARKED_N (NODE, 3)
1474 #define CLASSTYPE_MARKED5(NODE) CLASSTYPE_MARKED_N (NODE, 4)
1475 #define CLASSTYPE_MARKED6(NODE) CLASSTYPE_MARKED_N (NODE, 5)
1476
1477 /* Macros to modify the above flags */
1478 #define SET_CLASSTYPE_MARKED(NODE)    SET_CLASSTYPE_MARKED_N (NODE, 0)
1479 #define CLEAR_CLASSTYPE_MARKED(NODE)  CLEAR_CLASSTYPE_MARKED_N (NODE, 0)
1480 #define SET_CLASSTYPE_MARKED2(NODE)   SET_CLASSTYPE_MARKED_N (NODE, 1)
1481 #define CLEAR_CLASSTYPE_MARKED2(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 1)
1482 #define SET_CLASSTYPE_MARKED3(NODE)   SET_CLASSTYPE_MARKED_N (NODE, 2)
1483 #define CLEAR_CLASSTYPE_MARKED3(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 2)
1484 #define SET_CLASSTYPE_MARKED4(NODE)   SET_CLASSTYPE_MARKED_N (NODE, 3)
1485 #define CLEAR_CLASSTYPE_MARKED4(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 3)
1486 #define SET_CLASSTYPE_MARKED5(NODE)   SET_CLASSTYPE_MARKED_N (NODE, 4)
1487 #define CLEAR_CLASSTYPE_MARKED5(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 4)
1488 #define SET_CLASSTYPE_MARKED6(NODE)   SET_CLASSTYPE_MARKED_N (NODE, 5)
1489 #define CLEAR_CLASSTYPE_MARKED6(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 5)
1490
1491 /* A list of the nested tag-types (class, struct, union, or enum)
1492    found within this class.  The TREE_PURPOSE of each node is the name
1493    of the type; the TREE_VALUE is the type itself.  This list includes
1494    nested member class templates.  */
1495 #define CLASSTYPE_TAGS(NODE)            (LANG_TYPE_CLASS_CHECK (NODE)->tags)
1496
1497 /* Nonzero if NODE has a primary base class, i.e., a base class with
1498    which it shares the virtual function table pointer.  */
1499 #define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \
1500   (CLASSTYPE_PRIMARY_BINFO (NODE) != NULL_TREE)
1501
1502 /* If non-NULL, this is the binfo for the primary base class, i.e.,
1503    the base class which contains the virtual function table pointer
1504    for this class.  */
1505 #define CLASSTYPE_PRIMARY_BINFO(NODE) \
1506   (LANG_TYPE_CLASS_CHECK (NODE)->primary_base)
1507
1508 /* The number of virtual functions present in this class' virtual
1509    function table.  */
1510 #define CLASSTYPE_VSIZE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vsize)
1511
1512 /* A chain of BINFOs for the direct and indirect virtual base classes
1513    that this type uses in a post-order depth-first left-to-right
1514    order.  (In other words, these bases appear in the order that they
1515    should be initialized.)  If a virtual base is primary, then the
1516    primary copy will appear on this list.  Thus, the BINFOs on this
1517    list are all "real"; they are the same BINFOs that will be
1518    encountered when using dfs_unmarked_real_bases_queue_p and related
1519    functions.  */
1520 #define CLASSTYPE_VBASECLASSES(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vbases)
1521
1522 /* For a non-virtual BINFO, the BINFO itself; for a virtual BINFO, the
1523    binfo_for_vbase.  C is the most derived class for the hierarchy
1524    containing BINFO.  */
1525 #define CANONICAL_BINFO(BINFO, C)               \
1526   (TREE_VIA_VIRTUAL (BINFO)                     \
1527    ? binfo_for_vbase (BINFO_TYPE (BINFO), C)    \
1528    : (BINFO))
1529
1530 /* Number of direct baseclasses of NODE.  */
1531 #define CLASSTYPE_N_BASECLASSES(NODE) \
1532   (BINFO_N_BASETYPES (TYPE_BINFO (NODE)))
1533
1534 /* These are the size and alignment of the type without its virtual
1535    base classes, for when we use this type as a base itself.  */
1536 #define CLASSTYPE_SIZE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->size)
1537 #define CLASSTYPE_SIZE_UNIT(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->size_unit)
1538 #define CLASSTYPE_ALIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->align)
1539 #define CLASSTYPE_USER_ALIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->user_align)
1540
1541 /* The alignment of NODE, without its virtual bases, in bytes.  */
1542 #define CLASSTYPE_ALIGN_UNIT(NODE) \
1543   (CLASSTYPE_ALIGN (NODE) / BITS_PER_UNIT)
1544
1545 /* True if this a Java interface type, declared with
1546    '__attribute__ ((java_interface))'. */
1547 #define TYPE_JAVA_INTERFACE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->java_interface)
1548
1549 /* A cons list of virtual functions which cannot be inherited by
1550    derived classes.  When deriving from this type, the derived
1551    class must provide its own definition for each of these functions.  */
1552 #define CLASSTYPE_PURE_VIRTUALS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->pure_virtuals)
1553
1554 /* Nonzero means that this aggr type has been `closed' by a semicolon.  */
1555 #define CLASSTYPE_GOT_SEMICOLON(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->got_semicolon)
1556
1557 /* Nonzero means that the main virtual function table pointer needs to be
1558    set because base constructors have placed the wrong value there.
1559    If this is zero, it means that they placed the right value there,
1560    and there is no need to change it.  */
1561 #define CLASSTYPE_NEEDS_VIRTUAL_REINIT(NODE) \
1562   (LANG_TYPE_CLASS_CHECK (NODE)->needs_virtual_reinit)
1563
1564 /* Nonzero means that this type has an X() constructor.  */
1565 #define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) \
1566   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_default_ctor)
1567
1568 /* Nonzero means that this type contains a mutable member */
1569 #define CLASSTYPE_HAS_MUTABLE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_mutable)
1570 #define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE))
1571
1572 /* Nonzero means that this class type is a non-POD class.  */
1573 #define CLASSTYPE_NON_POD_P(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_class)
1574
1575 /* Nonzero means that this class contains pod types whose default
1576    initialization is not a zero initialization (namely, pointers to
1577    data members).  */
1578 #define CLASSTYPE_NON_ZERO_INIT_P(NODE) \
1579   (LANG_TYPE_CLASS_CHECK (NODE)->non_zero_init)
1580
1581 /* Nonzero if this class is "nearly empty", i.e., contains only a
1582    virtual function table pointer.  */
1583 #define CLASSTYPE_NEARLY_EMPTY_P(NODE) \
1584   (LANG_TYPE_CLASS_CHECK (NODE)->nearly_empty_p)
1585
1586 /* A list of class types of which this type is a friend.  The
1587    TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the
1588    case of a template friend.  */
1589 #define CLASSTYPE_FRIEND_CLASSES(NODE) \
1590   (LANG_TYPE_CLASS_CHECK (NODE)->friend_classes)
1591
1592 /* A list of the classes which grant friendship to this class.  */
1593 #define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \
1594   (LANG_TYPE_CLASS_CHECK (NODE)->befriending_classes)
1595
1596 /* Say whether this node was declared as a "class" or a "struct".  */
1597 #define CLASSTYPE_DECLARED_CLASS(NODE) \
1598   (LANG_TYPE_CLASS_CHECK (NODE)->declared_class)
1599
1600 /* Nonzero if this class has const members which have no specified initialization.  */
1601 #define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE) \
1602   (LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init)
1603
1604 /* Nonzero if this class has ref members which have no specified initialization.  */
1605 #define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE) \
1606   (LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init)
1607
1608 /* Nonzero if this class is included from a header file which employs
1609    `#pragma interface', and it is not included in its implementation file.  */
1610 #define CLASSTYPE_INTERFACE_ONLY(NODE) \
1611   (LANG_TYPE_CLASS_CHECK (NODE)->interface_only)
1612
1613 /* True if we have already determined whether or not vtables, VTTs,
1614    typeinfo, and other similar per-class data should be emitted in
1615    this translation unit.  This flag does not indicate whether or not
1616    these items should be emitted; it only indicates that we know one
1617    way or the other.  */
1618 #define CLASSTYPE_INTERFACE_KNOWN(NODE) \
1619   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown == 0)
1620 /* The opposite of CLASSTYPE_INTERFANCE_KNOWN.  */
1621 #define CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
1622   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown)
1623
1624 #define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) \
1625   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = !!(X))
1626 #define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
1627   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 1)
1628 #define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) \
1629   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 0)
1630
1631 /* Nonzero if a _DECL node requires us to output debug info for this class.  */
1632 #define CLASSTYPE_DEBUG_REQUESTED(NODE) \
1633   (LANG_TYPE_CLASS_CHECK (NODE)->debug_requested)
1634 \f
1635 /* Additional macros for inheritance information.  */
1636
1637 /* The BINFO_INHERITANCE_CHAIN is used opposite to the description in
1638    gcc/tree.h.  In particular if D is derived from B then the BINFO
1639    for B (in D) will have a BINFO_INHERITANCE_CHAIN pointing to
1640    D.  In tree.h, this pointer is described as pointing in other
1641    direction.  There is a different BINFO for each path to a virtual
1642    base; BINFOs for virtual bases are not shared.
1643
1644    We use TREE_VIA_PROTECTED and TREE_VIA_PUBLIC, but private
1645    inheritance is indicated by the absence of the other two flags, not
1646    by TREE_VIA_PRIVATE, which is unused.  */
1647
1648 /* Mark the binfo, whether shared or not. Each instance of a virtual
1649    base can be separately marked.  */
1650 #define BINFO_UNSHARED_MARKED(NODE) TREE_LANG_FLAG_0 (NODE)
1651
1652 /* Nonzero means marked by DFS or BFS search.  */
1653 #define BINFO_MARKED(NODE)                      \
1654   (TREE_VIA_VIRTUAL (NODE)                      \
1655    ? CLASSTYPE_MARKED (BINFO_TYPE (NODE))       \
1656    : TREE_LANG_FLAG_0 (NODE))
1657 /* Macros needed because of C compilers that don't allow conditional
1658    expressions to be lvalues.  Grr!  */
1659 #define SET_BINFO_MARKED(NODE)                  \
1660   (TREE_VIA_VIRTUAL(NODE)                       \
1661    ? SET_CLASSTYPE_MARKED (BINFO_TYPE (NODE))   \
1662    : (void)(TREE_LANG_FLAG_0 (NODE) = 1))
1663 #define CLEAR_BINFO_MARKED(NODE)                \
1664   (TREE_VIA_VIRTUAL (NODE)                      \
1665    ? CLEAR_CLASSTYPE_MARKED (BINFO_TYPE (NODE)) \
1666    : (void)(TREE_LANG_FLAG_0 (NODE) = 0))
1667
1668 /* Nonzero means that this class is on a path leading to a new vtable.  */
1669 #define BINFO_VTABLE_PATH_MARKED(NODE)          \
1670   (TREE_VIA_VIRTUAL (NODE)                      \
1671    ? CLASSTYPE_MARKED3 (BINFO_TYPE (NODE))      \
1672    : TREE_LANG_FLAG_3 (NODE))
1673 #define SET_BINFO_VTABLE_PATH_MARKED(NODE)      \
1674   (TREE_VIA_VIRTUAL(NODE)                       \
1675    ? SET_CLASSTYPE_MARKED3 (BINFO_TYPE (NODE))  \
1676    : (TREE_LANG_FLAG_3 (NODE) = 1))
1677 #define CLEAR_BINFO_VTABLE_PATH_MARKED(NODE)    \
1678   (TREE_VIA_VIRTUAL (NODE)                      \
1679    ? CLEAR_CLASSTYPE_MARKED3 (BINFO_TYPE (NODE))\
1680    : (TREE_LANG_FLAG_3 (NODE) = 0))
1681
1682 /* Nonzero means B (a BINFO) has its own vtable.  Under the old ABI,
1683    secondary vtables are sometimes shared.  Any copies will not have
1684    this flag set.
1685
1686    B is part of the hierarchy dominated by C.  */
1687 #define BINFO_NEW_VTABLE_MARKED(B, C) \
1688   (TREE_LANG_FLAG_4 (CANONICAL_BINFO (B, C)))
1689
1690 /* Any subobject that needs a new vtable must have a vptr and must not
1691    be a non-virtual primary base (since it would then use the vtable from a
1692    derived class and never become non-primary.)  */
1693 #define SET_BINFO_NEW_VTABLE_MARKED(B, C)                                \
1694   (BINFO_NEW_VTABLE_MARKED (B, C) = 1,                                   \
1695    my_friendly_assert (!BINFO_PRIMARY_P (B)                              \
1696                        || TREE_VIA_VIRTUAL (B), 20000517),               \
1697    my_friendly_assert (CLASSTYPE_VFIELDS (BINFO_TYPE (B)) != NULL_TREE,  \
1698                        20000517))
1699
1700 /* Nonzero means this class has done dfs_pushdecls.  */
1701 #define BINFO_PUSHDECLS_MARKED(NODE) BINFO_VTABLE_PATH_MARKED (NODE)
1702 #define SET_BINFO_PUSHDECLS_MARKED(NODE) SET_BINFO_VTABLE_PATH_MARKED (NODE)
1703 #define CLEAR_BINFO_PUSHDECLS_MARKED(NODE) CLEAR_BINFO_VTABLE_PATH_MARKED (NODE)
1704
1705 /* Nonzero if this BINFO is a primary base class.  Note, this can be
1706    set for non-canononical virtual bases. For a virtual primary base
1707    you might also need to check whether it is canonical.  */
1708
1709 #define BINFO_PRIMARY_P(NODE) \
1710   (BINFO_PRIMARY_BASE_OF (NODE) != NULL_TREE)
1711
1712 /* The index in the VTT where this subobject's sub-VTT can be found.
1713    NULL_TREE if there is no sub-VTT.  */
1714 #define BINFO_SUBVTT_INDEX(NODE) TREE_VEC_ELT (NODE, 8)
1715
1716 /* The index in the VTT where the vptr for this subobject can be
1717    found.  NULL_TREE if there is no secondary vptr in the VTT.  */
1718 #define BINFO_VPTR_INDEX(NODE) TREE_VEC_ELT (NODE, 9)
1719
1720 /* The binfo of which NODE is a primary base.  (This is different from
1721    BINFO_INHERITANCE_CHAIN for virtual base because a virtual base is
1722    sometimes a primary base for a class for which it is not an
1723    immediate base.)  */
1724 #define BINFO_PRIMARY_BASE_OF(NODE) TREE_VEC_ELT (NODE, 10)
1725
1726 /* Nonzero if this binfo has lost its primary base binfo (because that
1727    is a nearly-empty virtual base that has been taken by some other
1728    base in the complete hierarchy.  */
1729 #define BINFO_LOST_PRIMARY_P(NODE) TREE_LANG_FLAG_2 (NODE)
1730
1731 /* Nonzero if this binfo is an indirect primary base, i.e. a virtual
1732    base that is a primary base of some of other class in the
1733    hierarchy.  */
1734 #define BINFO_INDIRECT_PRIMARY_P(NODE) TREE_USED (NODE)
1735
1736 /* Used by various search routines.  */
1737 #define IDENTIFIER_MARKED(NODE) TREE_LANG_FLAG_0 (NODE)
1738 \f
1739 /* Accessor macros for the vfield slots in structures.  */
1740
1741 /* The virtual function pointer fields that this type contains.  For a
1742    vfield defined just for this class, or from a primary base, the
1743    TREE_PURPOSE is NULL.  Otherwise, the TREE_PURPOSE is the BINFO for
1744    the class containing the vfield.  The TREE_VALUE is the class where
1745    the vfield was first defined.  */
1746 #define CLASSTYPE_VFIELDS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vfields)
1747
1748 /* Get the assoc info that caused this vfield to exist.  */
1749 #define VF_BINFO_VALUE(NODE) TREE_PURPOSE (NODE)
1750
1751 /* Get that same information as a _TYPE.  */
1752 #define VF_BASETYPE_VALUE(NODE) TREE_VALUE (NODE)
1753
1754 /* Get the value of the top-most type dominating the non-`normal' vfields.  */
1755 #define VF_DERIVED_VALUE(NODE) \
1756   (VF_BINFO_VALUE (NODE) ? BINFO_TYPE (VF_BINFO_VALUE (NODE)) : NULL_TREE)
1757
1758 /* The number of bytes by which to adjust the `this' pointer when
1759    calling this virtual function.  */
1760 #define BV_DELTA(NODE) (TREE_PURPOSE (NODE))
1761
1762 /* If non-NULL, the vtable index at which to find the vcall offset
1763    when calling this virtual function.  */
1764 #define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE))
1765
1766 /* The function to call.  */
1767 #define BV_FN(NODE) (TREE_VALUE (NODE))
1768
1769 /* Nonzero if we should use a virtual thunk for this entry.  */
1770 #define BV_USE_VCALL_INDEX_P(NODE) \
1771    (TREE_LANG_FLAG_0 (NODE))
1772 \f
1773 /* Nonzero for TREE_LIST node means that this list of things
1774    is a list of parameters, as opposed to a list of expressions.  */
1775 #define TREE_PARMLIST(NODE) (TREE_LANG_FLAG_2 (NODE))
1776
1777 /* Nonzero for a parmlist means that this parmlist ended in ...  */
1778 #define PARMLIST_ELLIPSIS_P(NODE) TREE_LANG_FLAG_0 (NODE)
1779
1780 /* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
1781    this type can raise.  Each TREE_VALUE is a _TYPE.  The TREE_VALUE
1782    will be NULL_TREE to indicate a throw specification of `()', or
1783    no exceptions allowed.  */
1784 #define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_BINFO (NODE)
1785
1786 /* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'.  */
1787 #define TYPE_NOTHROW_P(NODE) \
1788   (TYPE_RAISES_EXCEPTIONS (NODE) \
1789    && TREE_VALUE (TYPE_RAISES_EXCEPTIONS (NODE)) == NULL_TREE)
1790
1791 /* The binding level associated with the namespace.  */
1792 #define NAMESPACE_LEVEL(NODE) \
1793   (DECL_LANG_SPECIFIC (NODE)->decl_flags.u.level)
1794 \f
1795
1796 /* If a DECL has DECL_LANG_SPECIFIC, it is either a lang_decl_flags or
1797    a lang_decl (which has lang_decl_flags as its initial prefix).
1798    This macro is nonzero for tree nodes whose DECL_LANG_SPECIFIC is
1799    the full lang_decl, and not just lang_decl_flags.  */
1800 #define CAN_HAVE_FULL_LANG_DECL_P(NODE)         \
1801   (!(TREE_CODE (NODE) == VAR_DECL               \
1802      || TREE_CODE (NODE) == CONST_DECL          \
1803      || TREE_CODE (NODE) == FIELD_DECL          \
1804      || TREE_CODE (NODE) == USING_DECL))
1805
1806 struct lang_decl_flags GTY(())
1807 {
1808   struct c_lang_decl base;
1809
1810   ENUM_BITFIELD(languages) language : 8;
1811
1812   unsigned operator_attr : 1;
1813   unsigned constructor_attr : 1;
1814   unsigned destructor_attr : 1;
1815   unsigned friend_attr : 1;
1816   unsigned static_function : 1;
1817   unsigned pure_virtual : 1;
1818   unsigned has_in_charge_parm_p : 1;
1819   unsigned has_vtt_parm_p : 1;
1820
1821   unsigned deferred : 1;
1822   unsigned use_template : 2;
1823   unsigned nonconverting : 1;
1824   unsigned not_really_extern : 1;
1825   unsigned needs_final_overrider : 1;
1826   unsigned initialized_in_class : 1;
1827   unsigned assignment_operator_p : 1;
1828
1829   unsigned global_ctor_p : 1;
1830   unsigned global_dtor_p : 1;
1831   unsigned anticipated_p : 1;
1832   unsigned template_conv_p : 1;
1833   unsigned u1sel : 1;
1834   unsigned u2sel : 1;
1835   unsigned can_be_full : 1;
1836   unsigned unused : 1; /* One unused bit.  */
1837
1838   union lang_decl_u {
1839     /* In a FUNCTION_DECL, VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this
1840        is DECL_TEMPLATE_INFO.  */
1841     tree GTY ((tag ("0"))) template_info;
1842
1843     /* In a NAMESPACE_DECL, this is NAMESPACE_LEVEL.  */
1844     struct cp_binding_level * GTY ((tag ("1"))) level;
1845   } GTY ((desc ("%1.u1sel"))) u;
1846
1847   union lang_decl_u2 {
1848     /* This is DECL_ACCESS.  */
1849     tree GTY ((tag ("0"))) access;
1850
1851     /* For VAR_DECL in function, this is DECL_DISCRIMINATOR.  */
1852     int discriminator;
1853
1854     /* In a namespace-scope FUNCTION_DECL, this is
1855        GLOBAL_INIT_PRIORITY.  */
1856     int init_priority;
1857
1858     /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
1859        THUNK_VCALL_OFFSET.  */
1860     tree GTY((tag ("2"))) vcall_offset;
1861   } GTY ((desc ("%1.u2sel"))) u2;
1862 };
1863
1864 struct lang_decl GTY(())
1865 {
1866   struct lang_decl_flags decl_flags;
1867
1868   union lang_decl_u4
1869     {
1870       struct full_lang_decl
1871       {
1872         tree befriending_classes;
1873
1874         /* For a virtual FUNCTION_DECL, this is DECL_VIRTUAL_CONTEXT.  For a
1875            non-virtual FUNCTION_DECL, this is DECL_FRIEND_CONTEXT.  */
1876         tree context;
1877
1878         /* In a FUNCTION_DECL, this is DECL_CLONED_FUNCTION.  */
1879         tree cloned_function;
1880
1881         /* In an overloaded operator, this is the value of
1882            DECL_OVERLOADED_OPERATOR_P.  */
1883         enum tree_code operator_code;
1884
1885         unsigned u3sel : 1;
1886         unsigned pending_inline_p : 1;
1887
1888         union lang_decl_u3
1889         {
1890           tree GTY ((tag ("0"))) sorted_fields;
1891           struct unparsed_text * GTY ((tag ("2"))) pending_inline_info;
1892           struct language_function * GTY ((tag ("1")))
1893                saved_language_function;
1894         } GTY ((desc ("%1.u3sel + %1.pending_inline_p"))) u;
1895       } GTY ((tag ("1"))) f;
1896   } GTY ((desc ("%1.decl_flags.can_be_full"))) u;
1897 };
1898
1899 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
1900
1901 #define LANG_DECL_U2_CHECK(NODE, TF)                            \
1902 ({  struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);           \
1903     if (lt->decl_flags.u2sel != TF)                             \
1904       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);     \
1905     &lt->decl_flags.u2; })
1906
1907 #else
1908
1909 #define LANG_DECL_U2_CHECK(NODE, TF) \
1910   (&DECL_LANG_SPECIFIC (NODE)->decl_flags.u2)
1911
1912 #endif /* ENABLE_TREE_CHECKING */
1913
1914 #define DEFARG_POINTER(NODE) (DEFAULT_ARG_CHECK (NODE)->identifier.id.str)
1915
1916 /* DECL_NEEDED_P holds of a declaration when we need to emit its
1917    definition.  This is true when the back-end tells us that
1918    the symbol has been referenced in the generated code.  If, however,
1919    we are not generating code, then it is also true when a symbol has
1920    just been used somewhere, even if it's not really needed.  We need
1921    anything that isn't comdat, but we don't know for sure whether or
1922    not something is comdat until end-of-file.  */
1923 #define DECL_NEEDED_P(DECL)                                     \
1924   ((at_eof && TREE_PUBLIC (DECL) && !DECL_COMDAT (DECL))        \
1925    || (DECL_ASSEMBLER_NAME_SET_P (DECL)                         \
1926        && TREE_SYMBOL_REFERENCED (DECL_ASSEMBLER_NAME (DECL)))  \
1927    || (flag_syntax_only && TREE_USED (DECL)))
1928
1929 /* Non-zero iff DECL is memory-based.  The DECL_RTL of
1930    certain const variables might be a CONST_INT, or a REG
1931    in some cases.  We cannot use `memory_operand' as a test
1932    here because on most RISC machines, a variable's address
1933    is not, by itself, a legitimate address.  */
1934 #define DECL_IN_MEMORY_P(NODE) \
1935   (DECL_RTL_SET_P (NODE) && GET_CODE (DECL_RTL (NODE)) == MEM)
1936
1937 /* For a FUNCTION_DECL or a VAR_DECL, the language linkage for the
1938    declaration.  Some entities (like a member function in a local
1939    class, or a local variable) do not have linkage at all, and this
1940    macro should not be used in those cases.
1941
1942    Implementation note: A FUNCTION_DECL without DECL_LANG_SPECIFIC was
1943    created by language-independent code, and has C linkage.  Most
1944    VAR_DECLs have C++ linkage, and do not have DECL_LANG_SPECIFIC, but
1945    we do create DECL_LANG_SPECIFIC for variables with non-C++ linkage.  */
1946 #define DECL_LANGUAGE(NODE)                             \
1947   (DECL_LANG_SPECIFIC (NODE)                            \
1948    ? DECL_LANG_SPECIFIC (NODE)->decl_flags.language     \
1949    : (TREE_CODE (NODE) == FUNCTION_DECL                 \
1950       ? lang_c : lang_cplusplus))
1951
1952 /* Set the language linkage for NODE to LANGUAGE.  */
1953 #define SET_DECL_LANGUAGE(NODE, LANGUAGE) \
1954   (DECL_LANG_SPECIFIC (NODE)->decl_flags.language = (LANGUAGE))
1955
1956 /* For FUNCTION_DECLs: nonzero means that this function is a constructor.  */
1957 #define DECL_CONSTRUCTOR_P(NODE) \
1958   (DECL_LANG_SPECIFIC (NODE)->decl_flags.constructor_attr)
1959
1960 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete
1961    object.  */
1962 #define DECL_COMPLETE_CONSTRUCTOR_P(NODE)               \
1963   (DECL_CONSTRUCTOR_P (NODE)                            \
1964    && DECL_NAME (NODE) == complete_ctor_identifier)
1965
1966 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base
1967    object.  */
1968 #define DECL_BASE_CONSTRUCTOR_P(NODE)           \
1969   (DECL_CONSTRUCTOR_P (NODE)                    \
1970    && DECL_NAME (NODE) == base_ctor_identifier)
1971
1972 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the
1973    specialized in-charge constructor or the specialized not-in-charge
1974    constructor.  */
1975 #define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE)                \
1976   (DECL_CONSTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE))
1977
1978 /* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor.  */
1979 #define DECL_COPY_CONSTRUCTOR_P(NODE) \
1980   (DECL_CONSTRUCTOR_P (NODE) && copy_fn_p (NODE) > 0)
1981
1982 /* Nonzero if NODE is a destructor.  */
1983 #define DECL_DESTRUCTOR_P(NODE)                         \
1984   (DECL_LANG_SPECIFIC (NODE)->decl_flags.destructor_attr)
1985
1986 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the
1987    specialized in-charge constructor, in-charge deleting constructor,
1988    or the the base destructor.  */
1989 #define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE)                 \
1990   (DECL_DESTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE))
1991
1992 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
1993    object.  */
1994 #define DECL_COMPLETE_DESTRUCTOR_P(NODE)                \
1995   (DECL_DESTRUCTOR_P (NODE)                             \
1996    && DECL_NAME (NODE) == complete_dtor_identifier)
1997
1998 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base
1999    object.  */
2000 #define DECL_BASE_DESTRUCTOR_P(NODE)            \
2001   (DECL_DESTRUCTOR_P (NODE)                     \
2002    && DECL_NAME (NODE) == base_dtor_identifier)
2003
2004 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
2005    object that deletes the object after it has been destroyed.  */
2006 #define DECL_DELETING_DESTRUCTOR_P(NODE)                \
2007   (DECL_DESTRUCTOR_P (NODE)                             \
2008    && DECL_NAME (NODE) == deleting_dtor_identifier)
2009
2010 /* Nonzero if NODE (a FUNCTION_DECL) is a cloned constructor or
2011    destructor.  */
2012 #define DECL_CLONED_FUNCTION_P(NODE)            \
2013   ((TREE_CODE (NODE) == FUNCTION_DECL           \
2014     || TREE_CODE (NODE) == TEMPLATE_DECL)       \
2015    && DECL_LANG_SPECIFIC (NODE)                 \
2016    && DECL_CLONED_FUNCTION (NODE) != NULL_TREE)
2017
2018 /* If DECL_CLONED_FUNCTION_P holds, this is the function that was
2019    cloned.  */
2020 #define DECL_CLONED_FUNCTION(NODE) \
2021   (DECL_LANG_SPECIFIC (NODE)->u.f.cloned_function)
2022
2023 /* Nonzero if NODE has DECL_DISCRIMINATOR and not DECL_ACCESS.  */
2024 #define DECL_DISCRIMINATOR_P(NODE)      \
2025   (TREE_CODE (NODE) == VAR_DECL         \
2026    && DECL_FUNCTION_SCOPE_P (NODE))
2027
2028 /* Discriminator for name mangling.  */
2029 #define DECL_DISCRIMINATOR(NODE) (LANG_DECL_U2_CHECK (NODE, 1)->discriminator)
2030
2031 /* Non-zero if the VTT parm has been added to NODE.  */
2032 #define DECL_HAS_VTT_PARM_P(NODE) \
2033   (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_vtt_parm_p)
2034
2035 /* Non-zero if NODE is a FUNCTION_DECL for which a VTT parameter is
2036    required.  */
2037 #define DECL_NEEDS_VTT_PARM_P(NODE)                     \
2038   (TYPE_USES_VIRTUAL_BASECLASSES (DECL_CONTEXT (NODE))  \
2039    && (DECL_BASE_CONSTRUCTOR_P (NODE)                   \
2040        || DECL_BASE_DESTRUCTOR_P (NODE)))
2041
2042 /* Non-zero if NODE is a user-defined conversion operator.  */
2043 #define DECL_CONV_FN_P(NODE) \
2044   (IDENTIFIER_TYPENAME_P (DECL_NAME (NODE)))
2045
2046 /* Non-zero if NODE, which is a TEMPLATE_DECL, is a template
2047    conversion operator to a type dependent on the innermost template
2048    args.  */
2049 #define DECL_TEMPLATE_CONV_FN_P(NODE) \
2050   (DECL_LANG_SPECIFIC (NODE)->decl_flags.template_conv_p)
2051
2052 /* Set the overloaded operator code for NODE to CODE.  */
2053 #define SET_OVERLOADED_OPERATOR_CODE(NODE, CODE) \
2054   (DECL_LANG_SPECIFIC (NODE)->u.f.operator_code = (CODE))
2055
2056 /* If NODE is an overloaded operator, then this returns the TREE_CODE
2057    associcated with the overloaded operator.
2058    DECL_ASSIGNMENT_OPERATOR_P must also be checked to determine
2059    whether or not NODE is an assignment operator.  If NODE is not an
2060    overloaded operator, ERROR_MARK is returned.  Since the numerical
2061    value of ERROR_MARK is zero, this macro can be used as a predicate
2062    to test whether or not NODE is an overloaded operator.  */
2063 #define DECL_OVERLOADED_OPERATOR_P(NODE)                \
2064   (IDENTIFIER_OPNAME_P (DECL_NAME (NODE))               \
2065    ? DECL_LANG_SPECIFIC (NODE)->u.f.operator_code : ERROR_MARK)
2066
2067 /* Non-zero if NODE is an assignment operator.  */
2068 #define DECL_ASSIGNMENT_OPERATOR_P(NODE) \
2069   (DECL_LANG_SPECIFIC (NODE)->decl_flags.assignment_operator_p)
2070
2071 /* For FUNCTION_DECLs: nonzero means that this function is a
2072    constructor or a destructor with an extra in-charge parameter to
2073    control whether or not virtual bases are constructed.  */
2074 #define DECL_HAS_IN_CHARGE_PARM_P(NODE) \
2075   (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_in_charge_parm_p)
2076
2077 /* Nonzero if NODE is an overloaded `operator delete[]' function.  */
2078 #define DECL_ARRAY_DELETE_OPERATOR_P(NODE) \
2079   (DECL_OVERLOADED_OPERATOR_P (NODE) == VEC_DELETE_EXPR)
2080
2081 /* Nonzero for _DECL means that this decl appears in (or will appear
2082    in) as a member in a RECORD_TYPE or UNION_TYPE node.  It is also for
2083    detecting circularity in case members are multiply defined.  In the
2084    case of a VAR_DECL, it is also used to determine how program storage
2085    should be allocated.  */
2086 #define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3 (NODE))
2087
2088 /* Nonzero if the DECL was initialized in the class definition itself,
2089    rather than outside the class.  */
2090 #define DECL_INITIALIZED_IN_CLASS_P(DECL) \
2091  (DECL_LANG_SPECIFIC (DECL)->decl_flags.initialized_in_class)
2092
2093 /* Nonzero for FUNCTION_DECL means that this decl is just a
2094    friend declaration, and should not be added to the list of
2095    member functions for this class.  */
2096 #define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.friend_attr)
2097
2098 /* A TREE_LIST of the types which have befriended this FUNCTION_DECL.  */
2099 #define DECL_BEFRIENDING_CLASSES(NODE) \
2100   (DECL_LANG_SPECIFIC (NODE)->u.f.befriending_classes)
2101
2102 /* Nonzero for FUNCTION_DECL means that this decl is a static
2103    member function.  */
2104 #define DECL_STATIC_FUNCTION_P(NODE) \
2105   (DECL_LANG_SPECIFIC (NODE)->decl_flags.static_function)
2106
2107 /* Nonzero for FUNCTION_DECL means that this decl is a non-static
2108    member function.  */
2109 #define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \
2110   (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE)
2111
2112 /* Nonzero for FUNCTION_DECL means that this decl is a member function
2113    (static or non-static).  */
2114 #define DECL_FUNCTION_MEMBER_P(NODE) \
2115  (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE))
2116
2117 /* Nonzero for FUNCTION_DECL means that this member function
2118    has `this' as const X *const.  */
2119 #define DECL_CONST_MEMFUNC_P(NODE)                                       \
2120   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)                               \
2121    && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE                             \
2122                                   (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
2123
2124 /* Nonzero for FUNCTION_DECL means that this member function
2125    has `this' as volatile X *const.  */
2126 #define DECL_VOLATILE_MEMFUNC_P(NODE)                                    \
2127   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)                               \
2128    && CP_TYPE_VOLATILE_P (TREE_TYPE (TREE_VALUE                          \
2129                                   (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
2130
2131 /* Nonzero for a DECL means that this member is a non-static member.  */
2132 #define DECL_NONSTATIC_MEMBER_P(NODE)           \
2133   ((TREE_CODE (NODE) == FUNCTION_DECL           \
2134     && DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)) \
2135    || TREE_CODE (NODE) == FIELD_DECL)
2136
2137 /* Nonzero for _DECL means that this member object type
2138    is mutable.  */
2139 #define DECL_MUTABLE_P(NODE) (DECL_LANG_FLAG_0 (NODE))
2140
2141 /* Nonzero for _DECL means that this constructor is a non-converting
2142    constructor.  */
2143 #define DECL_NONCONVERTING_P(NODE) \
2144   (DECL_LANG_SPECIFIC (NODE)->decl_flags.nonconverting)
2145
2146 /* Nonzero for FUNCTION_DECL means that this member function is a pure
2147    virtual function.  */
2148 #define DECL_PURE_VIRTUAL_P(NODE) \
2149   (DECL_LANG_SPECIFIC (NODE)->decl_flags.pure_virtual)
2150
2151 /* Nonzero for FUNCTION_DECL means that this member function
2152    must be overridden by derived classes.  */
2153 #define DECL_NEEDS_FINAL_OVERRIDER_P(NODE) \
2154   (DECL_LANG_SPECIFIC (NODE)->decl_flags.needs_final_overrider)
2155
2156 /* Nonzero if NODE is a thunk, rather than an ordinary function.  */
2157 #define DECL_THUNK_P(NODE)                      \
2158   (TREE_CODE (NODE) == FUNCTION_DECL            \
2159    && DECL_LANG_FLAG_7 (NODE))
2160
2161 /* Nonzero if NODE is a FUNCTION_DECL, but not a thunk.  */
2162 #define DECL_NON_THUNK_FUNCTION_P(NODE)                         \
2163   (TREE_CODE (NODE) == FUNCTION_DECL && !DECL_THUNK_P (NODE))
2164
2165 /* Nonzero if NODE is `extern "C"'.  */
2166 #define DECL_EXTERN_C_P(NODE) \
2167   (DECL_LANGUAGE (NODE) == lang_c)
2168
2169 /* Nonzero if NODE is an `extern "C"' function.  */
2170 #define DECL_EXTERN_C_FUNCTION_P(NODE) \
2171   (DECL_NON_THUNK_FUNCTION_P (NODE) && DECL_EXTERN_C_P (NODE))
2172
2173 /* Set DECL_THUNK_P for node.  */
2174 #define SET_DECL_THUNK_P(NODE)                                  \
2175   (DECL_LANG_FLAG_7 (NODE) = 1,                                 \
2176    DECL_LANG_SPECIFIC (NODE)->u.f.u3sel = 1)
2177
2178 /* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a
2179    template function.  */
2180 #define DECL_PRETTY_FUNCTION_P(NODE) \
2181   (TREE_LANG_FLAG_0 (NODE))
2182
2183 /* The _TYPE context in which this _DECL appears.  This field holds the
2184    class where a virtual function instance is actually defined. */
2185 #define DECL_CLASS_CONTEXT(NODE) \
2186   (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE)
2187
2188 /* For a non-member friend function, the class (if any) in which this
2189    friend was defined.  For example, given:
2190
2191      struct S { friend void f (); };
2192
2193    the DECL_FRIEND_CONTEXT for `f' will be `S'.  */
2194 #define DECL_FRIEND_CONTEXT(NODE)                               \
2195   ((DECL_FRIEND_P (NODE) && !DECL_FUNCTION_MEMBER_P (NODE))     \
2196    ? DECL_LANG_SPECIFIC (NODE)->u.f.context                     \
2197    : NULL_TREE)
2198
2199 /* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT.  */
2200 #define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \
2201   (DECL_LANG_SPECIFIC (NODE)->u.f.context = (CONTEXT))
2202
2203 /* NULL_TREE in DECL_CONTEXT represents the global namespace. */
2204 #define CP_DECL_CONTEXT(NODE) \
2205   (DECL_CONTEXT (NODE) ? DECL_CONTEXT (NODE) : global_namespace)
2206 #define FROB_CONTEXT(NODE)   ((NODE) == global_namespace ? NULL_TREE : (NODE))
2207
2208 /* For a virtual function, the base where we find its vtable entry.
2209    For a non-virtual function, the base where it is defined.  */
2210 #define DECL_VIRTUAL_CONTEXT(NODE) \
2211   (DECL_LANG_SPECIFIC (NODE)->u.f.context)
2212
2213 /* 1 iff NODE has namespace scope, including the global namespace.  */
2214 #define DECL_NAMESPACE_SCOPE_P(NODE)                            \
2215   (!DECL_TEMPLATE_PARM_P (NODE)                                 \
2216    && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL)
2217
2218 /* 1 iff NODE is a class member.  */
2219 #define DECL_CLASS_SCOPE_P(NODE) \
2220   (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE)))
2221
2222 /* 1 iff NODE is function-local.  */
2223 #define DECL_FUNCTION_SCOPE_P(NODE) \
2224   (DECL_CONTEXT (NODE) \
2225    && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL)
2226
2227 /* 1 iff NODE is function-local, but for types.  */
2228 #define LOCAL_CLASS_P(NODE)                             \
2229   (decl_function_context (TYPE_MAIN_DECL (NODE)) != NULL_TREE)
2230
2231 /* For a NAMESPACE_DECL: the list of using namespace directives
2232    The PURPOSE is the used namespace, the value is the namespace
2233    that is the common ancestor. */
2234 #define DECL_NAMESPACE_USING(NODE) DECL_VINDEX (NAMESPACE_DECL_CHECK (NODE))
2235
2236 /* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users
2237    of a namespace, to record the transitive closure of using namespace. */
2238 #define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NAMESPACE_DECL_CHECK (NODE))
2239
2240 /* In a NAMESPACE_DECL, points to the original namespace if this is
2241    a namespace alias.  */
2242 #define DECL_NAMESPACE_ALIAS(NODE) \
2243         DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE))
2244 #define ORIGINAL_NAMESPACE(NODE)  \
2245   (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE))
2246
2247 /* Non-zero if NODE is the std namespace.  */
2248 #define DECL_NAMESPACE_STD_P(NODE)                      \
2249   (TREE_CODE (NODE) == NAMESPACE_DECL                   \
2250    && CP_DECL_CONTEXT (NODE) == global_namespace        \
2251    && DECL_NAME (NODE) == std_identifier)
2252
2253 /* In a non-local VAR_DECL with static storage duration, this is the
2254    initialization priority.  If this value is zero, the NODE will be
2255    initialized at the DEFAULT_INIT_PRIORITY.  */
2256 #define DECL_INIT_PRIORITY(NODE) (VAR_DECL_CHECK (NODE)->decl.u2.i)
2257
2258 /* In a TREE_LIST concatenating using directives, indicate indirect
2259    directives  */
2260 #define TREE_INDIRECT_USING(NODE) (TREE_LIST_CHECK (NODE)->common.lang_flag_0)
2261
2262 /* In a VAR_DECL for a variable declared in a for statement,
2263    this is the shadowed (local) variable.  */
2264 #define DECL_SHADOWED_FOR_VAR(NODE) DECL_RESULT_FLD(VAR_DECL_CHECK (NODE))
2265
2266 /* In a FUNCTION_DECL, this is nonzero if this function was defined in
2267    the class definition.  We have saved away the text of the function,
2268    but have not yet processed it.  */
2269 #define DECL_PENDING_INLINE_P(NODE) \
2270   (DECL_LANG_SPECIFIC (NODE)->u.f.pending_inline_p)
2271
2272 /* If DECL_PENDING_INLINE_P holds, this is the saved text of the
2273    function.  */
2274 #define DECL_PENDING_INLINE_INFO(NODE) \
2275   (DECL_LANG_SPECIFIC (NODE)->u.f.u.pending_inline_info)
2276
2277 /* For a TYPE_DECL: if this function has many fields, we'll sort them
2278    and put them into a TREE_VEC. */
2279 #define DECL_SORTED_FIELDS(NODE) \
2280   (DECL_LANG_SPECIFIC (TYPE_DECL_CHECK (NODE))->u.f.u.sorted_fields)
2281
2282 /* True if on the deferred_fns (see decl2.c) list.  */
2283 #define DECL_DEFERRED_FN(DECL) \
2284   (DECL_LANG_SPECIFIC (DECL)->decl_flags.deferred)
2285
2286 /* For a VAR_DECL, FUNCTION_DECL, TYPE_DECL or TEMPLATE_DECL:
2287    template-specific information.  */
2288 #define DECL_TEMPLATE_INFO(NODE) \
2289   (DECL_LANG_SPECIFIC (VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK (NODE)) \
2290    ->decl_flags.u.template_info)
2291
2292 /* Template information for a RECORD_TYPE or UNION_TYPE.  */
2293 #define CLASSTYPE_TEMPLATE_INFO(NODE) \
2294   (LANG_TYPE_CLASS_CHECK (RECORD_OR_UNION_TYPE_CHECK (NODE))->template_info)
2295
2296 /* Template information for an ENUMERAL_TYPE.  Although an enumeration may
2297    not be a primary template, it may be declared within the scope of a
2298    primary template and the enumeration constants may depend on
2299    non-type template parameters.  */
2300 #define ENUM_TEMPLATE_INFO(NODE) (TYPE_BINFO (ENUMERAL_TYPE_CHECK (NODE)))
2301
2302 /* Template information for a template template parameter.  */
2303 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) \
2304   (LANG_TYPE_CLASS_CHECK (BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK (NODE)) \
2305    ->template_info)
2306
2307 /* Template information for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
2308 #define TYPE_TEMPLATE_INFO(NODE)                        \
2309   (TREE_CODE (NODE) == ENUMERAL_TYPE                    \
2310    ? ENUM_TEMPLATE_INFO (NODE) :                        \
2311    (TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM    \
2312     ? TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (NODE) :     \
2313     (TYPE_LANG_SPECIFIC (NODE)                          \
2314      ? CLASSTYPE_TEMPLATE_INFO (NODE)                   \
2315      : NULL_TREE)))
2316
2317 /* Set the template information for an ENUMERAL_, RECORD_, or
2318    UNION_TYPE to VAL.  */
2319 #define SET_TYPE_TEMPLATE_INFO(NODE, VAL)       \
2320   (TREE_CODE (NODE) == ENUMERAL_TYPE            \
2321    ? (ENUM_TEMPLATE_INFO (NODE) = (VAL))        \
2322    : (CLASSTYPE_TEMPLATE_INFO (NODE) = (VAL)))
2323
2324 #define TI_TEMPLATE(NODE) (TREE_PURPOSE (NODE))
2325 #define TI_ARGS(NODE) (TREE_VALUE (NODE))
2326 #define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE)
2327
2328 /* We use TREE_VECs to hold template arguments.  If there is only one
2329    level of template arguments, then the TREE_VEC contains the
2330    arguments directly.  If there is more than one level of template
2331    arguments, then each entry in the TREE_VEC is itself a TREE_VEC,
2332    containing the template arguments for a single level.  The first
2333    entry in the outer TREE_VEC is the outermost level of template
2334    parameters; the last is the innermost.
2335
2336    It is incorrect to ever form a template argument vector containing
2337    only one level of arguments, but which is a TREE_VEC containing as
2338    its only entry the TREE_VEC for that level.  */
2339
2340 /* Non-zero if the template arguments is actually a vector of vectors,
2341    rather than just a vector.  */
2342 #define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE) \
2343   ((NODE) != NULL_TREE                                          \
2344    && TREE_CODE (NODE) == TREE_VEC                              \
2345    && TREE_VEC_LENGTH (NODE) > 0                                \
2346    && TREE_VEC_ELT (NODE, 0) != NULL_TREE                       \
2347    && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC)
2348
2349 /* The depth of a template argument vector.  When called directly by
2350    the parser, we use a TREE_LIST rather than a TREE_VEC to represent
2351    template arguments.  In fact, we may even see NULL_TREE if there
2352    are no template arguments.  In both of those cases, there is only
2353    one level of template arguments.  */
2354 #define TMPL_ARGS_DEPTH(NODE)                                   \
2355   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE) : 1)
2356
2357 /* The LEVELth level of the template ARGS.  The outermost level of of
2358    args is level 1, not level 0.  */
2359 #define TMPL_ARGS_LEVEL(ARGS, LEVEL)            \
2360   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS)        \
2361    ? TREE_VEC_ELT (ARGS, (LEVEL) - 1) : (ARGS))
2362
2363 /* Set the LEVELth level of the template ARGS to VAL.  This macro does
2364    not work with single-level argument vectors.  */
2365 #define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL)   \
2366   (TREE_VEC_ELT (ARGS, (LEVEL) - 1) = (VAL))
2367
2368 /* Accesses the IDXth parameter in the LEVELth level of the ARGS.  */
2369 #define TMPL_ARG(ARGS, LEVEL, IDX)                              \
2370   (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX))
2371
2372 /* Set the IDXth element in the LEVELth level of ARGS to VAL.  This
2373    macro does not work with single-level argument vectors.  */
2374 #define SET_TMPL_ARG(ARGS, LEVEL, IDX, VAL)                     \
2375   (TREE_VEC_ELT (TREE_VEC_ELT ((ARGS), (LEVEL) - 1), (IDX)) = (VAL))
2376
2377 /* Given a single level of template arguments in NODE, return the
2378    number of arguments.  */
2379 #define NUM_TMPL_ARGS(NODE)                             \
2380   ((NODE) == NULL_TREE ? 0                              \
2381    : (TREE_CODE (NODE) == TREE_VEC                      \
2382       ? TREE_VEC_LENGTH (NODE) : list_length (NODE)))
2383
2384 /* Returns the innermost level of template arguments in ARGS.  */
2385 #define INNERMOST_TEMPLATE_ARGS(NODE) \
2386   (get_innermost_template_args ((NODE), 1))
2387
2388 /* The number of levels of template parameters given by NODE.  */
2389 #define TMPL_PARMS_DEPTH(NODE) \
2390   ((HOST_WIDE_INT) TREE_INT_CST_LOW (TREE_PURPOSE (NODE)))
2391
2392 /* The TEMPLATE_DECL instantiated or specialized by NODE.  This
2393    TEMPLATE_DECL will be the immediate parent, not the most general
2394    template.  For example, in:
2395
2396       template <class T> struct S { template <class U> void f(U); }
2397
2398    the FUNCTION_DECL for S<int>::f<double> will have, as its
2399    DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'.
2400
2401    As a special case, for a member friend template of a template
2402    class, this value will not be a TEMPLATE_DECL, but rather a
2403    LOOKUP_EXPR, IDENTIFIER_NODE or OVERLOAD indicating the name of
2404    the template and any explicit template arguments provided.  For
2405    example, in:
2406
2407      template <class T> struct S { friend void f<int>(int, double); }
2408
2409    the DECL_TI_TEMPLATE will be a LOOKUP_EXPR for `f' and the
2410    DECL_TI_ARGS will be {int}.  */
2411 #define DECL_TI_TEMPLATE(NODE)      TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
2412
2413 /* The template arguments used to obtain this decl from the most
2414    general form of DECL_TI_TEMPLATE.  For the example given for
2415    DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}.  These
2416    are always the full set of arguments required to instantiate this
2417    declaration from the most general template specialized here.  */
2418 #define DECL_TI_ARGS(NODE)          TI_ARGS (DECL_TEMPLATE_INFO (NODE))
2419 #define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
2420 #define CLASSTYPE_TI_ARGS(NODE)     TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
2421 #define ENUM_TI_TEMPLATE(NODE)                  \
2422   TI_TEMPLATE (ENUM_TEMPLATE_INFO (NODE))
2423 #define ENUM_TI_ARGS(NODE)                      \
2424   TI_ARGS (ENUM_TEMPLATE_INFO (NODE))
2425
2426 /* Like DECL_TI_TEMPLATE, but for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
2427 #define TYPE_TI_TEMPLATE(NODE)                  \
2428   (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE)))
2429
2430 /* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
2431 #define TYPE_TI_ARGS(NODE)                      \
2432   (TI_ARGS (TYPE_TEMPLATE_INFO (NODE)))
2433
2434 #define INNERMOST_TEMPLATE_PARMS(NODE)  TREE_VALUE (NODE)
2435
2436 /* Nonzero if the NODE corresponds to the template parameters for a
2437    member template, whose inline definition is being processed after
2438    the class definition is complete.  */
2439 #define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE)
2440
2441 /* In a FUNCTION_DECL, the saved language-specific per-function data.  */
2442 #define DECL_SAVED_FUNCTION_DATA(NODE)                  \
2443   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))      \
2444    ->u.f.u.saved_language_function)
2445
2446 #define NEW_EXPR_USE_GLOBAL(NODE)       TREE_LANG_FLAG_0 (NODE)
2447 #define DELETE_EXPR_USE_GLOBAL(NODE)    TREE_LANG_FLAG_0 (NODE)
2448 #define DELETE_EXPR_USE_VEC(NODE)       TREE_LANG_FLAG_1 (NODE)
2449 #define LOOKUP_EXPR_GLOBAL(NODE)        TREE_LANG_FLAG_0 (NODE)
2450
2451 /* Nonzero if this AGGR_INIT_EXPR provides for initialization via a
2452    constructor call, rather than an ordinary function call.  */
2453 #define AGGR_INIT_VIA_CTOR_P(NODE) \
2454   TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE))
2455
2456 /* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a
2457    TEMPLATE_DECL.  This macro determines whether or not a given class
2458    type is really a template type, as opposed to an instantiation or
2459    specialization of one.  */
2460 #define CLASSTYPE_IS_TEMPLATE(NODE)  \
2461   (CLASSTYPE_TEMPLATE_INFO (NODE)    \
2462    && !CLASSTYPE_USE_TEMPLATE (NODE) \
2463    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
2464
2465 /* The name used by the user to name the typename type.  Typically,
2466    this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the
2467    corresponding TYPE_DECL.  However, this may also be a
2468    TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'.  */
2469 #define TYPENAME_TYPE_FULLNAME(NODE) (TYPE_FIELDS (NODE))
2470
2471 /* Nonzero if NODE is an implicit typename.  */
2472 #define IMPLICIT_TYPENAME_P(NODE) \
2473   (TREE_CODE (NODE) == TYPENAME_TYPE && TREE_TYPE (NODE))
2474
2475 /* Nonzero if NODE is a TYPE_DECL that should not be visible because
2476    it is from a dependent base class.  */
2477 #define IMPLICIT_TYPENAME_TYPE_DECL_P(NODE)     \
2478   (TREE_CODE (NODE) == TYPE_DECL                \
2479    && DECL_ARTIFICIAL (NODE)                    \
2480    && IMPLICIT_TYPENAME_P (TREE_TYPE (NODE)))
2481
2482 /* Nonzero in INTEGER_CST means that this int is negative by dint of
2483    using a twos-complement negated operand.  */
2484 #define TREE_NEGATED_INT(NODE) TREE_LANG_FLAG_0 (INTEGER_CST_CHECK (NODE))
2485
2486 /* Nonzero in any kind of _TYPE where conversions to base-classes may
2487    involve pointer arithmetic.  If this is zero, then converting to
2488    a base-class never requires changing the value of the pointer.  */
2489 #define TYPE_BASE_CONVS_MAY_REQUIRE_CODE_P(NODE) (TREE_LANG_FLAG_1 (NODE))
2490
2491 /* [class.virtual]
2492
2493    A class that declares or inherits a virtual function is called a
2494    polymorphic class.  */
2495 #define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE))
2496
2497 /* Nonzero if this class has a virtual function table pointer.  */
2498 #define TYPE_CONTAINS_VPTR_P(NODE)              \
2499   (TYPE_POLYMORPHIC_P (NODE)                    \
2500    || TYPE_USES_VIRTUAL_BASECLASSES (NODE))
2501
2502 extern int flag_new_for_scope;
2503
2504 /* This flag is true of a local VAR_DECL if it was declared in a for
2505    statement, but we are no longer in the scope of the for.  */
2506 #define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE))
2507
2508 /* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL
2509    if we already emitted a warning about using it.  */
2510 #define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (VAR_DECL_CHECK (NODE))
2511
2512 /* Nonzero if NODE is a FUNCTION_DECL (for a function with global
2513    scope) declared in a local scope.  */
2514 #define DECL_LOCAL_FUNCTION_P(NODE) \
2515   DECL_LANG_FLAG_0 (FUNCTION_DECL_CHECK (NODE))
2516
2517 /* Nonzero if NODE is a FUNCTION_DECL for a built-in function, and we have
2518    not yet seen a prototype for that function.  */
2519 #define DECL_ANTICIPATED(NODE) \
2520   (DECL_LANG_SPECIFIC (DECL_CHECK (NODE))->decl_flags.anticipated_p)
2521
2522 /* Record whether a typedef for type `int' was actually `signed int'.  */
2523 #define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP)
2524
2525 /* Returns non-zero if DECL has external linkage, as specified by the
2526    language standard.  (This predicate may hold even when the
2527    corresponding entity is not actually given external linkage in the
2528    object file; see decl_linkage for details.)  */
2529 #define DECL_EXTERNAL_LINKAGE_P(DECL) \
2530   (decl_linkage (DECL) == lk_external)
2531
2532 #define INTEGRAL_CODE_P(CODE) \
2533   ((CODE) == INTEGER_TYPE || (CODE) == ENUMERAL_TYPE || (CODE) == BOOLEAN_TYPE)
2534
2535 /* [basic.fundamental]
2536
2537    Types  bool, char, wchar_t, and the signed and unsigned integer types
2538    are collectively called integral types.
2539
2540    Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration
2541    types as well, which is incorrect in C++.  */
2542 #define CP_INTEGRAL_TYPE_P(TYPE)                \
2543   (TREE_CODE (TYPE) == BOOLEAN_TYPE             \
2544    || TREE_CODE (TYPE) == INTEGER_TYPE)
2545
2546 /* [basic.fundamental]
2547
2548    Integral and floating types are collectively called arithmetic
2549    types.  */
2550 #define ARITHMETIC_TYPE_P(TYPE) \
2551   (CP_INTEGRAL_TYPE_P (TYPE) || TREE_CODE (TYPE) == REAL_TYPE)
2552
2553 /* [basic.types]
2554
2555    Arithmetic types, enumeration types, pointer types, and
2556    pointer-to-member types, are collectively called scalar types.  */
2557 #define SCALAR_TYPE_P(TYPE)                     \
2558   (ARITHMETIC_TYPE_P (TYPE)                     \
2559    || TREE_CODE (TYPE) == ENUMERAL_TYPE         \
2560    || TYPE_PTR_P (TYPE)                         \
2561    || TYPE_PTRMEM_P (TYPE)                      \
2562    || TYPE_PTRMEMFUNC_P (TYPE))
2563
2564 /* Nonzero for _TYPE means that the _TYPE defines
2565    at least one constructor.  */
2566 #define TYPE_HAS_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1 (NODE))
2567
2568 /* When appearing in an INDIRECT_REF, it means that the tree structure
2569    underneath is actually a call to a constructor.  This is needed
2570    when the constructor must initialize local storage (which can
2571    be automatically destroyed), rather than allowing it to allocate
2572    space from the heap.
2573
2574    When appearing in a SAVE_EXPR, it means that underneath
2575    is a call to a constructor.
2576
2577    When appearing in a CONSTRUCTOR, it means that it was
2578    a GNU C constructor expression.
2579
2580    When appearing in a FIELD_DECL, it means that this field
2581    has been duly initialized in its constructor.  */
2582 #define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4 (NODE))
2583
2584 #define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR         \
2585                                    && CONSTRUCTOR_ELTS (NODE) == NULL_TREE \
2586                                    && ! TREE_HAS_CONSTRUCTOR (NODE))
2587
2588 /* Nonzero for _TYPE means that the _TYPE defines a destructor.  */
2589 #define TYPE_HAS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_2 (NODE))
2590
2591 /* Nonzero means that an object of this type can not be initialized using
2592    an initializer list.  */
2593 #define CLASSTYPE_NON_AGGREGATE(NODE) \
2594   (LANG_TYPE_CLASS_CHECK (NODE)->non_aggregate)
2595 #define TYPE_NON_AGGREGATE_CLASS(NODE) \
2596   (IS_AGGR_TYPE (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
2597
2598 /* Nonzero if there is a user-defined X::op=(x&) for this class.  */
2599 #define TYPE_HAS_REAL_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_real_assign_ref)
2600 #define TYPE_HAS_COMPLEX_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_assign_ref)
2601 #define TYPE_HAS_ABSTRACT_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_abstract_assign_ref)
2602 #define TYPE_HAS_COMPLEX_INIT_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_init_ref)
2603
2604 /* Nonzero if TYPE has a trivial destructor.  From [class.dtor]:
2605
2606      A destructor is trivial if it is an implicitly declared
2607      destructor and if:
2608
2609        - all of the direct base classes of its class have trivial
2610          destructors,
2611
2612        - for all of the non-static data members of its class that are
2613          of class type (or array thereof), each such class has a
2614          trivial destructor.  */
2615 #define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \
2616   (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE))
2617
2618 /* Nonzero for _TYPE node means that this type does not have a trivial
2619    destructor.  Therefore, destroying an object of this type will
2620    involve a call to a destructor.  This can apply to objects of
2621    ARRAY_TYPE is the type of the elements needs a destructor.  */
2622 #define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \
2623   (TYPE_LANG_FLAG_4 (NODE))
2624
2625 /* Nonzero for class type means that copy initialization of this type can use
2626    a bitwise copy.  */
2627 #define TYPE_HAS_TRIVIAL_INIT_REF(NODE) \
2628   (TYPE_HAS_INIT_REF (NODE) && ! TYPE_HAS_COMPLEX_INIT_REF (NODE))
2629
2630 /* Nonzero for class type means that assignment of this type can use
2631    a bitwise copy.  */
2632 #define TYPE_HAS_TRIVIAL_ASSIGN_REF(NODE) \
2633   (TYPE_HAS_ASSIGN_REF (NODE) && ! TYPE_HAS_COMPLEX_ASSIGN_REF (NODE))
2634
2635 #define TYPE_PTRMEM_P(NODE)                                     \
2636   (TREE_CODE (NODE) == POINTER_TYPE                             \
2637    && TREE_CODE (TREE_TYPE (NODE)) == OFFSET_TYPE)
2638 #define TYPE_PTR_P(NODE)                                \
2639   (TREE_CODE (NODE) == POINTER_TYPE                     \
2640    && TREE_CODE (TREE_TYPE (NODE)) != OFFSET_TYPE)
2641 #define TYPE_PTROB_P(NODE)                                              \
2642   (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE   \
2643    && TREE_CODE (TREE_TYPE (NODE)) != VOID_TYPE)
2644 #define TYPE_PTROBV_P(NODE)                                             \
2645   (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE)
2646 #define TYPE_PTRFN_P(NODE)                              \
2647   (TREE_CODE (NODE) == POINTER_TYPE                     \
2648    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
2649 #define TYPE_REFFN_P(NODE)                              \
2650   (TREE_CODE (NODE) == REFERENCE_TYPE                   \
2651    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
2652
2653 /* Nonzero for _TYPE node means that this type is a pointer to member
2654    function type.  */
2655 #define TYPE_PTRMEMFUNC_P(NODE)         \
2656   (TREE_CODE (NODE) == RECORD_TYPE      \
2657    && TYPE_LANG_SPECIFIC (NODE)         \
2658    && TYPE_PTRMEMFUNC_FLAG (NODE))
2659
2660 #define TYPE_PTRMEMFUNC_FLAG(NODE) \
2661   (LANG_TYPE_CLASS_CHECK (NODE)->ptrmemfunc_flag)
2662
2663 /* Indicates when overload resolution may resolve to a pointer to
2664    member function. [expr.unary.op]/3 */
2665 #define PTRMEM_OK_P(NODE) TREE_LANG_FLAG_0 (NODE)
2666
2667 /* A pointer-to-function member type looks like:
2668
2669      struct {
2670        __P __pfn;
2671        ptrdiff_t __delta;
2672      };
2673
2674    If __pfn is NULL, it is a NULL pointer-to-member-function.
2675
2676    (Because the vtable is always the first thing in the object, we
2677    don't need its offset.)  If the function is virtual, then PFN is
2678    one plus twice the index into the vtable; otherwise, it is just a
2679    pointer to the function.
2680
2681    Unfortunately, using the lowest bit of PFN doesn't work in
2682    architectures that don't impose alignment requirements on function
2683    addresses, or that use the lowest bit to tell one ISA from another,
2684    for example.  For such architectures, we use the lowest bit of
2685    DELTA instead of the lowest bit of the PFN, and DELTA will be
2686    multiplied by 2.  */
2687 enum ptrmemfunc_vbit_where_t
2688 {
2689   ptrmemfunc_vbit_in_pfn,
2690   ptrmemfunc_vbit_in_delta
2691 };
2692
2693 /* Get the POINTER_TYPE to the METHOD_TYPE associated with this
2694    pointer to member function.  TYPE_PTRMEMFUNC_P _must_ be true,
2695    before using this macro.  */
2696 #define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \
2697   (TREE_TYPE (TYPE_FIELDS (NODE)))
2698
2699 /* Returns `A' for a type like `int (A::*)(double)' */
2700 #define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \
2701   TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
2702
2703 /* These are use to manipulate the canonical RECORD_TYPE from the
2704    hashed POINTER_TYPE, and can only be used on the POINTER_TYPE.  */
2705 #define TYPE_GET_PTRMEMFUNC_TYPE(NODE) \
2706   (TYPE_LANG_SPECIFIC (NODE) ? LANG_TYPE_PTRMEM_CHECK (NODE)->record : NULL)
2707 #define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE)                           \
2708   do {                                                                  \
2709     if (TYPE_LANG_SPECIFIC (NODE) == NULL)                              \
2710       {                                                                 \
2711         TYPE_LANG_SPECIFIC (NODE) =                                     \
2712           ggc_alloc_cleared (sizeof (struct lang_type_ptrmem));         \
2713         TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.h.is_lang_type_class = 0;   \
2714       }                                                                 \
2715     TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.record = (VALUE);               \
2716   } while (0)
2717 /* Returns the pfn field from a TYPE_PTRMEMFUNC_P.  */
2718 #define PFN_FROM_PTRMEMFUNC(NODE) pfn_from_ptrmemfunc ((NODE))
2719
2720 /* For a pointer-to-member type of the form `T X::*', this is `X'.
2721    For a type like `void (X::*)() const', this type is `X', not `const
2722    X'.  To get at the `const X' you have to look at the
2723    TYPE_PTRMEM_POINTED_TO_TYPE; there, the first parameter will have
2724    type `const X*'.  */
2725 #define TYPE_PTRMEM_CLASS_TYPE(NODE)                    \
2726   (TYPE_PTRMEM_P (NODE)                                 \
2727    ? TYPE_OFFSET_BASETYPE (TREE_TYPE (NODE))            \
2728    : TYPE_PTRMEMFUNC_OBJECT_TYPE (NODE))
2729
2730 /* For a pointer-to-member type of the form `T X::*', this is `T'.  */
2731 #define TYPE_PTRMEM_POINTED_TO_TYPE(NODE)               \
2732    (TYPE_PTRMEM_P (NODE)                                \
2733     ? TREE_TYPE (TREE_TYPE (NODE))                      \
2734     : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
2735
2736 /* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for
2737    `X'.  */
2738 #define PTRMEM_CST_CLASS(NODE) \
2739   TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE)))
2740
2741 /* For a pointer-to-member constant `X::Y' this is the _DECL for
2742    `Y'.  */
2743 #define PTRMEM_CST_MEMBER(NODE) (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member)
2744
2745 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
2746    specified in its declaration.  This can also be set for an
2747    erroneously declared PARM_DECL.  */
2748 #define DECL_THIS_EXTERN(NODE) \
2749   DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
2750
2751 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
2752    specified in its declaration.  This can also be set for an
2753    erroneously declared PARM_DECL.  */
2754 #define DECL_THIS_STATIC(NODE) \
2755   DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
2756
2757 /* Nonzero if TYPE is an anonymous union or struct type.  We have to use a
2758    flag for this because "A union for which objects or pointers are
2759    declared is not an anonymous union" [class.union].  */
2760 #define ANON_AGGR_TYPE_P(NODE)                          \
2761   (CLASS_TYPE_P (NODE) && LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr)
2762 #define SET_ANON_AGGR_TYPE_P(NODE)                      \
2763   (LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr = 1)
2764
2765 /* Nonzero if TYPE is an anonymous union type.  */
2766 #define ANON_UNION_TYPE_P(NODE) \
2767   (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE))
2768
2769 #define UNKNOWN_TYPE LANG_TYPE
2770
2771 /* Define fields and accessors for nodes representing declared names.  */
2772
2773 #define TYPE_WAS_ANONYMOUS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->was_anonymous)
2774
2775 /* C++: all of these are overloaded!  These apply only to TYPE_DECLs.  */
2776
2777 /* The format of each node in the DECL_FRIENDLIST is as follows:
2778
2779    The TREE_PURPOSE will be the name of a function, i.e., an
2780    IDENTIFIER_NODE.  The TREE_VALUE will be itself a TREE_LIST, the
2781    list of functions with that name which are friends.  The
2782    TREE_PURPOSE of each node in this sublist will be error_mark_node,
2783    if the function was declared a friend individually, in which case
2784    the TREE_VALUE will be the function_decl.  If, however, all
2785    functions with a given name in a class were declared to be friends,
2786    the TREE_PUROSE will be the class type, and the TREE_VALUE will be
2787    NULL_TREE.  */
2788 #define DECL_FRIENDLIST(NODE)           (DECL_INITIAL (NODE))
2789 #define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
2790 #define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
2791
2792 /* The DECL_ACCESS, if non-NULL, is a TREE_LIST.  The TREE_PURPOSE of
2793    each node is a type; the TREE_VALUE is the access granted for this
2794    DECL in that type.  The DECL_ACCESS is set by access declarations.
2795    For example, if a member that would normally be public in a
2796    derived class is made protected, then the derived class and the
2797    protected_access_node will appear in the DECL_ACCESS for the node.  */
2798 #define DECL_ACCESS(NODE) (LANG_DECL_U2_CHECK (NODE, 0)->access)
2799
2800 /* Nonzero if the FUNCTION_DECL is a global constructor.  */
2801 #define DECL_GLOBAL_CTOR_P(NODE) \
2802   (DECL_LANG_SPECIFIC (NODE)->decl_flags.global_ctor_p)
2803
2804 /* Nonzero if the FUNCTION_DECL is a global destructor.  */
2805 #define DECL_GLOBAL_DTOR_P(NODE) \
2806   (DECL_LANG_SPECIFIC (NODE)->decl_flags.global_dtor_p)
2807
2808 /* If DECL_GLOBAL_CTOR_P or DECL_GLOBAL_DTOR_P holds, this macro
2809    returns the initialization priority for the function.  Constructors
2810    with lower numbers should be run first.  Destructors should be run
2811    in the reverse order of constructors.  */
2812 #define GLOBAL_INIT_PRIORITY(NODE) \
2813   (LANG_DECL_U2_CHECK (NODE, 1)->init_priority)
2814
2815 /* Accessor macros for C++ template decl nodes.  */
2816
2817 /* The DECL_TEMPLATE_PARMS are a list.  The TREE_PURPOSE of each node
2818    is a INT_CST whose TREE_INT_CST_LOW indicates the level of the
2819    template parameters, with 1 being the outermost set of template
2820    parameters.  The TREE_VALUE is a vector, whose elements are the
2821    template parameters at each level.  Each element in the vector is a
2822    TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a
2823    non-type parameter), or a TYPE_DECL (if the parameter is a type
2824    parameter).  The TREE_PURPOSE is the default value, if any.  The
2825    TEMPLATE_PARM_INDEX for the parameter is avilable as the
2826    DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a
2827    TYPE_DECL).  */
2828 #define DECL_TEMPLATE_PARMS(NODE)       DECL_ARGUMENTS (NODE)
2829 #define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
2830    INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
2831 #define DECL_NTPARMS(NODE) \
2832    TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
2833 /* For function, method, class-data templates.  */
2834 #define DECL_TEMPLATE_RESULT(NODE)      DECL_RESULT_FLD (NODE)
2835 /* For a static member variable template, the
2836    DECL_TEMPLATE_INSTANTIATIONS list contains the explicitly and
2837    implicitly generated instantiations of the variable.  There are no
2838    partial instantiations of static member variables, so all of these
2839    will be full instantiations.
2840
2841    For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds
2842    all instantiations and specializations of the class type, including
2843    partial instantiations and partial specializations.
2844
2845    In both cases, the TREE_PURPOSE of each node contains the arguments
2846    used; the TREE_VALUE contains the generated variable.  The template
2847    arguments are always complete.  For example, given:
2848
2849       template <class T> struct S1 {
2850         template <class U> struct S2 {};
2851         template <class U> struct S2<U*> {};
2852       };
2853
2854    the record for the partial specialization will contain, as its
2855    argument list, { {T}, {U*} }, and will be on the
2856    DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template
2857    <class U> struct S1<T>::S2'.
2858
2859    This list is not used for function templates.  */
2860 #define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX (NODE)
2861 /* For a function template, the DECL_TEMPLATE_SPECIALIZATIONS lists
2862    contains all instantiations and specializations of the function,
2863    including partial instantiations.  For a partial instantiation
2864    which is a specialization, this list holds only full
2865    specializations of the template that are instantiations of the
2866    partial instantiation.  For example, given:
2867
2868       template <class T> struct S {
2869         template <class U> void f(U);
2870         template <> void f(T);
2871       };
2872
2873    the `S<int>::f<int>(int)' function will appear on the
2874    DECL_TEMPLATE_SPECIALIZATIONS list for both `template <class T>
2875    template <class U> void S<T>::f(U)' and `template <class T> void
2876    S<int>::f(T)'.  In the latter case, however, it will have only the
2877    innermost set of arguments (T, in this case).  The DECL_TI_TEMPLATE
2878    for the function declaration will point at the specialization, not
2879    the fully general template.
2880
2881    For a class template, this list contains the partial
2882    specializations of this template.  (Full specializations are not
2883    recorded on this list.)  The TREE_PURPOSE holds the innermost
2884    arguments used in the partial specialization (e.g., for `template
2885    <class T> struct S<T*, int>' this will be `T*'.)  The TREE_VALUE
2886    holds the innermost template parameters for the specialization
2887    (e.g., `T' in the example above.)  The TREE_TYPE is the _TYPE node
2888    for the partial specialization.
2889
2890    This list is not used for static variable templates.  */
2891 #define DECL_TEMPLATE_SPECIALIZATIONS(NODE)     DECL_SIZE (NODE)
2892
2893 /* Nonzero for a DECL which is actually a template parameter.  */
2894 #define DECL_TEMPLATE_PARM_P(NODE)              \
2895   (DECL_LANG_FLAG_0 (NODE)                      \
2896    && (TREE_CODE (NODE) == CONST_DECL           \
2897        || TREE_CODE (NODE) == PARM_DECL         \
2898        || TREE_CODE (NODE) == TYPE_DECL         \
2899        || TREE_CODE (NODE) == TEMPLATE_DECL))
2900
2901 /* Mark NODE as a template parameter.  */
2902 #define SET_DECL_TEMPLATE_PARM_P(NODE) \
2903   (DECL_LANG_FLAG_0 (NODE) = 1)
2904
2905 /* Nonzero if NODE is a template template parameter.  */
2906 #define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \
2907   (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE))
2908
2909 #define DECL_FUNCTION_TEMPLATE_P(NODE)  \
2910   (TREE_CODE (NODE) == TEMPLATE_DECL \
2911    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
2912
2913 /* Nonzero for a DECL that represents a template class.  */
2914 #define DECL_CLASS_TEMPLATE_P(NODE) \
2915   (TREE_CODE (NODE) == TEMPLATE_DECL \
2916    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL \
2917    && !DECL_TEMPLATE_TEMPLATE_PARM_P (NODE))
2918
2919 /* Nonzero if NODE which declares a type.  */
2920 #define DECL_DECLARES_TYPE_P(NODE) \
2921   (TREE_CODE (NODE) == TYPE_DECL || DECL_CLASS_TEMPLATE_P (NODE))
2922
2923 /* Nonzero if NODE is the typedef implicitly generated for a type when
2924    the type is declared.  (In C++, `struct S {};' is roughly equivalent
2925    to `struct S {}; typedef struct S S;' in C.  This macro will hold
2926    for the typedef indicated in this example.  Note that in C++, there
2927    is a second implicit typedef for each class, in the scope of `S'
2928    itself, so that you can say `S::S'.  This macro does *not* hold for
2929    those typedefs.  */
2930 #define DECL_IMPLICIT_TYPEDEF_P(NODE) \
2931   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_2 (NODE))
2932 #define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \
2933   (DECL_LANG_FLAG_2 (NODE) = 1)
2934
2935 /* A `primary' template is one that has its own template header.  A
2936    member function of a class template is a template, but not primary.
2937    A member template is primary.  Friend templates are primary, too.  */
2938
2939 /* Returns the primary template corresponding to these parameters.  */
2940 #define DECL_PRIMARY_TEMPLATE(NODE) \
2941   (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)))
2942
2943 /* Returns non-zero if NODE is a primary template.  */
2944 #define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == (NODE))
2945
2946 #define CLASSTYPE_TEMPLATE_LEVEL(NODE) \
2947   (TREE_INT_CST_LOW (TREE_PURPOSE (CLASSTYPE_TI_TEMPLATE (NODE))))
2948
2949 /* Indicates whether or not (and how) a template was expanded for this
2950    FUNCTION_DECL or VAR_DECL.
2951      0=normal declaration, e.g. int min (int, int);
2952      1=implicit template instantiation
2953      2=explicit template specialization, e.g. int min<int> (int, int);
2954      3=explicit template instantiation, e.g. template int min<int> (int, int);  */
2955 #define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.use_template)
2956
2957 #define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
2958 #define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
2959   (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
2960
2961 #define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
2962 #define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
2963 #define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
2964   (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
2965 #define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
2966   (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
2967
2968 #define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
2969 #define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
2970 #define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
2971   (CLASSTYPE_USE_TEMPLATE (NODE) == 1)
2972 #define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
2973   (CLASSTYPE_USE_TEMPLATE (NODE) = 1)
2974
2975 #define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
2976 #define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
2977 #define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
2978   (CLASSTYPE_USE_TEMPLATE (NODE) == 3)
2979 #define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
2980   (CLASSTYPE_USE_TEMPLATE (NODE) = 3)
2981
2982 /* Non-zero if DECL is a friend function which is an instantiation
2983    from the point of view of the compiler, but not from the point of
2984    view of the language.  For example given:
2985       template <class T> struct S { friend void f(T) {}; };
2986    the declaration of `void f(int)' generated when S<int> is
2987    instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be
2988    a DECL_FRIEND_PSUEDO_TEMPLATE_INSTANTIATION.  */
2989 #define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \
2990   (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL))
2991
2992 /* Non-zero if TYPE is a partial instantiation of a template class,
2993    i.e., an instantiation whose instantiation arguments involve
2994    template types.  */
2995 #define PARTIAL_INSTANTIATION_P(TYPE) \
2996   (LANG_TYPE_CLASS_CHECK (TYPE)->is_partial_instantiation)
2997
2998 /* Non-zero iff we are currently processing a declaration for an
2999    entity with its own template parameter list, and which is not a
3000    full specialization.  */
3001 #define PROCESSING_REAL_TEMPLATE_DECL_P() \
3002   (processing_template_decl > template_class_depth (current_class_type))
3003
3004 /* This function may be a guiding decl for a template.  */
3005 #define DECL_MAYBE_TEMPLATE(NODE) DECL_LANG_FLAG_4 (NODE)
3006
3007 /* Nonzero if this VAR_DECL or FUNCTION_DECL has already been
3008    instantiated, i.e. its definition has been generated from the
3009    pattern given in the the template.  */
3010 #define DECL_TEMPLATE_INSTANTIATED(NODE) \
3011   DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE))
3012
3013 /* We know what we're doing with this decl now.  */
3014 #define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
3015
3016 /* This function was declared inline.  This flag controls the linkage
3017    semantics of 'inline'; whether or not the function is inlined is
3018    controlled by DECL_INLINE.  */
3019 #define DECL_DECLARED_INLINE_P(NODE) \
3020   (DECL_LANG_SPECIFIC (NODE)->decl_flags.base.declared_inline)
3021
3022 /* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
3023    so that assemble_external will work properly.  So we have this flag to
3024    tell us whether the decl is really not external.  */
3025 #define DECL_NOT_REALLY_EXTERN(NODE) \
3026   (DECL_LANG_SPECIFIC (NODE)->decl_flags.not_really_extern)
3027
3028 #define DECL_REALLY_EXTERN(NODE) \
3029   (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE))
3030
3031 /* A thunk is a stub function.
3032
3033    A thunk is an alternate entry point for an ordinary FUNCTION_DECL.
3034    The address of the ordinary FUNCTION_DECL is given by the
3035    DECL_INITIAL, which is always an ADDR_EXPR whose operand is a
3036    FUNCTION_DECL.  The job of the thunk is to adjust the `this'
3037    pointer before transferring control to the FUNCTION_DECL.
3038
3039    A thunk may perform either, or both, of the following operations:
3040
3041    o Adjust the `this' pointer by a constant offset.
3042    o Adjust the `this' pointer by looking up a vcall-offset
3043      in the vtable.
3044
3045    If both operations are performed, then the constant adjument to
3046    `this' is performed first.
3047
3048    The constant adjustment is given by THUNK_DELTA.  If the
3049    vcall-offset is required, the index into the vtable is given by
3050    THUNK_VCALL_OFFSET.  */
3051
3052 /* An integer indicating how many bytes should be subtracted from the
3053    `this' pointer when this function is called.  */
3054 #define THUNK_DELTA(DECL) (DECL_CHECK (DECL)->decl.u1.i)
3055
3056 /* A tree indicating how many bytes should be subtracted from the
3057    vtable for the `this' pointer to find the vcall offset.  (The vptr
3058    is always located at offset zero from the f `this' pointer.)  If
3059    NULL, then there is no vcall offset.  */
3060 #define THUNK_VCALL_OFFSET(DECL) \
3061   (LANG_DECL_U2_CHECK (DECL, 0)->vcall_offset)
3062
3063 /* These macros provide convenient access to the various _STMT nodes
3064    created when parsing template declarations.  */
3065 #define TRY_STMTS(NODE)         TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0)
3066 #define TRY_HANDLERS(NODE)      TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1)
3067
3068 #define EH_SPEC_STMTS(NODE)     TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 0)
3069 #define EH_SPEC_RAISES(NODE)    TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 1)
3070
3071 #define USING_STMT_NAMESPACE(NODE) TREE_OPERAND (USING_STMT_CHECK (NODE), 0)
3072
3073 /* Nonzero if this try block is a function try block.  */
3074 #define FN_TRY_BLOCK_P(NODE)    TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE))
3075 #define HANDLER_PARMS(NODE)     TREE_OPERAND (HANDLER_CHECK (NODE), 0)
3076 #define HANDLER_BODY(NODE)      TREE_OPERAND (HANDLER_CHECK (NODE), 1)
3077 #define HANDLER_TYPE(NODE)      TREE_TYPE (HANDLER_CHECK (NODE))
3078
3079 /* The parameters for a call-declarator.  */
3080 #define CALL_DECLARATOR_PARMS(NODE) \
3081   (TREE_PURPOSE (TREE_OPERAND (NODE, 1)))
3082
3083 /* The cv-qualifiers for a call-declarator.  */
3084 #define CALL_DECLARATOR_QUALS(NODE) \
3085   (TREE_VALUE (TREE_OPERAND (NODE, 1)))
3086
3087 /* The exception-specification for a call-declarator.  */
3088 #define CALL_DECLARATOR_EXCEPTION_SPEC(NODE) \
3089   (TREE_TYPE (NODE))
3090
3091 /* An enumeration of the kind of tags that C++ accepts.  */
3092 enum tag_types { record_type, class_type, union_type, enum_type };
3093
3094 /* The various kinds of lvalues we distinguish.  */
3095 typedef enum cp_lvalue_kind {
3096   clk_none = 0,     /* Things that are not an lvalue.  */
3097   clk_ordinary = 1, /* An ordinary lvalue.  */
3098   clk_class = 2,    /* An rvalue of class-type.  */
3099   clk_bitfield = 4, /* An lvalue for a bit-field.  */
3100 } cp_lvalue_kind;
3101
3102 /* The kinds of scopes we recognize.  */
3103 typedef enum scope_kind {
3104   sk_template_parms, /* A scope for template parameters.  */
3105   sk_template_spec   /* A scope corresponding to a template
3106                         specialization.  There is never anything in
3107                         this scope.  */
3108 } scope_kind;
3109
3110 /* Various kinds of template specialization, instantiation, etc.  */
3111 typedef enum tmpl_spec_kind {
3112   tsk_none,                /* Not a template at all.  */
3113   tsk_invalid_member_spec, /* An explicit member template
3114                               specialization, but the enclosing
3115                               classes have not all been explicitly
3116                               specialized.  */
3117   tsk_invalid_expl_inst,   /* An explicit instantiation containing
3118                               template parameter lists.  */
3119   tsk_excessive_parms,     /* A template declaration with too many
3120                               template parameter lists.  */
3121   tsk_insufficient_parms,  /* A template declaration with too few
3122                               parameter lists.  */
3123   tsk_template,            /* A template declaration.  */
3124   tsk_expl_spec,           /* An explicit specialization.  */
3125   tsk_expl_inst            /* An explicit instantiation.  */
3126 } tmpl_spec_kind;
3127
3128 /* The various kinds of access.  BINFO_ACCESS depends on these being
3129    two bit quantities.  The numerical values are important; they are
3130    used to initialize RTTI data structures, so changing them changes
3131    the ABI.  */
3132 typedef enum access_kind {
3133   ak_none = 0,             /* Inaccessible.  */
3134   ak_public = 1,           /* Accessible, as a `public' thing.  */
3135   ak_protected = 2,        /* Accessible, as a `protected' thing.  */
3136   ak_private = 3           /* Accessible, as a `private' thing.  */
3137 } access_kind;
3138
3139 /* The various kinds of special functions.  If you add to this list,
3140    you should update special_function_p as well.  */
3141 typedef enum special_function_kind {
3142   sfk_none = 0,            /* Not a special function.  This enumeral
3143                               must have value zero; see
3144                               special_function_p.  */
3145   sfk_constructor,         /* A constructor.  */
3146   sfk_copy_constructor,    /* A copy constructor.  */
3147   sfk_assignment_operator, /* An assignment operator.  */
3148   sfk_destructor,          /* A destructor.  */
3149   sfk_complete_destructor, /* A destructor for complete objects.  */
3150   sfk_base_destructor,     /* A destructor for base subobjects.  */
3151   sfk_deleting_destructor, /* A destructor for complete objects that
3152                               deletes the object after it has been
3153                               destroyed.  */
3154   sfk_conversion           /* A conversion operator.  */
3155 } special_function_kind;
3156
3157 /* The various kinds of linkage.  From [basic.link],
3158
3159       A name is said to have linkage when it might denote the same
3160       object, reference, function, type, template, namespace or value
3161       as a name introduced in another scope:
3162
3163       -- When a name has external linkage, the entity it denotes can
3164          be referred to from scopes of other translation units or from
3165          other scopes of the same translation unit.
3166
3167       -- When a name has internal linkage, the entity it denotes can
3168          be referred to by names from other scopes in the same
3169          translation unit.
3170
3171       -- When a name has no linkage, the entity it denotes cannot be
3172          referred to by names from other scopes.  */
3173
3174 typedef enum linkage_kind {
3175   lk_none,                 /* No linkage.  */
3176   lk_internal,             /* Internal linkage.  */
3177   lk_external              /* External linkage.  */
3178 } linkage_kind;
3179
3180 /* Bitmask flags to control type substitution.  */
3181 typedef enum tsubst_flags_t {
3182   tf_none = 0,               /* nothing special */
3183   tf_error = 1 << 0,         /* give error messages  */
3184   tf_warning = 1 << 1,       /* give warnings too  */
3185   tf_no_attributes = 1 << 2, /* ignore attributes on comparisons
3186                                 (instantiate_type use) */
3187   tf_ignore_bad_quals = 1 << 3, /* ignore bad cvr qualifiers */
3188   tf_keep_type_decl = 1 << 4,   /* retain typedef type decls
3189                                    (make_typename_type use) */
3190   tf_ptrmem_ok = 1 << 5      /* pointers to member ok (internal
3191                                 instantiate_type use) */
3192 } tsubst_flags_t;
3193
3194 /* The kind of checking we can do looking in a class hierarchy. */
3195 typedef enum base_access {
3196   ba_any = 0,      /* Do not check access, allow an ambiguous base,
3197                       prefer a non-virtual base */
3198   ba_ignore = 1,   /* Do not check access */
3199   ba_check = 2,    /* Check access */
3200   ba_not_special = 3, /* Do not consider special privilege
3201                          current_class_type might give. */
3202   ba_quiet = 4,    /* Do not issue error messages (bit mask).  */
3203 } base_access;
3204
3205 /* The kind of base we can find, looking in a class hierarchy.
3206    Values <0 indicate we failed. */
3207 typedef enum base_kind {
3208   bk_inaccessible = -3,   /* The base is inaccessible */
3209   bk_ambig = -2,          /* The base is ambiguous */
3210   bk_not_base = -1,       /* It is not a base */
3211   bk_same_type = 0,       /* It is the same type */
3212   bk_proper_base = 1,     /* It is a proper base */
3213   bk_via_virtual = 2      /* It is a proper base, but via a virtual
3214                              path. This might not be the canonical
3215                              binfo. */
3216 } base_kind;
3217
3218 /* Non-zero means warn in function declared in derived class has the
3219    same name as a virtual in the base class, but fails to match the
3220    type signature of any virtual function in the base class.  */
3221 extern int warn_overloaded_virtual;
3222
3223 /* Set by add_implicitly_declared_members() to keep those members from
3224    being flagged as deprecated or reported as using deprecated
3225    types.  */
3226 extern int adding_implicit_members;
3227
3228 /* Non-zero means warn if a non-templatized friend function is
3229    declared in a templatized class. This behavior is warned about with
3230    flag_guiding_decls in do_friend. */
3231 extern int warn_nontemplate_friend;
3232
3233 /* in decl{2}.c */
3234 /* A node that is a list (length 1) of error_mark_nodes.  */
3235 extern GTY(()) tree error_mark_list;
3236
3237 /* Node for "pointer to (virtual) function".
3238    This may be distinct from ptr_type_node so gdb can distinguish them.  */
3239 #define vfunc_ptr_type_node  vtable_entry_type
3240
3241
3242 /* For building calls to `delete'.  */
3243 extern GTY(()) tree integer_two_node;
3244 extern GTY(()) tree integer_three_node;
3245
3246 extern GTY(()) tree anonymous_namespace_name;
3247
3248 /* The number of function bodies which we are currently processing.
3249    (Zero if we are at namespace scope, one inside the body of a
3250    function, two inside the body of a function in a local class, etc.)  */
3251 extern int function_depth;
3252
3253 /* in pt.c  */
3254
3255 /* These values are used for the `STRICT' parameter to type_unification and
3256    fn_type_unification.  Their meanings are described with the
3257    documentation for fn_type_unification.  */
3258
3259 typedef enum unification_kind_t {
3260   DEDUCE_CALL,
3261   DEDUCE_CONV,
3262   DEDUCE_EXACT,
3263   DEDUCE_ORDER
3264 } unification_kind_t;
3265
3266 /* Macros for operating on a template instantiation level node, represented
3267    by an EXPR_WITH_FILE_LOCATION.  */
3268
3269 #define TINST_DECL(NODE) EXPR_WFL_NODE (NODE)
3270 #define TINST_LINE(NODE) EXPR_WFL_LINENO (NODE)
3271 #define TINST_FILE(NODE) EXPR_WFL_FILENAME (NODE)
3272
3273 /* in class.c */
3274
3275 extern int current_class_depth;
3276
3277 /* An array of all local classes present in this translation unit, in
3278    declaration order.  */
3279 extern GTY(()) varray_type local_classes;
3280 \f
3281 /* Here's where we control how name mangling takes place.  */
3282
3283 /* Cannot use '$' up front, because this confuses gdb
3284    (names beginning with '$' are gdb-local identifiers).
3285
3286    Note that all forms in which the '$' is significant are long enough
3287    for direct indexing (meaning that if we know there is a '$'
3288    at a particular location, we can index into the string at
3289    any other location that provides distinguishing characters).  */
3290
3291 /* Define NO_DOLLAR_IN_LABEL in your favorite tm file if your assembler
3292    doesn't allow '$' in symbol names.  */
3293 #ifndef NO_DOLLAR_IN_LABEL
3294
3295 #define JOINER '$'
3296
3297 #define VPTR_NAME "$v"
3298 #define THROW_NAME "$eh_throw"
3299 #define AUTO_VTABLE_NAME "__vtbl$me__"
3300 #define AUTO_TEMP_NAME "_$tmp_"
3301 #define AUTO_TEMP_FORMAT "_$tmp_%d"
3302 #define VTABLE_BASE "$vb"
3303 #define VTABLE_NAME_PREFIX "__vt_"
3304 #define VFIELD_BASE "$vf"
3305 #define VFIELD_NAME "_vptr$"
3306 #define VFIELD_NAME_FORMAT "_vptr$%s"
3307 #define STATIC_NAME_FORMAT "_%s$%s"
3308 #define ANON_AGGRNAME_FORMAT "$_%d"
3309
3310 #else /* NO_DOLLAR_IN_LABEL */
3311
3312 #ifndef NO_DOT_IN_LABEL
3313
3314 #define JOINER '.'
3315
3316 #define VPTR_NAME ".v"
3317 #define THROW_NAME ".eh_throw"
3318 #define AUTO_VTABLE_NAME "__vtbl.me__"
3319 #define AUTO_TEMP_NAME "_.tmp_"
3320 #define AUTO_TEMP_FORMAT "_.tmp_%d"
3321 #define VTABLE_BASE ".vb"
3322 #define VTABLE_NAME_PREFIX "__vt_"
3323 #define VFIELD_BASE ".vf"
3324 #define VFIELD_NAME "_vptr."
3325 #define VFIELD_NAME_FORMAT "_vptr.%s"
3326 #define STATIC_NAME_FORMAT "_%s.%s"
3327
3328 #define ANON_AGGRNAME_FORMAT "._%d"
3329
3330 #else /* NO_DOT_IN_LABEL */
3331
3332 #define VPTR_NAME "__vptr"
3333 #define VPTR_NAME_P(ID_NODE) \
3334   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VPTR_NAME, sizeof (VPTR_NAME) - 1))
3335 #define THROW_NAME "__eh_throw"
3336 #define IN_CHARGE_NAME "__in_chrg"
3337 #define AUTO_VTABLE_NAME "__vtbl_me__"
3338 #define AUTO_TEMP_NAME "__tmp_"
3339 #define TEMP_NAME_P(ID_NODE) \
3340   (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \
3341              sizeof (AUTO_TEMP_NAME) - 1))
3342 #define AUTO_TEMP_FORMAT "__tmp_%d"
3343 #define VTABLE_BASE "__vtb"
3344 #define VTABLE_NAME "__vt_"
3345 #define VTABLE_NAME_PREFIX "__vt_"
3346 #define VTABLE_NAME_P(ID_NODE) \
3347   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
3348              sizeof (VTABLE_NAME) - 1))
3349 #define VFIELD_BASE "__vfb"
3350 #define VFIELD_NAME "__vptr_"
3351 #define VFIELD_NAME_P(ID_NODE) \
3352   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
3353             sizeof (VFIELD_NAME) - 1))
3354 #define VFIELD_NAME_FORMAT "__vptr_%s"
3355 #define STATIC_NAME_FORMAT "__static_%s_%s"
3356
3357 #define ANON_AGGRNAME_PREFIX "__anon_"
3358 #define ANON_AGGRNAME_P(ID_NODE) \
3359   (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \
3360              sizeof (ANON_AGGRNAME_PREFIX) - 1))
3361 #define ANON_AGGRNAME_FORMAT "__anon_%d"
3362
3363 #endif  /* NO_DOT_IN_LABEL */
3364 #endif  /* NO_DOLLAR_IN_LABEL */
3365
3366 #define THIS_NAME "this"
3367 #define FILE_FUNCTION_PREFIX_LEN 9
3368 #define CTOR_NAME "__ct"
3369 #define DTOR_NAME "__dt"
3370
3371 #define IN_CHARGE_NAME "__in_chrg"
3372
3373 #define VTBL_PTR_TYPE           "__vtbl_ptr_type"
3374 #define VTABLE_DELTA_NAME       "__delta"
3375 #define VTABLE_PFN_NAME         "__pfn"
3376
3377 #define EXCEPTION_CLEANUP_NAME  "exception cleanup"
3378
3379 #if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
3380
3381 #define VPTR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
3382                               && IDENTIFIER_POINTER (ID_NODE)[1] == 'v')
3383
3384 #define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
3385   && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
3386   && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
3387
3388 #define TEMP_NAME_P(ID_NODE) \
3389   (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1))
3390 #define VFIELD_NAME_P(ID_NODE) \
3391   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
3392
3393 /* For anonymous aggregate types, we need some sort of name to
3394    hold on to.  In practice, this should not appear, but it should
3395    not be harmful if it does.  */
3396 #define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
3397                                   && IDENTIFIER_POINTER (ID_NODE)[1] == '_')
3398 #endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
3399
3400 /* Returns non-zero iff NODE is a declaration for the global function
3401    `main'.  */
3402 #define DECL_MAIN_P(NODE)                               \
3403    (DECL_EXTERN_C_FUNCTION_P (NODE)                     \
3404     && DECL_NAME (NODE) != NULL_TREE                    \
3405     && MAIN_NAME_P (DECL_NAME (NODE)))
3406
3407 \f
3408 /* Things for handling inline functions.  */
3409
3410 /* Nonzero means do emit exported implementations of functions even if
3411    they can be inlined.  */
3412
3413 extern int flag_implement_inlines;
3414
3415 /* Nonzero means templates obey #pragma interface and implementation.  */
3416
3417 extern int flag_external_templates;
3418
3419 /* Nonzero means templates are emitted where they are instantiated.  */
3420
3421 extern int flag_alt_external_templates;
3422
3423 /* Nonzero means implicit template instantiations are emitted.  */
3424
3425 extern int flag_implicit_templates;
3426
3427 /* Nonzero if we want to emit defined symbols with common-like linkage as
3428    weak symbols where possible, in order to conform to C++ semantics.
3429    Otherwise, emit them as local symbols.  */
3430
3431 extern int flag_weak;
3432
3433 /* Nonzero if we're done parsing and into end-of-file activities.  */
3434
3435 extern int at_eof;
3436
3437 /* Functions called along with real static constructors and destructors.  */
3438
3439 extern GTY(()) tree static_ctors;
3440 extern GTY(()) tree static_dtors;
3441
3442 enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, OP_FLAG, TYPENAME_FLAG };
3443
3444 /* Some macros for char-based bitfields.  */
3445 #define B_SET(A,X) ((A)[(X)>>3] |=  (1 << ((X)&7)))
3446 #define B_CLR(A,X) ((A)[(X)>>3] &= ~(1 << ((X)&7)))
3447 #define B_TST(A,X) ((A)[(X)>>3] &   (1 << ((X)&7)))
3448
3449 /* These are uses as bits in flags passed to build_method_call
3450    to control its error reporting behavior.
3451
3452    LOOKUP_PROTECT means flag access violations.
3453    LOOKUP_COMPLAIN mean complain if no suitable member function
3454      matching the arguments is found.
3455    LOOKUP_NORMAL is just a combination of these two.
3456    LOOKUP_NONVIRTUAL means make a direct call to the member function found
3457    LOOKUP_GLOBAL means search through the space of overloaded functions,
3458      as well as the space of member functions.
3459    LOOKUP_ONLYCONVERTING means that non-conversion constructors are not tried.
3460    DIRECT_BIND means that if a temporary is created, it should be created so
3461      that it lives as long as the current variable bindings; otherwise it
3462      only lives until the end of the complete-expression.  It also forces
3463      direct-initialization in cases where other parts of the compiler have
3464      already generated a temporary, such as reference initialization and the
3465      catch parameter.
3466    LOOKUP_SPECULATIVELY means return NULL_TREE if we cannot find what we are
3467      after.  Note, LOOKUP_COMPLAIN is checked and error messages printed
3468      before LOOKUP_SPECULATIVELY is checked.
3469    LOOKUP_NO_CONVERSION means that user-defined conversions are not
3470      permitted.  Built-in conversions are permitted.
3471    LOOKUP_DESTRUCTOR means explicit call to destructor.
3472    LOOKUP_NO_TEMP_BIND means temporaries will not be bound to references.
3473
3474    These are used in global lookup to support elaborated types and
3475    qualifiers.
3476
3477    LOOKUP_PREFER_TYPES means not to accept objects, and possibly namespaces.
3478    LOOKUP_PREFER_NAMESPACES means not to accept objects, and possibly types.
3479    LOOKUP_PREFER_BOTH means class-or-namespace-name.
3480    LOOKUP_TEMPLATES_EXPECTED means that class templates also count
3481      as types.  */
3482
3483 #define LOOKUP_PROTECT (1)
3484 #define LOOKUP_COMPLAIN (2)
3485 #define LOOKUP_NORMAL (3)
3486 #define LOOKUP_NONVIRTUAL (8)
3487 #define LOOKUP_GLOBAL (16)
3488 #define LOOKUP_SPECULATIVELY (64)
3489 #define LOOKUP_ONLYCONVERTING (128)
3490 #define DIRECT_BIND (256)
3491 #define LOOKUP_NO_CONVERSION (512)
3492 #define LOOKUP_DESTRUCTOR (512)
3493 #define LOOKUP_NO_TEMP_BIND (1024)
3494 #define LOOKUP_PREFER_TYPES (2048)
3495 #define LOOKUP_PREFER_NAMESPACES (4096)
3496 #define LOOKUP_PREFER_BOTH (6144)
3497 #define LOOKUP_TEMPLATES_EXPECTED (8192)
3498
3499 #define LOOKUP_NAMESPACES_ONLY(F)  \
3500   (((F) & LOOKUP_PREFER_NAMESPACES) && !((F) & LOOKUP_PREFER_TYPES))
3501 #define LOOKUP_TYPES_ONLY(F)  \
3502   (!((F) & LOOKUP_PREFER_NAMESPACES) && ((F) & LOOKUP_PREFER_TYPES))
3503 #define LOOKUP_QUALIFIERS_ONLY(F)     ((F) & LOOKUP_PREFER_BOTH)
3504
3505
3506 /* These flags are used by the conversion code.
3507    CONV_IMPLICIT   :  Perform implicit conversions (standard and user-defined).
3508    CONV_STATIC     :  Perform the explicit conversions for static_cast.
3509    CONV_CONST      :  Perform the explicit conversions for const_cast.
3510    CONV_REINTERPRET:  Perform the explicit conversions for reinterpret_cast.
3511    CONV_PRIVATE    :  Perform upcasts to private bases.
3512    CONV_FORCE_TEMP :  Require a new temporary when converting to the same
3513                       aggregate type.  */
3514
3515 #define CONV_IMPLICIT    1
3516 #define CONV_STATIC      2
3517 #define CONV_CONST       4
3518 #define CONV_REINTERPRET 8
3519 #define CONV_PRIVATE     16
3520 /* #define CONV_NONCONVERTING 32 */
3521 #define CONV_FORCE_TEMP  64
3522 #define CONV_STATIC_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_FORCE_TEMP)
3523 #define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
3524                           | CONV_REINTERPRET)
3525 #define CONV_C_CAST      (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
3526                           | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
3527
3528 /* Used by build_expr_type_conversion to indicate which types are
3529    acceptable as arguments to the expression under consideration.  */
3530
3531 #define WANT_INT        1 /* integer types, including bool */
3532 #define WANT_FLOAT      2 /* floating point types */
3533 #define WANT_ENUM       4 /* enumerated types */
3534 #define WANT_POINTER    8 /* pointer types */
3535 #define WANT_NULL      16 /* null pointer constant */
3536 #define WANT_ARITH      (WANT_INT | WANT_FLOAT)
3537
3538 /* Used with comptypes, and related functions, to guide type
3539    comparison.  */
3540
3541 #define COMPARE_STRICT        0 /* Just check if the types are the
3542                                    same.  */
3543 #define COMPARE_BASE          1 /* Check to see if the second type is
3544                                    derived from the first, or if both
3545                                    are pointers (or references) and
3546                                    the types pointed to by the second
3547                                    type is derived from the pointed to
3548                                    by the first.  */
3549 #define COMPARE_RELAXED       2 /* Like COMPARE_DERIVED, but in
3550                                    reverse.  Also treat enmeration
3551                                    types as the same as integer types
3552                                    of the same width.  */
3553 #define COMPARE_REDECLARATION 4 /* The comparsion is being done when
3554                                    another declaration of an existing
3555                                    entity is seen.  */
3556 #define COMPARE_NO_ATTRIBUTES 8 /* The comparison should ignore
3557                                    extra-linguistic type attributes.  */
3558
3559 /* Used with push_overloaded_decl.  */
3560 #define PUSH_GLOBAL          0  /* Push the DECL into namespace scope,
3561                                    regardless of the current scope.  */
3562 #define PUSH_LOCAL           1  /* Push the DECL into the current
3563                                    scope.  */
3564 #define PUSH_USING           2  /* We are pushing this DECL as the
3565                                    result of a using declaration.  */
3566
3567 /* Used with start function.  */
3568 #define SF_DEFAULT           0  /* No flags.  */
3569 #define SF_PRE_PARSED        1  /* The function declaration has
3570                                    already been parsed.  */
3571 #define SF_INCLASS_INLINE    2  /* The function is an inline, defined
3572                                    in the class body.  */
3573
3574 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2
3575    is derived from TYPE1, or if TYPE2 is a pointer (reference) to a
3576    class derived from the type pointed to (referred to) by TYPE1.  */
3577 #define same_or_base_type_p(TYPE1, TYPE2) \
3578   comptypes ((TYPE1), (TYPE2), COMPARE_BASE)
3579
3580 /* These macros are used to access a TEMPLATE_PARM_INDEX.  */
3581 #define TEMPLATE_PARM_INDEX_CAST(NODE) \
3582         ((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE))
3583 #define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index)
3584 #define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level)
3585 #define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE))
3586 #define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level)
3587 #define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl)
3588
3589 /* These macros are for accessing the fields of TEMPLATE_TYPE_PARM,
3590    TEMPLATE_TEMPLATE_PARM and BOUND_TEMPLATE_TEMPLATE_PARM nodes.  */
3591 #define TEMPLATE_TYPE_PARM_INDEX(NODE) (TYPE_FIELDS (NODE))
3592 #define TEMPLATE_TYPE_IDX(NODE) \
3593   (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3594 #define TEMPLATE_TYPE_LEVEL(NODE) \
3595   (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3596 #define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \
3597   (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3598 #define TEMPLATE_TYPE_DECL(NODE) \
3599   (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3600
3601 /* These constants can used as bit flags in the process of tree formatting.
3602
3603    TFF_PLAIN_IDENTIFIER: unqualified part of a name.
3604    TFF_SCOPE: include the class and namespace scope of the name.
3605    TFF_CHASE_TYPEDEF: print the original type-id instead of the typedef-name.
3606    TFF_DECL_SPECIFIERS: print decl-specifiers.
3607    TFF_CLASS_KEY_OR_ENUM: precede a class-type name (resp. enum name) with
3608        a class-key (resp. `enum').
3609    TFF_RETURN_TYPE: include function return type.
3610    TFF_FUNCTION_DEFAULT_ARGUMENTS: include function default parameter values.
3611    TFF_EXCEPTION_SPECIFICATION: show function exception specification.
3612    TFF_TEMPLATE_HEADER: show the template<...> header in a
3613        template-declaration.
3614    TFF_TEMPLATE_NAME: show only template-name.
3615    TFF_EXPR_IN_PARENS: Parenthesize expressions.  */
3616
3617 #define TFF_PLAIN_IDENTIFIER               (0)
3618 #define TFF_SCOPE                          (1)
3619 #define TFF_CHASE_TYPEDEF                  (1 << 1)
3620 #define TFF_DECL_SPECIFIERS                (1 << 2)
3621 #define TFF_CLASS_KEY_OR_ENUM              (1 << 3)
3622 #define TFF_RETURN_TYPE                    (1 << 4)
3623 #define TFF_FUNCTION_DEFAULT_ARGUMENTS     (1 << 5)
3624 #define TFF_EXCEPTION_SPECIFICATION        (1 << 6)
3625 #define TFF_TEMPLATE_HEADER                (1 << 7)
3626 #define TFF_TEMPLATE_NAME                  (1 << 8)
3627 #define TFF_EXPR_IN_PARENS                 (1 << 9)
3628
3629 /* Returns the TEMPLATE_DECL associated to a TEMPLATE_TEMPLATE_PARM
3630    node.  */
3631 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL(NODE)      \
3632   ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM)   \
3633    ? TYPE_TI_TEMPLATE (NODE)                            \
3634    : TYPE_NAME (NODE))
3635
3636 /* in lex.c  */
3637
3638 extern void init_reswords PARAMS ((void));
3639
3640 /* Indexed by TREE_CODE, these tables give C-looking names to
3641    operators represented by TREE_CODES.  For example,
3642    opname_tab[(int) MINUS_EXPR] == "-".  */
3643 extern const char **opname_tab, **assignop_tab;
3644
3645 typedef struct operator_name_info_t
3646 {
3647   /* The IDENTIFIER_NODE for the operator.  */
3648   tree identifier;
3649   /* The name of the operator.  */
3650   const char *name;
3651   /* The mangled name of the operator.  */
3652   const char *mangled_name;
3653 } operator_name_info_t;
3654
3655 /* A mapping from tree codes to operator name information.  */
3656 extern operator_name_info_t operator_name_info[];
3657 /* Similar, but for assignment operators.  */
3658 extern operator_name_info_t assignment_operator_name_info[];
3659
3660 /* in call.c */
3661 extern int check_dtor_name                      PARAMS ((tree, tree));
3662 extern int get_arglist_len_in_bytes             PARAMS ((tree));
3663
3664 extern tree build_vfield_ref                    PARAMS ((tree, tree));
3665 extern tree build_scoped_method_call            PARAMS ((tree, tree, tree, tree));
3666 extern tree build_conditional_expr              PARAMS ((tree, tree, tree));
3667 extern tree build_addr_func                     PARAMS ((tree));
3668 extern tree build_call                          PARAMS ((tree, tree));
3669 extern tree build_method_call                   PARAMS ((tree, tree, tree, tree, int));
3670 extern int null_ptr_cst_p                       PARAMS ((tree));
3671 extern int sufficient_parms_p                   PARAMS ((tree));
3672 extern tree type_decays_to                      PARAMS ((tree));
3673 extern tree build_user_type_conversion          PARAMS ((tree, tree, int));
3674 extern tree build_new_function_call             PARAMS ((tree, tree));
3675 extern tree build_new_op                        PARAMS ((enum tree_code, int, tree, tree, tree));
3676 extern tree build_op_delete_call                PARAMS ((enum tree_code, tree, tree, int, tree));
3677 extern int can_convert                          PARAMS ((tree, tree));
3678 extern int can_convert_arg                      PARAMS ((tree, tree, tree));
3679 extern int can_convert_arg_bad                  PARAMS ((tree, tree, tree));
3680 extern int enforce_access                       PARAMS ((tree, tree));
3681 extern tree convert_default_arg                 PARAMS ((tree, tree, tree, int));
3682 extern tree convert_arg_to_ellipsis             PARAMS ((tree));
3683 extern tree build_x_va_arg                      PARAMS ((tree, tree));
3684 extern tree cxx_type_promotes_to                PARAMS ((tree));
3685 extern int is_properly_derived_from             PARAMS ((tree, tree));
3686 extern tree initialize_reference                PARAMS ((tree, tree));
3687 extern tree strip_top_quals                     PARAMS ((tree));
3688 extern tree perform_implicit_conversion         PARAMS ((tree, tree));
3689
3690 /* in class.c */
3691 extern tree build_base_path                     PARAMS ((enum tree_code, tree, tree, int));
3692 extern tree build_vbase_path                    PARAMS ((enum tree_code, tree, tree, tree, int));
3693 extern tree build_vtbl_ref                      PARAMS ((tree, tree));
3694 extern tree build_vfn_ref                       PARAMS ((tree, tree));
3695 extern tree get_vtable_decl                     PARAMS ((tree, int));
3696 extern void add_method                          PARAMS ((tree, tree, int));
3697 extern int currently_open_class                 PARAMS ((tree));
3698 extern tree currently_open_derived_class        PARAMS ((tree));
3699 extern void duplicate_tag_error                 PARAMS ((tree));
3700 extern tree finish_struct                       PARAMS ((tree, tree));
3701 extern void finish_struct_1                     PARAMS ((tree));
3702 extern int resolves_to_fixed_type_p             PARAMS ((tree, int *));
3703 extern void init_class_processing               PARAMS ((void));
3704 extern int is_empty_class                       PARAMS ((tree));
3705 extern void pushclass                           PARAMS ((tree, int));
3706 extern void popclass                            PARAMS ((void));
3707 extern void push_nested_class                   PARAMS ((tree, int));
3708 extern void pop_nested_class                    PARAMS ((void));
3709 extern int current_lang_depth                   PARAMS ((void));
3710 extern void push_lang_context                   PARAMS ((tree));
3711 extern void pop_lang_context                    PARAMS ((void));
3712 extern tree instantiate_type                    PARAMS ((tree, tree, tsubst_flags_t));
3713 extern void print_class_statistics              PARAMS ((void));
3714 extern void cxx_print_statistics                PARAMS ((void));
3715 extern void cxx_print_xnode                     PARAMS ((FILE *, tree, int));
3716 extern void cxx_print_decl                      PARAMS ((FILE *, tree, int));
3717 extern void cxx_print_type                      PARAMS ((FILE *, tree, int));
3718 extern void cxx_print_identifier                PARAMS ((FILE *, tree, int));
3719 extern void cxx_print_error_function    PARAMS ((struct diagnostic_context *,
3720                                                  const char *));
3721 extern void build_self_reference                PARAMS ((void));
3722 extern int same_signature_p                     PARAMS ((tree, tree));
3723 extern void warn_hidden                         PARAMS ((tree));
3724 extern tree get_enclosing_class                 PARAMS ((tree));
3725 int is_base_of_enclosing_class                  PARAMS ((tree, tree));
3726 extern void unreverse_member_declarations       PARAMS ((tree));
3727 extern void invalidate_class_lookup_cache       PARAMS ((void));
3728 extern void maybe_note_name_used_in_class       PARAMS ((tree, tree));
3729 extern void note_name_declared_in_class         PARAMS ((tree, tree));
3730 extern tree get_vtbl_decl_for_binfo             PARAMS ((tree));
3731 extern tree in_charge_arg_for_name              PARAMS ((tree));
3732 extern tree get_vtt_name                        PARAMS ((tree));
3733 extern tree get_primary_binfo                   PARAMS ((tree));
3734
3735 /* in cvt.c */
3736 extern tree convert_to_reference                PARAMS ((tree, tree, int, int, tree));
3737 extern tree convert_from_reference              PARAMS ((tree));
3738 extern tree convert_lvalue                      PARAMS ((tree, tree));
3739 extern tree ocp_convert                         PARAMS ((tree, tree, int, int));
3740 extern tree cp_convert                          PARAMS ((tree, tree));
3741 extern tree convert_to_void                     PARAMS ((tree, const char */*implicit context*/));
3742 extern tree convert_force                       PARAMS ((tree, tree, int));
3743 extern tree build_type_conversion               PARAMS ((tree, tree, int));
3744 extern tree build_expr_type_conversion          PARAMS ((int, tree, int));
3745 extern tree type_promotes_to                    PARAMS ((tree));
3746 extern tree perform_qualification_conversions   PARAMS ((tree, tree));
3747 extern void clone_function_decl                 PARAMS ((tree, int));
3748 extern void adjust_clone_args                   PARAMS ((tree));
3749
3750 /* decl.c */
3751 extern int global_bindings_p                    PARAMS ((void));
3752 extern int kept_level_p                         PARAMS ((void));
3753 extern tree getdecls                            PARAMS ((void));
3754 extern void pushlevel                           PARAMS ((int));
3755 extern tree poplevel                            PARAMS ((int,int, int));
3756 extern void insert_block                        PARAMS ((tree));
3757 extern void set_block                           PARAMS ((tree));
3758 extern tree pushdecl                            PARAMS ((tree));
3759 extern void cxx_init_decl_processing            PARAMS ((void));
3760 enum cp_tree_node_structure_enum cp_tree_node_structure
3761   PARAMS ((union lang_tree_node *));
3762 extern void cxx_insert_default_attributes       PARAMS ((tree));
3763 extern bool cxx_mark_addressable                PARAMS ((tree));
3764 extern void cxx_push_function_context           PARAMS ((struct function *));
3765 extern void cxx_pop_function_context            PARAMS ((struct function *));
3766 extern void cxx_mark_function_context           PARAMS ((struct function *));
3767 extern int toplevel_bindings_p                  PARAMS ((void));
3768 extern int namespace_bindings_p                 PARAMS ((void));
3769 extern void keep_next_level                     PARAMS ((int));
3770 extern int template_parm_scope_p                PARAMS ((void));
3771 extern void set_class_shadows                   PARAMS ((tree));
3772 extern void maybe_push_cleanup_level            PARAMS ((tree));
3773 extern void begin_scope                         PARAMS ((scope_kind));
3774 extern void finish_scope                        PARAMS ((void));
3775 extern void note_level_for_for                  PARAMS ((void));
3776 extern void note_level_for_try                  PARAMS ((void));
3777 extern void note_level_for_catch                PARAMS ((void));
3778 extern void resume_level                        PARAMS ((struct cp_binding_level *));
3779 extern void delete_block                        PARAMS ((tree));
3780 extern void add_block_current_level             PARAMS ((tree));
3781 extern void pushlevel_class                     PARAMS ((void));
3782 extern void poplevel_class                      PARAMS ((void));
3783 extern void print_binding_stack                 PARAMS ((void));
3784 extern void print_binding_level                 PARAMS ((struct cp_binding_level *));
3785 extern void push_namespace                      PARAMS ((tree));
3786 extern void pop_namespace                       PARAMS ((void));
3787 extern void push_nested_namespace               PARAMS ((tree));
3788 extern void pop_nested_namespace                PARAMS ((tree));
3789 extern void maybe_push_to_top_level             PARAMS ((int));
3790 extern void push_to_top_level                   PARAMS ((void));
3791 extern void pop_from_top_level                  PARAMS ((void));
3792 extern void push_switch                         PARAMS ((tree));
3793 extern void pop_switch                          PARAMS ((void));
3794 extern tree identifier_type_value               PARAMS ((tree));
3795 extern void set_identifier_type_value           PARAMS ((tree, tree));
3796 extern void pop_everything                      PARAMS ((void));
3797 extern void pushtag                             PARAMS ((tree, tree, int));
3798 extern tree make_anon_name                      PARAMS ((void));
3799 extern void clear_anon_tags                     PARAMS ((void));
3800 extern int decls_match                          PARAMS ((tree, tree));
3801 extern int duplicate_decls                      PARAMS ((tree, tree));
3802 extern tree pushdecl_top_level                  PARAMS ((tree));
3803 extern void pushdecl_class_level                PARAMS ((tree));
3804 extern tree pushdecl_namespace_level            PARAMS ((tree));
3805 extern tree push_using_decl                     PARAMS ((tree, tree));
3806 extern tree push_using_directive                PARAMS ((tree));
3807 extern void push_class_level_binding            PARAMS ((tree, tree));
3808 extern tree implicitly_declare                  PARAMS ((tree));
3809 extern tree declare_local_label                 PARAMS ((tree));
3810 extern tree define_label                        PARAMS ((const char *, int, tree));
3811 extern void check_goto                          PARAMS ((tree));
3812 extern void define_case_label                   PARAMS ((void));
3813 extern tree binding_for_name                    PARAMS ((tree, tree));
3814 extern tree namespace_binding                   PARAMS ((tree, tree));
3815 extern void set_namespace_binding               PARAMS ((tree, tree, tree));
3816 extern tree lookup_namespace_name               PARAMS ((tree, tree));
3817 extern tree build_typename_type                 PARAMS ((tree, tree, tree, tree));
3818 extern tree make_typename_type                  PARAMS ((tree, tree, tsubst_flags_t));
3819 extern tree make_unbound_class_template         PARAMS ((tree, tree, int));
3820 extern tree lookup_name_nonclass                PARAMS ((tree));
3821 extern tree lookup_function_nonclass            PARAMS ((tree, tree));
3822 extern tree lookup_name                         PARAMS ((tree, int));
3823 extern tree lookup_name_current_level           PARAMS ((tree));
3824 extern tree lookup_type_current_level           PARAMS ((tree));
3825 extern tree lookup_name_namespace_only          PARAMS ((tree));
3826 extern void begin_only_namespace_names          PARAMS ((void));
3827 extern void end_only_namespace_names            PARAMS ((void));
3828 extern tree namespace_ancestor                  PARAMS ((tree, tree));
3829 extern tree unqualified_namespace_lookup        PARAMS ((tree, int, tree *));
3830 extern tree check_for_out_of_scope_variable     (tree);
3831 extern int  lookup_using_namespace              PARAMS ((tree, tree, tree, tree, int, tree *));
3832 extern int  qualified_lookup_using_namespace    PARAMS ((tree, tree, tree, int));
3833 extern tree build_library_fn                    PARAMS ((tree, tree));
3834 extern tree build_library_fn_ptr                PARAMS ((const char *, tree));
3835 extern tree build_cp_library_fn_ptr             PARAMS ((const char *, tree));
3836 extern tree push_library_fn                     PARAMS ((tree, tree));
3837 extern tree push_void_library_fn                PARAMS ((tree, tree));
3838 extern tree push_throw_library_fn               PARAMS ((tree, tree));
3839 extern int init_type_desc                       PARAMS ((void));
3840 extern tree check_tag_decl                      PARAMS ((tree));
3841 extern void shadow_tag                          PARAMS ((tree));
3842 extern tree groktypename                        PARAMS ((tree));
3843 extern tree start_decl                          PARAMS ((tree, tree, int, tree, tree));
3844 extern void start_decl_1                        PARAMS ((tree));
3845 extern void cp_finish_decl                      PARAMS ((tree, tree, tree, int));
3846 extern void finish_decl                         PARAMS ((tree, tree, tree));
3847 extern void maybe_inject_for_scope_var          PARAMS ((tree));
3848 extern void initialize_local_var                PARAMS ((tree, tree, int));
3849 extern void expand_static_init                  PARAMS ((tree, tree));
3850 extern tree start_handler_parms                 PARAMS ((tree, tree));
3851 extern int complete_array_type                  PARAMS ((tree, tree, int));
3852 extern tree build_ptrmemfunc_type               PARAMS ((tree));
3853 /* the grokdeclarator prototype is in decl.h */
3854 extern int parmlist_is_exprlist                 PARAMS ((tree));
3855 extern int copy_fn_p                            PARAMS ((tree));
3856 extern void grok_special_member_properties      PARAMS ((tree));
3857 extern int grok_ctor_properties                 PARAMS ((tree, tree));
3858 extern void grok_op_properties                  PARAMS ((tree, int));
3859 extern tree xref_tag                            (enum tag_types, tree, tree, bool);
3860 extern tree xref_tag_from_type                  PARAMS ((tree, tree, int));
3861 extern void xref_basetypes                      PARAMS ((tree, tree));
3862 extern tree start_enum                          PARAMS ((tree));
3863 extern void finish_enum                         PARAMS ((tree));
3864 extern void build_enumerator                    PARAMS ((tree, tree, tree));
3865 extern int start_function                       PARAMS ((tree, tree, tree, int));
3866 extern tree begin_function_body                 PARAMS ((void));
3867 extern void finish_function_body                PARAMS ((tree));
3868 extern tree finish_function                     PARAMS ((int));
3869 extern tree start_method                        PARAMS ((tree, tree, tree));
3870 extern tree finish_method                       PARAMS ((tree));
3871 extern void maybe_register_incomplete_var       PARAMS ((tree));
3872 extern void complete_vars                       PARAMS ((tree));
3873 extern void finish_stmt                         PARAMS ((void));
3874 extern void print_other_binding_stack           PARAMS ((struct cp_binding_level *));
3875 extern void revert_static_member_fn             PARAMS ((tree));
3876 extern void fixup_anonymous_aggr                PARAMS ((tree));
3877 extern int check_static_variable_definition     PARAMS ((tree, tree));
3878 extern tree compute_array_index_type            PARAMS ((tree, tree));
3879 extern void push_local_binding                  PARAMS ((tree, tree, int));
3880 extern int push_class_binding                   PARAMS ((tree, tree));
3881 extern tree check_default_argument              PARAMS ((tree, tree));
3882 extern tree push_overloaded_decl                PARAMS ((tree, int));
3883 extern void clear_identifier_class_values       PARAMS ((void));
3884 extern void storetags                           PARAMS ((tree));
3885 extern int vtable_decl_p                        PARAMS ((tree, void *));
3886 extern int vtype_decl_p                         PARAMS ((tree, void *));
3887 extern int sigtable_decl_p                      PARAMS ((tree, void *));
3888 typedef int (*walk_globals_pred)                PARAMS ((tree, void *));
3889 typedef int (*walk_globals_fn)                  PARAMS ((tree *, void *));
3890 extern int walk_globals                         PARAMS ((walk_globals_pred,
3891                                                        walk_globals_fn,
3892                                                        void *));
3893 typedef int (*walk_namespaces_fn)               PARAMS ((tree, void *));
3894 extern int walk_namespaces                      PARAMS ((walk_namespaces_fn,
3895                                                        void *));
3896 extern int wrapup_globals_for_namespace         PARAMS ((tree, void *));
3897 extern tree cp_namespace_decls                  PARAMS ((tree));
3898 extern tree create_implicit_typedef             PARAMS ((tree, tree));
3899 extern tree maybe_push_decl                     PARAMS ((tree));
3900 extern tree build_target_expr_with_type         PARAMS ((tree, tree));
3901 extern int local_variable_p                     PARAMS ((tree));
3902 extern int nonstatic_local_decl_p               PARAMS ((tree));
3903 extern tree declare_global_var                  PARAMS ((tree, tree));
3904 extern void register_dtor_fn                    PARAMS ((tree));
3905 extern tmpl_spec_kind current_tmpl_spec_kind    PARAMS ((int));
3906 extern tree cp_fname_init                       PARAMS ((const char *));
3907 extern bool have_extern_spec;
3908
3909 /* in decl2.c */
3910 extern int check_java_method                    PARAMS ((tree));
3911 extern int cxx_decode_option                    PARAMS ((int, char **));
3912 extern int grok_method_quals                    PARAMS ((tree, tree, tree));
3913 extern void warn_if_unknown_interface           PARAMS ((tree));
3914 extern void grok_x_components                   PARAMS ((tree));
3915 extern void maybe_retrofit_in_chrg              PARAMS ((tree));
3916 extern void maybe_make_one_only                 PARAMS ((tree));
3917 extern void grokclassfn                         PARAMS ((tree, tree, enum overload_flags, tree));
3918 extern tree grok_array_decl                     PARAMS ((tree, tree));
3919 extern tree delete_sanity                       PARAMS ((tree, tree, int, int));
3920 extern tree check_classfn                       PARAMS ((tree, tree));
3921 extern void check_member_template               PARAMS ((tree));
3922 extern tree grokfield                           PARAMS ((tree, tree, tree, tree, tree));
3923 extern tree grokbitfield                        PARAMS ((tree, tree, tree));
3924 extern tree groktypefield                       PARAMS ((tree, tree));
3925 extern tree grokoptypename                      PARAMS ((tree, tree));
3926 extern void cplus_decl_attributes               PARAMS ((tree *, tree, int));
3927 extern tree constructor_name_full               PARAMS ((tree));
3928 extern tree constructor_name                    PARAMS ((tree));
3929 extern void defer_fn                            PARAMS ((tree));
3930 extern void finish_anon_union                   PARAMS ((tree));
3931 extern tree finish_table                        PARAMS ((tree, tree, tree, int));
3932 extern void finish_builtin_type                 PARAMS ((tree, const char *,
3933                                                        tree *, int, tree));
3934 extern tree coerce_new_type                     PARAMS ((tree));
3935 extern tree coerce_delete_type                  PARAMS ((tree));
3936 extern void comdat_linkage                      PARAMS ((tree));
3937 extern void import_export_vtable                PARAMS ((tree, tree, int));
3938 extern void import_export_decl                  PARAMS ((tree));
3939 extern void import_export_tinfo                 PARAMS ((tree, tree, int));
3940 extern tree build_cleanup                       PARAMS ((tree));
3941 extern void finish_file                         PARAMS ((void));
3942 extern tree reparse_absdcl_as_expr              PARAMS ((tree, tree));
3943 extern tree reparse_absdcl_as_casts             PARAMS ((tree, tree));
3944 extern tree build_expr_from_tree                PARAMS ((tree));
3945 extern tree reparse_decl_as_expr                PARAMS ((tree, tree));
3946 extern tree finish_decl_parsing                 PARAMS ((tree));
3947 extern void set_decl_namespace                  PARAMS ((tree, tree, int));
3948 extern tree current_decl_namespace              PARAMS ((void));
3949 extern void push_decl_namespace                 PARAMS ((tree));
3950 extern void pop_decl_namespace                  PARAMS ((void));
3951 extern void push_scope                          PARAMS ((tree));
3952 extern void pop_scope                           PARAMS ((tree));
3953 extern void do_namespace_alias                  PARAMS ((tree, tree));
3954 extern void do_toplevel_using_decl              PARAMS ((tree));
3955 extern void do_local_using_decl                 PARAMS ((tree));
3956 extern tree do_class_using_decl                 PARAMS ((tree));
3957 extern void do_using_directive                  PARAMS ((tree));
3958 extern void check_default_args                  PARAMS ((tree));
3959 extern void mark_used                           PARAMS ((tree));
3960 extern tree handle_class_head                   (enum tag_types, tree, tree, tree, int, int *);
3961 extern tree lookup_arg_dependent                PARAMS ((tree, tree, tree));
3962 extern void finish_static_data_member_decl      PARAMS ((tree, tree, tree, int));
3963 extern tree build_artificial_parm               PARAMS ((tree, tree));
3964 extern tree get_guard                           PARAMS ((tree));
3965 extern tree get_guard_cond                      PARAMS ((tree));
3966 extern tree set_guard                           PARAMS ((tree));
3967
3968 extern void cp_error_at         PARAMS ((const char *msgid, ...));
3969 extern void cp_warning_at       PARAMS ((const char *msgid, ...));
3970 extern void cp_pedwarn_at       PARAMS ((const char *msgid, ...));
3971
3972 /* XXX Not i18n clean.  */
3973 #define cp_deprecated(STR)                                                      \
3974   do {                                                                          \
3975     if (warn_deprecated)                                                        \
3976       warning ("%s is deprecated, please see the documentation for details",    \
3977                (STR));                                                          \
3978   } while (0)
3979
3980 /* in error.c */
3981 extern void init_error                          PARAMS ((void));
3982 extern const char *type_as_string               PARAMS ((tree, int));
3983 extern const char *decl_as_string               PARAMS ((tree, int));
3984 extern const char *expr_as_string               PARAMS ((tree, int));
3985 extern const char *context_as_string            PARAMS ((tree, int));
3986 extern const char *lang_decl_name               PARAMS ((tree, int));
3987 extern const char *cp_file_of                   PARAMS ((tree));
3988 extern int cp_line_of                           PARAMS ((tree));
3989 extern const char *language_to_string           PARAMS ((enum languages, int));
3990 extern void print_instantiation_context         PARAMS ((void));
3991
3992 /* in except.c */
3993 extern void init_exception_processing           PARAMS ((void));
3994 extern tree expand_start_catch_block            PARAMS ((tree));
3995 extern void expand_end_catch_block              PARAMS ((void));
3996 extern void expand_builtin_throw                PARAMS ((void));
3997 extern void expand_eh_spec_block                PARAMS ((tree));
3998 extern void expand_exception_blocks             PARAMS ((void));
3999 extern tree build_exc_ptr                       PARAMS ((void));
4000 extern tree build_throw                         PARAMS ((tree));
4001 extern void mark_all_runtime_matches            PARAMS ((void));
4002 extern int nothrow_libfn_p                      PARAMS ((tree));
4003 extern void check_handlers                      PARAMS ((tree));
4004 extern void choose_personality_routine          PARAMS ((enum languages));
4005
4006 /* in expr.c */
4007 extern int extract_init                         PARAMS ((tree, tree));
4008 extern rtx cxx_expand_expr                      PARAMS ((tree, rtx,
4009                                                          enum machine_mode,
4010                                                          int));
4011 extern tree cplus_expand_constant               PARAMS ((tree));
4012
4013 /* friend.c */
4014 extern int is_friend                            PARAMS ((tree, tree));
4015 extern void make_friend_class                   PARAMS ((tree, tree));
4016 extern void add_friend                          PARAMS ((tree, tree));
4017 extern tree do_friend                           PARAMS ((tree, tree, tree, tree, tree, enum overload_flags, tree, int));
4018
4019 /* in init.c */
4020 extern void emit_base_init                      PARAMS ((tree, tree));
4021 extern tree expand_member_init                  PARAMS ((tree, tree, tree));
4022 extern tree build_aggr_init                     PARAMS ((tree, tree, int));
4023 extern tree build_init                          PARAMS ((tree, tree, int));
4024 extern int is_aggr_type                         PARAMS ((tree, int));
4025 extern tree get_aggr_from_typedef               PARAMS ((tree, int));
4026 extern tree get_type_value                      PARAMS ((tree));
4027 extern tree build_forced_zero_init              PARAMS ((tree));
4028 extern tree build_member_call                   PARAMS ((tree, tree, tree));
4029 extern tree build_offset_ref                    PARAMS ((tree, tree));
4030 extern tree resolve_offset_ref                  PARAMS ((tree));
4031 extern tree build_new                           PARAMS ((tree, tree, tree, int));
4032 extern tree build_vec_init                      PARAMS ((tree, tree, int));
4033 extern tree build_x_delete                      PARAMS ((tree, int, tree));
4034 extern tree build_delete                        PARAMS ((tree, tree, special_function_kind, int, int));
4035 extern void push_base_cleanups                  PARAMS ((void));
4036 extern tree build_vbase_delete                  PARAMS ((tree, tree));
4037 extern tree build_vec_delete                    PARAMS ((tree, tree, special_function_kind, int));
4038 extern tree create_temporary_var                PARAMS ((tree));
4039 extern void begin_init_stmts                    PARAMS ((tree *, tree *));
4040 extern tree finish_init_stmts                   PARAMS ((tree, tree));
4041 extern void initialize_vtbl_ptrs                PARAMS ((tree));
4042 extern tree build_java_class_ref                PARAMS ((tree));
4043
4044 /* in input.c */
4045
4046 /* in lex.c */
4047 extern void cxx_dup_lang_specific_decl          PARAMS ((tree));
4048 extern tree make_pointer_declarator             PARAMS ((tree, tree));
4049 extern tree make_reference_declarator           PARAMS ((tree, tree));
4050 extern tree make_call_declarator                PARAMS ((tree, tree, tree, tree));
4051 extern void set_quals_and_spec                  PARAMS ((tree, tree, tree));
4052 extern void print_parse_statistics              PARAMS ((void));
4053 extern void do_pending_inlines                  PARAMS ((void));
4054 extern void process_next_inline                 PARAMS ((struct unparsed_text *));
4055
4056 extern void yyungetc                            PARAMS ((int, int));
4057 extern void snarf_method                        PARAMS ((tree));
4058
4059 extern void check_for_missing_semicolon         PARAMS ((tree));
4060 extern void note_got_semicolon                  PARAMS ((tree));
4061 extern void note_list_got_semicolon             PARAMS ((tree));
4062 extern void do_pending_lang_change              PARAMS ((void));
4063 extern void see_typename                        PARAMS ((void));
4064 extern tree do_identifier                       PARAMS ((tree, int, tree));
4065 extern tree do_scoped_id                        PARAMS ((tree, tree));
4066 extern tree identifier_typedecl_value           PARAMS ((tree));
4067 extern tree build_lang_decl                     PARAMS ((enum tree_code, tree, tree));
4068 extern void retrofit_lang_decl                  PARAMS ((tree));
4069 extern tree copy_decl                           PARAMS ((tree));
4070 extern tree copy_type                           PARAMS ((tree));
4071 extern tree cxx_make_type                       PARAMS ((enum tree_code));
4072 extern tree make_aggr_type                      PARAMS ((enum tree_code));
4073 extern void yyerror                             PARAMS ((const char *));
4074 extern void yyhook                              PARAMS ((int));
4075 extern int cp_type_qual_from_rid                PARAMS ((tree));
4076 extern const char *cxx_init                     PARAMS ((const char *));
4077 extern void cxx_finish PARAMS ((void));
4078 extern void cxx_init_options PARAMS ((void));
4079
4080 /* in method.c */
4081 extern void init_method                         PARAMS ((void));
4082 extern void set_mangled_name_for_decl           PARAMS ((tree));
4083 extern tree build_opfncall                      PARAMS ((enum tree_code, int, tree, tree, tree));
4084 extern tree hack_identifier                     PARAMS ((tree, tree));
4085 extern tree make_thunk                          PARAMS ((tree, tree, tree));
4086 extern void use_thunk                           PARAMS ((tree, int));
4087 extern void synthesize_method                   PARAMS ((tree));
4088 extern tree implicitly_declare_fn               PARAMS ((special_function_kind, tree, int));
4089 extern tree skip_artificial_parms_for           PARAMS ((tree, tree));
4090
4091 /* In optimize.c */
4092 extern void optimize_function                   PARAMS ((tree));
4093 extern int calls_setjmp_p                       PARAMS ((tree));
4094 extern int maybe_clone_body                     PARAMS ((tree));
4095
4096 /* in pt.c */
4097 extern void check_template_shadow               PARAMS ((tree));
4098 extern tree get_innermost_template_args         PARAMS ((tree, int));
4099 extern tree tsubst                              PARAMS ((tree, tree, tsubst_flags_t, tree));
4100 extern tree tsubst_expr                         PARAMS ((tree, tree, tsubst_flags_t, tree));
4101 extern tree tsubst_copy                         PARAMS ((tree, tree, tsubst_flags_t, tree));
4102 extern void maybe_begin_member_template_processing PARAMS ((tree));
4103 extern void maybe_end_member_template_processing PARAMS ((void));
4104 extern tree finish_member_template_decl         PARAMS ((tree));
4105 extern void begin_template_parm_list            PARAMS ((void));
4106 extern void begin_specialization                PARAMS ((void));
4107 extern void reset_specialization                PARAMS ((void));
4108 extern void end_specialization                  PARAMS ((void));
4109 extern void begin_explicit_instantiation        PARAMS ((void));
4110 extern void end_explicit_instantiation          PARAMS ((void));
4111 extern tree check_explicit_specialization       PARAMS ((tree, tree, int, int));
4112 extern tree process_template_parm               PARAMS ((tree, tree));
4113 extern tree end_template_parm_list              PARAMS ((tree));
4114 extern void end_template_decl                   PARAMS ((void));
4115 extern tree current_template_args               PARAMS ((void));
4116 extern tree push_template_decl                  PARAMS ((tree));
4117 extern tree push_template_decl_real             PARAMS ((tree, int));
4118 extern void redeclare_class_template            PARAMS ((tree, tree));
4119 extern tree lookup_template_class               PARAMS ((tree, tree, tree, tree, int, tsubst_flags_t));
4120 extern tree lookup_template_function            PARAMS ((tree, tree));
4121 extern int uses_template_parms                  PARAMS ((tree));
4122 extern tree instantiate_class_template          PARAMS ((tree));
4123 extern tree instantiate_template                PARAMS ((tree, tree));
4124 extern int fn_type_unification                  PARAMS ((tree, tree, tree, tree, tree, unification_kind_t, int));
4125 extern tree tinst_for_decl                      PARAMS ((void));
4126 extern void mark_decl_instantiated              PARAMS ((tree, int));
4127 extern int more_specialized                     PARAMS ((tree, tree, int, int));
4128 extern void mark_class_instantiated             PARAMS ((tree, int));
4129 extern void do_decl_instantiation               (tree, tree);
4130 extern void do_type_instantiation               PARAMS ((tree, tree, tsubst_flags_t));
4131 extern tree instantiate_decl                    PARAMS ((tree, int));
4132 extern tree get_bindings                        PARAMS ((tree, tree, tree));
4133 extern int push_tinst_level                     PARAMS ((tree));
4134 extern void pop_tinst_level                     PARAMS ((void));
4135 extern int more_specialized_class               PARAMS ((tree, tree));
4136 extern int is_member_template                   PARAMS ((tree));
4137 extern int template_parms_equal                 PARAMS ((tree, tree));
4138 extern int comp_template_parms                  PARAMS ((tree, tree));
4139 extern int template_class_depth                 PARAMS ((tree));
4140 extern int is_specialization_of                 PARAMS ((tree, tree));
4141 extern int comp_template_args                   PARAMS ((tree, tree));
4142 extern void maybe_process_partial_specialization PARAMS ((tree));
4143 extern void maybe_check_template_type           PARAMS ((tree));
4144 extern tree most_specialized_instantiation      PARAMS ((tree));
4145 extern void print_candidates                    PARAMS ((tree));
4146 extern int instantiate_pending_templates        PARAMS ((void));
4147 extern tree tsubst_default_argument             PARAMS ((tree, tree, tree));
4148 extern tree most_general_template               PARAMS ((tree));
4149 extern tree get_mostly_instantiated_function_type PARAMS ((tree, tree *, tree *));
4150 extern int problematic_instantiation_changed    PARAMS ((void));
4151 extern void record_last_problematic_instantiation PARAMS ((void));
4152 extern tree current_instantiation               PARAMS ((void));
4153 extern int processing_template_parmlist;
4154
4155 /* in repo.c */
4156 extern void repo_template_used                  PARAMS ((tree));
4157 extern void repo_template_instantiated          PARAMS ((tree, int));
4158 extern void init_repo                           PARAMS ((const char *));
4159 extern void finish_repo                         PARAMS ((void));
4160
4161 /* in rtti.c */
4162 extern void init_rtti_processing                PARAMS((void));
4163 extern tree build_typeid                        PARAMS((tree));
4164 extern tree get_tinfo_decl                      PARAMS((tree));
4165 extern tree get_typeid                          PARAMS((tree));
4166 extern tree build_dynamic_cast                  PARAMS((tree, tree));
4167 extern void emit_support_tinfos                 PARAMS((void));
4168 extern int unemitted_tinfo_decl_p               PARAMS((tree, void *));
4169 extern int emit_tinfo_decl                      PARAMS((tree *, void *));
4170
4171 /* in search.c */
4172 extern tree lookup_base PARAMS ((tree, tree, base_access, base_kind *));
4173 extern int types_overlap_p                      PARAMS ((tree, tree));
4174 extern tree get_vbase                           PARAMS ((tree, tree));
4175 extern tree get_dynamic_cast_base_type          PARAMS ((tree, tree));
4176 extern void type_access_control                 PARAMS ((tree, tree));
4177 extern int accessible_p                         PARAMS ((tree, tree));
4178 extern tree lookup_field                        PARAMS ((tree, tree, int, int));
4179 extern int lookup_fnfields_1                    PARAMS ((tree, tree));
4180 extern tree lookup_fnfields                     PARAMS ((tree, tree, int));
4181 extern tree lookup_member                       PARAMS ((tree, tree, int, int));
4182 extern int look_for_overrides                   PARAMS ((tree, tree));
4183 extern void get_pure_virtuals                   PARAMS ((tree));
4184 extern void get_vbase_types                     PARAMS ((tree));
4185 extern void maybe_suppress_debug_info           PARAMS ((tree));
4186 extern void note_debug_info_needed              PARAMS ((tree));
4187 extern void push_class_decls                    PARAMS ((tree));
4188 extern void pop_class_decls                     PARAMS ((void));
4189 extern void unuse_fields                        PARAMS ((tree));
4190 extern void print_search_statistics             PARAMS ((void));
4191 extern void init_search_processing              PARAMS ((void));
4192 extern void reinit_search_statistics            PARAMS ((void));
4193 extern tree current_scope                       PARAMS ((void));
4194 extern int at_function_scope_p                  PARAMS ((void));
4195 extern bool at_class_scope_p                    (void);
4196 extern tree context_for_name_lookup             PARAMS ((tree));
4197 extern tree lookup_conversions                  PARAMS ((tree));
4198 extern tree binfo_for_vtable                    PARAMS ((tree));
4199 extern tree binfo_from_vbase                    PARAMS ((tree));
4200 extern tree look_for_overrides_here             PARAMS ((tree, tree));
4201 extern int check_final_overrider                PARAMS ((tree, tree));
4202 extern tree dfs_walk                            PARAMS ((tree,
4203                                                        tree (*) (tree, void *),
4204                                                        tree (*) (tree, void *),
4205                                                        void *));
4206 extern tree dfs_walk_real                      PARAMS ((tree,
4207                                                        tree (*) (tree, void *),
4208                                                        tree (*) (tree, void *),
4209                                                        tree (*) (tree, void *),
4210                                                        void *));
4211 extern tree dfs_unmark                          PARAMS ((tree, void *));
4212 extern tree markedp                             PARAMS ((tree, void *));
4213 extern tree unmarkedp                           PARAMS ((tree, void *));
4214 extern tree dfs_unmarked_real_bases_queue_p     PARAMS ((tree, void *));
4215 extern tree dfs_marked_real_bases_queue_p       PARAMS ((tree, void *));
4216 extern tree dfs_skip_vbases                     PARAMS ((tree, void *));
4217 extern tree marked_vtable_pathp                 PARAMS ((tree, void *));
4218 extern tree unmarked_vtable_pathp               PARAMS ((tree, void *));
4219 extern tree find_vbase_instance                 PARAMS ((tree, tree));
4220 extern tree binfo_for_vbase                     PARAMS ((tree, tree));
4221 extern tree binfo_via_virtual                   PARAMS ((tree, tree));
4222
4223 /* in semantics.c */
4224 extern void init_cp_semantics                   PARAMS ((void));
4225 extern tree finish_expr_stmt                    PARAMS ((tree));
4226 extern tree begin_if_stmt                       PARAMS ((void));
4227 extern void finish_if_stmt_cond                 PARAMS ((tree, tree));
4228 extern tree finish_then_clause                  PARAMS ((tree));
4229 extern void begin_else_clause                   PARAMS ((void));
4230 extern void finish_else_clause                  PARAMS ((tree));
4231 extern void finish_if_stmt                      PARAMS ((void));
4232 extern tree begin_while_stmt                    PARAMS ((void));
4233 extern void finish_while_stmt_cond              PARAMS ((tree, tree));
4234 extern void finish_while_stmt                   PARAMS ((tree));
4235 extern tree begin_do_stmt                       PARAMS ((void));
4236 extern void finish_do_body                      PARAMS ((tree));
4237 extern void finish_do_stmt                      PARAMS ((tree, tree));
4238 extern tree finish_return_stmt                  PARAMS ((tree));
4239 extern tree begin_for_stmt                      PARAMS ((void));
4240 extern void finish_for_init_stmt                PARAMS ((tree));
4241 extern void finish_for_cond                     PARAMS ((tree, tree));
4242 extern void finish_for_expr                     PARAMS ((tree, tree));
4243 extern void finish_for_stmt                     PARAMS ((tree));
4244 extern tree finish_break_stmt                   PARAMS ((void));
4245 extern tree finish_continue_stmt                PARAMS ((void));
4246 extern tree begin_switch_stmt                   PARAMS ((void));
4247 extern void finish_switch_cond                  PARAMS ((tree, tree));
4248 extern void finish_switch_stmt                  PARAMS ((tree));
4249 extern tree finish_case_label                   PARAMS ((tree, tree));
4250 extern tree finish_goto_stmt                    PARAMS ((tree));
4251 extern tree begin_try_block                     PARAMS ((void));
4252 extern void finish_try_block                    PARAMS ((tree));
4253 extern tree begin_eh_spec_block                 PARAMS ((void));
4254 extern void finish_eh_spec_block                PARAMS ((tree, tree));
4255 extern void finish_handler_sequence             PARAMS ((tree));
4256 extern tree begin_function_try_block            PARAMS ((void));
4257 extern void finish_function_try_block           PARAMS ((tree));
4258 extern void finish_function_handler_sequence    PARAMS ((tree));
4259 extern void finish_cleanup_try_block            PARAMS ((tree));
4260 extern tree begin_handler                       PARAMS ((void));
4261 extern void finish_handler_parms                PARAMS ((tree, tree));
4262 extern void begin_catch_block                   PARAMS ((tree));
4263 extern void finish_handler                      PARAMS ((tree));
4264 extern void finish_cleanup                      PARAMS ((tree, tree));
4265 extern tree begin_compound_stmt                 PARAMS ((int));
4266 extern tree finish_compound_stmt                PARAMS ((int, tree));
4267 extern tree finish_asm_stmt                     PARAMS ((tree, tree, tree, tree, tree));
4268 extern void finish_label_stmt                   PARAMS ((tree));
4269 extern void finish_label_decl                   PARAMS ((tree));
4270 extern void finish_subobject                    PARAMS ((tree));
4271 extern tree finish_parenthesized_expr           PARAMS ((tree));
4272 extern tree begin_stmt_expr                     PARAMS ((void));
4273 extern tree finish_stmt_expr                    PARAMS ((tree));
4274 extern tree finish_call_expr                    PARAMS ((tree, tree, int));
4275 extern tree finish_increment_expr               PARAMS ((tree, enum tree_code));
4276 extern tree finish_this_expr                    PARAMS ((void));
4277 extern tree finish_object_call_expr             PARAMS ((tree, tree, tree));
4278 extern tree finish_qualified_object_call_expr   PARAMS ((tree, tree, tree));
4279 extern tree finish_pseudo_destructor_call_expr  PARAMS ((tree, tree, tree));
4280 extern tree finish_qualified_call_expr          PARAMS ((tree, tree));
4281 extern tree finish_unary_op_expr                PARAMS ((enum tree_code, tree));
4282 extern tree finish_id_expr                      PARAMS ((tree));
4283 extern tree finish_fname                        (tree);
4284 extern void save_type_access_control            PARAMS ((tree));
4285 extern void reset_type_access_control           PARAMS ((void));
4286 extern void decl_type_access_control            PARAMS ((tree));
4287 extern int begin_function_definition            PARAMS ((tree, tree));
4288 extern tree begin_constructor_declarator        PARAMS ((tree, tree));
4289 extern tree finish_declarator                   PARAMS ((tree, tree, tree, tree, int));
4290 extern void finish_translation_unit             PARAMS ((void));
4291 extern tree finish_template_type_parm           PARAMS ((tree, tree));
4292 extern tree finish_template_template_parm       PARAMS ((tree, tree));
4293 extern tree finish_parmlist                     PARAMS ((tree, int));
4294 extern tree begin_class_definition              PARAMS ((tree));
4295 extern tree finish_class_definition             PARAMS ((tree, tree, int, int));
4296 extern void finish_default_args                 PARAMS ((void));
4297 extern void begin_inline_definitions            PARAMS ((void));
4298 extern tree finish_member_class_template        PARAMS ((tree));
4299 extern void finish_template_decl                PARAMS ((tree));
4300 extern tree finish_template_type                PARAMS ((tree, tree, int));
4301 extern void enter_scope_of                      PARAMS ((tree));
4302 extern tree finish_base_specifier               PARAMS ((tree, tree));
4303 extern void finish_member_declaration           PARAMS ((tree));
4304 extern void check_multiple_declarators          PARAMS ((void));
4305 extern tree finish_typeof                       PARAMS ((tree));
4306 extern tree finish_sizeof                       PARAMS ((tree));
4307 extern tree finish_alignof                      PARAMS ((tree));
4308 extern void finish_decl_cleanup                 PARAMS ((tree, tree));
4309 extern void finish_eh_cleanup                   PARAMS ((tree));
4310 extern void finish_named_return_value           PARAMS ((tree, tree));
4311 extern void expand_body                         PARAMS ((tree));
4312 extern tree nullify_returns_r                 PARAMS ((tree *, int *, void *));
4313 extern void do_pushlevel                        PARAMS ((void));
4314 extern tree do_poplevel                         PARAMS ((void));
4315 extern void begin_mem_initializers              (void);
4316 extern void finish_mem_initializers             PARAMS ((tree));
4317 extern void setup_vtbl_ptr                      PARAMS ((tree, tree));
4318 extern void clear_out_block                     PARAMS ((void));
4319 extern tree begin_global_stmt_expr              PARAMS ((void));
4320 extern tree finish_global_stmt_expr             PARAMS ((tree));
4321
4322
4323 /* in spew.c */
4324 extern void init_spew                           PARAMS ((void));
4325 extern int peekyylex                            PARAMS ((void));
4326 extern tree arbitrate_lookup                    PARAMS ((tree, tree, tree));
4327 extern tree frob_opname                         PARAMS ((tree));
4328 extern void maybe_snarf_defarg                  PARAMS ((void));
4329 extern void add_defarg_fn                       PARAMS ((tree));
4330 extern void do_pending_defargs                  PARAMS ((void));
4331 extern void done_pending_defargs                PARAMS ((void));
4332 extern void unprocessed_defarg_fn               PARAMS ((tree));
4333 extern void replace_defarg                      PARAMS ((tree, tree));
4334 extern void end_input                           PARAMS ((void));
4335
4336 /* in tree.c */
4337 extern void lang_check_failed                   PARAMS ((const char *, int,
4338                                                          const char *));
4339 extern tree stabilize_expr                      PARAMS ((tree, tree *));
4340 extern tree cxx_unsave_expr_now                 PARAMS ((tree));
4341 extern tree cxx_maybe_build_cleanup             PARAMS ((tree));
4342 extern void init_tree                           PARAMS ((void));
4343 extern int pod_type_p                           PARAMS ((tree));
4344 extern int zero_init_p                          PARAMS ((tree));
4345 extern tree canonical_type_variant              PARAMS ((tree));
4346 extern void unshare_base_binfos                 PARAMS ((tree));
4347 extern int member_p                             PARAMS ((tree));
4348 extern cp_lvalue_kind real_lvalue_p             PARAMS ((tree));
4349 extern tree build_min                           PARAMS ((enum tree_code, tree,
4350                                                          ...));
4351 extern tree build_min_nt                        PARAMS ((enum tree_code, ...));
4352 extern tree build_cplus_new                     PARAMS ((tree, tree));
4353 extern tree get_target_expr                     PARAMS ((tree));
4354 extern tree break_out_calls                     PARAMS ((tree));
4355 extern tree build_cplus_method_type             PARAMS ((tree, tree, tree));
4356 extern tree build_cplus_staticfn_type           PARAMS ((tree, tree, tree));
4357 extern tree build_cplus_array_type              PARAMS ((tree, tree));
4358 extern tree hash_tree_cons                      PARAMS ((tree, tree, tree));
4359 extern tree hash_tree_chain                     PARAMS ((tree, tree));
4360 extern tree hash_chainon                        PARAMS ((tree, tree));
4361 extern tree make_binfo                          PARAMS ((tree, tree, tree, tree));
4362 extern tree reverse_path                        PARAMS ((tree));
4363 extern int count_functions                      PARAMS ((tree));
4364 extern int is_overloaded_fn                     PARAMS ((tree));
4365 extern tree get_overloaded_fn                   PARAMS ((tree));
4366 extern tree get_first_fn                        PARAMS ((tree));
4367 extern int bound_pmf_p                          PARAMS ((tree));
4368 extern tree ovl_cons                            PARAMS ((tree, tree));
4369 extern tree build_overload                      PARAMS ((tree, tree));
4370 extern tree function_arg_chain                  PARAMS ((tree));
4371 extern int promotes_to_aggr_type                PARAMS ((tree, enum tree_code));
4372 extern int is_aggr_type_2                       PARAMS ((tree, tree));
4373 extern const char *cxx_printable_name           PARAMS ((tree, int));
4374 extern tree build_exception_variant             PARAMS ((tree, tree));
4375 extern tree bind_template_template_parm         PARAMS ((tree, tree));
4376 extern tree array_type_nelts_total              PARAMS ((tree));
4377 extern tree array_type_nelts_top                PARAMS ((tree));
4378 extern tree break_out_target_exprs              PARAMS ((tree));
4379 extern tree get_type_decl                       PARAMS ((tree));
4380 extern tree vec_binfo_member                    PARAMS ((tree, tree));
4381 extern tree decl_namespace_context              PARAMS ((tree));
4382 extern tree lvalue_type                         PARAMS ((tree));
4383 extern tree error_type                          PARAMS ((tree));
4384 extern tree build_zc_wrapper                    PARAMS ((struct z_candidate *));
4385 extern tree build_srcloc_here                   PARAMS ((void));
4386 extern int varargs_function_p                   PARAMS ((tree));
4387 extern int really_overloaded_fn                 PARAMS ((tree));
4388 extern int cp_tree_equal                        PARAMS ((tree, tree));
4389 extern tree no_linkage_check                    PARAMS ((tree));
4390 extern void debug_binfo                         PARAMS ((tree));
4391 extern tree build_dummy_object                  PARAMS ((tree));
4392 extern tree maybe_dummy_object                  PARAMS ((tree, tree *));
4393 extern int is_dummy_object                      PARAMS ((tree));
4394 extern const struct attribute_spec cxx_attribute_table[];
4395 extern tree make_ptrmem_cst                     PARAMS ((tree, tree));
4396 extern tree cp_build_qualified_type_real        PARAMS ((tree, int, tsubst_flags_t));
4397 #define cp_build_qualified_type(TYPE, QUALS) \
4398   cp_build_qualified_type_real ((TYPE), (QUALS), tf_error | tf_warning)
4399 extern tree build_shared_int_cst                PARAMS ((int));
4400 extern special_function_kind special_function_p PARAMS ((tree));
4401 extern int count_trees                          PARAMS ((tree));
4402 extern int char_type_p                          PARAMS ((tree));
4403 extern void verify_stmt_tree                    PARAMS ((tree));
4404 extern tree find_tree                           PARAMS ((tree, tree));
4405 extern linkage_kind decl_linkage                PARAMS ((tree));
4406 extern tree cp_walk_subtrees PARAMS ((tree*, int*, walk_tree_fn,
4407                                       void*, void*));
4408 extern int cp_cannot_inline_tree_fn PARAMS ((tree*));
4409 extern tree cp_add_pending_fn_decls PARAMS ((void*,tree));
4410 extern int cp_is_overload_p PARAMS ((tree));
4411 extern int cp_auto_var_in_fn_p PARAMS ((tree,tree));
4412 extern tree cp_copy_res_decl_for_inlining PARAMS ((tree, tree, tree, void*,
4413                                                    int*, void*));
4414 extern int cp_start_inlining                    PARAMS ((tree));
4415 extern void cp_end_inlining                     PARAMS ((tree));
4416
4417 /* in typeck.c */
4418 extern int string_conv_p                        PARAMS ((tree, tree, int));
4419 extern tree cp_truthvalue_conversion            PARAMS ((tree));
4420 extern tree condition_conversion                PARAMS ((tree));
4421 extern tree target_type                         PARAMS ((tree));
4422 extern tree require_complete_type               PARAMS ((tree));
4423 extern tree complete_type                       PARAMS ((tree));
4424 extern tree complete_type_or_diagnostic         PARAMS ((tree, tree, int));
4425 #define complete_type_or_else(T,V) (complete_type_or_diagnostic ((T), (V), 0))
4426 extern int type_unknown_p                       PARAMS ((tree));
4427 extern tree commonparms                         PARAMS ((tree, tree));
4428 extern tree original_type                       PARAMS ((tree));
4429 extern int comp_except_specs                    PARAMS ((tree, tree, int));
4430 extern int comptypes                            PARAMS ((tree, tree, int));
4431 extern int comp_target_types                    PARAMS ((tree, tree, int));
4432 extern int compparms                            PARAMS ((tree, tree));
4433 extern int comp_cv_qualification                PARAMS ((tree, tree));
4434 extern int comp_cv_qual_signature               PARAMS ((tree, tree));
4435 extern tree expr_sizeof                         PARAMS ((tree));
4436 extern tree c_sizeof_nowarn                     PARAMS ((tree));
4437 extern tree inline_conversion                   PARAMS ((tree));
4438 extern tree decay_conversion                    PARAMS ((tree));
4439 extern tree build_object_ref                    PARAMS ((tree, tree, tree));
4440 extern tree build_component_ref_1               PARAMS ((tree, tree, int));
4441 extern tree build_component_ref                 PARAMS ((tree, tree, tree, int));
4442 extern tree build_x_component_ref               PARAMS ((tree, tree, tree));
4443 extern tree build_x_indirect_ref                PARAMS ((tree, const char *));
4444 extern tree build_indirect_ref                  PARAMS ((tree, const char *));
4445 extern tree build_array_ref                     PARAMS ((tree, tree));
4446 extern tree build_x_function_call               PARAMS ((tree, tree, tree));
4447 extern tree get_member_function_from_ptrfunc    PARAMS ((tree *, tree));
4448 extern tree build_function_call_real            PARAMS ((tree, tree, int, int));
4449 extern tree build_function_call_maybe           PARAMS ((tree, tree));
4450 extern tree convert_arguments                   PARAMS ((tree, tree, tree, int));
4451 extern tree build_x_binary_op                   PARAMS ((enum tree_code, tree, tree));
4452 extern tree build_x_unary_op                    PARAMS ((enum tree_code, tree));
4453 extern tree unary_complex_lvalue                PARAMS ((enum tree_code, tree));
4454 extern tree build_x_conditional_expr            PARAMS ((tree, tree, tree));
4455 extern tree build_x_compound_expr               PARAMS ((tree));
4456 extern tree build_compound_expr                 PARAMS ((tree));
4457 extern tree build_static_cast                   PARAMS ((tree, tree));
4458 extern tree build_reinterpret_cast              PARAMS ((tree, tree));
4459 extern tree build_const_cast                    PARAMS ((tree, tree));
4460 extern tree build_c_cast                        PARAMS ((tree, tree));
4461 extern tree build_x_modify_expr                 PARAMS ((tree, enum tree_code, tree));
4462 extern tree build_modify_expr                   PARAMS ((tree, enum tree_code, tree));
4463 extern tree dubious_conversion_warnings         PARAMS ((tree, tree, const char *, tree, int));
4464 extern tree convert_for_initialization          PARAMS ((tree, tree, tree, int, const char *, tree, int));
4465 extern int comp_ptr_ttypes                      PARAMS ((tree, tree));
4466 extern int ptr_reasonably_similar               PARAMS ((tree, tree));
4467 extern tree build_ptrmemfunc                    PARAMS ((tree, tree, int));
4468 extern int cp_type_quals                        PARAMS ((tree));
4469 extern int cp_has_mutable_p                     PARAMS ((tree));
4470 extern int at_least_as_qualified_p              PARAMS ((tree, tree));
4471 extern int more_qualified_p                     PARAMS ((tree, tree));
4472 extern tree build_ptrmemfunc1                   PARAMS ((tree, tree, tree));
4473 extern void expand_ptrmemfunc_cst               PARAMS ((tree, tree *, tree *));
4474 extern tree pfn_from_ptrmemfunc                 PARAMS ((tree));
4475 extern tree type_after_usual_arithmetic_conversions PARAMS ((tree, tree));
4476 extern tree composite_pointer_type              PARAMS ((tree, tree, tree, tree,
4477                                                        const char*));
4478 extern tree merge_types                         PARAMS ((tree, tree));
4479 extern tree check_return_expr                   PARAMS ((tree));
4480 #define cp_build_binary_op(code, arg1, arg2) \
4481   build_binary_op(code, arg1, arg2, 1)
4482
4483 /* in typeck2.c */
4484 extern void cxx_incomplete_type_diagnostic      PARAMS ((tree, tree, int));
4485 #undef cxx_incomplete_type_error
4486 extern void cxx_incomplete_type_error           PARAMS ((tree, tree));
4487 #define cxx_incomplete_type_error(V,T) \
4488   (cxx_incomplete_type_diagnostic ((V), (T), 0))
4489 extern tree error_not_base_type                 PARAMS ((tree, tree));
4490 extern tree binfo_or_else                       PARAMS ((tree, tree));
4491 extern void readonly_error                      PARAMS ((tree, const char *, int));
4492 extern int abstract_virtuals_error              PARAMS ((tree, tree));
4493
4494 #define my_friendly_assert(EXP, N) (void) \
4495  (((EXP) == 0) ? (fancy_abort (__FILE__, __LINE__, __FUNCTION__), 0) : 0)
4496
4497 extern tree force_store_init_value              PARAMS ((tree, tree));
4498 extern tree store_init_value                    PARAMS ((tree, tree));
4499 extern tree digest_init                         PARAMS ((tree, tree, tree *));
4500 extern tree build_scoped_ref                    PARAMS ((tree, tree, tree *));
4501 extern tree build_x_arrow                       PARAMS ((tree));
4502 extern tree build_m_component_ref               PARAMS ((tree, tree));
4503 extern tree build_functional_cast               PARAMS ((tree, tree));
4504 extern void check_for_new_type                  PARAMS ((const char *, flagged_type_tree));
4505 extern tree add_exception_specifier             PARAMS ((tree, tree, int));
4506 extern tree merge_exception_specifiers          PARAMS ((tree, tree));
4507
4508 /* in mangle.c */
4509 extern void init_mangle                         PARAMS ((void));
4510 extern void mangle_decl                         PARAMS ((tree));
4511 extern const char *mangle_type_string           PARAMS ((tree));
4512 extern tree mangle_type                         PARAMS ((tree));
4513 extern tree mangle_typeinfo_for_type            PARAMS ((tree));
4514 extern tree mangle_typeinfo_string_for_type     PARAMS ((tree));
4515 extern tree mangle_vtbl_for_type                PARAMS ((tree));
4516 extern tree mangle_vtt_for_type                 PARAMS ((tree));
4517 extern tree mangle_ctor_vtbl_for_type           PARAMS ((tree, tree));
4518 extern tree mangle_thunk                        PARAMS ((tree, tree, tree));
4519 extern tree mangle_conv_op_name_for_type        PARAMS ((tree));
4520 extern tree mangle_guard_variable               PARAMS ((tree));
4521 extern tree mangle_ref_init_variable            PARAMS ((tree));
4522
4523 /* in dump.c */
4524 extern int cp_dump_tree                         PARAMS ((void *, tree));
4525
4526 /* -- end of C++ */
4527
4528 #endif /* ! GCC_CP_TREE_H */