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