Home | History | Annotate | Download | only in cp
      1 /* Definitions for C++ parsing and type checking.
      2    Copyright (C) 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
      3    2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
      4    Free Software Foundation, Inc.
      5    Contributed by Michael Tiemann (tiemann (at) cygnus.com)
      6 
      7 This file is part of GCC.
      8 
      9 GCC is free software; you can redistribute it and/or modify
     10 it under the terms of the GNU General Public License as published by
     11 the Free Software Foundation; either version 3, or (at your option)
     12 any later version.
     13 
     14 GCC is distributed in the hope that it will be useful,
     15 but WITHOUT ANY WARRANTY; without even the implied warranty of
     16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     17 GNU General Public License for more details.
     18 
     19 You should have received a copy of the GNU General Public License
     20 along with GCC; see the file COPYING3.  If not see
     21 <http://www.gnu.org/licenses/>.  */
     22 
     23 #ifndef GCC_CP_TREE_H
     24 #define GCC_CP_TREE_H
     25 
     26 #include "ggc.h"
     27 #include "function.h"
     28 #include "hashtab.h"
     29 #include "vec.h"
     30 #include "l-ipo.h"
     31 
     32 /* In order for the format checking to accept the C++ front end
     33    diagnostic framework extensions, you must include this file before
     34    diagnostic-core.h, not after.  We override the definition of GCC_DIAG_STYLE
     35    in c-common.h.  */
     36 #undef GCC_DIAG_STYLE
     37 #define GCC_DIAG_STYLE __gcc_cxxdiag__
     38 #if defined(GCC_DIAGNOSTIC_CORE_H) || defined (GCC_C_COMMON_H)
     39 #error \
     40 In order for the format checking to accept the C++ front end diagnostic \
     41 framework extensions, you must include this file before diagnostic-core.h and \
     42 c-common.h, not after.
     43 #endif
     44 #include "c-family/c-common.h"
     45 #include "diagnostic.h"
     46 
     47 #include "name-lookup.h"
     48 
     49 /* Usage of TREE_LANG_FLAG_?:
     50    0: IDENTIFIER_MARKED (IDENTIFIER_NODEs)
     51       NEW_EXPR_USE_GLOBAL (in NEW_EXPR).
     52       DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR).
     53       COMPOUND_EXPR_OVERLOADED (in COMPOUND_EXPR).
     54       TREE_INDIRECT_USING (in NAMESPACE_DECL).
     55       CLEANUP_P (in TRY_BLOCK)
     56       AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR)
     57       PTRMEM_OK_P (in ADDR_EXPR, OFFSET_REF)
     58       PAREN_STRING_LITERAL (in STRING_CST)
     59       DECL_PRETTY_FUNCTION_P (in VAR_DECL)
     60       KOENIG_LOOKUP_P (in CALL_EXPR)
     61       STATEMENT_LIST_NO_SCOPE (in STATEMENT_LIST).
     62       EXPR_STMT_STMT_EXPR_RESULT (in EXPR_STMT)
     63       STMT_EXPR_NO_SCOPE (in STMT_EXPR)
     64       BIND_EXPR_TRY_BLOCK (in BIND_EXPR)
     65       TYPENAME_IS_ENUM_P (in TYPENAME_TYPE)
     66       REFERENCE_REF_P (in INDIRECT_EXPR)
     67       QUALIFIED_NAME_IS_TEMPLATE (in SCOPE_REF)
     68       OMP_FOR_GIMPLIFYING_P (in OMP_FOR)
     69       BASELINK_QUALIFIED_P (in BASELINK)
     70       TARGET_EXPR_IMPLICIT_P (in TARGET_EXPR)
     71       TEMPLATE_PARM_PARAMETER_PACK (in TEMPLATE_PARM_INDEX)
     72       ATTR_IS_DEPENDENT (in the TREE_LIST for an attribute)
     73       CONSTRUCTOR_IS_DIRECT_INIT (in CONSTRUCTOR)
     74       LAMBDA_EXPR_CAPTURES_THIS_P (in LAMBDA_EXPR)
     75       DECLTYPE_FOR_LAMBDA_CAPTURE (in DECLTYPE_TYPE)
     76       VEC_INIT_EXPR_IS_CONSTEXPR (in VEC_INIT_EXPR)
     77    1: IDENTIFIER_VIRTUAL_P (in IDENTIFIER_NODE)
     78       TI_PENDING_TEMPLATE_FLAG.
     79       TEMPLATE_PARMS_FOR_INLINE.
     80       DELETE_EXPR_USE_VEC (in DELETE_EXPR).
     81       (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out).
     82       ICS_ELLIPSIS_FLAG (in _CONV)
     83       DECL_INITIALIZED_P (in VAR_DECL)
     84       TYPENAME_IS_CLASS_P (in TYPENAME_TYPE)
     85       STMT_IS_FULL_EXPR_P (in _STMT)
     86       TARGET_EXPR_LIST_INIT_P (in TARGET_EXPR)
     87       LAMBDA_EXPR_MUTABLE_P (in LAMBDA_EXPR)
     88       DECLTYPE_FOR_LAMBDA_RETURN (in DECLTYPE_TYPE)
     89    2: IDENTIFIER_OPNAME_P (in IDENTIFIER_NODE)
     90       ICS_THIS_FLAG (in _CONV)
     91       DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (in VAR_DECL)
     92       STATEMENT_LIST_TRY_BLOCK (in STATEMENT_LIST)
     93       TYPENAME_IS_RESOLVING_P (in TYPE_NAME_TYPE)
     94       LAMBDA_EXPR_DEDUCE_RETURN_TYPE_P (in LAMBDA_EXPR)
     95       TARGET_EXPR_DIRECT_INIT_P (in TARGET_EXPR)
     96    3: (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out).
     97       ICS_BAD_FLAG (in _CONV)
     98       FN_TRY_BLOCK_P (in TRY_BLOCK)
     99       IDENTIFIER_CTOR_OR_DTOR_P (in IDENTIFIER_NODE)
    100       BIND_EXPR_BODY_BLOCK (in BIND_EXPR)
    101       DECL_NON_TRIVIALLY_INITIALIZED_P (in VAR_DECL)
    102    4: TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR,
    103 	  or FIELD_DECL).
    104       IDENTIFIER_TYPENAME_P (in IDENTIFIER_NODE)
    105       DECL_TINFO_P (in VAR_DECL)
    106    5: C_IS_RESERVED_WORD (in IDENTIFIER_NODE)
    107       DECL_VTABLE_OR_VTT_P (in VAR_DECL)
    108    6: IDENTIFIER_REPO_CHOSEN (in IDENTIFIER_NODE)
    109       DECL_CONSTRUCTION_VTABLE_P (in VAR_DECL)
    110       TYPE_MARKED_P (in _TYPE)
    111 
    112    Usage of TYPE_LANG_FLAG_?:
    113    0: TYPE_DEPENDENT_P
    114    1: TYPE_HAS_USER_CONSTRUCTOR.
    115    2: unused
    116    3: TYPE_FOR_JAVA.
    117    4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR
    118    5: CLASS_TYPE_P (in RECORD_TYPE and UNION_TYPE)
    119       ENUM_FIXED_UNDERLYING_TYPE_P (in ENUMERAL_TYPE)
    120    6: TYPE_DEPENDENT_P_VALID
    121 
    122    Usage of DECL_LANG_FLAG_?:
    123    0: DECL_ERROR_REPORTED (in VAR_DECL).
    124       DECL_TEMPLATE_PARM_P (in PARM_DECL, CONST_DECL, TYPE_DECL, or TEMPLATE_DECL)
    125       DECL_LOCAL_FUNCTION_P (in FUNCTION_DECL)
    126       DECL_MUTABLE_P (in FIELD_DECL)
    127       DECL_DEPENDENT_P (in USING_DECL)
    128    1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL).
    129       DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL)
    130       DECL_MEMBER_TEMPLATE_P (in TEMPLATE_DECL)
    131       FUNCTION_PARAMETER_PACK_P (in PARM_DECL)
    132    2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL).
    133       DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL)
    134    3: DECL_IN_AGGR_P.
    135    4: DECL_C_BIT_FIELD (in a FIELD_DECL)
    136       DECL_ANON_UNION_VAR_P (in a VAR_DECL)
    137       DECL_SELF_REFERENCE_P (in a TYPE_DECL)
    138       DECL_INVALID_OVERRIDER_P (in a FUNCTION_DECL)
    139    5: DECL_INTERFACE_KNOWN.
    140    6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL).
    141       DECL_FIELD_IS_BASE (in FIELD_DECL)
    142    7: DECL_DEAD_FOR_LOCAL (in VAR_DECL).
    143       DECL_THUNK_P (in a member FUNCTION_DECL)
    144       DECL_NORMAL_CAPTURE_P (in FIELD_DECL)
    145    8: DECL_DECLARED_CONSTEXPR_P (in VAR_DECL, FUNCTION_DECL)
    146 
    147    Usage of language-independent fields in a language-dependent manner:
    148 
    149    TYPE_ALIAS_SET
    150      This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so
    151      forth as a substitute for the mark bits provided in `lang_type'.
    152      At present, only the six low-order bits are used.
    153 
    154    TYPE_LANG_SLOT_1
    155      For an ENUMERAL_TYPE, this is ENUM_TEMPLATE_INFO.
    156      For a FUNCTION_TYPE or METHOD_TYPE, this is TYPE_RAISES_EXCEPTIONS
    157 
    158   BINFO_VIRTUALS
    159      For a binfo, this is a TREE_LIST.  There is an entry for each
    160      virtual function declared either in BINFO or its direct and
    161      indirect primary bases.
    162 
    163      The BV_DELTA of each node gives the amount by which to adjust the
    164      `this' pointer when calling the function.  If the method is an
    165      overridden version of a base class method, then it is assumed
    166      that, prior to adjustment, the this pointer points to an object
    167      of the base class.
    168 
    169      The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable
    170      index of the vcall offset for this entry.
    171 
    172      The BV_FN is the declaration for the virtual function itself.
    173 
    174      If BV_LOST_PRIMARY is set, it means that this entry is for a lost
    175      primary virtual base and can be left null in the vtable.
    176 
    177    BINFO_VTABLE
    178      This is an expression with POINTER_TYPE that gives the value
    179      to which the vptr should be initialized.  Use get_vtbl_decl_for_binfo
    180      to extract the VAR_DECL for the complete vtable.
    181 
    182    DECL_VINDEX
    183      This field is NULL for a non-virtual function.  For a virtual
    184      function, it is eventually set to an INTEGER_CST indicating the
    185      index in the vtable at which this function can be found.  When
    186      a virtual function is declared, but before it is known what
    187      function is overridden, this field is the error_mark_node.
    188 
    189      Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is
    190      the virtual function this one overrides, and whose TREE_CHAIN is
    191      the old DECL_VINDEX.  */
    192 
    193 /* Language-specific tree checkers.  */
    194 
    195 #define VAR_OR_FUNCTION_DECL_CHECK(NODE) \
    196   TREE_CHECK2(NODE,VAR_DECL,FUNCTION_DECL)
    197 
    198 #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) \
    199   TREE_CHECK3(NODE,VAR_DECL,FUNCTION_DECL,PARM_DECL)
    200 
    201 #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) \
    202   TREE_CHECK4(NODE,VAR_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL)
    203 
    204 #define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE) \
    205   TREE_CHECK(NODE,BOUND_TEMPLATE_TEMPLATE_PARM)
    206 
    207 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
    208 #define THUNK_FUNCTION_CHECK(NODE) __extension__			\
    209 ({  __typeof (NODE) const __t = (NODE);					\
    210     if (TREE_CODE (__t) != FUNCTION_DECL || !__t->decl_common.lang_specific \
    211 	|| !__t->decl_common.lang_specific->u.fn.thunk_p)		\
    212       tree_check_failed (__t, __FILE__, __LINE__, __FUNCTION__, 0);	\
    213      __t; })
    214 #else
    215 #define THUNK_FUNCTION_CHECK(NODE) (NODE)
    216 #endif
    217 
    218 /* Language-dependent contents of an identifier.  */
    220 
    221 struct GTY(()) lang_identifier {
    222   struct c_common_identifier c_common;
    223   cxx_binding *namespace_bindings;
    224   cxx_binding *bindings;
    225   tree class_template_info;
    226   tree label_value;
    227 };
    228 
    229 /* In an IDENTIFIER_NODE, nonzero if this identifier is actually a
    230    keyword.  C_RID_CODE (node) is then the RID_* value of the keyword,
    231    and C_RID_YYCODE is the token number wanted by Yacc.  */
    232 
    233 #define C_IS_RESERVED_WORD(ID) TREE_LANG_FLAG_5 (ID)
    234 
    235 #define LANG_IDENTIFIER_CAST(NODE) \
    236 	((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE))
    237 
    238 struct GTY(()) template_parm_index_s {
    239   struct tree_common common;
    240   int index;
    241   int level;
    242   int orig_level;
    243   int num_siblings;
    244   tree decl;
    245 };
    246 typedef struct template_parm_index_s template_parm_index;
    247 
    248 struct GTY(()) ptrmem_cst {
    249   struct tree_common common;
    250   tree member;
    251 };
    252 typedef struct ptrmem_cst * ptrmem_cst_t;
    253 
    254 #define IDENTIFIER_GLOBAL_VALUE(NODE) \
    255   namespace_binding ((NODE), global_namespace)
    256 #define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \
    257   set_namespace_binding ((NODE), global_namespace, (VAL))
    258 #define IDENTIFIER_NAMESPACE_VALUE(NODE) \
    259   namespace_binding ((NODE), current_namespace)
    260 #define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \
    261   set_namespace_binding ((NODE), current_namespace, (VAL))
    262 
    263 #define CLEANUP_P(NODE)		TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE))
    264 
    265 #define BIND_EXPR_TRY_BLOCK(NODE) \
    266   TREE_LANG_FLAG_0 (BIND_EXPR_CHECK (NODE))
    267 
    268 /* Used to mark the block around the member initializers and cleanups.  */
    269 #define BIND_EXPR_BODY_BLOCK(NODE) \
    270   TREE_LANG_FLAG_3 (BIND_EXPR_CHECK (NODE))
    271 #define FUNCTION_NEEDS_BODY_BLOCK(NODE) \
    272   (DECL_CONSTRUCTOR_P (NODE) || DECL_DESTRUCTOR_P (NODE))
    273 
    274 #define STATEMENT_LIST_NO_SCOPE(NODE) \
    275   TREE_LANG_FLAG_0 (STATEMENT_LIST_CHECK (NODE))
    276 #define STATEMENT_LIST_TRY_BLOCK(NODE) \
    277   TREE_LANG_FLAG_2 (STATEMENT_LIST_CHECK (NODE))
    278 
    279 /* Nonzero if this statement should be considered a full-expression,
    280    i.e., if temporaries created during this statement should have
    281    their destructors run at the end of this statement.  */
    282 #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
    283 
    284 /* Marks the result of a statement expression.  */
    285 #define EXPR_STMT_STMT_EXPR_RESULT(NODE) \
    286   TREE_LANG_FLAG_0 (EXPR_STMT_CHECK (NODE))
    287 
    288 /* Nonzero if this statement-expression does not have an associated scope.  */
    289 #define STMT_EXPR_NO_SCOPE(NODE) \
    290    TREE_LANG_FLAG_0 (STMT_EXPR_CHECK (NODE))
    291 
    292 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual
    293    sense of `same'.  */
    294 #define same_type_p(TYPE1, TYPE2) \
    295   comptypes ((TYPE1), (TYPE2), COMPARE_STRICT)
    296 
    297 /* Nonzero if we are presently building a statement tree, rather
    298    than expanding each statement as we encounter it.  */
    299 #define building_stmt_tree()  (cur_stmt_list != NULL_TREE)
    300 
    301 /* Returns nonzero iff NODE is a declaration for the global function
    302    `main'.  */
    303 #define DECL_MAIN_P(NODE)				\
    304    (DECL_EXTERN_C_FUNCTION_P (NODE)			\
    305     && DECL_NAME (NODE) != NULL_TREE			\
    306     && MAIN_NAME_P (DECL_NAME (NODE))			\
    307     && flag_hosted)
    308 
    309 /* The overloaded FUNCTION_DECL.  */
    310 #define OVL_FUNCTION(NODE) \
    311   (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function)
    312 #define OVL_CHAIN(NODE)      TREE_CHAIN (NODE)
    313 /* Polymorphic access to FUNCTION and CHAIN.  */
    314 #define OVL_CURRENT(NODE)	\
    315   ((TREE_CODE (NODE) == OVERLOAD) ? OVL_FUNCTION (NODE) : (NODE))
    316 #define OVL_NEXT(NODE)		\
    317   ((TREE_CODE (NODE) == OVERLOAD) ? TREE_CHAIN (NODE) : NULL_TREE)
    318 /* If set, this was imported in a using declaration.
    319    This is not to confuse with being used somewhere, which
    320    is not important for this node.  */
    321 #define OVL_USED(NODE)		TREE_USED (NODE)
    322 
    323 struct GTY(()) tree_overload {
    324   struct tree_common common;
    325   tree function;
    326 };
    327 
    328 /* Returns true iff NODE is a BASELINK.  */
    329 #define BASELINK_P(NODE) \
    330   (TREE_CODE (NODE) == BASELINK)
    331 /* The BINFO indicating the base from which the BASELINK_FUNCTIONS came.  */
    332 #define BASELINK_BINFO(NODE) \
    333   (((struct tree_baselink*) BASELINK_CHECK (NODE))->binfo)
    334 /* The functions referred to by the BASELINK; either a FUNCTION_DECL,
    335    a TEMPLATE_DECL, an OVERLOAD, or a TEMPLATE_ID_EXPR.  */
    336 #define BASELINK_FUNCTIONS(NODE) \
    337   (((struct tree_baselink*) BASELINK_CHECK (NODE))->functions)
    338 /* The BINFO in which the search for the functions indicated by this baselink
    339    began.  This base is used to determine the accessibility of functions
    340    selected by overload resolution.  */
    341 #define BASELINK_ACCESS_BINFO(NODE) \
    342   (((struct tree_baselink*) BASELINK_CHECK (NODE))->access_binfo)
    343 /* For a type-conversion operator, the BASELINK_OPTYPE indicates the type
    344    to which the conversion should occur.  This value is important if
    345    the BASELINK_FUNCTIONS include a template conversion operator --
    346    the BASELINK_OPTYPE can be used to determine what type the user
    347    requested.  */
    348 #define BASELINK_OPTYPE(NODE) \
    349   (TREE_CHAIN (BASELINK_CHECK (NODE)))
    350 /* Nonzero if this baselink was from a qualified lookup.  */
    351 #define BASELINK_QUALIFIED_P(NODE) \
    352   TREE_LANG_FLAG_0 (BASELINK_CHECK (NODE))
    353 
    354 struct GTY(()) tree_baselink {
    355   struct tree_common common;
    356   tree binfo;
    357   tree functions;
    358   tree access_binfo;
    359 };
    360 
    361 /* The different kinds of ids that we encounter.  */
    362 
    363 typedef enum cp_id_kind
    364 {
    365   /* Not an id at all.  */
    366   CP_ID_KIND_NONE,
    367   /* An unqualified-id that is not a template-id.  */
    368   CP_ID_KIND_UNQUALIFIED,
    369   /* An unqualified-id that is a dependent name.  */
    370   CP_ID_KIND_UNQUALIFIED_DEPENDENT,
    371   /* An unqualified template-id.  */
    372   CP_ID_KIND_TEMPLATE_ID,
    373   /* A qualified-id.  */
    374   CP_ID_KIND_QUALIFIED
    375 } cp_id_kind;
    376 
    377 
    378 /* The various kinds of C++0x warnings we encounter. */
    379 
    380 typedef enum cpp0x_warn_str
    381 {
    382   /* extended initializer lists */
    383   CPP0X_INITIALIZER_LISTS,
    384   /* explicit conversion operators */
    385   CPP0X_EXPLICIT_CONVERSION,
    386   /* variadic templates */
    387   CPP0X_VARIADIC_TEMPLATES,
    388   /* lambda expressions */
    389   CPP0X_LAMBDA_EXPR,
    390   /* C++0x auto */
    391   CPP0X_AUTO,
    392   /* scoped enums */
    393   CPP0X_SCOPED_ENUMS,
    394   /* defaulted and deleted functions */
    395   CPP0X_DEFAULTED_DELETED,
    396   /* inline namespaces */
    397   CPP0X_INLINE_NAMESPACES
    398 } cpp0x_warn_str;
    399 
    400 /* The various kinds of operation used by composite_pointer_type. */
    401 
    402 typedef enum composite_pointer_operation
    403 {
    404   /* comparison */
    405   CPO_COMPARISON,
    406   /* conversion */
    407   CPO_CONVERSION,
    408   /* conditional expression */
    409   CPO_CONDITIONAL_EXPR
    410 } composite_pointer_operation;
    411 
    412 /* Possible cases of expression list used by build_x_compound_expr_from_list. */
    413 typedef enum expr_list_kind {
    414   ELK_INIT,		/* initializer */
    415   ELK_MEM_INIT,		/* member initializer */
    416   ELK_FUNC_CAST		/* functional cast */
    417 } expr_list_kind;
    418 
    419 /* Possible cases of implicit bad rhs conversions. */
    420 typedef enum impl_conv_rhs {
    421   ICR_DEFAULT_ARGUMENT, /* default argument */
    422   ICR_CONVERTING,       /* converting */
    423   ICR_INIT,             /* initialization */
    424   ICR_ARGPASS,          /* argument passing */
    425   ICR_RETURN,           /* return */
    426   ICR_ASSIGN            /* assignment */
    427 } impl_conv_rhs;
    428 
    429 /* Possible cases of implicit or explicit bad conversions to void. */
    430 typedef enum impl_conv_void {
    431   ICV_CAST,            /* (explicit) conversion to void */
    432   ICV_SECOND_OF_COND,  /* second operand of conditional expression */
    433   ICV_THIRD_OF_COND,   /* third operand of conditional expression */
    434   ICV_RIGHT_OF_COMMA,  /* right operand of comma operator */
    435   ICV_LEFT_OF_COMMA,   /* left operand of comma operator */
    436   ICV_STATEMENT,       /* statement */
    437   ICV_THIRD_IN_FOR     /* for increment expression */
    438 } impl_conv_void;
    439 
    440 /* Macros for access to language-specific slots in an identifier.  */
    441 
    442 #define IDENTIFIER_NAMESPACE_BINDINGS(NODE)	\
    443   (LANG_IDENTIFIER_CAST (NODE)->namespace_bindings)
    444 #define IDENTIFIER_TEMPLATE(NODE)	\
    445   (LANG_IDENTIFIER_CAST (NODE)->class_template_info)
    446 
    447 /* The IDENTIFIER_BINDING is the innermost cxx_binding for the
    448     identifier.  It's PREVIOUS is the next outermost binding.  Each
    449     VALUE field is a DECL for the associated declaration.  Thus,
    450     name lookup consists simply of pulling off the node at the front
    451     of the list (modulo oddities for looking up the names of types,
    452     and such.)  You can use SCOPE field to determine the scope
    453     that bound the name.  */
    454 #define IDENTIFIER_BINDING(NODE) \
    455   (LANG_IDENTIFIER_CAST (NODE)->bindings)
    456 
    457 /* TREE_TYPE only indicates on local and class scope the current
    458    type. For namespace scope, the presence of a type in any namespace
    459    is indicated with global_type_node, and the real type behind must
    460    be found through lookup.  */
    461 #define IDENTIFIER_TYPE_VALUE(NODE) identifier_type_value (NODE)
    462 #define REAL_IDENTIFIER_TYPE_VALUE(NODE) TREE_TYPE (NODE)
    463 #define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = (TYPE))
    464 #define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0)
    465 
    466 #define IDENTIFIER_LABEL_VALUE(NODE) \
    467   (LANG_IDENTIFIER_CAST (NODE)->label_value)
    468 #define SET_IDENTIFIER_LABEL_VALUE(NODE, VALUE)   \
    469   IDENTIFIER_LABEL_VALUE (NODE) = (VALUE)
    470 
    471 /* Nonzero if this identifier is used as a virtual function name somewhere
    472    (optimizes searches).  */
    473 #define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1 (NODE)
    474 
    475 /* Nonzero if this identifier is the prefix for a mangled C++ operator
    476    name.  */
    477 #define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2 (NODE)
    478 
    479 /* Nonzero if this identifier is the name of a type-conversion
    480    operator.  */
    481 #define IDENTIFIER_TYPENAME_P(NODE) \
    482   TREE_LANG_FLAG_4 (NODE)
    483 
    484 /* Nonzero if this identifier is the name of a constructor or
    485    destructor.  */
    486 #define IDENTIFIER_CTOR_OR_DTOR_P(NODE) \
    487   TREE_LANG_FLAG_3 (NODE)
    488 
    489 /* True iff NAME is the DECL_ASSEMBLER_NAME for an entity with vague
    490    linkage which the prelinker has assigned to this translation
    491    unit.  */
    492 #define IDENTIFIER_REPO_CHOSEN(NAME) \
    493   (TREE_LANG_FLAG_6 (NAME))
    494 
    495 /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only.  */
    496 #define C_TYPE_FIELDS_READONLY(TYPE) \
    497   (LANG_TYPE_CLASS_CHECK (TYPE)->fields_readonly)
    498 
    499 /* The tokens stored in the default argument.  */
    500 
    501 #define DEFARG_TOKENS(NODE) \
    502   (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->tokens)
    503 #define DEFARG_INSTANTIATIONS(NODE) \
    504   (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->instantiations)
    505 
    506 struct GTY (()) tree_default_arg {
    507   struct tree_common common;
    508   struct cp_token_cache *tokens;
    509   VEC(tree,gc) *instantiations;
    510 };
    511 
    512 /* The condition associated with the static assertion.  This must be
    513    an integral constant expression.  */
    514 #define STATIC_ASSERT_CONDITION(NODE) \
    515   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->condition)
    516 
    517 /* The message associated with the static assertion.  This must be a
    518    string constant, which will be emitted as an error message when the
    519    static assert condition is false.  */
    520 #define STATIC_ASSERT_MESSAGE(NODE) \
    521   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->message)
    522 
    523 /* Source location information for a static assertion.  */
    524 #define STATIC_ASSERT_SOURCE_LOCATION(NODE) \
    525   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->location)
    526 
    527 struct GTY (()) tree_static_assert {
    528   struct tree_common common;
    529   tree condition;
    530   tree message;
    531   location_t location;
    532 };
    533 
    534 struct GTY (()) tree_argument_pack_select {
    535   struct tree_common common;
    536   tree argument_pack;
    537   int index;
    538 };
    539 
    540 /* The different kinds of traits that we encounter.  */
    541 
    542 typedef enum cp_trait_kind
    543 {
    544   CPTK_HAS_NOTHROW_ASSIGN,
    545   CPTK_HAS_NOTHROW_CONSTRUCTOR,
    546   CPTK_HAS_NOTHROW_COPY,
    547   CPTK_HAS_TRIVIAL_ASSIGN,
    548   CPTK_HAS_TRIVIAL_CONSTRUCTOR,
    549   CPTK_HAS_TRIVIAL_COPY,
    550   CPTK_HAS_TRIVIAL_DESTRUCTOR,
    551   CPTK_HAS_VIRTUAL_DESTRUCTOR,
    552   CPTK_IS_ABSTRACT,
    553   CPTK_IS_BASE_OF,
    554   CPTK_IS_CLASS,
    555   CPTK_IS_CONVERTIBLE_TO,
    556   CPTK_IS_EMPTY,
    557   CPTK_IS_ENUM,
    558   CPTK_IS_POD,
    559   CPTK_IS_POLYMORPHIC,
    560   CPTK_IS_STD_LAYOUT,
    561   CPTK_IS_TRIVIAL,
    562   CPTK_IS_LITERAL_TYPE,
    563   CPTK_IS_UNION
    564 } cp_trait_kind;
    565 
    566 /* The types that we are processing.  */
    567 #define TRAIT_EXPR_TYPE1(NODE) \
    568   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->type1)
    569 
    570 #define TRAIT_EXPR_TYPE2(NODE) \
    571   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->type2)
    572 
    573 /* The specific trait that we are processing.  */
    574 #define TRAIT_EXPR_KIND(NODE) \
    575   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->kind)
    576 
    577 struct GTY (()) tree_trait_expr {
    578   struct tree_common common;
    579   tree type1;
    580   tree type2;
    581   enum cp_trait_kind kind;
    582 };
    583 
    584 /* Based off of TYPE_ANONYMOUS_P.  */
    585 #define LAMBDA_TYPE_P(NODE) \
    586   (CLASS_TYPE_P (NODE) && LAMBDANAME_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
    587 
    588 /* Test if FUNCTION_DECL is a lambda function.  */
    589 #define LAMBDA_FUNCTION_P(FNDECL) \
    590   (DECL_OVERLOADED_OPERATOR_P (FNDECL) == CALL_EXPR \
    591    && LAMBDA_TYPE_P (CP_DECL_CONTEXT (FNDECL)))
    592 
    593 enum cp_lambda_default_capture_mode_type {
    594   CPLD_NONE,
    595   CPLD_COPY,
    596   CPLD_REFERENCE
    597 };
    598 
    599 /* The method of default capture, if any.  */
    600 #define LAMBDA_EXPR_DEFAULT_CAPTURE_MODE(NODE) \
    601   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->default_capture_mode)
    602 
    603 /* The capture-list, including `this'.  Each capture is stored as a FIELD_DECL
    604  * so that the name, type, and field are all together, whether or not it has
    605  * been added to the lambda's class type.
    606    TREE_LIST:
    607      TREE_PURPOSE: The FIELD_DECL for this capture.
    608      TREE_VALUE: The initializer. This is part of a GNU extension.  */
    609 #define LAMBDA_EXPR_CAPTURE_LIST(NODE) \
    610   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->capture_list)
    611 
    612 /* The node in the capture-list that holds the 'this' capture.  */
    613 #define LAMBDA_EXPR_THIS_CAPTURE(NODE) \
    614   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->this_capture)
    615 
    616 /* Predicate tracking whether `this' is in the effective capture set.  */
    617 #define LAMBDA_EXPR_CAPTURES_THIS_P(NODE) \
    618   LAMBDA_EXPR_THIS_CAPTURE(NODE)
    619 
    620 /* Predicate tracking whether the lambda was declared 'mutable'.  */
    621 #define LAMBDA_EXPR_MUTABLE_P(NODE) \
    622   TREE_LANG_FLAG_1 (LAMBDA_EXPR_CHECK (NODE))
    623 
    624 /* True iff we should try to deduce the lambda return type from any return
    625    statement.  */
    626 #define LAMBDA_EXPR_DEDUCE_RETURN_TYPE_P(NODE) \
    627   TREE_LANG_FLAG_2 (LAMBDA_EXPR_CHECK (NODE))
    628 
    629 /* The return type in the expression.
    630  * NULL_TREE indicates that none was specified.  */
    631 #define LAMBDA_EXPR_RETURN_TYPE(NODE) \
    632   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->return_type)
    633 
    634 /* The source location of the lambda.  */
    635 #define LAMBDA_EXPR_LOCATION(NODE) \
    636   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->locus)
    637 
    638 /* The mangling scope for the lambda: FUNCTION_DECL, PARM_DECL, VAR_DECL,
    639    FIELD_DECL or NULL_TREE.  If this is NULL_TREE, we have no linkage.  */
    640 #define LAMBDA_EXPR_EXTRA_SCOPE(NODE) \
    641   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->extra_scope)
    642 
    643 /* If EXTRA_SCOPE, this is the number of the lambda within that scope.  */
    644 #define LAMBDA_EXPR_DISCRIMINATOR(NODE) \
    645   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->discriminator)
    646 
    647 struct GTY (()) tree_lambda_expr
    648 {
    649   struct tree_common common;
    650   location_t locus;
    651   enum cp_lambda_default_capture_mode_type default_capture_mode;
    652   tree capture_list;
    653   tree this_capture;
    654   tree return_type;
    655   tree extra_scope;
    656   int discriminator;
    657 };
    658 
    659 /* A (typedef,context,usage location) triplet.
    660    It represents a typedef used through a
    661    context at a given source location.
    662    e.g.
    663    struct foo {
    664      typedef int myint;
    665    };
    666 
    667    struct bar {
    668     foo::myint v; // #1<-- this location.
    669    };
    670 
    671    In bar, the triplet will be (myint, foo, #1).
    672    */
    673 struct GTY(()) qualified_typedef_usage_s {
    674   tree typedef_decl;
    675   tree context;
    676   location_t locus;
    677 };
    678 typedef struct qualified_typedef_usage_s qualified_typedef_usage_t;
    679 DEF_VEC_O (qualified_typedef_usage_t);
    680 DEF_VEC_ALLOC_O (qualified_typedef_usage_t,gc);
    681 
    682 struct GTY(()) tree_template_info {
    683   struct tree_common common;
    684   VEC(qualified_typedef_usage_t,gc) *typedefs_needing_access_checking;
    685 };
    686 
    687 enum cp_tree_node_structure_enum {
    688   TS_CP_GENERIC,
    689   TS_CP_IDENTIFIER,
    690   TS_CP_TPI,
    691   TS_CP_PTRMEM,
    692   TS_CP_BINDING,
    693   TS_CP_OVERLOAD,
    694   TS_CP_BASELINK,
    695   TS_CP_WRAPPER,
    696   TS_CP_DEFAULT_ARG,
    697   TS_CP_STATIC_ASSERT,
    698   TS_CP_ARGUMENT_PACK_SELECT,
    699   TS_CP_TRAIT_EXPR,
    700   TS_CP_LAMBDA_EXPR,
    701   TS_CP_TEMPLATE_INFO,
    702   LAST_TS_CP_ENUM
    703 };
    704 
    705 /* The resulting tree type.  */
    706 union GTY((desc ("cp_tree_node_structure (&%h)"),
    707        chain_next ("(union lang_tree_node *)TREE_CHAIN (&%h.generic)"))) lang_tree_node {
    708   union tree_node GTY ((tag ("TS_CP_GENERIC"),
    709 			desc ("tree_node_structure (&%h)"))) generic;
    710   struct template_parm_index_s GTY ((tag ("TS_CP_TPI"))) tpi;
    711   struct ptrmem_cst GTY ((tag ("TS_CP_PTRMEM"))) ptrmem;
    712   struct tree_overload GTY ((tag ("TS_CP_OVERLOAD"))) overload;
    713   struct tree_baselink GTY ((tag ("TS_CP_BASELINK"))) baselink;
    714   struct tree_default_arg GTY ((tag ("TS_CP_DEFAULT_ARG"))) default_arg;
    715   struct lang_identifier GTY ((tag ("TS_CP_IDENTIFIER"))) identifier;
    716   struct tree_static_assert GTY ((tag ("TS_CP_STATIC_ASSERT")))
    717     static_assertion;
    718   struct tree_argument_pack_select GTY ((tag ("TS_CP_ARGUMENT_PACK_SELECT")))
    719     argument_pack_select;
    720   struct tree_trait_expr GTY ((tag ("TS_CP_TRAIT_EXPR")))
    721     trait_expression;
    722   struct tree_lambda_expr GTY ((tag ("TS_CP_LAMBDA_EXPR")))
    723     lambda_expression;
    724   struct tree_template_info GTY ((tag ("TS_CP_TEMPLATE_INFO")))
    725     template_info;
    726 };
    727 
    728 
    729 enum cp_tree_index
    731 {
    732     CPTI_JAVA_BYTE_TYPE,
    733     CPTI_JAVA_SHORT_TYPE,
    734     CPTI_JAVA_INT_TYPE,
    735     CPTI_JAVA_LONG_TYPE,
    736     CPTI_JAVA_FLOAT_TYPE,
    737     CPTI_JAVA_DOUBLE_TYPE,
    738     CPTI_JAVA_CHAR_TYPE,
    739     CPTI_JAVA_BOOLEAN_TYPE,
    740 
    741     CPTI_WCHAR_DECL,
    742     CPTI_VTABLE_ENTRY_TYPE,
    743     CPTI_DELTA_TYPE,
    744     CPTI_VTABLE_INDEX_TYPE,
    745     CPTI_CLEANUP_TYPE,
    746     CPTI_VTT_PARM_TYPE,
    747 
    748     CPTI_CLASS_TYPE,
    749     CPTI_UNKNOWN_TYPE,
    750     CPTI_INIT_LIST_TYPE,
    751     CPTI_VTBL_TYPE,
    752     CPTI_VTBL_PTR_TYPE,
    753     CPTI_STD,
    754     CPTI_ABI,
    755     CPTI_CONST_TYPE_INFO_TYPE,
    756     CPTI_TYPE_INFO_PTR_TYPE,
    757     CPTI_ABORT_FNDECL,
    758     CPTI_GLOBAL_DELETE_FNDECL,
    759     CPTI_AGGR_TAG,
    760 
    761     CPTI_CTOR_IDENTIFIER,
    762     CPTI_COMPLETE_CTOR_IDENTIFIER,
    763     CPTI_BASE_CTOR_IDENTIFIER,
    764     CPTI_DTOR_IDENTIFIER,
    765     CPTI_COMPLETE_DTOR_IDENTIFIER,
    766     CPTI_BASE_DTOR_IDENTIFIER,
    767     CPTI_DELETING_DTOR_IDENTIFIER,
    768     CPTI_DELTA_IDENTIFIER,
    769     CPTI_IN_CHARGE_IDENTIFIER,
    770     CPTI_VTT_PARM_IDENTIFIER,
    771     CPTI_NELTS_IDENTIFIER,
    772     CPTI_THIS_IDENTIFIER,
    773     CPTI_PFN_IDENTIFIER,
    774     CPTI_VPTR_IDENTIFIER,
    775     CPTI_STD_IDENTIFIER,
    776 
    777     CPTI_LANG_NAME_C,
    778     CPTI_LANG_NAME_CPLUSPLUS,
    779     CPTI_LANG_NAME_JAVA,
    780 
    781     CPTI_EMPTY_EXCEPT_SPEC,
    782     CPTI_NOEXCEPT_TRUE_SPEC,
    783     CPTI_NOEXCEPT_FALSE_SPEC,
    784     CPTI_JCLASS,
    785     CPTI_TERMINATE,
    786     CPTI_CALL_UNEXPECTED,
    787     CPTI_ATEXIT_FN_PTR_TYPE,
    788     CPTI_ATEXIT,
    789     CPTI_DSO_HANDLE,
    790     CPTI_DCAST,
    791 
    792     CPTI_KEYED_CLASSES,
    793 
    794     CPTI_NULLPTR,
    795     CPTI_NULLPTR_TYPE,
    796 
    797     CPTI_MAX
    798 };
    799 
    800 extern GTY(()) tree cp_global_trees[CPTI_MAX];
    801 
    802 #define java_byte_type_node		cp_global_trees[CPTI_JAVA_BYTE_TYPE]
    803 #define java_short_type_node		cp_global_trees[CPTI_JAVA_SHORT_TYPE]
    804 #define java_int_type_node		cp_global_trees[CPTI_JAVA_INT_TYPE]
    805 #define java_long_type_node		cp_global_trees[CPTI_JAVA_LONG_TYPE]
    806 #define java_float_type_node		cp_global_trees[CPTI_JAVA_FLOAT_TYPE]
    807 #define java_double_type_node		cp_global_trees[CPTI_JAVA_DOUBLE_TYPE]
    808 #define java_char_type_node		cp_global_trees[CPTI_JAVA_CHAR_TYPE]
    809 #define java_boolean_type_node		cp_global_trees[CPTI_JAVA_BOOLEAN_TYPE]
    810 
    811 #define wchar_decl_node			cp_global_trees[CPTI_WCHAR_DECL]
    812 #define vtable_entry_type		cp_global_trees[CPTI_VTABLE_ENTRY_TYPE]
    813 /* The type used to represent an offset by which to adjust the `this'
    814    pointer in pointer-to-member types.  */
    815 #define delta_type_node			cp_global_trees[CPTI_DELTA_TYPE]
    816 /* The type used to represent an index into the vtable.  */
    817 #define vtable_index_type		cp_global_trees[CPTI_VTABLE_INDEX_TYPE]
    818 
    819 #define class_type_node			cp_global_trees[CPTI_CLASS_TYPE]
    820 #define unknown_type_node		cp_global_trees[CPTI_UNKNOWN_TYPE]
    821 #define init_list_type_node		cp_global_trees[CPTI_INIT_LIST_TYPE]
    822 #define vtbl_type_node			cp_global_trees[CPTI_VTBL_TYPE]
    823 #define vtbl_ptr_type_node		cp_global_trees[CPTI_VTBL_PTR_TYPE]
    824 #define std_node			cp_global_trees[CPTI_STD]
    825 #define abi_node			cp_global_trees[CPTI_ABI]
    826 #define const_type_info_type_node	cp_global_trees[CPTI_CONST_TYPE_INFO_TYPE]
    827 #define type_info_ptr_type		cp_global_trees[CPTI_TYPE_INFO_PTR_TYPE]
    828 #define abort_fndecl			cp_global_trees[CPTI_ABORT_FNDECL]
    829 #define global_delete_fndecl		cp_global_trees[CPTI_GLOBAL_DELETE_FNDECL]
    830 #define current_aggr			cp_global_trees[CPTI_AGGR_TAG]
    831 #define nullptr_node			cp_global_trees[CPTI_NULLPTR]
    832 #define nullptr_type_node		cp_global_trees[CPTI_NULLPTR_TYPE]
    833 
    834 /* We cache these tree nodes so as to call get_identifier less
    835    frequently.  */
    836 
    837 /* The name of a constructor that takes an in-charge parameter to
    838    decide whether or not to construct virtual base classes.  */
    839 #define ctor_identifier			cp_global_trees[CPTI_CTOR_IDENTIFIER]
    840 /* The name of a constructor that constructs virtual base classes.  */
    841 #define complete_ctor_identifier	cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER]
    842 /* The name of a constructor that does not construct virtual base classes.  */
    843 #define base_ctor_identifier		cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER]
    844 /* The name of a destructor that takes an in-charge parameter to
    845    decide whether or not to destroy virtual base classes and whether
    846    or not to delete the object.  */
    847 #define dtor_identifier			cp_global_trees[CPTI_DTOR_IDENTIFIER]
    848 /* The name of a destructor that destroys virtual base classes.  */
    849 #define complete_dtor_identifier	cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER]
    850 /* The name of a destructor that does not destroy virtual base
    851    classes.  */
    852 #define base_dtor_identifier		cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER]
    853 /* The name of a destructor that destroys virtual base classes, and
    854    then deletes the entire object.  */
    855 #define deleting_dtor_identifier	cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER]
    856 #define delta_identifier		cp_global_trees[CPTI_DELTA_IDENTIFIER]
    857 #define in_charge_identifier		cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER]
    858 /* The name of the parameter that contains a pointer to the VTT to use
    859    for this subobject constructor or destructor.  */
    860 #define vtt_parm_identifier		cp_global_trees[CPTI_VTT_PARM_IDENTIFIER]
    861 #define nelts_identifier		cp_global_trees[CPTI_NELTS_IDENTIFIER]
    862 #define this_identifier			cp_global_trees[CPTI_THIS_IDENTIFIER]
    863 #define pfn_identifier			cp_global_trees[CPTI_PFN_IDENTIFIER]
    864 #define vptr_identifier			cp_global_trees[CPTI_VPTR_IDENTIFIER]
    865 /* The name of the std namespace.  */
    866 #define std_identifier			cp_global_trees[CPTI_STD_IDENTIFIER]
    867 #define lang_name_c			cp_global_trees[CPTI_LANG_NAME_C]
    868 #define lang_name_cplusplus		cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS]
    869 #define lang_name_java			cp_global_trees[CPTI_LANG_NAME_JAVA]
    870 
    871 /* Exception specifier used for throw().  */
    872 #define empty_except_spec		cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC]
    873 #define noexcept_true_spec		cp_global_trees[CPTI_NOEXCEPT_TRUE_SPEC]
    874 #define noexcept_false_spec		cp_global_trees[CPTI_NOEXCEPT_FALSE_SPEC]
    875 
    876 /* If non-NULL, a POINTER_TYPE equivalent to (java::lang::Class*).  */
    877 #define jclass_node			cp_global_trees[CPTI_JCLASS]
    878 
    879 /* The declaration for `std::terminate'.  */
    880 #define terminate_node			cp_global_trees[CPTI_TERMINATE]
    881 
    882 /* The declaration for "__cxa_call_unexpected".  */
    883 #define call_unexpected_node		cp_global_trees[CPTI_CALL_UNEXPECTED]
    884 
    885 /* The type of the function-pointer argument to "__cxa_atexit" (or
    886    "std::atexit", if "__cxa_atexit" is not being used).  */
    887 #define atexit_fn_ptr_type_node         cp_global_trees[CPTI_ATEXIT_FN_PTR_TYPE]
    888 
    889 /* A pointer to `std::atexit'.  */
    890 #define atexit_node			cp_global_trees[CPTI_ATEXIT]
    891 
    892 /* A pointer to `__dso_handle'.  */
    893 #define dso_handle_node			cp_global_trees[CPTI_DSO_HANDLE]
    894 
    895 /* The declaration of the dynamic_cast runtime.  */
    896 #define dynamic_cast_node		cp_global_trees[CPTI_DCAST]
    897 
    898 /* The type of a destructor.  */
    899 #define cleanup_type			cp_global_trees[CPTI_CLEANUP_TYPE]
    900 
    901 /* The type of the vtt parameter passed to subobject constructors and
    902    destructors.  */
    903 #define vtt_parm_type			cp_global_trees[CPTI_VTT_PARM_TYPE]
    904 
    905 /* A TREE_LIST of the dynamic classes whose vtables may have to be
    906    emitted in this translation unit.  */
    907 
    908 #define keyed_classes			cp_global_trees[CPTI_KEYED_CLASSES]
    909 
    910 /* Node to indicate default access. This must be distinct from the
    911    access nodes in tree.h.  */
    912 
    913 #define access_default_node		null_node
    914 
    915 /* Global state.  */
    916 
    917 struct GTY(()) saved_scope {
    918   VEC(cxx_saved_binding,gc) *old_bindings;
    919   tree old_namespace;
    920   VEC(tree,gc) *decl_ns_list;
    921   tree class_name;
    922   tree class_type;
    923   tree access_specifier;
    924   tree function_decl;
    925   VEC(tree,gc) *lang_base;
    926   tree lang_name;
    927   tree template_parms;
    928   struct cp_binding_level *x_previous_class_level;
    929   tree x_saved_tree;
    930 
    931   int x_processing_template_decl;
    932   int x_processing_specialization;
    933   BOOL_BITFIELD x_processing_explicit_instantiation : 1;
    934   BOOL_BITFIELD need_pop_function_context : 1;
    935 
    936   int unevaluated_operand;
    937   int inhibit_evaluation_warnings;
    938 
    939   struct stmt_tree_s x_stmt_tree;
    940 
    941   struct cp_binding_level *class_bindings;
    942   struct cp_binding_level *bindings;
    943 
    944   struct saved_scope *prev;
    945 };
    946 
    947 /* The current open namespace.  */
    948 
    949 #define current_namespace scope_chain->old_namespace
    950 
    951 /* The stack for namespaces of current declarations.  */
    952 
    953 #define decl_namespace_list scope_chain->decl_ns_list
    954 
    955 /* IDENTIFIER_NODE: name of current class */
    956 
    957 #define current_class_name scope_chain->class_name
    958 
    959 /* _TYPE: the type of the current class */
    960 
    961 #define current_class_type scope_chain->class_type
    962 
    963 /* When parsing a class definition, the access specifier most recently
    964    given by the user, or, if no access specifier was given, the
    965    default value appropriate for the kind of class (i.e., struct,
    966    class, or union).  */
    967 
    968 #define current_access_specifier scope_chain->access_specifier
    969 
    970 /* Pointer to the top of the language name stack.  */
    971 
    972 #define current_lang_base scope_chain->lang_base
    973 #define current_lang_name scope_chain->lang_name
    974 
    975 /* When parsing a template declaration, a TREE_LIST represents the
    976    active template parameters.  Each node in the list represents one
    977    level of template parameters.  The innermost level is first in the
    978    list.  The depth of each level is stored as an INTEGER_CST in the
    979    TREE_PURPOSE of each node.  The parameters for that level are
    980    stored in the TREE_VALUE.  */
    981 
    982 #define current_template_parms scope_chain->template_parms
    983 
    984 #define processing_template_decl scope_chain->x_processing_template_decl
    985 #define processing_specialization scope_chain->x_processing_specialization
    986 #define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation
    987 
    988 /* The cached class binding level, from the most recently exited
    989    class, or NULL if none.  */
    990 
    991 #define previous_class_level scope_chain->x_previous_class_level
    992 
    993 /* A list of private types mentioned, for deferred access checking.  */
    994 
    995 extern GTY(()) struct saved_scope *scope_chain;
    996 
    997 struct GTY(()) cxx_int_tree_map {
    998   unsigned int uid;
    999   tree to;
   1000 };
   1001 
   1002 extern unsigned int cxx_int_tree_map_hash (const void *);
   1003 extern int cxx_int_tree_map_eq (const void *, const void *);
   1004 
   1005 /* Global state pertinent to the current function.  */
   1006 
   1007 struct GTY(()) language_function {
   1008   struct c_language_function base;
   1009 
   1010   tree x_cdtor_label;
   1011   tree x_current_class_ptr;
   1012   tree x_current_class_ref;
   1013   tree x_eh_spec_block;
   1014   tree x_in_charge_parm;
   1015   tree x_vtt_parm;
   1016   tree x_return_value;
   1017 
   1018   BOOL_BITFIELD returns_value : 1;
   1019   BOOL_BITFIELD returns_null : 1;
   1020   BOOL_BITFIELD returns_abnormally : 1;
   1021   BOOL_BITFIELD in_function_try_handler : 1;
   1022   BOOL_BITFIELD in_base_initializer : 1;
   1023 
   1024   /* True if this function can throw an exception.  */
   1025   BOOL_BITFIELD can_throw : 1;
   1026 
   1027   htab_t GTY((param_is(struct named_label_entry))) x_named_labels;
   1028   struct cp_binding_level *bindings;
   1029   VEC(tree,gc) *x_local_names;
   1030   htab_t GTY((param_is (struct cxx_int_tree_map))) extern_decl_map;
   1031 };
   1032 
   1033 /* The current C++-specific per-function global variables.  */
   1034 
   1035 #define cp_function_chain (cfun->language)
   1036 
   1037 /* In a constructor destructor, the point at which all derived class
   1038    destroying/construction has been done.  I.e., just before a
   1039    constructor returns, or before any base class destroying will be done
   1040    in a destructor.  */
   1041 
   1042 #define cdtor_label cp_function_chain->x_cdtor_label
   1043 
   1044 /* When we're processing a member function, current_class_ptr is the
   1045    PARM_DECL for the `this' pointer.  The current_class_ref is an
   1046    expression for `*this'.  */
   1047 
   1048 #define current_class_ptr \
   1049   (cfun && cp_function_chain					\
   1050    ? cp_function_chain->x_current_class_ptr : NULL_TREE)
   1051 #define current_class_ref \
   1052   ((cfun && cp_function_chain)                                  \
   1053    ? cp_function_chain->x_current_class_ref : NULL_TREE)
   1054 
   1055 /* The EH_SPEC_BLOCK for the exception-specifiers for the current
   1056    function, if any.  */
   1057 
   1058 #define current_eh_spec_block cp_function_chain->x_eh_spec_block
   1059 
   1060 /* The `__in_chrg' parameter for the current function.  Only used for
   1061    constructors and destructors.  */
   1062 
   1063 #define current_in_charge_parm cp_function_chain->x_in_charge_parm
   1064 
   1065 /* The `__vtt_parm' parameter for the current function.  Only used for
   1066    constructors and destructors.  */
   1067 
   1068 #define current_vtt_parm cp_function_chain->x_vtt_parm
   1069 
   1070 /* Set to 0 at beginning of a function definition, set to 1 if
   1071    a return statement that specifies a return value is seen.  */
   1072 
   1073 #define current_function_returns_value cp_function_chain->returns_value
   1074 
   1075 /* Set to 0 at beginning of a function definition, set to 1 if
   1076    a return statement with no argument is seen.  */
   1077 
   1078 #define current_function_returns_null cp_function_chain->returns_null
   1079 
   1080 /* Set to 0 at beginning of a function definition, set to 1 if
   1081    a call to a noreturn function is seen.  */
   1082 
   1083 #define current_function_returns_abnormally \
   1084   cp_function_chain->returns_abnormally
   1085 
   1086 /* Nonzero if we are processing a base initializer.  Zero elsewhere.  */
   1087 #define in_base_initializer cp_function_chain->in_base_initializer
   1088 
   1089 #define in_function_try_handler cp_function_chain->in_function_try_handler
   1090 
   1091 /* Expression always returned from function, or error_mark_node
   1092    otherwise, for use by the automatic named return value optimization.  */
   1093 
   1094 #define current_function_return_value \
   1095   (cp_function_chain->x_return_value)
   1096 
   1097 /* True if NAME is the IDENTIFIER_NODE for an overloaded "operator
   1098    new" or "operator delete".  */
   1099 #define NEW_DELETE_OPNAME_P(NAME)		\
   1100   ((NAME) == ansi_opname (NEW_EXPR)		\
   1101    || (NAME) == ansi_opname (VEC_NEW_EXPR)	\
   1102    || (NAME) == ansi_opname (DELETE_EXPR)	\
   1103    || (NAME) == ansi_opname (VEC_DELETE_EXPR))
   1104 
   1105 #define ansi_opname(CODE) \
   1106   (operator_name_info[(int) (CODE)].identifier)
   1107 #define ansi_assopname(CODE) \
   1108   (assignment_operator_name_info[(int) (CODE)].identifier)
   1109 
   1110 /* True if NODE is an erroneous expression.  */
   1111 
   1112 #define error_operand_p(NODE)					\
   1113   ((NODE) == error_mark_node					\
   1114    || ((NODE) && TREE_TYPE ((NODE)) == error_mark_node))
   1115 
   1116 /* TRUE if a tree code represents a statement.  */
   1118 extern bool statement_code_p[MAX_TREE_CODES];
   1119 
   1120 #define STATEMENT_CODE_P(CODE) statement_code_p[(int) (CODE)]
   1121 
   1122 enum languages { lang_c, lang_cplusplus, lang_java };
   1123 
   1124 /* Macros to make error reporting functions' lives easier.  */
   1125 #define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE)))
   1126 #define TYPE_LINKAGE_IDENTIFIER(NODE) \
   1127   (TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (NODE)))
   1128 #define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
   1129 #define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
   1130 
   1131 /* Nonzero if NODE has no name for linkage purposes.  */
   1132 #define TYPE_ANONYMOUS_P(NODE) \
   1133   (TAGGED_TYPE_P (NODE) && ANON_AGGRNAME_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
   1134 
   1135 /* The _DECL for this _TYPE.  */
   1136 #define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
   1137 
   1138 /* Nonzero if T is a class (or struct or union) type.  Also nonzero
   1139    for template type parameters, typename types, and instantiated
   1140    template template parameters.  Keep these checks in ascending code
   1141    order.  */
   1142 #define MAYBE_CLASS_TYPE_P(T)					\
   1143   (TREE_CODE (T) == TEMPLATE_TYPE_PARM			\
   1144    || TREE_CODE (T) == TYPENAME_TYPE			\
   1145    || TREE_CODE (T) == TYPEOF_TYPE			\
   1146    || TREE_CODE (T) == BOUND_TEMPLATE_TEMPLATE_PARM	\
   1147    || TREE_CODE (T) == DECLTYPE_TYPE			\
   1148    || CLASS_TYPE_P (T))
   1149 
   1150 /* Set CLASS_TYPE_P for T to VAL.  T must be a class, struct, or
   1151    union type.  */
   1152 #define SET_CLASS_TYPE_P(T, VAL) \
   1153   (TYPE_LANG_FLAG_5 (T) = (VAL))
   1154 
   1155 /* Nonzero if T is a class type.  Zero for template type parameters,
   1156    typename types, and so forth.  */
   1157 #define CLASS_TYPE_P(T) \
   1158   (RECORD_OR_UNION_CODE_P (TREE_CODE (T)) && TYPE_LANG_FLAG_5 (T))
   1159 
   1160 /* Nonzero if T is a class type but not an union.  */
   1161 #define NON_UNION_CLASS_TYPE_P(T) \
   1162   (CLASS_TYPE_P (T) && TREE_CODE (T) != UNION_TYPE)
   1163 
   1164 /* Keep these checks in ascending code order.  */
   1165 #define RECORD_OR_UNION_CODE_P(T)	\
   1166   ((T) == RECORD_TYPE || (T) == UNION_TYPE)
   1167 #define TAGGED_TYPE_P(T) \
   1168   (CLASS_TYPE_P (T) || TREE_CODE (T) == ENUMERAL_TYPE)
   1169 #define IS_OVERLOAD_TYPE(T) TAGGED_TYPE_P (T)
   1170 
   1171 /* True if this a "Java" type, defined in 'extern "Java"'.  */
   1172 #define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3 (NODE)
   1173 
   1174 /* True if this type is dependent.  This predicate is only valid if
   1175    TYPE_DEPENDENT_P_VALID is true.  */
   1176 #define TYPE_DEPENDENT_P(NODE) TYPE_LANG_FLAG_0 (NODE)
   1177 
   1178 /* True if dependent_type_p has been called for this type, with the
   1179    result that TYPE_DEPENDENT_P is valid.  */
   1180 #define TYPE_DEPENDENT_P_VALID(NODE) TYPE_LANG_FLAG_6(NODE)
   1181 
   1182 /* Nonzero if this type is const-qualified.  */
   1183 #define CP_TYPE_CONST_P(NODE)				\
   1184   ((cp_type_quals (NODE) & TYPE_QUAL_CONST) != 0)
   1185 
   1186 /* Nonzero if this type is volatile-qualified.  */
   1187 #define CP_TYPE_VOLATILE_P(NODE)			\
   1188   ((cp_type_quals (NODE) & TYPE_QUAL_VOLATILE) != 0)
   1189 
   1190 /* Nonzero if this type is restrict-qualified.  */
   1191 #define CP_TYPE_RESTRICT_P(NODE)			\
   1192   ((cp_type_quals (NODE) & TYPE_QUAL_RESTRICT) != 0)
   1193 
   1194 /* Nonzero if this type is const-qualified, but not
   1195    volatile-qualified.  Other qualifiers are ignored.  This macro is
   1196    used to test whether or not it is OK to bind an rvalue to a
   1197    reference.  */
   1198 #define CP_TYPE_CONST_NON_VOLATILE_P(NODE)				\
   1199   ((cp_type_quals (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE))	\
   1200    == TYPE_QUAL_CONST)
   1201 
   1202 #define FUNCTION_ARG_CHAIN(NODE) \
   1203   TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE)))
   1204 
   1205 /* Given a FUNCTION_DECL, returns the first TREE_LIST out of TYPE_ARG_TYPES
   1206    which refers to a user-written parameter.  */
   1207 #define FUNCTION_FIRST_USER_PARMTYPE(NODE) \
   1208   skip_artificial_parms_for ((NODE), TYPE_ARG_TYPES (TREE_TYPE (NODE)))
   1209 
   1210 /* Similarly, but for DECL_ARGUMENTS.  */
   1211 #define FUNCTION_FIRST_USER_PARM(NODE) \
   1212   skip_artificial_parms_for ((NODE), DECL_ARGUMENTS (NODE))
   1213 
   1214 /* Nonzero iff TYPE is derived from PARENT. Ignores accessibility and
   1215    ambiguity issues.  */
   1216 #define DERIVED_FROM_P(PARENT, TYPE) \
   1217   (lookup_base ((TYPE), (PARENT), ba_any, NULL) != NULL_TREE)
   1218 /* Nonzero iff TYPE is uniquely derived from PARENT. Ignores
   1219    accessibility.  */
   1220 #define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) \
   1221   (lookup_base ((TYPE), (PARENT), ba_unique | ba_quiet, NULL) != NULL_TREE)
   1222 /* Nonzero iff TYPE is publicly & uniquely derived from PARENT.  */
   1223 #define PUBLICLY_UNIQUELY_DERIVED_P(PARENT, TYPE) \
   1224   (lookup_base ((TYPE), (PARENT), ba_ignore_scope | ba_check | ba_quiet, \
   1225 		NULL) != NULL_TREE)
   1226 
   1227 /* Gives the visibility specification for a class type.  */
   1228 #define CLASSTYPE_VISIBILITY(TYPE)		\
   1229 	DECL_VISIBILITY (TYPE_MAIN_DECL (TYPE))
   1230 #define CLASSTYPE_VISIBILITY_SPECIFIED(TYPE)	\
   1231 	DECL_VISIBILITY_SPECIFIED (TYPE_MAIN_DECL (TYPE))
   1232 
   1233 typedef struct GTY (()) tree_pair_s {
   1234   tree purpose;
   1235   tree value;
   1236 } tree_pair_s;
   1237 typedef tree_pair_s *tree_pair_p;
   1238 DEF_VEC_O (tree_pair_s);
   1239 DEF_VEC_ALLOC_O (tree_pair_s,gc);
   1240 
   1241 /* This is a few header flags for 'struct lang_type'.  Actually,
   1242    all but the first are used only for lang_type_class; they
   1243    are put in this structure to save space.  */
   1244 struct GTY(()) lang_type_header {
   1245   BOOL_BITFIELD is_lang_type_class : 1;
   1246 
   1247   BOOL_BITFIELD has_type_conversion : 1;
   1248   BOOL_BITFIELD has_copy_ctor : 1;
   1249   BOOL_BITFIELD has_default_ctor : 1;
   1250   BOOL_BITFIELD const_needs_init : 1;
   1251   BOOL_BITFIELD ref_needs_init : 1;
   1252   BOOL_BITFIELD has_const_copy_assign : 1;
   1253 
   1254   BOOL_BITFIELD spare : 1;
   1255 };
   1256 
   1257 /* This structure provides additional information above and beyond
   1258    what is provide in the ordinary tree_type.  In the past, we used it
   1259    for the types of class types, template parameters types, typename
   1260    types, and so forth.  However, there can be many (tens to hundreds
   1261    of thousands) of template parameter types in a compilation, and
   1262    there's no need for this additional information in that case.
   1263    Therefore, we now use this data structure only for class types.
   1264 
   1265    In the past, it was thought that there would be relatively few
   1266    class types.  However, in the presence of heavy use of templates,
   1267    many (i.e., thousands) of classes can easily be generated.
   1268    Therefore, we should endeavor to keep the size of this structure to
   1269    a minimum.  */
   1270 struct GTY(()) lang_type_class {
   1271   struct lang_type_header h;
   1272 
   1273   unsigned char align;
   1274 
   1275   unsigned has_mutable : 1;
   1276   unsigned com_interface : 1;
   1277   unsigned non_pod_class : 1;
   1278   unsigned nearly_empty_p : 1;
   1279   unsigned user_align : 1;
   1280   unsigned has_copy_assign : 1;
   1281   unsigned has_new : 1;
   1282   unsigned has_array_new : 1;
   1283 
   1284   unsigned gets_delete : 2;
   1285   unsigned interface_only : 1;
   1286   unsigned interface_unknown : 1;
   1287   unsigned contains_empty_class_p : 1;
   1288   unsigned anon_aggr : 1;
   1289   unsigned non_zero_init : 1;
   1290   unsigned empty_p : 1;
   1291 
   1292   unsigned vec_new_uses_cookie : 1;
   1293   unsigned declared_class : 1;
   1294   unsigned diamond_shaped : 1;
   1295   unsigned repeated_base : 1;
   1296   unsigned being_defined : 1;
   1297   unsigned java_interface : 1;
   1298   unsigned debug_requested : 1;
   1299   unsigned fields_readonly : 1;
   1300 
   1301   unsigned use_template : 2;
   1302   unsigned ptrmemfunc_flag : 1;
   1303   unsigned was_anonymous : 1;
   1304   unsigned lazy_default_ctor : 1;
   1305   unsigned lazy_copy_ctor : 1;
   1306   unsigned lazy_copy_assign : 1;
   1307   unsigned lazy_destructor : 1;
   1308 
   1309   unsigned has_const_copy_ctor : 1;
   1310   unsigned has_complex_copy_ctor : 1;
   1311   unsigned has_complex_copy_assign : 1;
   1312   unsigned non_aggregate : 1;
   1313   unsigned has_complex_dflt : 1;
   1314   unsigned has_list_ctor : 1;
   1315   unsigned non_std_layout : 1;
   1316   unsigned is_literal : 1;
   1317 
   1318   unsigned lazy_move_ctor : 1;
   1319   unsigned lazy_move_assign : 1;
   1320   unsigned has_complex_move_ctor : 1;
   1321   unsigned has_complex_move_assign : 1;
   1322   unsigned has_constexpr_ctor : 1;
   1323 
   1324   /* When adding a flag here, consider whether or not it ought to
   1325      apply to a template instance if it applies to the template.  If
   1326      so, make sure to copy it in instantiate_class_template!  */
   1327 
   1328   /* There are some bits left to fill out a 32-bit word.  Keep track
   1329      of this by updating the size of this bitfield whenever you add or
   1330      remove a flag.  */
   1331   unsigned dummy : 3;
   1332 
   1333   tree primary_base;
   1334   VEC(tree_pair_s,gc) *vcall_indices;
   1335   tree vtables;
   1336   tree typeinfo_var;
   1337   VEC(tree,gc) *vbases;
   1338   binding_table nested_udts;
   1339   tree as_base;
   1340   VEC(tree,gc) *pure_virtuals;
   1341   tree friend_classes;
   1342   VEC(tree,gc) * GTY((reorder ("resort_type_method_vec"))) methods;
   1343   tree key_method;
   1344   tree decl_list;
   1345   tree template_info;
   1346   tree befriending_classes;
   1347   /* In a RECORD_TYPE, information specific to Objective-C++, such
   1348      as a list of adopted protocols or a pointer to a corresponding
   1349      @interface.  See objc/objc-act.h for details.  */
   1350   tree objc_info;
   1351   /* sorted_fields is sorted based on a pointer, so we need to be able
   1352      to resort it if pointers get rearranged.  */
   1353   struct sorted_fields_type * GTY ((reorder ("resort_sorted_fields")))
   1354     sorted_fields;
   1355   /* FIXME reuse another field?  */
   1356   tree lambda_expr;
   1357 };
   1358 
   1359 struct GTY(()) lang_type_ptrmem {
   1360   struct lang_type_header h;
   1361   tree record;
   1362 };
   1363 
   1364 struct GTY((variable_size)) lang_type {
   1365   union lang_type_u
   1366   {
   1367     struct lang_type_header GTY((skip (""))) h;
   1368     struct lang_type_class  GTY((tag ("1"))) c;
   1369     struct lang_type_ptrmem GTY((tag ("0"))) ptrmem;
   1370   } GTY((desc ("%h.h.is_lang_type_class"))) u;
   1371 };
   1372 
   1373 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
   1374 
   1375 #define LANG_TYPE_CLASS_CHECK(NODE) __extension__		\
   1376 ({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);		\
   1377     if (! lt->u.h.is_lang_type_class)				\
   1378       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   1379     &lt->u.c; })
   1380 
   1381 #define LANG_TYPE_PTRMEM_CHECK(NODE) __extension__		\
   1382 ({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);		\
   1383     if (lt->u.h.is_lang_type_class)				\
   1384       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   1385     &lt->u.ptrmem; })
   1386 
   1387 #else
   1388 
   1389 #define LANG_TYPE_CLASS_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.c)
   1390 #define LANG_TYPE_PTRMEM_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.ptrmem)
   1391 
   1392 #endif /* ENABLE_TREE_CHECKING */
   1393 
   1394 /* Nonzero for _CLASSTYPE means that operator delete is defined.  */
   1395 #define TYPE_GETS_DELETE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->gets_delete)
   1396 #define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
   1397 
   1398 /* Nonzero if `new NODE[x]' should cause the allocation of extra
   1399    storage to indicate how many array elements are in use.  */
   1400 #define TYPE_VEC_NEW_USES_COOKIE(NODE)			\
   1401   (CLASS_TYPE_P (NODE)					\
   1402    && LANG_TYPE_CLASS_CHECK (NODE)->vec_new_uses_cookie)
   1403 
   1404 /* Nonzero means that this _CLASSTYPE node defines ways of converting
   1405    itself to other types.  */
   1406 #define TYPE_HAS_CONVERSION(NODE) \
   1407   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_type_conversion)
   1408 
   1409 /* Nonzero means that NODE (a class type) has a default constructor --
   1410    but that it has not yet been declared.  */
   1411 #define CLASSTYPE_LAZY_DEFAULT_CTOR(NODE) \
   1412   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_default_ctor)
   1413 
   1414 /* Nonzero means that NODE (a class type) has a copy constructor --
   1415    but that it has not yet been declared.  */
   1416 #define CLASSTYPE_LAZY_COPY_CTOR(NODE) \
   1417   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_ctor)
   1418 
   1419 /* Nonzero means that NODE (a class type) has a move constructor --
   1420    but that it has not yet been declared.  */
   1421 #define CLASSTYPE_LAZY_MOVE_CTOR(NODE) \
   1422   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_move_ctor)
   1423 
   1424 /* Nonzero means that NODE (a class type) has an assignment operator
   1425    -- but that it has not yet been declared.  */
   1426 #define CLASSTYPE_LAZY_COPY_ASSIGN(NODE) \
   1427   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_assign)
   1428 
   1429 /* Nonzero means that NODE (a class type) has an assignment operator
   1430    -- but that it has not yet been declared.  */
   1431 #define CLASSTYPE_LAZY_MOVE_ASSIGN(NODE) \
   1432   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_move_assign)
   1433 
   1434 /* Nonzero means that NODE (a class type) has a destructor -- but that
   1435    it has not yet been declared.  */
   1436 #define CLASSTYPE_LAZY_DESTRUCTOR(NODE) \
   1437   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_destructor)
   1438 
   1439 /* Nonzero means that this _CLASSTYPE node overloads operator=(X&).  */
   1440 #define TYPE_HAS_COPY_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_copy_assign)
   1441 
   1442 /* True iff the class type NODE has an "operator =" whose parameter
   1443    has a parameter of type "const X&".  */
   1444 #define TYPE_HAS_CONST_COPY_ASSIGN(NODE) \
   1445   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_const_copy_assign)
   1446 
   1447 /* Nonzero means that this _CLASSTYPE node has an X(X&) constructor.  */
   1448 #define TYPE_HAS_COPY_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->h.has_copy_ctor)
   1449 #define TYPE_HAS_CONST_COPY_CTOR(NODE) \
   1450   (LANG_TYPE_CLASS_CHECK (NODE)->has_const_copy_ctor)
   1451 
   1452 /* Nonzero if this class has an X(initializer_list<T>) constructor.  */
   1453 #define TYPE_HAS_LIST_CTOR(NODE) \
   1454   (LANG_TYPE_CLASS_CHECK (NODE)->has_list_ctor)
   1455 
   1456 /* Nonzero if this class has a constexpr constructor other than a copy/move
   1457    constructor.  Note that a class can have constexpr constructors for
   1458    static initialization even if it isn't a literal class.  */
   1459 #define TYPE_HAS_CONSTEXPR_CTOR(NODE) \
   1460   (LANG_TYPE_CLASS_CHECK (NODE)->has_constexpr_ctor)
   1461 
   1462 /* Nonzero if this class defines an overloaded operator new.  (An
   1463    operator new [] doesn't count.)  */
   1464 #define TYPE_HAS_NEW_OPERATOR(NODE) \
   1465   (LANG_TYPE_CLASS_CHECK (NODE)->has_new)
   1466 
   1467 /* Nonzero if this class defines an overloaded operator new[].  */
   1468 #define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \
   1469   (LANG_TYPE_CLASS_CHECK (NODE)->has_array_new)
   1470 
   1471 /* Nonzero means that this type is being defined.  I.e., the left brace
   1472    starting the definition of this type has been seen.  */
   1473 #define TYPE_BEING_DEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->being_defined)
   1474 
   1475 /* Nonzero means that this type is either complete or being defined, so we
   1476    can do lookup in it.  */
   1477 #define COMPLETE_OR_OPEN_TYPE_P(NODE) \
   1478   (COMPLETE_TYPE_P (NODE) || (CLASS_TYPE_P (NODE) && TYPE_BEING_DEFINED (NODE)))
   1479 
   1480 /* Mark bits for repeated base checks.  */
   1481 #define TYPE_MARKED_P(NODE) TREE_LANG_FLAG_6 (TYPE_CHECK (NODE))
   1482 
   1483 /* Nonzero if the class NODE has multiple paths to the same (virtual)
   1484    base object.  */
   1485 #define CLASSTYPE_DIAMOND_SHAPED_P(NODE) \
   1486   (LANG_TYPE_CLASS_CHECK(NODE)->diamond_shaped)
   1487 
   1488 /* Nonzero if the class NODE has multiple instances of the same base
   1489    type.  */
   1490 #define CLASSTYPE_REPEATED_BASE_P(NODE) \
   1491   (LANG_TYPE_CLASS_CHECK(NODE)->repeated_base)
   1492 
   1493 /* The member function with which the vtable will be emitted:
   1494    the first noninline non-pure-virtual member function.  NULL_TREE
   1495    if there is no key function or if this is a class template */
   1496 #define CLASSTYPE_KEY_METHOD(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->key_method)
   1497 
   1498 /* Vector member functions defined in this class.  Each element is
   1499    either a FUNCTION_DECL, a TEMPLATE_DECL, or an OVERLOAD.  All
   1500    functions with the same name end up in the same slot.  The first
   1501    two elements are for constructors, and destructors, respectively.
   1502    All template conversion operators to innermost template dependent
   1503    types are overloaded on the next slot, if they exist.  Note, the
   1504    names for these functions will not all be the same.  The
   1505    non-template conversion operators & templated conversions to
   1506    non-innermost template types are next, followed by ordinary member
   1507    functions.  There may be empty entries at the end of the vector.
   1508    The conversion operators are unsorted. The ordinary member
   1509    functions are sorted, once the class is complete.  */
   1510 #define CLASSTYPE_METHOD_VEC(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->methods)
   1511 
   1512 /* For class templates, this is a TREE_LIST of all member data,
   1513    functions, types, and friends in the order of declaration.
   1514    The TREE_PURPOSE of each TREE_LIST is NULL_TREE for a friend,
   1515    and the RECORD_TYPE for the class template otherwise.  */
   1516 #define CLASSTYPE_DECL_LIST(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->decl_list)
   1517 
   1518 /* The slot in the CLASSTYPE_METHOD_VEC where constructors go.  */
   1519 #define CLASSTYPE_CONSTRUCTOR_SLOT 0
   1520 
   1521 /* The slot in the CLASSTYPE_METHOD_VEC where destructors go.  */
   1522 #define CLASSTYPE_DESTRUCTOR_SLOT 1
   1523 
   1524 /* The first slot in the CLASSTYPE_METHOD_VEC where conversion
   1525    operators can appear.  */
   1526 #define CLASSTYPE_FIRST_CONVERSION_SLOT 2
   1527 
   1528 /* A FUNCTION_DECL or OVERLOAD for the constructors for NODE.  These
   1529    are the constructors that take an in-charge parameter.  */
   1530 #define CLASSTYPE_CONSTRUCTORS(NODE) \
   1531   (VEC_index (tree, CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_CONSTRUCTOR_SLOT))
   1532 
   1533 /* A FUNCTION_DECL for the destructor for NODE.  These are the
   1534    destructors that take an in-charge parameter.  If
   1535    CLASSTYPE_LAZY_DESTRUCTOR is true, then this entry will be NULL
   1536    until the destructor is created with lazily_declare_fn.  */
   1537 #define CLASSTYPE_DESTRUCTORS(NODE) \
   1538   (CLASSTYPE_METHOD_VEC (NODE)						      \
   1539    ? VEC_index (tree, CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_DESTRUCTOR_SLOT) \
   1540    : NULL_TREE)
   1541 
   1542 /* A dictionary of the nested user-defined-types (class-types, or enums)
   1543    found within this class.  This table includes nested member class
   1544    templates.  */
   1545 #define CLASSTYPE_NESTED_UTDS(NODE) \
   1546    (LANG_TYPE_CLASS_CHECK (NODE)->nested_udts)
   1547 
   1548 /* Nonzero if NODE has a primary base class, i.e., a base class with
   1549    which it shares the virtual function table pointer.  */
   1550 #define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \
   1551   (CLASSTYPE_PRIMARY_BINFO (NODE) != NULL_TREE)
   1552 
   1553 /* If non-NULL, this is the binfo for the primary base class, i.e.,
   1554    the base class which contains the virtual function table pointer
   1555    for this class.  */
   1556 #define CLASSTYPE_PRIMARY_BINFO(NODE) \
   1557   (LANG_TYPE_CLASS_CHECK (NODE)->primary_base)
   1558 
   1559 /* A vector of BINFOs for the direct and indirect virtual base classes
   1560    that this type uses in a post-order depth-first left-to-right
   1561    order.  (In other words, these bases appear in the order that they
   1562    should be initialized.)  */
   1563 #define CLASSTYPE_VBASECLASSES(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vbases)
   1564 
   1565 /* The type corresponding to NODE when NODE is used as a base class,
   1566    i.e., NODE without virtual base classes.  */
   1567 
   1568 #define CLASSTYPE_AS_BASE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->as_base)
   1569 
   1570 /* True iff NODE is the CLASSTYPE_AS_BASE version of some type.  */
   1571 
   1572 #define IS_FAKE_BASE_TYPE(NODE)					\
   1573   (TREE_CODE (NODE) == RECORD_TYPE				\
   1574    && TYPE_CONTEXT (NODE) && CLASS_TYPE_P (TYPE_CONTEXT (NODE))	\
   1575    && CLASSTYPE_AS_BASE (TYPE_CONTEXT (NODE)) == (NODE))
   1576 
   1577 /* These are the size and alignment of the type without its virtual
   1578    base classes, for when we use this type as a base itself.  */
   1579 #define CLASSTYPE_SIZE(NODE) TYPE_SIZE (CLASSTYPE_AS_BASE (NODE))
   1580 #define CLASSTYPE_SIZE_UNIT(NODE) TYPE_SIZE_UNIT (CLASSTYPE_AS_BASE (NODE))
   1581 #define CLASSTYPE_ALIGN(NODE) TYPE_ALIGN (CLASSTYPE_AS_BASE (NODE))
   1582 #define CLASSTYPE_USER_ALIGN(NODE) TYPE_USER_ALIGN (CLASSTYPE_AS_BASE (NODE))
   1583 
   1584 /* The alignment of NODE, without its virtual bases, in bytes.  */
   1585 #define CLASSTYPE_ALIGN_UNIT(NODE) \
   1586   (CLASSTYPE_ALIGN (NODE) / BITS_PER_UNIT)
   1587 
   1588 /* True if this a Java interface type, declared with
   1589    '__attribute__ ((java_interface))'.  */
   1590 #define TYPE_JAVA_INTERFACE(NODE) \
   1591   (LANG_TYPE_CLASS_CHECK (NODE)->java_interface)
   1592 
   1593 /* A VEC(tree) of virtual functions which cannot be inherited by
   1594    derived classes.  When deriving from this type, the derived
   1595    class must provide its own definition for each of these functions.  */
   1596 #define CLASSTYPE_PURE_VIRTUALS(NODE) \
   1597   (LANG_TYPE_CLASS_CHECK (NODE)->pure_virtuals)
   1598 
   1599 /* Nonzero means that this type has an X() constructor.  */
   1600 #define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) \
   1601   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_default_ctor)
   1602 
   1603 /* Nonzero means that this type contains a mutable member.  */
   1604 #define CLASSTYPE_HAS_MUTABLE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_mutable)
   1605 #define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE))
   1606 
   1607 /* Nonzero means that this class type is not POD for the purpose of layout
   1608    (as defined in the ABI).  This is different from the language's POD.  */
   1609 #define CLASSTYPE_NON_LAYOUT_POD_P(NODE) \
   1610   (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_class)
   1611 
   1612 /* Nonzero means that this class type is a non-standard-layout class.  */
   1613 #define CLASSTYPE_NON_STD_LAYOUT(NODE) \
   1614   (LANG_TYPE_CLASS_CHECK (NODE)->non_std_layout)
   1615 
   1616 /* Nonzero means that this class contains pod types whose default
   1617    initialization is not a zero initialization (namely, pointers to
   1618    data members).  */
   1619 #define CLASSTYPE_NON_ZERO_INIT_P(NODE) \
   1620   (LANG_TYPE_CLASS_CHECK (NODE)->non_zero_init)
   1621 
   1622 /* Nonzero if this class is "empty" in the sense of the C++ ABI.  */
   1623 #define CLASSTYPE_EMPTY_P(NODE) \
   1624   (LANG_TYPE_CLASS_CHECK (NODE)->empty_p)
   1625 
   1626 /* Nonzero if this class is "nearly empty", i.e., contains only a
   1627    virtual function table pointer.  */
   1628 #define CLASSTYPE_NEARLY_EMPTY_P(NODE) \
   1629   (LANG_TYPE_CLASS_CHECK (NODE)->nearly_empty_p)
   1630 
   1631 /* Nonzero if this class contains an empty subobject.  */
   1632 #define CLASSTYPE_CONTAINS_EMPTY_CLASS_P(NODE) \
   1633   (LANG_TYPE_CLASS_CHECK (NODE)->contains_empty_class_p)
   1634 
   1635 /* A list of class types of which this type is a friend.  The
   1636    TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the
   1637    case of a template friend.  */
   1638 #define CLASSTYPE_FRIEND_CLASSES(NODE) \
   1639   (LANG_TYPE_CLASS_CHECK (NODE)->friend_classes)
   1640 
   1641 /* A list of the classes which grant friendship to this class.  */
   1642 #define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \
   1643   (LANG_TYPE_CLASS_CHECK (NODE)->befriending_classes)
   1644 
   1645 /* The associated LAMBDA_EXPR that made this class.  */
   1646 #define CLASSTYPE_LAMBDA_EXPR(NODE) \
   1647   (LANG_TYPE_CLASS_CHECK (NODE)->lambda_expr)
   1648 /* The extra mangling scope for this closure type.  */
   1649 #define LAMBDA_TYPE_EXTRA_SCOPE(NODE) \
   1650   (LAMBDA_EXPR_EXTRA_SCOPE (CLASSTYPE_LAMBDA_EXPR (NODE)))
   1651 
   1652 /* Say whether this node was declared as a "class" or a "struct".  */
   1653 #define CLASSTYPE_DECLARED_CLASS(NODE) \
   1654   (LANG_TYPE_CLASS_CHECK (NODE)->declared_class)
   1655 
   1656 /* Nonzero if this class has const members
   1657    which have no specified initialization.  */
   1658 #define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE)	\
   1659   (TYPE_LANG_SPECIFIC (NODE)				\
   1660    ? LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init : 0)
   1661 #define SET_CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE, VALUE) \
   1662   (LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init = (VALUE))
   1663 
   1664 /* Nonzero if this class has ref members
   1665    which have no specified initialization.  */
   1666 #define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE)		\
   1667   (TYPE_LANG_SPECIFIC (NODE)				\
   1668    ? LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init : 0)
   1669 #define SET_CLASSTYPE_REF_FIELDS_NEED_INIT(NODE, VALUE) \
   1670   (LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init = (VALUE))
   1671 
   1672 /* Nonzero if this class is included from a header file which employs
   1673    `#pragma interface', and it is not included in its implementation file.  */
   1674 #define CLASSTYPE_INTERFACE_ONLY(NODE) \
   1675   (LANG_TYPE_CLASS_CHECK (NODE)->interface_only)
   1676 
   1677 /* True if we have already determined whether or not vtables, VTTs,
   1678    typeinfo, and other similar per-class data should be emitted in
   1679    this translation unit.  This flag does not indicate whether or not
   1680    these items should be emitted; it only indicates that we know one
   1681    way or the other.  */
   1682 #define CLASSTYPE_INTERFACE_KNOWN(NODE) \
   1683   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown == 0)
   1684 /* The opposite of CLASSTYPE_INTERFACE_KNOWN.  */
   1685 #define CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
   1686   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown)
   1687 
   1688 #define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) \
   1689   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = !!(X))
   1690 #define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
   1691   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 1)
   1692 #define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) \
   1693   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 0)
   1694 
   1695 /* Nonzero if a _DECL node requires us to output debug info for this class.  */
   1696 #define CLASSTYPE_DEBUG_REQUESTED(NODE) \
   1697   (LANG_TYPE_CLASS_CHECK (NODE)->debug_requested)
   1698 
   1699 /* Additional macros for inheritance information.  */
   1701 
   1702 /* Nonzero means that this class is on a path leading to a new vtable.  */
   1703 #define BINFO_VTABLE_PATH_MARKED(NODE) BINFO_FLAG_1 (NODE)
   1704 
   1705 /* Nonzero means B (a BINFO) has its own vtable.  Any copies will not
   1706    have this flag set.  */
   1707 #define BINFO_NEW_VTABLE_MARKED(B) (BINFO_FLAG_2 (B))
   1708 
   1709 /* Compare a BINFO_TYPE with another type for equality.  For a binfo,
   1710    this is functionally equivalent to using same_type_p, but
   1711    measurably faster.  At least one of the arguments must be a
   1712    BINFO_TYPE.  The other can be a BINFO_TYPE or a regular type.  If
   1713    BINFO_TYPE(T) ever stops being the main variant of the class the
   1714    binfo is for, this macro must change.  */
   1715 #define SAME_BINFO_TYPE_P(A, B) ((A) == (B))
   1716 
   1717 /* Any subobject that needs a new vtable must have a vptr and must not
   1718    be a non-virtual primary base (since it would then use the vtable from a
   1719    derived class and never become non-primary.)  */
   1720 #define SET_BINFO_NEW_VTABLE_MARKED(B)					 \
   1721   (BINFO_NEW_VTABLE_MARKED (B) = 1,					 \
   1722    gcc_assert (!BINFO_PRIMARY_P (B) || BINFO_VIRTUAL_P (B)),		 \
   1723    gcc_assert (TYPE_VFIELD (BINFO_TYPE (B))))
   1724 
   1725 /* Nonzero if this binfo is for a dependent base - one that should not
   1726    be searched.  */
   1727 #define BINFO_DEPENDENT_BASE_P(NODE) BINFO_FLAG_3 (NODE)
   1728 
   1729 /* Nonzero if this binfo has lost its primary base binfo (because that
   1730    is a nearly-empty virtual base that has been taken by some other
   1731    base in the complete hierarchy.  */
   1732 #define BINFO_LOST_PRIMARY_P(NODE) BINFO_FLAG_4 (NODE)
   1733 
   1734 /* Nonzero if this BINFO is a primary base class.  */
   1735 #define BINFO_PRIMARY_P(NODE) BINFO_FLAG_5(NODE)
   1736 
   1737 /* Used by various search routines.  */
   1738 #define IDENTIFIER_MARKED(NODE) TREE_LANG_FLAG_0 (NODE)
   1739 
   1740 /* A VEC(tree_pair_s) of the vcall indices associated with the class
   1742    NODE.  The PURPOSE of each element is a FUNCTION_DECL for a virtual
   1743    function.  The VALUE is the index into the virtual table where the
   1744    vcall offset for that function is stored, when NODE is a virtual
   1745    base.  */
   1746 #define CLASSTYPE_VCALL_INDICES(NODE) \
   1747   (LANG_TYPE_CLASS_CHECK (NODE)->vcall_indices)
   1748 
   1749 /* The various vtables for the class NODE.  The primary vtable will be
   1750    first, followed by the construction vtables and VTT, if any.  */
   1751 #define CLASSTYPE_VTABLES(NODE) \
   1752   (LANG_TYPE_CLASS_CHECK (NODE)->vtables)
   1753 
   1754 /* The std::type_info variable representing this class, or NULL if no
   1755    such variable has been created.  This field is only set for the
   1756    TYPE_MAIN_VARIANT of the class.  */
   1757 #define CLASSTYPE_TYPEINFO_VAR(NODE) \
   1758   (LANG_TYPE_CLASS_CHECK (NODE)->typeinfo_var)
   1759 
   1760 /* Accessor macros for the BINFO_VIRTUALS list.  */
   1761 
   1762 /* The number of bytes by which to adjust the `this' pointer when
   1763    calling this virtual function.  Subtract this value from the this
   1764    pointer. Always non-NULL, might be constant zero though.  */
   1765 #define BV_DELTA(NODE) (TREE_PURPOSE (NODE))
   1766 
   1767 /* If non-NULL, the vtable index at which to find the vcall offset
   1768    when calling this virtual function.  Add the value at that vtable
   1769    index to the this pointer.  */
   1770 #define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE))
   1771 
   1772 /* The function to call.  */
   1773 #define BV_FN(NODE) (TREE_VALUE (NODE))
   1774 
   1775 /* Whether or not this entry is for a lost primary virtual base.  */
   1776 #define BV_LOST_PRIMARY(NODE) (TREE_LANG_FLAG_0 (NODE))
   1777 
   1778 /* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
   1780    this type can raise.  Each TREE_VALUE is a _TYPE.  The TREE_VALUE
   1781    will be NULL_TREE to indicate a throw specification of `()', or
   1782    no exceptions allowed.  For a noexcept specification, TREE_VALUE
   1783    is NULL_TREE and TREE_PURPOSE is the constant-expression. */
   1784 #define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_LANG_SLOT_1 (NODE)
   1785 
   1786 /* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'
   1787    or noexcept(true).  */
   1788 #define TYPE_NOTHROW_P(NODE) nothrow_spec_p (TYPE_RAISES_EXCEPTIONS (NODE))
   1789 
   1790 /* For FUNCTION_TYPE or METHOD_TYPE, true if NODE is noexcept.  This is the
   1791    case for things declared noexcept(true) and, with -fnothrow-opt, for
   1792    throw() functions.  */
   1793 #define TYPE_NOEXCEPT_P(NODE) type_noexcept_p (NODE)
   1794 
   1795 /* The binding level associated with the namespace.  */
   1796 #define NAMESPACE_LEVEL(NODE) \
   1797   (LANG_DECL_NS_CHECK (NODE)->level)
   1798 
   1799 /* Flags shared by all forms of DECL_LANG_SPECIFIC.
   1801 
   1802    Some of the flags live here only to make lang_decl_min/fn smaller.  Do
   1803    not make this struct larger than 32 bits; instead, make sel smaller.  */
   1804 
   1805 struct GTY(()) lang_decl_base {
   1806   unsigned selector : 16;   /* Larger than necessary for faster access.  */
   1807   ENUM_BITFIELD(languages) language : 4;
   1808   unsigned use_template : 2;
   1809   unsigned not_really_extern : 1;	   /* var or fn */
   1810   unsigned initialized_in_class : 1;	   /* var or fn */
   1811   unsigned repo_available_p : 1;	   /* var or fn */
   1812   unsigned threadprivate_or_deleted_p : 1; /* var or fn */
   1813   unsigned anticipated_p : 1;		   /* fn or type */
   1814   unsigned friend_attr : 1;		   /* fn or type */
   1815   unsigned template_conv_p : 1;		   /* var or template */
   1816   unsigned odr_used : 1;		   /* var or fn */
   1817   unsigned u2sel : 1;
   1818   /* 1 spare bit */
   1819 };
   1820 
   1821 /* True for DECL codes which have template info and access.  */
   1822 #define LANG_DECL_HAS_MIN(NODE)			\
   1823   (TREE_CODE (NODE) == FUNCTION_DECL		\
   1824    || TREE_CODE (NODE) == FIELD_DECL		\
   1825    || TREE_CODE (NODE) == VAR_DECL		\
   1826    || TREE_CODE (NODE) == CONST_DECL		\
   1827    || TREE_CODE (NODE) == TYPE_DECL		\
   1828    || TREE_CODE (NODE) == TEMPLATE_DECL		\
   1829    || TREE_CODE (NODE) == USING_DECL)
   1830 
   1831 /* DECL_LANG_SPECIFIC for the above codes.  */
   1832 
   1833 struct GTY(()) lang_decl_min {
   1834   struct lang_decl_base base;
   1835 
   1836   /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
   1837      THUNK_ALIAS.
   1838      In a FUNCTION_DECL for which DECL_THUNK_P does not hold,
   1839      VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this is
   1840      DECL_TEMPLATE_INFO.  */
   1841   tree template_info;
   1842 
   1843   union lang_decl_u2 {
   1844     /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
   1845        THUNK_VIRTUAL_OFFSET.
   1846        Otherwise this is DECL_ACCESS.  */
   1847     tree GTY ((tag ("0"))) access;
   1848 
   1849     /* For VAR_DECL in function, this is DECL_DISCRIMINATOR.  */
   1850     int GTY ((tag ("1"))) discriminator;
   1851   } GTY ((desc ("%0.u.base.u2sel"))) u2;
   1852 };
   1853 
   1854 /* Additional DECL_LANG_SPECIFIC information for functions.  */
   1855 
   1856 struct GTY(()) lang_decl_fn {
   1857   struct lang_decl_min min;
   1858 
   1859   /* In an overloaded operator, this is the value of
   1860      DECL_OVERLOADED_OPERATOR_P.  */
   1861   ENUM_BITFIELD (tree_code) operator_code : 16;
   1862 
   1863   unsigned global_ctor_p : 1;
   1864   unsigned global_dtor_p : 1;
   1865   unsigned constructor_attr : 1;
   1866   unsigned destructor_attr : 1;
   1867   unsigned assignment_operator_p : 1;
   1868   unsigned static_function : 1;
   1869   unsigned pure_virtual : 1;
   1870   unsigned defaulted_p : 1;
   1871 
   1872   unsigned has_in_charge_parm_p : 1;
   1873   unsigned has_vtt_parm_p : 1;
   1874   unsigned pending_inline_p : 1;
   1875   unsigned nonconverting : 1;
   1876   unsigned thunk_p : 1;
   1877   unsigned this_thunk_p : 1;
   1878   unsigned hidden_friend_p : 1;
   1879   /* 1 spare bit.  */
   1880 
   1881   /* For a non-thunk function decl, this is a tree list of
   1882      friendly classes. For a thunk function decl, it is the
   1883      thunked to function decl.  */
   1884   tree befriending_classes;
   1885 
   1886   /* For a non-virtual FUNCTION_DECL, this is
   1887      DECL_FRIEND_CONTEXT.  For a virtual FUNCTION_DECL for which
   1888      DECL_THIS_THUNK_P does not hold, this is DECL_THUNKS. Both
   1889      this pointer and result pointer adjusting thunks are
   1890      chained here.  This pointer thunks to return pointer thunks
   1891      will be chained on the return pointer thunk.  */
   1892   tree context;
   1893 
   1894   union lang_decl_u5
   1895   {
   1896     /* In a non-thunk FUNCTION_DECL or TEMPLATE_DECL, this is
   1897        DECL_CLONED_FUNCTION.  */
   1898     tree GTY ((tag ("0"))) cloned_function;
   1899 
   1900     /* In a FUNCTION_DECL for which THUNK_P holds this is the
   1901        THUNK_FIXED_OFFSET.  */
   1902     HOST_WIDE_INT GTY ((tag ("1"))) fixed_offset;
   1903   } GTY ((desc ("%1.thunk_p"))) u5;
   1904 
   1905   union lang_decl_u3
   1906   {
   1907     struct cp_token_cache * GTY ((tag ("1"))) pending_inline_info;
   1908     struct language_function * GTY ((tag ("0")))
   1909       saved_language_function;
   1910   } GTY ((desc ("%1.pending_inline_p"))) u;
   1911 
   1912 };
   1913 
   1914 /* DECL_LANG_SPECIFIC for namespaces.  */
   1915 
   1916 struct GTY(()) lang_decl_ns {
   1917   struct lang_decl_base base;
   1918   struct cp_binding_level *level;
   1919 };
   1920 
   1921 /* DECL_LANG_SPECIFIC for parameters.  */
   1922 
   1923 struct GTY(()) lang_decl_parm {
   1924   struct lang_decl_base base;
   1925   int level;
   1926   int index;
   1927 };
   1928 
   1929 /* DECL_LANG_SPECIFIC for all types.  It would be nice to just make this a
   1930    union rather than a struct containing a union as its only field, but
   1931    tree.h declares it as a struct.  */
   1932 
   1933 struct GTY((variable_size)) lang_decl {
   1934   union GTY((desc ("%h.base.selector"))) lang_decl_u {
   1935     struct lang_decl_base GTY ((default)) base;
   1936     struct lang_decl_min GTY((tag ("0"))) min;
   1937     struct lang_decl_fn GTY ((tag ("1"))) fn;
   1938     struct lang_decl_ns GTY((tag ("2"))) ns;
   1939     struct lang_decl_parm GTY((tag ("3"))) parm;
   1940   } u;
   1941 };
   1942 
   1943 /* Looks through a template (if present) to find what it declares.  */
   1944 #define STRIP_TEMPLATE(NODE) \
   1945   (TREE_CODE (NODE) == TEMPLATE_DECL ? DECL_TEMPLATE_RESULT (NODE) : NODE)
   1946 
   1947 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
   1948 
   1949 #define LANG_DECL_MIN_CHECK(NODE) __extension__			\
   1950 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
   1951    if (!LANG_DECL_HAS_MIN (NODE))				\
   1952      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   1953    &lt->u.min; })
   1954 
   1955 /* We want to be able to check DECL_CONSTRUCTOR_P and such on a function
   1956    template, not just on a FUNCTION_DECL.  So when looking for things in
   1957    lang_decl_fn, look down through a TEMPLATE_DECL into its result.  */
   1958 #define LANG_DECL_FN_CHECK(NODE) __extension__				\
   1959 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (STRIP_TEMPLATE (NODE));	\
   1960    if (!DECL_DECLARES_FUNCTION_P (NODE) || lt->u.base.selector != 1)	\
   1961      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);		\
   1962    &lt->u.fn; })
   1963 
   1964 #define LANG_DECL_NS_CHECK(NODE) __extension__				\
   1965 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);			\
   1966    if (TREE_CODE (NODE) != NAMESPACE_DECL || lt->u.base.selector != 2)	\
   1967      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);		\
   1968    &lt->u.ns; })
   1969 
   1970 #define LANG_DECL_PARM_CHECK(NODE) __extension__		\
   1971 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
   1972   if (TREE_CODE (NODE) != PARM_DECL)				\
   1973     lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   1974   &lt->u.parm; })
   1975 
   1976 #define LANG_DECL_U2_CHECK(NODE, TF) __extension__		\
   1977 ({  struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
   1978     if (!LANG_DECL_HAS_MIN (NODE) || lt->u.base.u2sel != TF)	\
   1979       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   1980     &lt->u.min.u2; })
   1981 
   1982 #else
   1983 
   1984 #define LANG_DECL_MIN_CHECK(NODE) \
   1985   (&DECL_LANG_SPECIFIC (NODE)->u.min)
   1986 
   1987 #define LANG_DECL_FN_CHECK(NODE) \
   1988   (&DECL_LANG_SPECIFIC (STRIP_TEMPLATE (NODE))->u.fn)
   1989 
   1990 #define LANG_DECL_NS_CHECK(NODE) \
   1991   (&DECL_LANG_SPECIFIC (NODE)->u.ns)
   1992 
   1993 #define LANG_DECL_PARM_CHECK(NODE) \
   1994   (&DECL_LANG_SPECIFIC (NODE)->u.parm)
   1995 
   1996 #define LANG_DECL_U2_CHECK(NODE, TF) \
   1997   (&DECL_LANG_SPECIFIC (NODE)->u.min.u2)
   1998 
   1999 #endif /* ENABLE_TREE_CHECKING */
   2000 
   2001 /* For a FUNCTION_DECL or a VAR_DECL, the language linkage for the
   2002    declaration.  Some entities (like a member function in a local
   2003    class, or a local variable) do not have linkage at all, and this
   2004    macro should not be used in those cases.
   2005 
   2006    Implementation note: A FUNCTION_DECL without DECL_LANG_SPECIFIC was
   2007    created by language-independent code, and has C linkage.  Most
   2008    VAR_DECLs have C++ linkage, and do not have DECL_LANG_SPECIFIC, but
   2009    we do create DECL_LANG_SPECIFIC for variables with non-C++ linkage.  */
   2010 #define DECL_LANGUAGE(NODE)				\
   2011   (DECL_LANG_SPECIFIC (NODE)				\
   2012    ? DECL_LANG_SPECIFIC (NODE)->u.base.language		\
   2013    : (TREE_CODE (NODE) == FUNCTION_DECL			\
   2014       ? lang_c : lang_cplusplus))
   2015 
   2016 /* Set the language linkage for NODE to LANGUAGE.  */
   2017 #define SET_DECL_LANGUAGE(NODE, LANGUAGE) \
   2018   (DECL_LANG_SPECIFIC (NODE)->u.base.language = (LANGUAGE))
   2019 
   2020 /* For FUNCTION_DECLs: nonzero means that this function is a constructor.  */
   2021 #define DECL_CONSTRUCTOR_P(NODE) \
   2022   (LANG_DECL_FN_CHECK (NODE)->constructor_attr)
   2023 
   2024 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete
   2025    object.  */
   2026 #define DECL_COMPLETE_CONSTRUCTOR_P(NODE)		\
   2027   (DECL_CONSTRUCTOR_P (NODE)				\
   2028    && DECL_NAME (NODE) == complete_ctor_identifier)
   2029 
   2030 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base
   2031    object.  */
   2032 #define DECL_BASE_CONSTRUCTOR_P(NODE)		\
   2033   (DECL_CONSTRUCTOR_P (NODE)			\
   2034    && DECL_NAME (NODE) == base_ctor_identifier)
   2035 
   2036 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the
   2037    specialized in-charge constructor or the specialized not-in-charge
   2038    constructor.  */
   2039 #define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE)		\
   2040   (DECL_DECLARES_FUNCTION_P (NODE) && DECL_CONSTRUCTOR_P (NODE) \
   2041    && !DECL_CLONED_FUNCTION_P (NODE))
   2042 
   2043 /* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor.  */
   2044 #define DECL_COPY_CONSTRUCTOR_P(NODE) \
   2045   (DECL_CONSTRUCTOR_P (NODE) && copy_fn_p (NODE) > 0)
   2046 
   2047 /* Nonzero if NODE (a FUNCTION_DECL) is a move constructor.  */
   2048 #define DECL_MOVE_CONSTRUCTOR_P(NODE) \
   2049   (DECL_CONSTRUCTOR_P (NODE) && move_fn_p (NODE))
   2050 
   2051 /* Nonzero if NODE is a destructor.  */
   2052 #define DECL_DESTRUCTOR_P(NODE)				\
   2053   (LANG_DECL_FN_CHECK (NODE)->destructor_attr)
   2054 
   2055 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the
   2056    specialized in-charge constructor, in-charge deleting constructor,
   2057    or the base destructor.  */
   2058 #define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE)			\
   2059   (DECL_DECLARES_FUNCTION_P (NODE) && DECL_DESTRUCTOR_P (NODE)	\
   2060    && !DECL_CLONED_FUNCTION_P (NODE))
   2061 
   2062 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
   2063    object.  */
   2064 #define DECL_COMPLETE_DESTRUCTOR_P(NODE)		\
   2065   (DECL_DESTRUCTOR_P (NODE)				\
   2066    && DECL_NAME (NODE) == complete_dtor_identifier)
   2067 
   2068 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base
   2069    object.  */
   2070 #define DECL_BASE_DESTRUCTOR_P(NODE)		\
   2071   (DECL_DESTRUCTOR_P (NODE)			\
   2072    && DECL_NAME (NODE) == base_dtor_identifier)
   2073 
   2074 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
   2075    object that deletes the object after it has been destroyed.  */
   2076 #define DECL_DELETING_DESTRUCTOR_P(NODE)		\
   2077   (DECL_DESTRUCTOR_P (NODE)				\
   2078    && DECL_NAME (NODE) == deleting_dtor_identifier)
   2079 
   2080 /* Nonzero if NODE (a FUNCTION_DECL) is a cloned constructor or
   2081    destructor.  */
   2082 #define DECL_CLONED_FUNCTION_P(NODE) (!!decl_cloned_function_p (NODE, true))
   2083 
   2084 /* If DECL_CLONED_FUNCTION_P holds, this is the function that was
   2085    cloned.  */
   2086 #define DECL_CLONED_FUNCTION(NODE) (*decl_cloned_function_p (NODE, false))
   2087 
   2088 /* Perform an action for each clone of FN, if FN is a function with
   2089    clones.  This macro should be used like:
   2090 
   2091       FOR_EACH_CLONE (clone, fn)
   2092 	{ ... }
   2093 
   2094   */
   2095 #define FOR_EACH_CLONE(CLONE, FN)			\
   2096   if (TREE_CODE (FN) == FUNCTION_DECL			\
   2097       && (DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P (FN)	\
   2098 	  || DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P (FN)))	\
   2099      for (CLONE = DECL_CHAIN (FN);			\
   2100 	  CLONE && DECL_CLONED_FUNCTION_P (CLONE);	\
   2101 	  CLONE = DECL_CHAIN (CLONE))
   2102 
   2103 /* Nonzero if NODE has DECL_DISCRIMINATOR and not DECL_ACCESS.  */
   2104 #define DECL_DISCRIMINATOR_P(NODE)	\
   2105   (TREE_CODE (NODE) == VAR_DECL		\
   2106    && DECL_FUNCTION_SCOPE_P (NODE))
   2107 
   2108 /* Discriminator for name mangling.  */
   2109 #define DECL_DISCRIMINATOR(NODE) (LANG_DECL_U2_CHECK (NODE, 1)->discriminator)
   2110 
   2111 /* True iff DECL_DISCRIMINATOR is set for a DECL_DISCRIMINATOR_P decl.  */
   2112 #define DECL_DISCRIMINATOR_SET_P(NODE) \
   2113   (DECL_LANG_SPECIFIC (NODE) && DECL_LANG_SPECIFIC (NODE)->u.base.u2sel == 1)
   2114 
   2115 /* The index of a user-declared parameter in its function, starting at 1.
   2116    All artificial parameters will have index 0.  */
   2117 #define DECL_PARM_INDEX(NODE) \
   2118   (LANG_DECL_PARM_CHECK (NODE)->index)
   2119 
   2120 /* The level of a user-declared parameter in its function, starting at 1.
   2121    A parameter of the function will have level 1; a parameter of the first
   2122    nested function declarator (i.e. t in void f (void (*p)(T t))) will have
   2123    level 2.  */
   2124 #define DECL_PARM_LEVEL(NODE) \
   2125   (LANG_DECL_PARM_CHECK (NODE)->level)
   2126 
   2127 /* Nonzero if the VTT parm has been added to NODE.  */
   2128 #define DECL_HAS_VTT_PARM_P(NODE) \
   2129   (LANG_DECL_FN_CHECK (NODE)->has_vtt_parm_p)
   2130 
   2131 /* Nonzero if NODE is a FUNCTION_DECL for which a VTT parameter is
   2132    required.  */
   2133 #define DECL_NEEDS_VTT_PARM_P(NODE)			\
   2134   (CLASSTYPE_VBASECLASSES (DECL_CONTEXT (NODE))		\
   2135    && (DECL_BASE_CONSTRUCTOR_P (NODE)			\
   2136        || DECL_BASE_DESTRUCTOR_P (NODE)))
   2137 
   2138 /* Nonzero if NODE is a user-defined conversion operator.  */
   2139 #define DECL_CONV_FN_P(NODE) \
   2140   (DECL_NAME (NODE) && IDENTIFIER_TYPENAME_P (DECL_NAME (NODE)))
   2141 
   2142 /* If FN is a conversion operator, the type to which it converts.
   2143    Otherwise, NULL_TREE.  */
   2144 #define DECL_CONV_FN_TYPE(FN) \
   2145   (DECL_CONV_FN_P (FN) ? TREE_TYPE (DECL_NAME (FN)) : NULL_TREE)
   2146 
   2147 /* Nonzero if NODE, which is a TEMPLATE_DECL, is a template
   2148    conversion operator to a type dependent on the innermost template
   2149    args.  */
   2150 #define DECL_TEMPLATE_CONV_FN_P(NODE) \
   2151   (DECL_LANG_SPECIFIC (TEMPLATE_DECL_CHECK (NODE))->u.base.template_conv_p)
   2152 
   2153 /* Nonzero if NODE, a static data member, was declared in its class as an
   2154    array of unknown bound.  */
   2155 #define VAR_HAD_UNKNOWN_BOUND(NODE)			\
   2156   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))		\
   2157    ? DECL_LANG_SPECIFIC (NODE)->u.base.template_conv_p	\
   2158    : false)
   2159 #define SET_VAR_HAD_UNKNOWN_BOUND(NODE) \
   2160   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))->u.base.template_conv_p = true)
   2161 
   2162 /* Set the overloaded operator code for NODE to CODE.  */
   2163 #define SET_OVERLOADED_OPERATOR_CODE(NODE, CODE) \
   2164   (LANG_DECL_FN_CHECK (NODE)->operator_code = (CODE))
   2165 
   2166 /* If NODE is an overloaded operator, then this returns the TREE_CODE
   2167    associated with the overloaded operator.
   2168    DECL_ASSIGNMENT_OPERATOR_P must also be checked to determine
   2169    whether or not NODE is an assignment operator.  If NODE is not an
   2170    overloaded operator, ERROR_MARK is returned.  Since the numerical
   2171    value of ERROR_MARK is zero, this macro can be used as a predicate
   2172    to test whether or not NODE is an overloaded operator.  */
   2173 #define DECL_OVERLOADED_OPERATOR_P(NODE)		\
   2174   (IDENTIFIER_OPNAME_P (DECL_NAME (NODE))		\
   2175    ? LANG_DECL_FN_CHECK (NODE)->operator_code : ERROR_MARK)
   2176 
   2177 /* Nonzero if NODE is an assignment operator (including += and such).  */
   2178 #define DECL_ASSIGNMENT_OPERATOR_P(NODE) \
   2179   (LANG_DECL_FN_CHECK (NODE)->assignment_operator_p)
   2180 
   2181 /* For FUNCTION_DECLs: nonzero means that this function is a
   2182    constructor or a destructor with an extra in-charge parameter to
   2183    control whether or not virtual bases are constructed.  */
   2184 #define DECL_HAS_IN_CHARGE_PARM_P(NODE) \
   2185   (LANG_DECL_FN_CHECK (NODE)->has_in_charge_parm_p)
   2186 
   2187 /* Nonzero if DECL is a declaration of __builtin_constant_p.  */
   2188 #define DECL_IS_BUILTIN_CONSTANT_P(NODE)		\
   2189  (TREE_CODE (NODE) == FUNCTION_DECL			\
   2190   && DECL_BUILT_IN_CLASS (NODE) == BUILT_IN_NORMAL	\
   2191   && DECL_FUNCTION_CODE (NODE) == BUILT_IN_CONSTANT_P)
   2192 
   2193 /* Nonzero for _DECL means that this decl appears in (or will appear
   2194    in) as a member in a RECORD_TYPE or UNION_TYPE node.  It is also for
   2195    detecting circularity in case members are multiply defined.  In the
   2196    case of a VAR_DECL, it is also used to determine how program storage
   2197    should be allocated.  */
   2198 #define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3 (NODE))
   2199 
   2200 /* Nonzero for a VAR_DECL means that the variable's initialization (if
   2201    any) has been processed.  (In general, DECL_INITIALIZED_P is
   2202    !DECL_EXTERN, but static data members may be initialized even if
   2203    not defined.)  */
   2204 #define DECL_INITIALIZED_P(NODE) \
   2205    (TREE_LANG_FLAG_1 (VAR_DECL_CHECK (NODE)))
   2206 
   2207 /* Nonzero for a VAR_DECL iff an explicit initializer was provided.  */
   2208 #define DECL_NONTRIVIALLY_INITIALIZED_P(NODE)	\
   2209    (TREE_LANG_FLAG_3 (VAR_DECL_CHECK (NODE)))
   2210 
   2211 /* Nonzero for a VAR_DECL that was initialized with a
   2212    constant-expression.  */
   2213 #define DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P(NODE) \
   2214   (TREE_LANG_FLAG_2 (VAR_DECL_CHECK (NODE)))
   2215 
   2216 /* Nonzero if the DECL was initialized in the class definition itself,
   2217    rather than outside the class.  This is used for both static member
   2218    VAR_DECLS, and FUNCTION_DECLS that are defined in the class.  */
   2219 #define DECL_INITIALIZED_IN_CLASS_P(DECL) \
   2220   (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL)) \
   2221    ->u.base.initialized_in_class)
   2222 
   2223 /* Nonzero if the DECL is used in the sense of 3.2 [basic.def.odr].
   2224    Only available for decls with DECL_LANG_SPECIFIC.  */
   2225 #define DECL_ODR_USED(DECL) \
   2226   (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL)) \
   2227    ->u.base.odr_used)
   2228 
   2229 /* Nonzero for DECL means that this decl is just a friend declaration,
   2230    and should not be added to the list of members for this class.  */
   2231 #define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC (NODE)->u.base.friend_attr)
   2232 
   2233 /* A TREE_LIST of the types which have befriended this FUNCTION_DECL.  */
   2234 #define DECL_BEFRIENDING_CLASSES(NODE) \
   2235   (LANG_DECL_FN_CHECK (NODE)->befriending_classes)
   2236 
   2237 /* Nonzero for FUNCTION_DECL means that this decl is a static
   2238    member function.  */
   2239 #define DECL_STATIC_FUNCTION_P(NODE) \
   2240   (LANG_DECL_FN_CHECK (NODE)->static_function)
   2241 
   2242 /* Nonzero for FUNCTION_DECL means that this decl is a non-static
   2243    member function.  */
   2244 #define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \
   2245   (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE)
   2246 
   2247 /* Nonzero for FUNCTION_DECL means that this decl is a member function
   2248    (static or non-static).  */
   2249 #define DECL_FUNCTION_MEMBER_P(NODE) \
   2250   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE))
   2251 
   2252 /* Nonzero for FUNCTION_DECL means that this member function
   2253    has `this' as const X *const.  */
   2254 #define DECL_CONST_MEMFUNC_P(NODE)					 \
   2255   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
   2256    && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE				 \
   2257 				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
   2258 
   2259 /* Nonzero for FUNCTION_DECL means that this member function
   2260    has `this' as volatile X *const.  */
   2261 #define DECL_VOLATILE_MEMFUNC_P(NODE)					 \
   2262   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
   2263    && CP_TYPE_VOLATILE_P (TREE_TYPE (TREE_VALUE				 \
   2264 				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
   2265 
   2266 /* Nonzero for a DECL means that this member is a non-static member.  */
   2267 #define DECL_NONSTATIC_MEMBER_P(NODE)		\
   2268   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)	\
   2269    || TREE_CODE (NODE) == FIELD_DECL)
   2270 
   2271 /* Nonzero for _DECL means that this member object type
   2272    is mutable.  */
   2273 #define DECL_MUTABLE_P(NODE) (DECL_LANG_FLAG_0 (NODE))
   2274 
   2275 /* Nonzero for _DECL means that this constructor or conversion function is
   2276    non-converting.  */
   2277 #define DECL_NONCONVERTING_P(NODE) \
   2278   (LANG_DECL_FN_CHECK (NODE)->nonconverting)
   2279 
   2280 /* Nonzero for FUNCTION_DECL means that this member function is a pure
   2281    virtual function.  */
   2282 #define DECL_PURE_VIRTUAL_P(NODE) \
   2283   (LANG_DECL_FN_CHECK (NODE)->pure_virtual)
   2284 
   2285 /* True (in a FUNCTION_DECL) if NODE is a virtual function that is an
   2286    invalid overrider for a function from a base class.  Once we have
   2287    complained about an invalid overrider we avoid complaining about it
   2288    again.  */
   2289 #define DECL_INVALID_OVERRIDER_P(NODE) \
   2290   (DECL_LANG_FLAG_4 (NODE))
   2291 
   2292 /* The thunks associated with NODE, a FUNCTION_DECL.  */
   2293 #define DECL_THUNKS(NODE) \
   2294   (LANG_DECL_FN_CHECK (NODE)->context)
   2295 
   2296 /* Nonzero if NODE is a thunk, rather than an ordinary function.  */
   2297 #define DECL_THUNK_P(NODE)			\
   2298   (TREE_CODE (NODE) == FUNCTION_DECL		\
   2299    && DECL_LANG_SPECIFIC (NODE)			\
   2300    && LANG_DECL_FN_CHECK (NODE)->thunk_p)
   2301 
   2302 /* Set DECL_THUNK_P for node.  */
   2303 #define SET_DECL_THUNK_P(NODE, THIS_ADJUSTING)			\
   2304   (LANG_DECL_FN_CHECK (NODE)->thunk_p = 1,			\
   2305    LANG_DECL_FN_CHECK (NODE)->this_thunk_p = (THIS_ADJUSTING))
   2306 
   2307 /* Nonzero if NODE is a this pointer adjusting thunk.  */
   2308 #define DECL_THIS_THUNK_P(NODE)			\
   2309   (DECL_THUNK_P (NODE) && LANG_DECL_FN_CHECK (NODE)->this_thunk_p)
   2310 
   2311 /* Nonzero if NODE is a result pointer adjusting thunk.  */
   2312 #define DECL_RESULT_THUNK_P(NODE)			\
   2313   (DECL_THUNK_P (NODE) && !LANG_DECL_FN_CHECK (NODE)->this_thunk_p)
   2314 
   2315 /* Nonzero if NODE is a FUNCTION_DECL, but not a thunk.  */
   2316 #define DECL_NON_THUNK_FUNCTION_P(NODE)				\
   2317   (TREE_CODE (NODE) == FUNCTION_DECL && !DECL_THUNK_P (NODE))
   2318 
   2319 /* Nonzero if NODE is `extern "C"'.  */
   2320 #define DECL_EXTERN_C_P(NODE) \
   2321   (DECL_LANGUAGE (NODE) == lang_c)
   2322 
   2323 /* Nonzero if NODE is an `extern "C"' function.  */
   2324 #define DECL_EXTERN_C_FUNCTION_P(NODE) \
   2325   (DECL_NON_THUNK_FUNCTION_P (NODE) && DECL_EXTERN_C_P (NODE))
   2326 
   2327 /* True iff DECL is an entity with vague linkage whose definition is
   2328    available in this translation unit.  */
   2329 #define DECL_REPO_AVAILABLE_P(NODE) \
   2330   (DECL_LANG_SPECIFIC (NODE)->u.base.repo_available_p)
   2331 
   2332 /* True if DECL is declared 'constexpr'.  */
   2333 #define DECL_DECLARED_CONSTEXPR_P(DECL) \
   2334   DECL_LANG_FLAG_8 (VAR_OR_FUNCTION_DECL_CHECK (STRIP_TEMPLATE (DECL)))
   2335 
   2336 /* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a
   2337    template function.  */
   2338 #define DECL_PRETTY_FUNCTION_P(NODE) \
   2339   (TREE_LANG_FLAG_0 (VAR_DECL_CHECK (NODE)))
   2340 
   2341 /* The _TYPE context in which this _DECL appears.  This field holds the
   2342    class where a virtual function instance is actually defined.  */
   2343 #define DECL_CLASS_CONTEXT(NODE) \
   2344   (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE)
   2345 
   2346 /* For a non-member friend function, the class (if any) in which this
   2347    friend was defined.  For example, given:
   2348 
   2349      struct S { friend void f (); };
   2350 
   2351    the DECL_FRIEND_CONTEXT for `f' will be `S'.  */
   2352 #define DECL_FRIEND_CONTEXT(NODE)				\
   2353   ((DECL_DECLARES_FUNCTION_P (NODE)				\
   2354     && DECL_FRIEND_P (NODE) && !DECL_FUNCTION_MEMBER_P (NODE))	\
   2355    ? LANG_DECL_FN_CHECK (NODE)->context				\
   2356    : NULL_TREE)
   2357 
   2358 /* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT.  */
   2359 #define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \
   2360   (LANG_DECL_FN_CHECK (NODE)->context = (CONTEXT))
   2361 
   2362 #define CP_DECL_CONTEXT(NODE) \
   2363   (!DECL_FILE_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : global_namespace)
   2364 #define CP_TYPE_CONTEXT(NODE) \
   2365   (!TYPE_FILE_SCOPE_P (NODE) ? TYPE_CONTEXT (NODE) : global_namespace)
   2366 #define FROB_CONTEXT(NODE) \
   2367   ((NODE) == global_namespace ? DECL_CONTEXT (NODE) : (NODE))
   2368 
   2369 /* 1 iff NODE has namespace scope, including the global namespace.  */
   2370 #define DECL_NAMESPACE_SCOPE_P(NODE)				\
   2371   (!DECL_TEMPLATE_PARM_P (NODE)					\
   2372    && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL)
   2373 
   2374 #define TYPE_NAMESPACE_SCOPE_P(NODE) \
   2375   (TREE_CODE (CP_TYPE_CONTEXT (NODE)) == NAMESPACE_DECL)
   2376 
   2377 #define NAMESPACE_SCOPE_P(NODE) \
   2378   ((DECL_P (NODE) && DECL_NAMESPACE_SCOPE_P (NODE)) \
   2379    || (TYPE_P (NODE) && TYPE_NAMESPACE_SCOPE_P (NODE)))
   2380 
   2381 /* 1 iff NODE is a class member.  */
   2382 #define DECL_CLASS_SCOPE_P(NODE) \
   2383   (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE)))
   2384 
   2385 #define TYPE_CLASS_SCOPE_P(NODE) \
   2386   (TYPE_CONTEXT (NODE) && TYPE_P (TYPE_CONTEXT (NODE)))
   2387 
   2388 /* 1 iff NODE is function-local.  */
   2389 #define DECL_FUNCTION_SCOPE_P(NODE) \
   2390   (DECL_CONTEXT (NODE) \
   2391    && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL)
   2392 
   2393 #define TYPE_FUNCTION_SCOPE_P(NODE) \
   2394   (TYPE_CONTEXT (NODE) && TREE_CODE (TYPE_CONTEXT (NODE)) == FUNCTION_DECL)
   2395 
   2396 /* 1 iff VAR_DECL node NODE is a type-info decl.  This flag is set for
   2397    both the primary typeinfo object and the associated NTBS name.  */
   2398 #define DECL_TINFO_P(NODE) TREE_LANG_FLAG_4 (VAR_DECL_CHECK (NODE))
   2399 
   2400 /* 1 iff VAR_DECL node NODE is virtual table or VTT.  */
   2401 #define DECL_VTABLE_OR_VTT_P(NODE) TREE_LANG_FLAG_5 (VAR_DECL_CHECK (NODE))
   2402 
   2403 /* Returns 1 iff VAR_DECL is a construction virtual table.
   2404    DECL_VTABLE_OR_VTT_P will be true in this case and must be checked
   2405    before using this macro.  */
   2406 #define DECL_CONSTRUCTION_VTABLE_P(NODE) \
   2407   TREE_LANG_FLAG_6 (VAR_DECL_CHECK (NODE))
   2408 
   2409 /* 1 iff NODE is function-local, but for types.  */
   2410 #define LOCAL_CLASS_P(NODE)				\
   2411   (decl_function_context (TYPE_MAIN_DECL (NODE)) != NULL_TREE)
   2412 
   2413 /* For a NAMESPACE_DECL: the list of using namespace directives
   2414    The PURPOSE is the used namespace, the value is the namespace
   2415    that is the common ancestor.  */
   2416 #define DECL_NAMESPACE_USING(NODE) DECL_VINDEX (NAMESPACE_DECL_CHECK (NODE))
   2417 
   2418 /* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users
   2419    of a namespace, to record the transitive closure of using namespace.  */
   2420 #define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NAMESPACE_DECL_CHECK (NODE))
   2421 
   2422 /* In a NAMESPACE_DECL, the list of namespaces which have associated
   2423    themselves with this one.  */
   2424 #define DECL_NAMESPACE_ASSOCIATIONS(NODE) \
   2425   (NAMESPACE_DECL_CHECK (NODE)->decl_non_common.saved_tree)
   2426 
   2427 /* In a NAMESPACE_DECL, points to the original namespace if this is
   2428    a namespace alias.  */
   2429 #define DECL_NAMESPACE_ALIAS(NODE) \
   2430 	DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE))
   2431 #define ORIGINAL_NAMESPACE(NODE)  \
   2432   (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE))
   2433 
   2434 /* Nonzero if NODE is the std namespace.  */
   2435 #define DECL_NAMESPACE_STD_P(NODE)			\
   2436   (TREE_CODE (NODE) == NAMESPACE_DECL			\
   2437    && CP_DECL_CONTEXT (NODE) == global_namespace	\
   2438    && DECL_NAME (NODE) == std_identifier)
   2439 
   2440 /* In a TREE_LIST concatenating using directives, indicate indirect
   2441    directives  */
   2442 #define TREE_INDIRECT_USING(NODE) (TREE_LIST_CHECK (NODE)->base.lang_flag_0)
   2443 
   2444 /* In a TREE_LIST in an attribute list, indicates that the attribute
   2445    must be applied at instantiation time.  */
   2446 #define ATTR_IS_DEPENDENT(NODE) (TREE_LIST_CHECK (NODE)->base.lang_flag_0)
   2447 
   2448 extern tree decl_shadowed_for_var_lookup (tree);
   2449 extern void decl_shadowed_for_var_insert (tree, tree);
   2450 
   2451 /* Non zero if this is a using decl for a dependent scope. */
   2452 #define DECL_DEPENDENT_P(NODE) DECL_LANG_FLAG_0 (USING_DECL_CHECK (NODE))
   2453 
   2454 /* The scope named in a using decl.  */
   2455 #define USING_DECL_SCOPE(NODE) TREE_TYPE (USING_DECL_CHECK (NODE))
   2456 
   2457 /* The decls named by a using decl.  */
   2458 #define USING_DECL_DECLS(NODE) DECL_INITIAL (USING_DECL_CHECK (NODE))
   2459 
   2460 /* In a VAR_DECL, true if we have a shadowed local variable
   2461    in the shadowed var table for this VAR_DECL.  */
   2462 #define DECL_HAS_SHADOWED_FOR_VAR_P(NODE) \
   2463   (VAR_DECL_CHECK (NODE)->decl_with_vis.shadowed_for_var_p)
   2464 
   2465 /* In a VAR_DECL for a variable declared in a for statement,
   2466    this is the shadowed (local) variable.  */
   2467 #define DECL_SHADOWED_FOR_VAR(NODE) \
   2468   (DECL_HAS_SHADOWED_FOR_VAR_P(NODE) ? decl_shadowed_for_var_lookup (NODE) : NULL)
   2469 
   2470 #define SET_DECL_SHADOWED_FOR_VAR(NODE, VAL) \
   2471   (decl_shadowed_for_var_insert (NODE, VAL))
   2472 
   2473 /* In a FUNCTION_DECL, this is nonzero if this function was defined in
   2474    the class definition.  We have saved away the text of the function,
   2475    but have not yet processed it.  */
   2476 #define DECL_PENDING_INLINE_P(NODE) \
   2477   (LANG_DECL_FN_CHECK (NODE)->pending_inline_p)
   2478 
   2479 /* If DECL_PENDING_INLINE_P holds, this is the saved text of the
   2480    function.  */
   2481 #define DECL_PENDING_INLINE_INFO(NODE) \
   2482   (LANG_DECL_FN_CHECK (NODE)->u.pending_inline_info)
   2483 
   2484 /* For a class type: if this structure has many fields, we'll sort them
   2485    and put them into a TREE_VEC.  */
   2486 #define CLASSTYPE_SORTED_FIELDS(NODE) \
   2487   (LANG_TYPE_CLASS_CHECK (NODE)->sorted_fields)
   2488 
   2489 /* If non-NULL for a VAR_DECL, FUNCTION_DECL, TYPE_DECL or
   2490    TEMPLATE_DECL, the entity is either a template specialization (if
   2491    DECL_USE_TEMPLATE is nonzero) or the abstract instance of the
   2492    template itself.
   2493 
   2494    In either case, DECL_TEMPLATE_INFO is a TREE_LIST, whose
   2495    TREE_PURPOSE is the TEMPLATE_DECL of which this entity is a
   2496    specialization or abstract instance.  The TREE_VALUE is the
   2497    template arguments used to specialize the template.
   2498 
   2499    Consider:
   2500 
   2501       template <typename T> struct S { friend void f(T) {} };
   2502 
   2503    In this case, S<int>::f is, from the point of view of the compiler,
   2504    an instantiation of a template -- but, from the point of view of
   2505    the language, each instantiation of S results in a wholly unrelated
   2506    global function f.  In this case, DECL_TEMPLATE_INFO for S<int>::f
   2507    will be non-NULL, but DECL_USE_TEMPLATE will be zero.  */
   2508 #define DECL_TEMPLATE_INFO(NODE) \
   2509   (DECL_LANG_SPECIFIC (VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK (NODE)) \
   2510    ->u.min.template_info)
   2511 
   2512 /* For a VAR_DECL, indicates that the variable is actually a
   2513    non-static data member of anonymous union that has been promoted to
   2514    variable status.  */
   2515 #define DECL_ANON_UNION_VAR_P(NODE) \
   2516   (DECL_LANG_FLAG_4 (VAR_DECL_CHECK (NODE)))
   2517 
   2518 /* Template information for a RECORD_TYPE or UNION_TYPE.  */
   2519 #define CLASSTYPE_TEMPLATE_INFO(NODE) \
   2520   (LANG_TYPE_CLASS_CHECK (RECORD_OR_UNION_CHECK (NODE))->template_info)
   2521 
   2522 /* Template information for an ENUMERAL_TYPE.  Although an enumeration may
   2523    not be a primary template, it may be declared within the scope of a
   2524    primary template and the enumeration constants may depend on
   2525    non-type template parameters.  */
   2526 #define ENUM_TEMPLATE_INFO(NODE) \
   2527   (TYPE_LANG_SLOT_1 (ENUMERAL_TYPE_CHECK (NODE)))
   2528 
   2529 /* Template information for a template template parameter.  */
   2530 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) \
   2531   (LANG_TYPE_CLASS_CHECK (BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK (NODE)) \
   2532    ->template_info)
   2533 
   2534 /* Template information for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
   2535 #define TYPE_TEMPLATE_INFO(NODE)			\
   2536   (TREE_CODE (NODE) == ENUMERAL_TYPE			\
   2537    ? ENUM_TEMPLATE_INFO (NODE) :			\
   2538    (TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM	\
   2539     ? TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (NODE) :	\
   2540     (TYPE_LANG_SPECIFIC (NODE)				\
   2541      ? CLASSTYPE_TEMPLATE_INFO (NODE)			\
   2542      : NULL_TREE)))
   2543 
   2544 /* Set the template information for an ENUMERAL_, RECORD_, or
   2545    UNION_TYPE to VAL.  */
   2546 #define SET_TYPE_TEMPLATE_INFO(NODE, VAL)	\
   2547   (TREE_CODE (NODE) == ENUMERAL_TYPE		\
   2548    ? (ENUM_TEMPLATE_INFO (NODE) = (VAL))	\
   2549    : (CLASSTYPE_TEMPLATE_INFO (NODE) = (VAL)))
   2550 
   2551 #define TI_TEMPLATE(NODE) TREE_TYPE (TEMPLATE_INFO_CHECK (NODE))
   2552 #define TI_ARGS(NODE) TREE_CHAIN (TEMPLATE_INFO_CHECK (NODE))
   2553 #define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE)
   2554 /* For a given TREE_VEC containing a template argument list,
   2555    this property contains the number of arguments that are not
   2556    defaulted.  */
   2557 #define NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) TREE_CHAIN (TREE_VEC_CHECK (NODE))
   2558 /* Below are the setter and getter of the NON_DEFAULT_TEMPLATE_ARGS_COUNT
   2559    property.  */
   2560 #define SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE, INT_VALUE) \
   2561   NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) = build_int_cst (NULL_TREE, INT_VALUE)
   2562 #ifdef ENABLE_CHECKING
   2563 #define GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
   2564     int_cst_value (NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE))
   2565 #else
   2566 #define GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
   2567   NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE) \
   2568   ? int_cst_value (NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE)) \
   2569   : TREE_VEC_LENGTH (INNERMOST_TEMPLATE_ARGS (NODE))
   2570 #endif
   2571 /* The list of typedefs - used in the template - that need
   2572    access checking at template instantiation time.  */
   2573 #define TI_TYPEDEFS_NEEDING_ACCESS_CHECKING(NODE) \
   2574   ((struct tree_template_info*)TEMPLATE_INFO_CHECK \
   2575      (NODE))->typedefs_needing_access_checking
   2576 
   2577 /* We use TREE_VECs to hold template arguments.  If there is only one
   2578    level of template arguments, then the TREE_VEC contains the
   2579    arguments directly.  If there is more than one level of template
   2580    arguments, then each entry in the TREE_VEC is itself a TREE_VEC,
   2581    containing the template arguments for a single level.  The first
   2582    entry in the outer TREE_VEC is the outermost level of template
   2583    parameters; the last is the innermost.
   2584 
   2585    It is incorrect to ever form a template argument vector containing
   2586    only one level of arguments, but which is a TREE_VEC containing as
   2587    its only entry the TREE_VEC for that level.
   2588 
   2589    For each TREE_VEC containing the template arguments for a single
   2590    level, it's possible to get or set the number of non defaulted
   2591    template arguments by using the accessor macros
   2592    GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT or
   2593    SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT.  */
   2594 
   2595 /* Nonzero if the template arguments is actually a vector of vectors,
   2596    rather than just a vector.  */
   2597 #define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE)		     \
   2598   (NODE && TREE_VEC_LENGTH (NODE) && TREE_VEC_ELT (NODE, 0)  \
   2599    && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC)
   2600 
   2601 /* The depth of a template argument vector.  When called directly by
   2602    the parser, we use a TREE_LIST rather than a TREE_VEC to represent
   2603    template arguments.  In fact, we may even see NULL_TREE if there
   2604    are no template arguments.  In both of those cases, there is only
   2605    one level of template arguments.  */
   2606 #define TMPL_ARGS_DEPTH(NODE)					\
   2607   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE) : 1)
   2608 
   2609 /* The LEVELth level of the template ARGS.  The outermost level of
   2610    args is level 1, not level 0.  */
   2611 #define TMPL_ARGS_LEVEL(ARGS, LEVEL)		\
   2612   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS)	\
   2613    ? TREE_VEC_ELT (ARGS, (LEVEL) - 1) : (ARGS))
   2614 
   2615 /* Set the LEVELth level of the template ARGS to VAL.  This macro does
   2616    not work with single-level argument vectors.  */
   2617 #define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL)	\
   2618   (TREE_VEC_ELT (ARGS, (LEVEL) - 1) = (VAL))
   2619 
   2620 /* Accesses the IDXth parameter in the LEVELth level of the ARGS.  */
   2621 #define TMPL_ARG(ARGS, LEVEL, IDX)				\
   2622   (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX))
   2623 
   2624 /* Given a single level of template arguments in NODE, return the
   2625    number of arguments.  */
   2626 #define NUM_TMPL_ARGS(NODE)				\
   2627   (TREE_VEC_LENGTH (NODE))
   2628 
   2629 /* Returns the innermost level of template arguments in ARGS.  */
   2630 #define INNERMOST_TEMPLATE_ARGS(NODE) \
   2631   (get_innermost_template_args ((NODE), 1))
   2632 
   2633 /* The number of levels of template parameters given by NODE.  */
   2634 #define TMPL_PARMS_DEPTH(NODE) \
   2635   ((HOST_WIDE_INT) TREE_INT_CST_LOW (TREE_PURPOSE (NODE)))
   2636 
   2637 /* The TEMPLATE_DECL instantiated or specialized by NODE.  This
   2638    TEMPLATE_DECL will be the immediate parent, not the most general
   2639    template.  For example, in:
   2640 
   2641       template <class T> struct S { template <class U> void f(U); }
   2642 
   2643    the FUNCTION_DECL for S<int>::f<double> will have, as its
   2644    DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'.
   2645 
   2646    As a special case, for a member friend template of a template
   2647    class, this value will not be a TEMPLATE_DECL, but rather an
   2648    IDENTIFIER_NODE or OVERLOAD indicating the name of the template and
   2649    any explicit template arguments provided.  For example, in:
   2650 
   2651      template <class T> struct S { friend void f<int>(int, double); }
   2652 
   2653    the DECL_TI_TEMPLATE will be an IDENTIFIER_NODE for `f' and the
   2654    DECL_TI_ARGS will be {int}.  */
   2655 #define DECL_TI_TEMPLATE(NODE)      TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
   2656 
   2657 /* The template arguments used to obtain this decl from the most
   2658    general form of DECL_TI_TEMPLATE.  For the example given for
   2659    DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}.  These
   2660    are always the full set of arguments required to instantiate this
   2661    declaration from the most general template specialized here.  */
   2662 #define DECL_TI_ARGS(NODE)	    TI_ARGS (DECL_TEMPLATE_INFO (NODE))
   2663 
   2664 /* The TEMPLATE_DECL associated with NODE, a class type.  Even if NODE
   2665    will be generated from a partial specialization, the TEMPLATE_DECL
   2666    referred to here will be the original template.  For example,
   2667    given:
   2668 
   2669       template <typename T> struct S {};
   2670       template <typename T> struct S<T*> {};
   2671 
   2672    the CLASSTPYE_TI_TEMPLATE for S<int*> will be S, not the S<T*>.  */
   2673 #define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
   2674 #define CLASSTYPE_TI_ARGS(NODE)     TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
   2675 
   2676 /* For a template instantiation TYPE, returns the TYPE corresponding
   2677    to the primary template.  Otherwise returns TYPE itself.  */
   2678 #define CLASSTYPE_PRIMARY_TEMPLATE_TYPE(TYPE)				\
   2679   ((CLASSTYPE_USE_TEMPLATE ((TYPE))					\
   2680     && !CLASSTYPE_TEMPLATE_SPECIALIZATION ((TYPE)))			\
   2681    ? TREE_TYPE (DECL_TEMPLATE_RESULT (DECL_PRIMARY_TEMPLATE		\
   2682 				      (CLASSTYPE_TI_TEMPLATE ((TYPE))))) \
   2683    : (TYPE))
   2684 
   2685 /* Like CLASS_TI_TEMPLATE, but also works for ENUMERAL_TYPEs.  */
   2686 #define TYPE_TI_TEMPLATE(NODE)			\
   2687   (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE)))
   2688 
   2689 /* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
   2690 #define TYPE_TI_ARGS(NODE)			\
   2691   (TI_ARGS (TYPE_TEMPLATE_INFO (NODE)))
   2692 
   2693 #define INNERMOST_TEMPLATE_PARMS(NODE)  TREE_VALUE (NODE)
   2694 
   2695 /* Nonzero if NODE (a TEMPLATE_DECL) is a member template, in the
   2696    sense of [temp.mem].  */
   2697 #define DECL_MEMBER_TEMPLATE_P(NODE) \
   2698   (DECL_LANG_FLAG_1 (TEMPLATE_DECL_CHECK (NODE)))
   2699 
   2700 /* Nonzero if the NODE corresponds to the template parameters for a
   2701    member template, whose inline definition is being processed after
   2702    the class definition is complete.  */
   2703 #define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE)
   2704 
   2705 /* Determine if a parameter (i.e., a PARM_DECL) is a function
   2706    parameter pack.  */
   2707 #define FUNCTION_PARAMETER_PACK_P(NODE) \
   2708   (DECL_LANG_FLAG_1 (PARM_DECL_CHECK (NODE)))
   2709 
   2710 /* Determines if NODE is an expansion of one or more parameter packs,
   2711    e.g., a TYPE_PACK_EXPANSION or EXPR_PACK_EXPANSION.  */
   2712 #define PACK_EXPANSION_P(NODE)                 \
   2713   (TREE_CODE (NODE) == TYPE_PACK_EXPANSION     \
   2714    || TREE_CODE (NODE) == EXPR_PACK_EXPANSION)
   2715 
   2716 /* Extracts the type or expression pattern from a TYPE_PACK_EXPANSION or
   2717    EXPR_PACK_EXPANSION.  */
   2718 #define PACK_EXPANSION_PATTERN(NODE)                            \
   2719   (TREE_CODE (NODE) == TYPE_PACK_EXPANSION? TREE_TYPE (NODE)    \
   2720    : TREE_OPERAND (NODE, 0))
   2721 
   2722 /* Sets the type or expression pattern for a TYPE_PACK_EXPANSION or
   2723    EXPR_PACK_EXPANSION.  */
   2724 #define SET_PACK_EXPANSION_PATTERN(NODE,VALUE)  \
   2725   if (TREE_CODE (NODE) == TYPE_PACK_EXPANSION)  \
   2726     TREE_TYPE (NODE) = VALUE;                   \
   2727   else                                          \
   2728     TREE_OPERAND (NODE, 0) = VALUE
   2729 
   2730 /* The list of parameter packs used in the PACK_EXPANSION_* node. The
   2731    TREE_VALUE of each TREE_LIST contains the parameter packs.  */
   2732 #define PACK_EXPANSION_PARAMETER_PACKS(NODE) TREE_CHAIN (NODE)
   2733 
   2734 /* Determine if this is an argument pack.  */
   2735 #define ARGUMENT_PACK_P(NODE)                          \
   2736   (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK              \
   2737    || TREE_CODE (NODE) == NONTYPE_ARGUMENT_PACK)
   2738 
   2739 /* The arguments stored in an argument pack. Arguments are stored in a
   2740    TREE_VEC, which may have length zero.  */
   2741 #define ARGUMENT_PACK_ARGS(NODE)                               \
   2742   (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK? TREE_TYPE (NODE)    \
   2743    : TREE_OPERAND (NODE, 0))
   2744 
   2745 /* Set the arguments stored in an argument pack. VALUE must be a
   2746    TREE_VEC.  */
   2747 #define SET_ARGUMENT_PACK_ARGS(NODE,VALUE)     \
   2748   if (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK)  \
   2749     TREE_TYPE (NODE) = VALUE;                           \
   2750   else                                                  \
   2751     TREE_OPERAND (NODE, 0) = VALUE
   2752 
   2753 /* Whether the argument pack is "incomplete", meaning that more
   2754    arguments can still be deduced. Incomplete argument packs are only
   2755    used when the user has provided an explicit template argument list
   2756    for a variadic function template. Some of the explicit template
   2757    arguments will be placed into the beginning of the argument pack,
   2758    but additional arguments might still be deduced.  */
   2759 #define ARGUMENT_PACK_INCOMPLETE_P(NODE)        \
   2760   TREE_LANG_FLAG_0 (ARGUMENT_PACK_ARGS (NODE))
   2761 
   2762 /* When ARGUMENT_PACK_INCOMPLETE_P, stores the explicit template
   2763    arguments used to fill this pack.  */
   2764 #define ARGUMENT_PACK_EXPLICIT_ARGS(NODE)       \
   2765   TREE_TYPE (ARGUMENT_PACK_ARGS (NODE))
   2766 
   2767 /* In an ARGUMENT_PACK_SELECT, the argument pack from which an
   2768    argument will be selected.  */
   2769 #define ARGUMENT_PACK_SELECT_FROM_PACK(NODE)				\
   2770   (((struct tree_argument_pack_select *)ARGUMENT_PACK_SELECT_CHECK (NODE))->argument_pack)
   2771 
   2772 /* In an ARGUMENT_PACK_SELECT, the index of the argument we want to
   2773    select.  */
   2774 #define ARGUMENT_PACK_SELECT_INDEX(NODE)				\
   2775   (((struct tree_argument_pack_select *)ARGUMENT_PACK_SELECT_CHECK (NODE))->index)
   2776 
   2777 /* In an ARGUMENT_PACK_SELECT, the actual underlying argument that the
   2778    ARGUMENT_PACK_SELECT represents. */
   2779 #define ARGUMENT_PACK_SELECT_ARG(NODE)					\
   2780   TREE_VEC_ELT (ARGUMENT_PACK_ARGS (ARGUMENT_PACK_SELECT_FROM_PACK (NODE)), \
   2781 	        ARGUMENT_PACK_SELECT_INDEX (NODE));
   2782 
   2783 /* In a FUNCTION_DECL, the saved language-specific per-function data.  */
   2784 #define DECL_SAVED_FUNCTION_DATA(NODE)			\
   2785   (LANG_DECL_FN_CHECK (FUNCTION_DECL_CHECK (NODE))	\
   2786    ->u.saved_language_function)
   2787 
   2788 /* Indicates an indirect_expr is for converting a reference.  */
   2789 #define REFERENCE_REF_P(NODE) \
   2790   TREE_LANG_FLAG_0 (INDIRECT_REF_CHECK (NODE))
   2791 
   2792 #define NEW_EXPR_USE_GLOBAL(NODE) \
   2793   TREE_LANG_FLAG_0 (NEW_EXPR_CHECK (NODE))
   2794 #define DELETE_EXPR_USE_GLOBAL(NODE) \
   2795   TREE_LANG_FLAG_0 (DELETE_EXPR_CHECK (NODE))
   2796 #define DELETE_EXPR_USE_VEC(NODE) \
   2797   TREE_LANG_FLAG_1 (DELETE_EXPR_CHECK (NODE))
   2798 
   2799 /* Indicates that this is a non-dependent COMPOUND_EXPR which will
   2800    resolve to a function call.  */
   2801 #define COMPOUND_EXPR_OVERLOADED(NODE) \
   2802   TREE_LANG_FLAG_0 (COMPOUND_EXPR_CHECK (NODE))
   2803 
   2804 /* In a CALL_EXPR appearing in a template, true if Koenig lookup
   2805    should be performed at instantiation time.  */
   2806 #define KOENIG_LOOKUP_P(NODE) TREE_LANG_FLAG_0 (CALL_EXPR_CHECK (NODE))
   2807 
   2808 /* Indicates whether a string literal has been parenthesized. Such
   2809    usages are disallowed in certain circumstances.  */
   2810 
   2811 #define PAREN_STRING_LITERAL_P(NODE) \
   2812   TREE_LANG_FLAG_0 (STRING_CST_CHECK (NODE))
   2813 
   2814 /* Nonzero if this AGGR_INIT_EXPR provides for initialization via a
   2815    constructor call, rather than an ordinary function call.  */
   2816 #define AGGR_INIT_VIA_CTOR_P(NODE) \
   2817   TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE))
   2818 
   2819 /* Nonzero if expanding this AGGR_INIT_EXPR should first zero-initialize
   2820    the object.  */
   2821 #define AGGR_INIT_ZERO_FIRST(NODE) \
   2822   TREE_LANG_FLAG_2 (AGGR_INIT_EXPR_CHECK (NODE))
   2823 
   2824 /* AGGR_INIT_EXPR accessors.  These are equivalent to the CALL_EXPR
   2825    accessors, except for AGGR_INIT_EXPR_SLOT (which takes the place of
   2826    CALL_EXPR_STATIC_CHAIN).  */
   2827 
   2828 #define AGGR_INIT_EXPR_FN(NODE) TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 1)
   2829 #define AGGR_INIT_EXPR_SLOT(NODE) \
   2830   TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 2)
   2831 #define AGGR_INIT_EXPR_ARG(NODE, I) \
   2832   TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), (I) + 3)
   2833 #define aggr_init_expr_nargs(NODE) (VL_EXP_OPERAND_LENGTH(NODE) - 3)
   2834 
   2835 /* AGGR_INIT_EXPR_ARGP returns a pointer to the argument vector for NODE.
   2836    We can't use &AGGR_INIT_EXPR_ARG (NODE, 0) because that will complain if
   2837    the argument count is zero when checking is enabled.  Instead, do
   2838    the pointer arithmetic to advance past the 3 fixed operands in a
   2839    AGGR_INIT_EXPR.  That produces a valid pointer to just past the end of
   2840    the operand array, even if it's not valid to dereference it.  */
   2841 #define AGGR_INIT_EXPR_ARGP(NODE) \
   2842   (&(TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 0)) + 3)
   2843 
   2844 /* Abstract iterators for AGGR_INIT_EXPRs.  */
   2845 
   2846 /* Structure containing iterator state.  */
   2847 typedef struct aggr_init_expr_arg_iterator_d {
   2848   tree t;	/* the aggr_init_expr */
   2849   int n;	/* argument count */
   2850   int i;	/* next argument index */
   2851 } aggr_init_expr_arg_iterator;
   2852 
   2853 /* Initialize the abstract argument list iterator object ITER with the
   2854    arguments from AGGR_INIT_EXPR node EXP.  */
   2855 static inline void
   2856 init_aggr_init_expr_arg_iterator (tree exp,
   2857 				       aggr_init_expr_arg_iterator *iter)
   2858 {
   2859   iter->t = exp;
   2860   iter->n = aggr_init_expr_nargs (exp);
   2861   iter->i = 0;
   2862 }
   2863 
   2864 /* Return the next argument from abstract argument list iterator object ITER,
   2865    and advance its state.  Return NULL_TREE if there are no more arguments.  */
   2866 static inline tree
   2867 next_aggr_init_expr_arg (aggr_init_expr_arg_iterator *iter)
   2868 {
   2869   tree result;
   2870   if (iter->i >= iter->n)
   2871     return NULL_TREE;
   2872   result = AGGR_INIT_EXPR_ARG (iter->t, iter->i);
   2873   iter->i++;
   2874   return result;
   2875 }
   2876 
   2877 /* Initialize the abstract argument list iterator object ITER, then advance
   2878    past and return the first argument.  Useful in for expressions, e.g.
   2879      for (arg = first_aggr_init_expr_arg (exp, &iter); arg;
   2880           arg = next_aggr_init_expr_arg (&iter))   */
   2881 static inline tree
   2882 first_aggr_init_expr_arg (tree exp, aggr_init_expr_arg_iterator *iter)
   2883 {
   2884   init_aggr_init_expr_arg_iterator (exp, iter);
   2885   return next_aggr_init_expr_arg (iter);
   2886 }
   2887 
   2888 /* Test whether there are more arguments in abstract argument list iterator
   2889    ITER, without changing its state.  */
   2890 static inline bool
   2891 more_aggr_init_expr_args_p (const aggr_init_expr_arg_iterator *iter)
   2892 {
   2893   return (iter->i < iter->n);
   2894 }
   2895 
   2896 /* Iterate through each argument ARG of AGGR_INIT_EXPR CALL, using variable
   2897    ITER (of type aggr_init_expr_arg_iterator) to hold the iteration state.  */
   2898 #define FOR_EACH_AGGR_INIT_EXPR_ARG(arg, iter, call)			\
   2899   for ((arg) = first_aggr_init_expr_arg ((call), &(iter)); (arg);	\
   2900        (arg) = next_aggr_init_expr_arg (&(iter)))
   2901 
   2902 /* VEC_INIT_EXPR accessors.  */
   2903 #define VEC_INIT_EXPR_SLOT(NODE) TREE_OPERAND (NODE, 0)
   2904 #define VEC_INIT_EXPR_INIT(NODE) TREE_OPERAND (NODE, 1)
   2905 
   2906 /* Indicates that a VEC_INIT_EXPR is a potential constant expression.
   2907    Only set when the current function is constexpr.  */
   2908 #define VEC_INIT_EXPR_IS_CONSTEXPR(NODE) \
   2909   TREE_LANG_FLAG_0 (VEC_INIT_EXPR_CHECK (NODE))
   2910 
   2911 /* Indicates that a VEC_INIT_EXPR is expressing value-initialization.  */
   2912 #define VEC_INIT_EXPR_VALUE_INIT(NODE) \
   2913   TREE_LANG_FLAG_1 (VEC_INIT_EXPR_CHECK (NODE))
   2914 
   2915 /* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a
   2916    TEMPLATE_DECL.  This macro determines whether or not a given class
   2917    type is really a template type, as opposed to an instantiation or
   2918    specialization of one.  */
   2919 #define CLASSTYPE_IS_TEMPLATE(NODE)  \
   2920   (CLASSTYPE_TEMPLATE_INFO (NODE)    \
   2921    && !CLASSTYPE_USE_TEMPLATE (NODE) \
   2922    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
   2923 
   2924 /* The name used by the user to name the typename type.  Typically,
   2925    this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the
   2926    corresponding TYPE_DECL.  However, this may also be a
   2927    TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'.  */
   2928 #define TYPENAME_TYPE_FULLNAME(NODE) (TYPENAME_TYPE_CHECK (NODE))->type.values
   2929 
   2930 /* True if a TYPENAME_TYPE was declared as an "enum".  */
   2931 #define TYPENAME_IS_ENUM_P(NODE) \
   2932   (TREE_LANG_FLAG_0 (TYPENAME_TYPE_CHECK (NODE)))
   2933 
   2934 /* True if a TYPENAME_TYPE was declared as a "class", "struct", or
   2935    "union".  */
   2936 #define TYPENAME_IS_CLASS_P(NODE) \
   2937   (TREE_LANG_FLAG_1 (TYPENAME_TYPE_CHECK (NODE)))
   2938 
   2939 /* True if a TYPENAME_TYPE is in the process of being resolved.  */
   2940 #define TYPENAME_IS_RESOLVING_P(NODE) \
   2941   (TREE_LANG_FLAG_2 (TYPENAME_TYPE_CHECK (NODE)))
   2942 
   2943 /* Nonzero in INTEGER_CST means that this int is negative by dint of
   2944    using a twos-complement negated operand.  */
   2945 #define TREE_NEGATED_INT(NODE) TREE_LANG_FLAG_0 (INTEGER_CST_CHECK (NODE))
   2946 
   2947 /* [class.virtual]
   2948 
   2949    A class that declares or inherits a virtual function is called a
   2950    polymorphic class.  */
   2951 #define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE))
   2952 
   2953 /* Nonzero if this class has a virtual function table pointer.  */
   2954 #define TYPE_CONTAINS_VPTR_P(NODE)		\
   2955   (TYPE_POLYMORPHIC_P (NODE) || CLASSTYPE_VBASECLASSES (NODE))
   2956 
   2957 /* This flag is true of a local VAR_DECL if it was declared in a for
   2958    statement, but we are no longer in the scope of the for.  */
   2959 #define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE))
   2960 
   2961 /* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL
   2962    if we already emitted a warning about using it.  */
   2963 #define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (VAR_DECL_CHECK (NODE))
   2964 
   2965 /* Nonzero if NODE is a FUNCTION_DECL (for a function with global
   2966    scope) declared in a local scope.  */
   2967 #define DECL_LOCAL_FUNCTION_P(NODE) \
   2968   DECL_LANG_FLAG_0 (FUNCTION_DECL_CHECK (NODE))
   2969 
   2970 /* Nonzero if NODE is a DECL which we know about but which has not
   2971    been explicitly declared, such as a built-in function or a friend
   2972    declared inside a class.  In the latter case DECL_HIDDEN_FRIEND_P
   2973    will be set.  */
   2974 #define DECL_ANTICIPATED(NODE) \
   2975   (DECL_LANG_SPECIFIC (DECL_COMMON_CHECK (NODE))->u.base.anticipated_p)
   2976 
   2977 /* Nonzero if NODE is a FUNCTION_DECL which was declared as a friend
   2978    within a class but has not been declared in the surrounding scope.
   2979    The function is invisible except via argument dependent lookup.  */
   2980 #define DECL_HIDDEN_FRIEND_P(NODE) \
   2981   (LANG_DECL_FN_CHECK (DECL_COMMON_CHECK (NODE))->hidden_friend_p)
   2982 
   2983 /* Nonzero if DECL has been declared threadprivate by
   2984    #pragma omp threadprivate.  */
   2985 #define CP_DECL_THREADPRIVATE_P(DECL) \
   2986   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (DECL))->u.base.threadprivate_or_deleted_p)
   2987 
   2988 /* Nonzero if DECL was declared with '= delete'.  */
   2989 #define DECL_DELETED_FN(DECL) \
   2990   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.base.threadprivate_or_deleted_p)
   2991 
   2992 /* Nonzero if DECL was declared with '= default' (maybe implicitly).  */
   2993 #define DECL_DEFAULTED_FN(DECL) \
   2994   (LANG_DECL_FN_CHECK (DECL)->defaulted_p)
   2995 
   2996 /* Nonzero if DECL is explicitly defaulted in the class body.  */
   2997 #define DECL_DEFAULTED_IN_CLASS_P(DECL)					\
   2998   (DECL_DEFAULTED_FN (DECL) && DECL_INITIALIZED_IN_CLASS_P (DECL))
   2999 /* Nonzero if DECL was defaulted outside the class body.  */
   3000 #define DECL_DEFAULTED_OUTSIDE_CLASS_P(DECL)				\
   3001   (DECL_DEFAULTED_FN (DECL)						\
   3002    && !(DECL_ARTIFICIAL (DECL) || DECL_INITIALIZED_IN_CLASS_P (DECL)))
   3003 
   3004 /* Record whether a typedef for type `int' was actually `signed int'.  */
   3005 #define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP)
   3006 
   3007 /* Returns nonzero if DECL has external linkage, as specified by the
   3008    language standard.  (This predicate may hold even when the
   3009    corresponding entity is not actually given external linkage in the
   3010    object file; see decl_linkage for details.)  */
   3011 #define DECL_EXTERNAL_LINKAGE_P(DECL) \
   3012   (decl_linkage (DECL) == lk_external)
   3013 
   3014 /* Keep these codes in ascending code order.  */
   3015 
   3016 #define INTEGRAL_CODE_P(CODE)	\
   3017   ((CODE) == ENUMERAL_TYPE	\
   3018    || (CODE) == BOOLEAN_TYPE	\
   3019    || (CODE) == INTEGER_TYPE)
   3020 
   3021 /* [basic.fundamental]
   3022 
   3023    Types  bool, char, wchar_t, and the signed and unsigned integer types
   3024    are collectively called integral types.
   3025 
   3026    Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration
   3027    types as well, which is incorrect in C++.  Keep these checks in
   3028    ascending code order.  */
   3029 #define CP_INTEGRAL_TYPE_P(TYPE)		\
   3030   (TREE_CODE (TYPE) == BOOLEAN_TYPE		\
   3031    || TREE_CODE (TYPE) == INTEGER_TYPE)
   3032 
   3033 /* Returns true if TYPE is an integral or enumeration name.  Keep
   3034    these checks in ascending code order.  */
   3035 #define INTEGRAL_OR_ENUMERATION_TYPE_P(TYPE) \
   3036    (TREE_CODE (TYPE) == ENUMERAL_TYPE || CP_INTEGRAL_TYPE_P (TYPE))
   3037 
   3038 /* Returns true if TYPE is an integral or unscoped enumeration type.  */
   3039 #define INTEGRAL_OR_UNSCOPED_ENUMERATION_TYPE_P(TYPE) \
   3040    (UNSCOPED_ENUM_P (TYPE) || CP_INTEGRAL_TYPE_P (TYPE))
   3041 
   3042 /* True if the class type TYPE is a literal type.  */
   3043 #define CLASSTYPE_LITERAL_P(TYPE)              \
   3044    (LANG_TYPE_CLASS_CHECK (TYPE)->is_literal)
   3045 
   3046 /* [basic.fundamental]
   3047 
   3048    Integral and floating types are collectively called arithmetic
   3049    types.
   3050 
   3051    As a GNU extension, we also accept complex types.
   3052 
   3053    Keep these checks in ascending code order.  */
   3054 #define ARITHMETIC_TYPE_P(TYPE) \
   3055   (CP_INTEGRAL_TYPE_P (TYPE) \
   3056    || TREE_CODE (TYPE) == REAL_TYPE \
   3057    || TREE_CODE (TYPE) == COMPLEX_TYPE)
   3058 
   3059 /* True iff TYPE is cv decltype(nullptr).  */
   3060 #define NULLPTR_TYPE_P(TYPE) (TREE_CODE (TYPE) == NULLPTR_TYPE)
   3061 
   3062 /* [basic.types]
   3063 
   3064    Arithmetic types, enumeration types, pointer types,
   3065    pointer-to-member types, and std::nullptr_t are collectively called
   3066    scalar types.
   3067 
   3068    Keep these checks in ascending code order.  */
   3069 #define SCALAR_TYPE_P(TYPE)			\
   3070   (TYPE_PTRMEM_P (TYPE)				\
   3071    || TREE_CODE (TYPE) == ENUMERAL_TYPE		\
   3072    || ARITHMETIC_TYPE_P (TYPE)			\
   3073    || TYPE_PTR_P (TYPE)				\
   3074    || TYPE_PTRMEMFUNC_P (TYPE)                  \
   3075    || NULLPTR_TYPE_P (TYPE))
   3076 
   3077 /* Determines whether this type is a C++0x scoped enumeration
   3078    type. Scoped enumerations types are introduced via "enum class" or
   3079    "enum struct", e.g.,
   3080 
   3081      enum class Color {
   3082        Red, Green, Blue
   3083      };
   3084 
   3085    Scoped enumeration types are different from normal (unscoped)
   3086    enumeration types in several ways:
   3087 
   3088      - The enumerators of a scoped enumeration type are only available
   3089        within the scope of the enumeration type and not in the
   3090        enclosing scope. For example, the Red color can be referred to
   3091        with "Color::Red" but not "Red".
   3092 
   3093      - Scoped enumerators and enumerations do not implicitly convert
   3094        to integers or 'bool'.
   3095 
   3096      - The underlying type of the enum is well-defined.  */
   3097 #define SCOPED_ENUM_P(TYPE)                                             \
   3098   (TREE_CODE (TYPE) == ENUMERAL_TYPE && ENUM_IS_SCOPED (TYPE))
   3099 
   3100 /* Determine whether this is an unscoped enumeration type.  */
   3101 #define UNSCOPED_ENUM_P(TYPE)                                           \
   3102   (TREE_CODE (TYPE) == ENUMERAL_TYPE && !ENUM_IS_SCOPED (TYPE))
   3103 
   3104 /* Set the flag indicating whether an ENUMERAL_TYPE is a C++0x scoped
   3105    enumeration type (1) or a normal (unscoped) enumeration type
   3106    (0).  */
   3107 #define SET_SCOPED_ENUM_P(TYPE, VAL)                    \
   3108   (ENUM_IS_SCOPED (TYPE) = (VAL))
   3109 
   3110 #define SET_OPAQUE_ENUM_P(TYPE, VAL)                    \
   3111   (ENUM_IS_OPAQUE (TYPE) = (VAL))
   3112 
   3113 #define OPAQUE_ENUM_P(TYPE)				\
   3114   (TREE_CODE (TYPE) == ENUMERAL_TYPE && ENUM_IS_OPAQUE (TYPE))
   3115 
   3116 /* Determines whether an ENUMERAL_TYPE has an explicit
   3117    underlying type.  */
   3118 #define ENUM_FIXED_UNDERLYING_TYPE_P(NODE) (TYPE_LANG_FLAG_5 (NODE))
   3119 
   3120 /* Returns the underlying type of the given enumeration type. The
   3121    underlying type is determined in different ways, depending on the
   3122    properties of the enum:
   3123 
   3124      - In C++0x, the underlying type can be explicitly specified, e.g.,
   3125 
   3126          enum E1 : char { ... } // underlying type is char
   3127 
   3128      - In a C++0x scoped enumeration, the underlying type is int
   3129        unless otherwises specified:
   3130 
   3131          enum class E2 { ... } // underlying type is int
   3132 
   3133      - Otherwise, the underlying type is determined based on the
   3134        values of the enumerators. In this case, the
   3135        ENUM_UNDERLYING_TYPE will not be set until after the definition
   3136        of the enumeration is completed by finish_enum.  */
   3137 #define ENUM_UNDERLYING_TYPE(TYPE) \
   3138   TREE_TYPE (ENUMERAL_TYPE_CHECK (TYPE))
   3139 
   3140 /* [dcl.init.aggr]
   3141 
   3142    An aggregate is an array or a class with no user-declared
   3143    constructors, no private or protected non-static data members, no
   3144    base classes, and no virtual functions.
   3145 
   3146    As an extension, we also treat vectors as aggregates.  Keep these
   3147    checks in ascending code order.  */
   3148 #define CP_AGGREGATE_TYPE_P(TYPE)				\
   3149   (TREE_CODE (TYPE) == VECTOR_TYPE				\
   3150    ||TREE_CODE (TYPE) == ARRAY_TYPE				\
   3151    || (CLASS_TYPE_P (TYPE) && !CLASSTYPE_NON_AGGREGATE (TYPE)))
   3152 
   3153 /* Nonzero for a class type means that the class type has a
   3154    user-declared constructor.  */
   3155 #define TYPE_HAS_USER_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1 (NODE))
   3156 
   3157 /* When appearing in an INDIRECT_REF, it means that the tree structure
   3158    underneath is actually a call to a constructor.  This is needed
   3159    when the constructor must initialize local storage (which can
   3160    be automatically destroyed), rather than allowing it to allocate
   3161    space from the heap.
   3162 
   3163    When appearing in a SAVE_EXPR, it means that underneath
   3164    is a call to a constructor.
   3165 
   3166    When appearing in a CONSTRUCTOR, the expression is a
   3167    compound literal.
   3168 
   3169    When appearing in a FIELD_DECL, it means that this field
   3170    has been duly initialized in its constructor.  */
   3171 #define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4 (NODE))
   3172 
   3173 /* True if NODE is a brace-enclosed initializer.  */
   3174 #define BRACE_ENCLOSED_INITIALIZER_P(NODE) \
   3175   (TREE_CODE (NODE) == CONSTRUCTOR && TREE_TYPE (NODE) == init_list_type_node)
   3176 
   3177 /* True if NODE is a compound-literal, i.e., a brace-enclosed
   3178    initializer cast to a particular type.  */
   3179 #define COMPOUND_LITERAL_P(NODE) \
   3180   (TREE_CODE (NODE) == CONSTRUCTOR && TREE_HAS_CONSTRUCTOR (NODE))
   3181 
   3182 #define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \
   3183 				   && VEC_empty (constructor_elt, \
   3184 						 CONSTRUCTOR_ELTS (NODE)) \
   3185 				   && !TREE_HAS_CONSTRUCTOR (NODE))
   3186 
   3187 /* True if NODE is a init-list used as a direct-initializer, i.e.
   3188    B b{1,2}, not B b({1,2}) or B b = {1,2}.  */
   3189 #define CONSTRUCTOR_IS_DIRECT_INIT(NODE) (TREE_LANG_FLAG_0 (CONSTRUCTOR_CHECK (NODE)))
   3190 
   3191 /* Nonzero means that an object of this type can not be initialized using
   3192    an initializer list.  */
   3193 #define CLASSTYPE_NON_AGGREGATE(NODE) \
   3194   (LANG_TYPE_CLASS_CHECK (NODE)->non_aggregate)
   3195 #define TYPE_NON_AGGREGATE_CLASS(NODE) \
   3196   (CLASS_TYPE_P (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
   3197 
   3198 /* Nonzero if there is a non-trivial X::op=(cv X&) for this class.  */
   3199 #define TYPE_HAS_COMPLEX_COPY_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_copy_assign)
   3200 
   3201 /* Nonzero if there is a non-trivial X::X(cv X&) for this class.  */
   3202 #define TYPE_HAS_COMPLEX_COPY_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_copy_ctor)
   3203 
   3204 /* Nonzero if there is a non-trivial X::op=(X&&) for this class.  */
   3205 #define TYPE_HAS_COMPLEX_MOVE_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_move_assign)
   3206 
   3207 /* Nonzero if there is a non-trivial X::X(X&&) for this class.  */
   3208 #define TYPE_HAS_COMPLEX_MOVE_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_move_ctor)
   3209 
   3210 /* Nonzero if there is a non-trivial default constructor for this class.  */
   3211 #define TYPE_HAS_COMPLEX_DFLT(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_dflt)
   3212 
   3213 /* Nonzero if TYPE has a trivial destructor.  From [class.dtor]:
   3214 
   3215      A destructor is trivial if it is an implicitly declared
   3216      destructor and if:
   3217 
   3218        - all of the direct base classes of its class have trivial
   3219 	 destructors,
   3220 
   3221        - for all of the non-static data members of its class that are
   3222 	 of class type (or array thereof), each such class has a
   3223 	 trivial destructor.  */
   3224 #define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \
   3225   (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE))
   3226 
   3227 /* Nonzero for _TYPE node means that this type does not have a trivial
   3228    destructor.  Therefore, destroying an object of this type will
   3229    involve a call to a destructor.  This can apply to objects of
   3230    ARRAY_TYPE is the type of the elements needs a destructor.  */
   3231 #define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \
   3232   (TYPE_LANG_FLAG_4 (NODE))
   3233 
   3234 /* Nonzero for class type means that the default constructor is trivial.  */
   3235 #define TYPE_HAS_TRIVIAL_DFLT(NODE) \
   3236   (TYPE_HAS_DEFAULT_CONSTRUCTOR (NODE) && ! TYPE_HAS_COMPLEX_DFLT (NODE))
   3237 
   3238 /* Nonzero for class type means that copy initialization of this type can use
   3239    a bitwise copy.  */
   3240 #define TYPE_HAS_TRIVIAL_COPY_CTOR(NODE) \
   3241   (TYPE_HAS_COPY_CTOR (NODE) && ! TYPE_HAS_COMPLEX_COPY_CTOR (NODE))
   3242 
   3243 /* Nonzero for class type means that assignment of this type can use
   3244    a bitwise copy.  */
   3245 #define TYPE_HAS_TRIVIAL_COPY_ASSIGN(NODE) \
   3246   (TYPE_HAS_COPY_ASSIGN (NODE) && ! TYPE_HAS_COMPLEX_COPY_ASSIGN (NODE))
   3247 
   3248 /* Returns true if NODE is a pointer-to-data-member.  */
   3249 #define TYPE_PTRMEM_P(NODE)			\
   3250   (TREE_CODE (NODE) == OFFSET_TYPE)
   3251 /* Returns true if NODE is a pointer.  */
   3252 #define TYPE_PTR_P(NODE)			\
   3253   (TREE_CODE (NODE) == POINTER_TYPE)
   3254 
   3255 /* Returns true if NODE is an object type:
   3256 
   3257      [basic.types]
   3258 
   3259      An object type is a (possibly cv-qualified) type that is not a
   3260      function type, not a reference type, and not a void type.
   3261 
   3262    Keep these checks in ascending order, for speed.  */
   3263 #define TYPE_OBJ_P(NODE)			\
   3264   (TREE_CODE (NODE) != REFERENCE_TYPE		\
   3265    && TREE_CODE (NODE) != VOID_TYPE		\
   3266    && TREE_CODE (NODE) != FUNCTION_TYPE		\
   3267    && TREE_CODE (NODE) != METHOD_TYPE)
   3268 
   3269 /* Returns true if NODE is a pointer to an object.  Keep these checks
   3270    in ascending tree code order.  */
   3271 #define TYPE_PTROB_P(NODE)					\
   3272   (TYPE_PTR_P (NODE) && TYPE_OBJ_P (TREE_TYPE (NODE)))
   3273 
   3274 /* Returns true if NODE is a reference to an object.  Keep these checks
   3275    in ascending tree code order.  */
   3276 #define TYPE_REF_OBJ_P(NODE)					\
   3277   (TREE_CODE (NODE) == REFERENCE_TYPE && TYPE_OBJ_P (TREE_TYPE (NODE)))
   3278 
   3279 /* Returns true if NODE is a pointer to an object, or a pointer to
   3280    void.  Keep these checks in ascending tree code order.  */
   3281 #define TYPE_PTROBV_P(NODE)					\
   3282   (TYPE_PTR_P (NODE)						\
   3283    && !(TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE		\
   3284 	|| TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE))
   3285 
   3286 /* Returns true if NODE is a pointer to function.  */
   3287 #define TYPE_PTRFN_P(NODE)				\
   3288   (TREE_CODE (NODE) == POINTER_TYPE			\
   3289    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
   3290 
   3291 /* Returns true if NODE is a reference to function.  */
   3292 #define TYPE_REFFN_P(NODE)				\
   3293   (TREE_CODE (NODE) == REFERENCE_TYPE			\
   3294    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
   3295 
   3296 /* Nonzero for _TYPE node means that this type is a pointer to member
   3297    function type.  */
   3298 #define TYPE_PTRMEMFUNC_P(NODE)		\
   3299   (TREE_CODE (NODE) == RECORD_TYPE	\
   3300    && TYPE_LANG_SPECIFIC (NODE)		\
   3301    && TYPE_PTRMEMFUNC_FLAG (NODE))
   3302 
   3303 #define TYPE_PTRMEMFUNC_FLAG(NODE) \
   3304   (LANG_TYPE_CLASS_CHECK (NODE)->ptrmemfunc_flag)
   3305 
   3306 /* Returns true if NODE is a pointer-to-member.  */
   3307 #define TYPE_PTR_TO_MEMBER_P(NODE) \
   3308   (TYPE_PTRMEM_P (NODE) || TYPE_PTRMEMFUNC_P (NODE))
   3309 
   3310 /* Indicates when overload resolution may resolve to a pointer to
   3311    member function. [expr.unary.op]/3 */
   3312 #define PTRMEM_OK_P(NODE) \
   3313   TREE_LANG_FLAG_0 (TREE_CHECK2 ((NODE), ADDR_EXPR, OFFSET_REF))
   3314 
   3315 /* Get the POINTER_TYPE to the METHOD_TYPE associated with this
   3316    pointer to member function.  TYPE_PTRMEMFUNC_P _must_ be true,
   3317    before using this macro.  */
   3318 #define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \
   3319   (TREE_TYPE (TYPE_FIELDS (NODE)))
   3320 
   3321 /* Returns `A' for a type like `int (A::*)(double)' */
   3322 #define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \
   3323   TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
   3324 
   3325 /* These are use to manipulate the canonical RECORD_TYPE from the
   3326    hashed POINTER_TYPE, and can only be used on the POINTER_TYPE.  */
   3327 #define TYPE_GET_PTRMEMFUNC_TYPE(NODE) \
   3328   (TYPE_LANG_SPECIFIC (NODE) ? LANG_TYPE_PTRMEM_CHECK (NODE)->record : NULL)
   3329 #define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE)				\
   3330   do {									\
   3331     if (TYPE_LANG_SPECIFIC (NODE) == NULL)				\
   3332       {									\
   3333 	TYPE_LANG_SPECIFIC (NODE) = ggc_alloc_cleared_lang_type		\
   3334 	 (sizeof (struct lang_type_ptrmem));				\
   3335 	TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.h.is_lang_type_class = 0;	\
   3336       }									\
   3337     TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.record = (VALUE);		\
   3338   } while (0)
   3339 
   3340 /* For a pointer-to-member type of the form `T X::*', this is `X'.
   3341    For a type like `void (X::*)() const', this type is `X', not `const
   3342    X'.  To get at the `const X' you have to look at the
   3343    TYPE_PTRMEM_POINTED_TO_TYPE; there, the first parameter will have
   3344    type `const X*'.  */
   3345 #define TYPE_PTRMEM_CLASS_TYPE(NODE)			\
   3346   (TYPE_PTRMEM_P (NODE)					\
   3347    ? TYPE_OFFSET_BASETYPE (NODE)		\
   3348    : TYPE_PTRMEMFUNC_OBJECT_TYPE (NODE))
   3349 
   3350 /* For a pointer-to-member type of the form `T X::*', this is `T'.  */
   3351 #define TYPE_PTRMEM_POINTED_TO_TYPE(NODE)		\
   3352    (TYPE_PTRMEM_P (NODE)				\
   3353     ? TREE_TYPE (NODE)					\
   3354     : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
   3355 
   3356 /* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for
   3357    `X'.  */
   3358 #define PTRMEM_CST_CLASS(NODE) \
   3359   TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE)))
   3360 
   3361 /* For a pointer-to-member constant `X::Y' this is the _DECL for
   3362    `Y'.  */
   3363 #define PTRMEM_CST_MEMBER(NODE) (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member)
   3364 
   3365 /* The expression in question for a TYPEOF_TYPE.  */
   3366 #define TYPEOF_TYPE_EXPR(NODE) (TYPEOF_TYPE_CHECK (NODE))->type.values
   3367 
   3368 /* The expression in question for a DECLTYPE_TYPE.  */
   3369 #define DECLTYPE_TYPE_EXPR(NODE) (DECLTYPE_TYPE_CHECK (NODE))->type.values
   3370 
   3371 /* Whether the DECLTYPE_TYPE_EXPR of NODE was originally parsed as an
   3372    id-expression or a member-access expression. When false, it was
   3373    parsed as a full expression.  */
   3374 #define DECLTYPE_TYPE_ID_EXPR_OR_MEMBER_ACCESS_P(NODE) \
   3375   (DECLTYPE_TYPE_CHECK (NODE))->type.string_flag
   3376 
   3377 /* These flags indicate that we want different semantics from normal
   3378    decltype: lambda capture just drops references, lambda return also does
   3379    type decay.  */
   3380 #define DECLTYPE_FOR_LAMBDA_CAPTURE(NODE) \
   3381   TREE_LANG_FLAG_0 (DECLTYPE_TYPE_CHECK (NODE))
   3382 #define DECLTYPE_FOR_LAMBDA_RETURN(NODE) \
   3383   TREE_LANG_FLAG_1 (DECLTYPE_TYPE_CHECK (NODE))
   3384 
   3385 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
   3386    specified in its declaration.  This can also be set for an
   3387    erroneously declared PARM_DECL.  */
   3388 #define DECL_THIS_EXTERN(NODE) \
   3389   DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
   3390 
   3391 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
   3392    specified in its declaration.  This can also be set for an
   3393    erroneously declared PARM_DECL.  */
   3394 #define DECL_THIS_STATIC(NODE) \
   3395   DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
   3396 
   3397 /* Nonzero for FIELD_DECL node means that this field is a base class
   3398    of the parent object, as opposed to a member field.  */
   3399 #define DECL_FIELD_IS_BASE(NODE) \
   3400   DECL_LANG_FLAG_6 (FIELD_DECL_CHECK (NODE))
   3401 
   3402 /* Nonzero for FIELD_DECL node means that this field is a simple (no
   3403    explicit initializer) lambda capture field, making it invisible to
   3404    name lookup in unevaluated contexts.  */
   3405 #define DECL_NORMAL_CAPTURE_P(NODE) \
   3406   DECL_LANG_FLAG_7 (FIELD_DECL_CHECK (NODE))
   3407 
   3408 /* Nonzero if TYPE is an anonymous union or struct type.  We have to use a
   3409    flag for this because "A union for which objects or pointers are
   3410    declared is not an anonymous union" [class.union].  */
   3411 #define ANON_AGGR_TYPE_P(NODE)				\
   3412   (CLASS_TYPE_P (NODE) && LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr)
   3413 #define SET_ANON_AGGR_TYPE_P(NODE)			\
   3414   (LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr = 1)
   3415 
   3416 /* Nonzero if TYPE is an anonymous union type.  */
   3417 #define ANON_UNION_TYPE_P(NODE) \
   3418   (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE))
   3419 
   3420 /* Define fields and accessors for nodes representing declared names.  */
   3421 
   3422 #define TYPE_WAS_ANONYMOUS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->was_anonymous)
   3423 
   3424 /* C++: all of these are overloaded!  These apply only to TYPE_DECLs.  */
   3425 
   3426 /* The format of each node in the DECL_FRIENDLIST is as follows:
   3427 
   3428    The TREE_PURPOSE will be the name of a function, i.e., an
   3429    IDENTIFIER_NODE.  The TREE_VALUE will be itself a TREE_LIST, whose
   3430    TREE_VALUEs are friends with the given name.  */
   3431 #define DECL_FRIENDLIST(NODE)		(DECL_INITIAL (NODE))
   3432 #define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
   3433 #define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
   3434 
   3435 /* The DECL_ACCESS, if non-NULL, is a TREE_LIST.  The TREE_PURPOSE of
   3436    each node is a type; the TREE_VALUE is the access granted for this
   3437    DECL in that type.  The DECL_ACCESS is set by access declarations.
   3438    For example, if a member that would normally be public in a
   3439    derived class is made protected, then the derived class and the
   3440    protected_access_node will appear in the DECL_ACCESS for the node.  */
   3441 #define DECL_ACCESS(NODE) (LANG_DECL_U2_CHECK (NODE, 0)->access)
   3442 
   3443 /* Nonzero if the FUNCTION_DECL is a global constructor.  */
   3444 #define DECL_GLOBAL_CTOR_P(NODE) \
   3445   (LANG_DECL_FN_CHECK (NODE)->global_ctor_p)
   3446 
   3447 /* Nonzero if the FUNCTION_DECL is a global destructor.  */
   3448 #define DECL_GLOBAL_DTOR_P(NODE) \
   3449   (LANG_DECL_FN_CHECK (NODE)->global_dtor_p)
   3450 
   3451 /* Accessor macros for C++ template decl nodes.  */
   3452 
   3453 /* The DECL_TEMPLATE_PARMS are a list.  The TREE_PURPOSE of each node
   3454    is a INT_CST whose TREE_INT_CST_LOW indicates the level of the
   3455    template parameters, with 1 being the outermost set of template
   3456    parameters.  The TREE_VALUE is a vector, whose elements are the
   3457    template parameters at each level.  Each element in the vector is a
   3458    TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a
   3459    non-type parameter), or a TYPE_DECL (if the parameter is a type
   3460    parameter).  The TREE_PURPOSE is the default value, if any.  The
   3461    TEMPLATE_PARM_INDEX for the parameter is available as the
   3462    DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a
   3463    TYPE_DECL).  */
   3464 #define DECL_TEMPLATE_PARMS(NODE)       DECL_NON_COMMON_CHECK (NODE)->decl_non_common.arguments
   3465 #define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
   3466    INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
   3467 #define DECL_NTPARMS(NODE) \
   3468    TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
   3469 /* For function, method, class-data templates.  */
   3470 #define DECL_TEMPLATE_RESULT(NODE)      DECL_RESULT_FLD (NODE)
   3471 /* For a function template at namespace scope, DECL_TEMPLATE_INSTANTIATIONS
   3472    lists all instantiations and specializations of the function so that
   3473    tsubst_friend_function can reassign them to another template if we find
   3474    that the namespace-scope template is really a partial instantiation of a
   3475    friend template.
   3476 
   3477    For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds
   3478    all instantiations and specializations of the class type, including
   3479    partial instantiations and partial specializations, so that if we
   3480    explicitly specialize a partial instantiation we can walk the list
   3481    in maybe_process_partial_specialization and reassign them or complain
   3482    as appropriate.
   3483 
   3484    In both cases, the TREE_PURPOSE of each node contains the arguments
   3485    used; the TREE_VALUE contains the generated variable.  The template
   3486    arguments are always complete.  For example, given:
   3487 
   3488       template <class T> struct S1 {
   3489 	template <class U> struct S2 {};
   3490 	template <class U> struct S2<U*> {};
   3491       };
   3492 
   3493    the record for the partial specialization will contain, as its
   3494    argument list, { {T}, {U*} }, and will be on the
   3495    DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template
   3496    <class U> struct S1<T>::S2'.
   3497 
   3498    This list is not used for other templates.  */
   3499 #define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX (NODE)
   3500 /* For a class template, this list contains the partial
   3501    specializations of this template.  (Full specializations are not
   3502    recorded on this list.)  The TREE_PURPOSE holds the arguments used
   3503    in the partial specialization (e.g., for `template <class T> struct
   3504    S<T*, int>' this will be `T*'.)  The arguments will also include
   3505    any outer template arguments.  The TREE_VALUE holds the innermost
   3506    template parameters for the specialization (e.g., `T' in the
   3507    example above.)  The TREE_TYPE is the _TYPE node for the partial
   3508    specialization.
   3509 
   3510    This list is not used for other templates.  */
   3511 #define DECL_TEMPLATE_SPECIALIZATIONS(NODE)     DECL_SIZE (NODE)
   3512 
   3513 /* Nonzero for a DECL which is actually a template parameter.  Keep
   3514    these checks in ascending tree code order.   */
   3515 #define DECL_TEMPLATE_PARM_P(NODE)		\
   3516   (DECL_LANG_FLAG_0 (NODE)			\
   3517    && (TREE_CODE (NODE) == CONST_DECL		\
   3518        || TREE_CODE (NODE) == PARM_DECL		\
   3519        || TREE_CODE (NODE) == TYPE_DECL		\
   3520        || TREE_CODE (NODE) == TEMPLATE_DECL))
   3521 
   3522 /* Mark NODE as a template parameter.  */
   3523 #define SET_DECL_TEMPLATE_PARM_P(NODE) \
   3524   (DECL_LANG_FLAG_0 (NODE) = 1)
   3525 
   3526 /* Nonzero if NODE is a template template parameter.  */
   3527 #define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \
   3528   (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE))
   3529 
   3530 /* Nonzero if NODE is a TEMPLATE_DECL representing an
   3531    UNBOUND_CLASS_TEMPLATE tree node.  */
   3532 #define DECL_UNBOUND_CLASS_TEMPLATE_P(NODE) \
   3533   (TREE_CODE (NODE) == TEMPLATE_DECL && !DECL_TEMPLATE_RESULT (NODE))
   3534 
   3535 #define DECL_FUNCTION_TEMPLATE_P(NODE)  \
   3536   (TREE_CODE (NODE) == TEMPLATE_DECL \
   3537    && !DECL_UNBOUND_CLASS_TEMPLATE_P (NODE) \
   3538    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
   3539 
   3540 /* Nonzero for a DECL that represents a template class.  */
   3541 #define DECL_CLASS_TEMPLATE_P(NODE)				\
   3542   (TREE_CODE (NODE) == TEMPLATE_DECL				\
   3543    && DECL_TEMPLATE_RESULT (NODE) != NULL_TREE			\
   3544    && DECL_IMPLICIT_TYPEDEF_P (DECL_TEMPLATE_RESULT (NODE)))
   3545 
   3546 /* Nonzero if NODE which declares a type.  */
   3547 #define DECL_DECLARES_TYPE_P(NODE) \
   3548   (TREE_CODE (NODE) == TYPE_DECL || DECL_CLASS_TEMPLATE_P (NODE))
   3549 
   3550 /* Nonzero if NODE declares a function.  */
   3551 #define DECL_DECLARES_FUNCTION_P(NODE) \
   3552   (TREE_CODE (NODE) == FUNCTION_DECL || DECL_FUNCTION_TEMPLATE_P (NODE))
   3553 
   3554 /* Nonzero if NODE is the typedef implicitly generated for a type when
   3555    the type is declared.  In C++, `struct S {};' is roughly
   3556    equivalent to `struct S {}; typedef struct S S;' in C.
   3557    DECL_IMPLICIT_TYPEDEF_P will hold for the typedef indicated in this
   3558    example.  In C++, there is a second implicit typedef for each
   3559    class, in the scope of `S' itself, so that you can say `S::S'.
   3560    DECL_SELF_REFERENCE_P will hold for that second typedef.  */
   3561 #define DECL_IMPLICIT_TYPEDEF_P(NODE) \
   3562   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_2 (NODE))
   3563 #define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \
   3564   (DECL_LANG_FLAG_2 (NODE) = 1)
   3565 #define DECL_SELF_REFERENCE_P(NODE) \
   3566   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_4 (NODE))
   3567 #define SET_DECL_SELF_REFERENCE_P(NODE) \
   3568   (DECL_LANG_FLAG_4 (NODE) = 1)
   3569 
   3570 /* A `primary' template is one that has its own template header.  A
   3571    member function of a class template is a template, but not primary.
   3572    A member template is primary.  Friend templates are primary, too.  */
   3573 
   3574 /* Returns the primary template corresponding to these parameters.  */
   3575 #define DECL_PRIMARY_TEMPLATE(NODE) \
   3576   (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)))
   3577 
   3578 /* Returns nonzero if NODE is a primary template.  */
   3579 #define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == (NODE))
   3580 
   3581 /* Nonzero iff NODE is a specialization of a template.  The value
   3582    indicates the type of specializations:
   3583 
   3584      1=implicit instantiation
   3585 
   3586      2=partial or explicit specialization, e.g.:
   3587 
   3588         template <> int min<int> (int, int),
   3589 
   3590      3=explicit instantiation, e.g.:
   3591 
   3592         template int min<int> (int, int);
   3593 
   3594    Note that NODE will be marked as a specialization even if the
   3595    template it is instantiating is not a primary template.  For
   3596    example, given:
   3597 
   3598      template <typename T> struct O {
   3599        void f();
   3600        struct I {};
   3601      };
   3602 
   3603    both O<int>::f and O<int>::I will be marked as instantiations.
   3604 
   3605    If DECL_USE_TEMPLATE is nonzero, then DECL_TEMPLATE_INFO will also
   3606    be non-NULL.  */
   3607 #define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC (NODE)->u.base.use_template)
   3608 
   3609 /* Like DECL_USE_TEMPLATE, but for class types.  */
   3610 #define CLASSTYPE_USE_TEMPLATE(NODE) \
   3611   (LANG_TYPE_CLASS_CHECK (NODE)->use_template)
   3612 
   3613 /* True if NODE is a specialization of a primary template.  */
   3614 #define CLASSTYPE_SPECIALIZATION_OF_PRIMARY_TEMPLATE_P(NODE)	\
   3615   (CLASS_TYPE_P (NODE)						\
   3616    && CLASSTYPE_USE_TEMPLATE (NODE)				\
   3617    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
   3618 
   3619 #define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
   3620 #define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
   3621   (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
   3622 
   3623 #define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
   3624 #define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
   3625 
   3626 /* Returns true for an explicit or partial specialization of a class
   3627    template.  */
   3628 #define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
   3629   (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
   3630 #define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
   3631   (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
   3632 
   3633 #define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
   3634 #define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
   3635 #define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
   3636   (CLASSTYPE_USE_TEMPLATE (NODE) == 1)
   3637 #define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
   3638   (CLASSTYPE_USE_TEMPLATE (NODE) = 1)
   3639 
   3640 #define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
   3641 #define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
   3642 #define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
   3643   (CLASSTYPE_USE_TEMPLATE (NODE) == 3)
   3644 #define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
   3645   (CLASSTYPE_USE_TEMPLATE (NODE) = 3)
   3646 
   3647 /* Nonzero if DECL is a friend function which is an instantiation
   3648    from the point of view of the compiler, but not from the point of
   3649    view of the language.  For example given:
   3650       template <class T> struct S { friend void f(T) {}; };
   3651    the declaration of `void f(int)' generated when S<int> is
   3652    instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be
   3653    a DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION.  */
   3654 #define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \
   3655   (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL))
   3656 
   3657 /* Nonzero iff we are currently processing a declaration for an
   3658    entity with its own template parameter list, and which is not a
   3659    full specialization.  */
   3660 #define PROCESSING_REAL_TEMPLATE_DECL_P() \
   3661   (processing_template_decl > template_class_depth (current_scope ()))
   3662 
   3663 /* Nonzero if this VAR_DECL or FUNCTION_DECL has already been
   3664    instantiated, i.e. its definition has been generated from the
   3665    pattern given in the template.  */
   3666 #define DECL_TEMPLATE_INSTANTIATED(NODE) \
   3667   DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE))
   3668 
   3669 /* We know what we're doing with this decl now.  */
   3670 #define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
   3671 
   3672 /* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
   3673    so that assemble_external will work properly.  So we have this flag to
   3674    tell us whether the decl is really not external.
   3675 
   3676    This flag does not indicate whether or not the decl is defined in the
   3677    current translation unit; it indicates whether or not we should emit the
   3678    decl at the end of compilation if it is defined and needed.  */
   3679 #define DECL_NOT_REALLY_EXTERN(NODE) \
   3680   (DECL_LANG_SPECIFIC (NODE)->u.base.not_really_extern)
   3681 
   3682 #define DECL_REALLY_EXTERN(NODE) \
   3683   (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE))
   3684 
   3685 /* A thunk is a stub function.
   3686 
   3687    A thunk is an alternate entry point for an ordinary FUNCTION_DECL.
   3688    The address of the ordinary FUNCTION_DECL is given by the
   3689    DECL_INITIAL, which is always an ADDR_EXPR whose operand is a
   3690    FUNCTION_DECL.  The job of the thunk is to either adjust the this
   3691    pointer before transferring control to the FUNCTION_DECL, or call
   3692    FUNCTION_DECL and then adjust the result value. Note, the result
   3693    pointer adjusting thunk must perform a call to the thunked
   3694    function, (or be implemented via passing some invisible parameter
   3695    to the thunked function, which is modified to perform the
   3696    adjustment just before returning).
   3697 
   3698    A thunk may perform either, or both, of the following operations:
   3699 
   3700    o Adjust the this or result pointer by a constant offset.
   3701    o Adjust the this or result pointer by looking up a vcall or vbase offset
   3702      in the vtable.
   3703 
   3704    A this pointer adjusting thunk converts from a base to a derived
   3705    class, and hence adds the offsets. A result pointer adjusting thunk
   3706    converts from a derived class to a base, and hence subtracts the
   3707    offsets.  If both operations are performed, then the constant
   3708    adjustment is performed first for this pointer adjustment and last
   3709    for the result pointer adjustment.
   3710 
   3711    The constant adjustment is given by THUNK_FIXED_OFFSET.  If the
   3712    vcall or vbase offset is required, THUNK_VIRTUAL_OFFSET is
   3713    used. For this pointer adjusting thunks, it is the vcall offset
   3714    into the vtable.  For result pointer adjusting thunks it is the
   3715    binfo of the virtual base to convert to.  Use that binfo's vbase
   3716    offset.
   3717 
   3718    It is possible to have equivalent covariant thunks.  These are
   3719    distinct virtual covariant thunks whose vbase offsets happen to
   3720    have the same value.  THUNK_ALIAS is used to pick one as the
   3721    canonical thunk, which will get all the this pointer adjusting
   3722    thunks attached to it.  */
   3723 
   3724 /* An integer indicating how many bytes should be subtracted from the
   3725    this or result pointer when this function is called.  */
   3726 #define THUNK_FIXED_OFFSET(DECL) \
   3727   (DECL_LANG_SPECIFIC (THUNK_FUNCTION_CHECK (DECL))->u.fn.u5.fixed_offset)
   3728 
   3729 /* A tree indicating how to perform the virtual adjustment. For a this
   3730    adjusting thunk it is the number of bytes to be added to the vtable
   3731    to find the vcall offset. For a result adjusting thunk, it is the
   3732    binfo of the relevant virtual base.  If NULL, then there is no
   3733    virtual adjust.  (The vptr is always located at offset zero from
   3734    the this or result pointer.)  (If the covariant type is within the
   3735    class hierarchy being laid out, the vbase index is not yet known
   3736    at the point we need to create the thunks, hence the need to use
   3737    binfos.)  */
   3738 
   3739 #define THUNK_VIRTUAL_OFFSET(DECL) \
   3740   (LANG_DECL_U2_CHECK (FUNCTION_DECL_CHECK (DECL), 0)->access)
   3741 
   3742 /* A thunk which is equivalent to another thunk.  */
   3743 #define THUNK_ALIAS(DECL) \
   3744   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.min.template_info)
   3745 
   3746 /* For thunk NODE, this is the FUNCTION_DECL thunked to.  It is
   3747    possible for the target to be a thunk too.  */
   3748 #define THUNK_TARGET(NODE)				\
   3749   (LANG_DECL_FN_CHECK (NODE)->befriending_classes)
   3750 
   3751 /* True for a SCOPE_REF iff the "template" keyword was used to
   3752    indicate that the qualified name denotes a template.  */
   3753 #define QUALIFIED_NAME_IS_TEMPLATE(NODE) \
   3754   (TREE_LANG_FLAG_0 (SCOPE_REF_CHECK (NODE)))
   3755 
   3756 /* True for an OMP_ATOMIC that has dependent parameters.  These are stored
   3757    as an expr in operand 1, and integer_zero_node in operand 0.  */
   3758 #define OMP_ATOMIC_DEPENDENT_P(NODE) \
   3759   (TREE_CODE (TREE_OPERAND (OMP_ATOMIC_CHECK (NODE), 0)) == INTEGER_CST)
   3760 
   3761 /* Used while gimplifying continue statements bound to OMP_FOR nodes.  */
   3762 #define OMP_FOR_GIMPLIFYING_P(NODE) \
   3763   (TREE_LANG_FLAG_0 (OMP_FOR_CHECK (NODE)))
   3764 
   3765 /* A language-specific token attached to the OpenMP data clauses to
   3766    hold code (or code fragments) related to ctors, dtors, and op=.
   3767    See semantics.c for details.  */
   3768 #define CP_OMP_CLAUSE_INFO(NODE) \
   3769   TREE_TYPE (OMP_CLAUSE_RANGE_CHECK (NODE, OMP_CLAUSE_PRIVATE, \
   3770 				     OMP_CLAUSE_COPYPRIVATE))
   3771 
   3772 /* These macros provide convenient access to the various _STMT nodes
   3773    created when parsing template declarations.  */
   3774 #define TRY_STMTS(NODE)		TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0)
   3775 #define TRY_HANDLERS(NODE)	TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1)
   3776 
   3777 #define EH_SPEC_STMTS(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 0)
   3778 #define EH_SPEC_RAISES(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 1)
   3779 
   3780 #define USING_STMT_NAMESPACE(NODE) TREE_OPERAND (USING_STMT_CHECK (NODE), 0)
   3781 
   3782 /* Nonzero if this try block is a function try block.  */
   3783 #define FN_TRY_BLOCK_P(NODE)	TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE))
   3784 #define HANDLER_PARMS(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 0)
   3785 #define HANDLER_BODY(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 1)
   3786 #define HANDLER_TYPE(NODE)	TREE_TYPE (HANDLER_CHECK (NODE))
   3787 
   3788 /* CLEANUP_STMT accessors.  The statement(s) covered, the cleanup to run
   3789    and the VAR_DECL for which this cleanup exists.  */
   3790 #define CLEANUP_BODY(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0)
   3791 #define CLEANUP_EXPR(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1)
   3792 #define CLEANUP_DECL(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 2)
   3793 
   3794 /* IF_STMT accessors. These give access to the condition of the if
   3795    statement, the then block of the if statement, and the else block
   3796    of the if statement if it exists.  */
   3797 #define IF_COND(NODE)		TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
   3798 #define THEN_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
   3799 #define ELSE_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
   3800 
   3801 /* WHILE_STMT accessors. These give access to the condition of the
   3802    while statement and the body of the while statement, respectively.  */
   3803 #define WHILE_COND(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0)
   3804 #define WHILE_BODY(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1)
   3805 
   3806 /* DO_STMT accessors. These give access to the condition of the do
   3807    statement and the body of the do statement, respectively.  */
   3808 #define DO_COND(NODE)		TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
   3809 #define DO_BODY(NODE)		TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
   3810 
   3811 /* FOR_STMT accessors. These give access to the init statement,
   3812    condition, update expression, and body of the for statement,
   3813    respectively.  */
   3814 #define FOR_INIT_STMT(NODE)	TREE_OPERAND (FOR_STMT_CHECK (NODE), 0)
   3815 #define FOR_COND(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 1)
   3816 #define FOR_EXPR(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 2)
   3817 #define FOR_BODY(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 3)
   3818 
   3819 /* RANGE_FOR_STMT accessors. These give access to the declarator,
   3820    expression and body of the statement, respectively.  */
   3821 #define RANGE_FOR_DECL(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 0)
   3822 #define RANGE_FOR_EXPR(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 1)
   3823 #define RANGE_FOR_BODY(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 2)
   3824 
   3825 #define SWITCH_STMT_COND(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0)
   3826 #define SWITCH_STMT_BODY(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1)
   3827 #define SWITCH_STMT_TYPE(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 2)
   3828 
   3829 /* STMT_EXPR accessor.  */
   3830 #define STMT_EXPR_STMT(NODE)	TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
   3831 
   3832 /* EXPR_STMT accessor. This gives the expression associated with an
   3833    expression statement.  */
   3834 #define EXPR_STMT_EXPR(NODE)	TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
   3835 
   3836 /* True if this TARGET_EXPR was created by build_cplus_new, and so we can
   3837    discard it if it isn't useful.  */
   3838 #define TARGET_EXPR_IMPLICIT_P(NODE) \
   3839   TREE_LANG_FLAG_0 (TARGET_EXPR_CHECK (NODE))
   3840 
   3841 /* True if this TARGET_EXPR is the result of list-initialization of a
   3842    temporary.  */
   3843 #define TARGET_EXPR_LIST_INIT_P(NODE) \
   3844   TREE_LANG_FLAG_1 (TARGET_EXPR_CHECK (NODE))
   3845 
   3846 /* True if this TARGET_EXPR expresses direct-initialization of an object
   3847    to be named later.  */
   3848 #define TARGET_EXPR_DIRECT_INIT_P(NODE) \
   3849   TREE_LANG_FLAG_2 (TARGET_EXPR_CHECK (NODE))
   3850 
   3851 /* True if EXPR expresses direct-initialization of a TYPE.  */
   3852 #define DIRECT_INIT_EXPR_P(TYPE,EXPR)					\
   3853   (TREE_CODE (EXPR) == TARGET_EXPR && TREE_LANG_FLAG_2 (EXPR)		\
   3854    && same_type_ignoring_top_level_qualifiers_p (TYPE, TREE_TYPE (EXPR)))
   3855 
   3856 /* An enumeration of the kind of tags that C++ accepts.  */
   3857 enum tag_types {
   3858   none_type = 0, /* Not a tag type.  */
   3859   record_type,   /* "struct" types.  */
   3860   class_type,    /* "class" types.  */
   3861   union_type,    /* "union" types.  */
   3862   enum_type,     /* "enum" types.  */
   3863   typename_type  /* "typename" types.  */
   3864 };
   3865 
   3866 /* The various kinds of lvalues we distinguish.  */
   3867 enum cp_lvalue_kind_flags {
   3868   clk_none = 0,     /* Things that are not an lvalue.  */
   3869   clk_ordinary = 1, /* An ordinary lvalue.  */
   3870   clk_rvalueref = 2,/* An rvalue formed using an rvalue reference */
   3871   clk_class = 4,    /* An rvalue of class-type.  */
   3872   clk_bitfield = 8, /* An lvalue for a bit-field.  */
   3873   clk_packed = 16   /* An lvalue for a packed field.  */
   3874 };
   3875 
   3876 /* This type is used for parameters and variables which hold
   3877    combinations of the flags in enum cp_lvalue_kind_flags.  */
   3878 typedef int cp_lvalue_kind;
   3879 
   3880 /* Various kinds of template specialization, instantiation, etc.  */
   3881 typedef enum tmpl_spec_kind {
   3882   tsk_none,		   /* Not a template at all.  */
   3883   tsk_invalid_member_spec, /* An explicit member template
   3884 			      specialization, but the enclosing
   3885 			      classes have not all been explicitly
   3886 			      specialized.  */
   3887   tsk_invalid_expl_inst,   /* An explicit instantiation containing
   3888 			      template parameter lists.  */
   3889   tsk_excessive_parms,	   /* A template declaration with too many
   3890 			      template parameter lists.  */
   3891   tsk_insufficient_parms,  /* A template declaration with too few
   3892 			      parameter lists.  */
   3893   tsk_template,		   /* A template declaration.  */
   3894   tsk_expl_spec,	   /* An explicit specialization.  */
   3895   tsk_expl_inst		   /* An explicit instantiation.  */
   3896 } tmpl_spec_kind;
   3897 
   3898 /* The various kinds of access.  BINFO_ACCESS depends on these being
   3899    two bit quantities.  The numerical values are important; they are
   3900    used to initialize RTTI data structures, so changing them changes
   3901    the ABI.  */
   3902 typedef enum access_kind {
   3903   ak_none = 0,		   /* Inaccessible.  */
   3904   ak_public = 1,	   /* Accessible, as a `public' thing.  */
   3905   ak_protected = 2,	   /* Accessible, as a `protected' thing.  */
   3906   ak_private = 3	   /* Accessible, as a `private' thing.  */
   3907 } access_kind;
   3908 
   3909 /* The various kinds of special functions.  If you add to this list,
   3910    you should update special_function_p as well.  */
   3911 typedef enum special_function_kind {
   3912   sfk_none = 0,		   /* Not a special function.  This enumeral
   3913 			      must have value zero; see
   3914 			      special_function_p.  */
   3915   sfk_constructor,	   /* A constructor.  */
   3916   sfk_copy_constructor,    /* A copy constructor.  */
   3917   sfk_move_constructor,    /* A move constructor.  */
   3918   sfk_copy_assignment,     /* A copy assignment operator.  */
   3919   sfk_move_assignment,     /* A move assignment operator.  */
   3920   sfk_destructor,	   /* A destructor.  */
   3921   sfk_complete_destructor, /* A destructor for complete objects.  */
   3922   sfk_base_destructor,     /* A destructor for base subobjects.  */
   3923   sfk_deleting_destructor, /* A destructor for complete objects that
   3924 			      deletes the object after it has been
   3925 			      destroyed.  */
   3926   sfk_conversion	   /* A conversion operator.  */
   3927 } special_function_kind;
   3928 
   3929 /* The various kinds of linkage.  From [basic.link],
   3930 
   3931       A name is said to have linkage when it might denote the same
   3932       object, reference, function, type, template, namespace or value
   3933       as a name introduced in another scope:
   3934 
   3935       -- When a name has external linkage, the entity it denotes can
   3936 	 be referred to from scopes of other translation units or from
   3937 	 other scopes of the same translation unit.
   3938 
   3939       -- When a name has internal linkage, the entity it denotes can
   3940 	 be referred to by names from other scopes in the same
   3941 	 translation unit.
   3942 
   3943       -- When a name has no linkage, the entity it denotes cannot be
   3944 	 referred to by names from other scopes.  */
   3945 
   3946 typedef enum linkage_kind {
   3947   lk_none,			/* No linkage.  */
   3948   lk_internal,			/* Internal linkage.  */
   3949   lk_external			/* External linkage.  */
   3950 } linkage_kind;
   3951 
   3952 typedef enum duration_kind {
   3953   dk_static,
   3954   dk_thread,
   3955   dk_auto,
   3956   dk_dynamic
   3957 } duration_kind;
   3958 
   3959 /* Bitmask flags to control type substitution.  */
   3960 enum tsubst_flags {
   3961   tf_none = 0,			 /* nothing special */
   3962   tf_error = 1 << 0,		 /* give error messages  */
   3963   tf_warning = 1 << 1,	 	 /* give warnings too  */
   3964   tf_ignore_bad_quals = 1 << 2,	 /* ignore bad cvr qualifiers */
   3965   tf_keep_type_decl = 1 << 3,	 /* retain typedef type decls
   3966 				    (make_typename_type use) */
   3967   tf_ptrmem_ok = 1 << 4,	 /* pointers to member ok (internal
   3968 				    instantiate_type use) */
   3969   tf_user = 1 << 5,		 /* found template must be a user template
   3970 				    (lookup_template_class use) */
   3971   tf_conv = 1 << 6,		 /* We are determining what kind of
   3972 				    conversion might be permissible,
   3973 				    not actually performing the
   3974 				    conversion.  */
   3975   tf_no_access_control = 1 << 7, /* Do not perform access checks, even
   3976 				    when issuing other errors.   */
   3977   /* Convenient substitution flags combinations.  */
   3978   tf_warning_or_error = tf_warning | tf_error
   3979 };
   3980 
   3981 /* This type is used for parameters and variables which hold
   3982    combinations of the flags in enum tsubst_flags.  */
   3983 typedef int tsubst_flags_t;
   3984 
   3985 /* The kind of checking we can do looking in a class hierarchy.  */
   3986 enum base_access_flags {
   3987   ba_any = 0,  /* Do not check access, allow an ambiguous base,
   3988 		      prefer a non-virtual base */
   3989   ba_unique = 1 << 0,  /* Must be a unique base.  */
   3990   ba_check_bit = 1 << 1,   /* Check access.  */
   3991   ba_check = ba_unique | ba_check_bit,
   3992   ba_ignore_scope = 1 << 2, /* Ignore access allowed by local scope.  */
   3993   ba_quiet = 1 << 3     /* Do not issue error messages.  */
   3994 };
   3995 
   3996 /* This type is used for parameters and variables which hold
   3997    combinations of the flags in enum base_access_flags.  */
   3998 typedef int base_access;
   3999 
   4000 /* The various kinds of access check during parsing.  */
   4001 typedef enum deferring_kind {
   4002   dk_no_deferred = 0, /* Check access immediately */
   4003   dk_deferred = 1,    /* Deferred check */
   4004   dk_no_check = 2     /* No access check */
   4005 } deferring_kind;
   4006 
   4007 /* The kind of base we can find, looking in a class hierarchy.
   4008    Values <0 indicate we failed.  */
   4009 typedef enum base_kind {
   4010   bk_inaccessible = -3,   /* The base is inaccessible */
   4011   bk_ambig = -2,	  /* The base is ambiguous */
   4012   bk_not_base = -1,	  /* It is not a base */
   4013   bk_same_type = 0,	  /* It is the same type */
   4014   bk_proper_base = 1,	  /* It is a proper base */
   4015   bk_via_virtual = 2	  /* It is a proper base, but via a virtual
   4016 			     path. This might not be the canonical
   4017 			     binfo.  */
   4018 } base_kind;
   4019 
   4020 /* Node for "pointer to (virtual) function".
   4021    This may be distinct from ptr_type_node so gdb can distinguish them.  */
   4022 #define vfunc_ptr_type_node  vtable_entry_type
   4023 
   4024 
   4025 /* For building calls to `delete'.  */
   4026 extern GTY(()) tree integer_two_node;
   4027 
   4028 /* The number of function bodies which we are currently processing.
   4029    (Zero if we are at namespace scope, one inside the body of a
   4030    function, two inside the body of a function in a local class, etc.)  */
   4031 extern int function_depth;
   4032 
   4033 /* In parser.c.  */
   4034 
   4035 /* Nonzero if we are parsing an unevaluated operand: an operand to
   4036    sizeof, typeof, or alignof.  This is a count since operands to
   4037    sizeof can be nested.  */
   4038 
   4039 extern int cp_unevaluated_operand;
   4040 extern tree cp_convert_range_for (tree, tree, tree);
   4041 
   4042 /* in pt.c  */
   4043 
   4044 /* These values are used for the `STRICT' parameter to type_unification and
   4045    fn_type_unification.  Their meanings are described with the
   4046    documentation for fn_type_unification.  */
   4047 
   4048 typedef enum unification_kind_t {
   4049   DEDUCE_CALL,
   4050   DEDUCE_CONV,
   4051   DEDUCE_EXACT
   4052 } unification_kind_t;
   4053 
   4054 /* in class.c */
   4055 
   4056 extern int current_class_depth;
   4057 
   4058 /* An array of all local classes present in this translation unit, in
   4059    declaration order.  */
   4060 extern GTY(()) VEC(tree,gc) *local_classes;
   4061 
   4062 /* Here's where we control how name mangling takes place.  */
   4064 
   4065 /* Cannot use '$' up front, because this confuses gdb
   4066    (names beginning with '$' are gdb-local identifiers).
   4067 
   4068    Note that all forms in which the '$' is significant are long enough
   4069    for direct indexing (meaning that if we know there is a '$'
   4070    at a particular location, we can index into the string at
   4071    any other location that provides distinguishing characters).  */
   4072 
   4073 /* Define NO_DOT_IN_LABEL in your favorite tm file if your assembler
   4074    doesn't allow '.' in symbol names.  */
   4075 #ifndef NO_DOT_IN_LABEL
   4076 
   4077 #define JOINER '.'
   4078 
   4079 #define AUTO_TEMP_NAME "_.tmp_"
   4080 #define VFIELD_BASE ".vf"
   4081 #define VFIELD_NAME "_vptr."
   4082 #define VFIELD_NAME_FORMAT "_vptr.%s"
   4083 
   4084 #define ANON_AGGRNAME_FORMAT "._%d"
   4085 
   4086 #else /* NO_DOT_IN_LABEL */
   4087 
   4088 #ifndef NO_DOLLAR_IN_LABEL
   4089 
   4090 #define JOINER '$'
   4091 
   4092 #define AUTO_TEMP_NAME "_$tmp_"
   4093 #define VFIELD_BASE "$vf"
   4094 #define VFIELD_NAME "_vptr$"
   4095 #define VFIELD_NAME_FORMAT "_vptr$%s"
   4096 #define ANON_AGGRNAME_FORMAT "$_%d"
   4097 
   4098 #else /* NO_DOLLAR_IN_LABEL */
   4099 
   4100 #define IN_CHARGE_NAME "__in_chrg"
   4101 #define AUTO_TEMP_NAME "__tmp_"
   4102 #define TEMP_NAME_P(ID_NODE) \
   4103   (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \
   4104 	     sizeof (AUTO_TEMP_NAME) - 1))
   4105 #define VTABLE_NAME "__vt_"
   4106 #define VTABLE_NAME_P(ID_NODE) \
   4107   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
   4108 	     sizeof (VTABLE_NAME) - 1))
   4109 #define VFIELD_BASE "__vfb"
   4110 #define VFIELD_NAME "__vptr_"
   4111 #define VFIELD_NAME_P(ID_NODE) \
   4112   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
   4113 	    sizeof (VFIELD_NAME) - 1))
   4114 #define VFIELD_NAME_FORMAT "__vptr_%s"
   4115 
   4116 #define ANON_AGGRNAME_PREFIX "__anon_"
   4117 #define ANON_AGGRNAME_P(ID_NODE) \
   4118   (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \
   4119 	     sizeof (ANON_AGGRNAME_PREFIX) - 1))
   4120 #define ANON_AGGRNAME_FORMAT "__anon_%d"
   4121 
   4122 #endif	/* NO_DOLLAR_IN_LABEL */
   4123 #endif	/* NO_DOT_IN_LABEL */
   4124 
   4125 #define THIS_NAME "this"
   4126 
   4127 #define IN_CHARGE_NAME "__in_chrg"
   4128 
   4129 #define VTBL_PTR_TYPE		"__vtbl_ptr_type"
   4130 #define VTABLE_DELTA_NAME	"__delta"
   4131 #define VTABLE_PFN_NAME		"__pfn"
   4132 
   4133 #define LAMBDANAME_PREFIX "__lambda"
   4134 #define LAMBDANAME_FORMAT LAMBDANAME_PREFIX "%d"
   4135 #define LAMBDANAME_P(ID_NODE) \
   4136   (!strncmp (IDENTIFIER_POINTER (ID_NODE), \
   4137              LAMBDANAME_PREFIX, \
   4138 	     sizeof (LAMBDANAME_PREFIX) - 1))
   4139 
   4140 #if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
   4141 
   4142 #define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
   4143   && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
   4144   && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
   4145 
   4146 #define TEMP_NAME_P(ID_NODE) \
   4147   (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1))
   4148 #define VFIELD_NAME_P(ID_NODE) \
   4149   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
   4150 
   4151 /* For anonymous aggregate types, we need some sort of name to
   4152    hold on to.  In practice, this should not appear, but it should
   4153    not be harmful if it does.  */
   4154 #define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
   4155 				  && IDENTIFIER_POINTER (ID_NODE)[1] == '_')
   4156 #endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
   4157 
   4158 
   4159 /* Nonzero if we're done parsing and into end-of-file activities.  */
   4161 
   4162 extern int at_eof;
   4163 
   4164 /* A list of namespace-scope objects which have constructors or
   4165    destructors which reside in the global scope.  The decl is stored
   4166    in the TREE_VALUE slot and the initializer is stored in the
   4167    TREE_PURPOSE slot.  */
   4168 extern GTY(()) tree static_aggregates;
   4169 
   4170 enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, TYPENAME_FLAG };
   4171 
   4172 /* These are uses as bits in flags passed to various functions to
   4173    control their behavior.  Despite the LOOKUP_ prefix, many of these
   4174    do not control name lookup.  ??? Functions using these flags should
   4175    probably be modified to accept explicit boolean flags for the
   4176    behaviors relevant to them.  */
   4177 /* Check for access violations.  */
   4178 #define LOOKUP_PROTECT (1 << 0)
   4179 /* Complain if no suitable member function matching the arguments is
   4180    found.  */
   4181 #define LOOKUP_COMPLAIN (1 << 1)
   4182 #define LOOKUP_NORMAL (LOOKUP_PROTECT | LOOKUP_COMPLAIN)
   4183 /* Even if the function found by lookup is a virtual function, it
   4184    should be called directly.  */
   4185 #define LOOKUP_NONVIRTUAL (1 << 2)
   4186 /* Non-converting (i.e., "explicit") constructors are not tried.  This flag
   4187    indicates that we are not performing direct-initialization.  */
   4188 #define LOOKUP_ONLYCONVERTING (1 << 3)
   4189 #define LOOKUP_IMPLICIT (LOOKUP_NORMAL | LOOKUP_ONLYCONVERTING)
   4190 /* If a temporary is created, it should be created so that it lives
   4191    as long as the current variable bindings; otherwise it only lives
   4192    until the end of the complete-expression.  It also forces
   4193    direct-initialization in cases where other parts of the compiler
   4194    have already generated a temporary, such as reference
   4195    initialization and the catch parameter.  */
   4196 #define DIRECT_BIND (1 << 4)
   4197 /* We're performing a user-defined conversion, so more user-defined
   4198    conversions are not permitted (only built-in conversions).  */
   4199 #define LOOKUP_NO_CONVERSION (1 << 5)
   4200 /* The user has explicitly called a destructor.  (Therefore, we do
   4201    not need to check that the object is non-NULL before calling the
   4202    destructor.)  */
   4203 #define LOOKUP_DESTRUCTOR (1 << 6)
   4204 /* Do not permit references to bind to temporaries.  */
   4205 #define LOOKUP_NO_TEMP_BIND (1 << 7)
   4206 /* Do not accept objects, and possibly namespaces.  */
   4207 #define LOOKUP_PREFER_TYPES (1 << 8)
   4208 /* Do not accept objects, and possibly types.   */
   4209 #define LOOKUP_PREFER_NAMESPACES (1 << 9)
   4210 /* Accept types or namespaces.  */
   4211 #define LOOKUP_PREFER_BOTH (LOOKUP_PREFER_TYPES | LOOKUP_PREFER_NAMESPACES)
   4212 /* Return friend declarations and un-declared builtin functions.
   4213    (Normally, these entities are registered in the symbol table, but
   4214    not found by lookup.)  */
   4215 #define LOOKUP_HIDDEN (LOOKUP_PREFER_NAMESPACES << 1)
   4216 /* Prefer that the lvalue be treated as an rvalue.  */
   4217 #define LOOKUP_PREFER_RVALUE (LOOKUP_HIDDEN << 1)
   4218 /* We're inside an init-list, so narrowing conversions are ill-formed.  */
   4219 #define LOOKUP_NO_NARROWING (LOOKUP_PREFER_RVALUE << 1)
   4220 /* Avoid user-defined conversions for the first parameter of a copy
   4221    constructor (or move constructor).  */
   4222 #define LOOKUP_NO_COPY_CTOR_CONVERSION (LOOKUP_NO_NARROWING << 1)
   4223 /* This is the first parameter of a copy constructor.  */
   4224 #define LOOKUP_COPY_PARM (LOOKUP_NO_COPY_CTOR_CONVERSION << 1)
   4225 /* We only want to consider list constructors.  */
   4226 #define LOOKUP_LIST_ONLY (LOOKUP_COPY_PARM << 1)
   4227 /* Return after determining which function to call and checking access.
   4228    Used by sythesized_method_walk to determine which functions will
   4229    be called to initialize subobjects, in order to determine exception
   4230    specification and possible implicit delete.
   4231    This is kind of a hack, but since access control doesn't respect SFINAE
   4232    we can't just use tf_none to avoid access control errors, we need
   4233    another mechanism.  Exiting early also avoids problems with trying
   4234    to perform argument conversions when the class isn't complete yet.  */
   4235 #define LOOKUP_SPECULATIVE (LOOKUP_LIST_ONLY << 1)
   4236 /* Used by calls from defaulted functions to limit the overload set to avoid
   4237    cycles trying to declare them (core issue 1092).  */
   4238 #define LOOKUP_DEFAULTED (LOOKUP_SPECULATIVE << 1)
   4239 /* Used in calls to store_init_value to suppress its usual call to
   4240    digest_init.  */
   4241 #define LOOKUP_ALREADY_DIGESTED (LOOKUP_DEFAULTED << 1)
   4242 /* An instantiation with explicit template arguments.  */
   4243 #define LOOKUP_EXPLICIT_TMPL_ARGS (LOOKUP_ALREADY_DIGESTED << 1)
   4244 
   4245 #define LOOKUP_NAMESPACES_ONLY(F)  \
   4246   (((F) & LOOKUP_PREFER_NAMESPACES) && !((F) & LOOKUP_PREFER_TYPES))
   4247 #define LOOKUP_TYPES_ONLY(F)  \
   4248   (!((F) & LOOKUP_PREFER_NAMESPACES) && ((F) & LOOKUP_PREFER_TYPES))
   4249 #define LOOKUP_QUALIFIERS_ONLY(F)     ((F) & LOOKUP_PREFER_BOTH)
   4250 
   4251 
   4252 /* These flags are used by the conversion code.
   4253    CONV_IMPLICIT   :  Perform implicit conversions (standard and user-defined).
   4254    CONV_STATIC     :  Perform the explicit conversions for static_cast.
   4255    CONV_CONST      :  Perform the explicit conversions for const_cast.
   4256    CONV_REINTERPRET:  Perform the explicit conversions for reinterpret_cast.
   4257    CONV_PRIVATE    :  Perform upcasts to private bases.
   4258    CONV_FORCE_TEMP :  Require a new temporary when converting to the same
   4259 		      aggregate type.  */
   4260 
   4261 #define CONV_IMPLICIT    1
   4262 #define CONV_STATIC      2
   4263 #define CONV_CONST       4
   4264 #define CONV_REINTERPRET 8
   4265 #define CONV_PRIVATE	 16
   4266 /* #define CONV_NONCONVERTING 32 */
   4267 #define CONV_FORCE_TEMP  64
   4268 #define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
   4269 			  | CONV_REINTERPRET)
   4270 #define CONV_C_CAST      (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
   4271 			  | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
   4272 
   4273 /* Used by build_expr_type_conversion to indicate which types are
   4274    acceptable as arguments to the expression under consideration.  */
   4275 
   4276 #define WANT_INT	1 /* integer types, including bool */
   4277 #define WANT_FLOAT	2 /* floating point types */
   4278 #define WANT_ENUM	4 /* enumerated types */
   4279 #define WANT_POINTER	8 /* pointer types */
   4280 #define WANT_NULL      16 /* null pointer constant */
   4281 #define WANT_VECTOR_OR_COMPLEX 32 /* vector or complex types */
   4282 #define WANT_ARITH	(WANT_INT | WANT_FLOAT | WANT_VECTOR_OR_COMPLEX)
   4283 
   4284 /* Used with comptypes, and related functions, to guide type
   4285    comparison.  */
   4286 
   4287 #define COMPARE_STRICT	      0 /* Just check if the types are the
   4288 				   same.  */
   4289 #define COMPARE_BASE	      1 /* Check to see if the second type is
   4290 				   derived from the first.  */
   4291 #define COMPARE_DERIVED	      2 /* Like COMPARE_BASE, but in
   4292 				   reverse.  */
   4293 #define COMPARE_REDECLARATION 4 /* The comparison is being done when
   4294 				   another declaration of an existing
   4295 				   entity is seen.  */
   4296 #define COMPARE_STRUCTURAL    8 /* The comparison is intended to be
   4297 				   structural. The actual comparison
   4298 				   will be identical to
   4299 				   COMPARE_STRICT.  */
   4300 
   4301 /* Used with push_overloaded_decl.  */
   4302 #define PUSH_GLOBAL	     0  /* Push the DECL into namespace scope,
   4303 				   regardless of the current scope.  */
   4304 #define PUSH_LOCAL	     1  /* Push the DECL into the current
   4305 				   scope.  */
   4306 #define PUSH_USING	     2  /* We are pushing this DECL as the
   4307 				   result of a using declaration.  */
   4308 
   4309 /* Used with start function.  */
   4310 #define SF_DEFAULT	     0  /* No flags.  */
   4311 #define SF_PRE_PARSED	     1  /* The function declaration has
   4312 				   already been parsed.  */
   4313 #define SF_INCLASS_INLINE    2  /* The function is an inline, defined
   4314 				   in the class body.  */
   4315 
   4316 /* Used with start_decl's initialized parameter.  */
   4317 #define SD_UNINITIALIZED     0
   4318 #define SD_INITIALIZED       1
   4319 #define SD_DEFAULTED         2
   4320 #define SD_DELETED           3
   4321 
   4322 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2
   4323    is derived from TYPE1, or if TYPE2 is a pointer (reference) to a
   4324    class derived from the type pointed to (referred to) by TYPE1.  */
   4325 #define same_or_base_type_p(TYPE1, TYPE2) \
   4326   comptypes ((TYPE1), (TYPE2), COMPARE_BASE)
   4327 
   4328 /* These macros are used to access a TEMPLATE_PARM_INDEX.  */
   4329 #define TEMPLATE_PARM_INDEX_CAST(NODE) \
   4330 	((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE))
   4331 #define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index)
   4332 #define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level)
   4333 /* The Number of sibling parms this template parm has.  */
   4334 #define TEMPLATE_PARM_NUM_SIBLINGS(NODE) \
   4335   (TEMPLATE_PARM_INDEX_CAST (NODE)->num_siblings)
   4336 #define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE))
   4337 #define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level)
   4338 #define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl)
   4339 #define TEMPLATE_PARM_PARAMETER_PACK(NODE) \
   4340   (TREE_LANG_FLAG_0 (TEMPLATE_PARM_INDEX_CHECK (NODE)))
   4341 
   4342 /* These macros are for accessing the fields of TEMPLATE_TYPE_PARM,
   4343    TEMPLATE_TEMPLATE_PARM and BOUND_TEMPLATE_TEMPLATE_PARM nodes.  */
   4344 #define TEMPLATE_TYPE_PARM_INDEX(NODE)					 \
   4345   (TREE_CHECK3 ((NODE), TEMPLATE_TYPE_PARM, TEMPLATE_TEMPLATE_PARM,	\
   4346 		BOUND_TEMPLATE_TEMPLATE_PARM))->type.values
   4347 #define TEMPLATE_TYPE_IDX(NODE) \
   4348   (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   4349 #define TEMPLATE_TYPE_LEVEL(NODE) \
   4350   (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   4351 #define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \
   4352   (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   4353 #define TEMPLATE_TYPE_DECL(NODE) \
   4354   (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   4355 #define TEMPLATE_TYPE_PARAMETER_PACK(NODE) \
   4356   (TEMPLATE_PARM_PARAMETER_PACK (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   4357 
   4358 /* These constants can used as bit flags in the process of tree formatting.
   4359 
   4360    TFF_PLAIN_IDENTIFIER: unqualified part of a name.
   4361    TFF_SCOPE: include the class and namespace scope of the name.
   4362    TFF_CHASE_TYPEDEF: print the original type-id instead of the typedef-name.
   4363    TFF_DECL_SPECIFIERS: print decl-specifiers.
   4364    TFF_CLASS_KEY_OR_ENUM: precede a class-type name (resp. enum name) with
   4365        a class-key (resp. `enum').
   4366    TFF_RETURN_TYPE: include function return type.
   4367    TFF_FUNCTION_DEFAULT_ARGUMENTS: include function default parameter values.
   4368    TFF_EXCEPTION_SPECIFICATION: show function exception specification.
   4369    TFF_TEMPLATE_HEADER: show the template<...> header in a
   4370        template-declaration.
   4371    TFF_TEMPLATE_NAME: show only template-name.
   4372    TFF_EXPR_IN_PARENS: parenthesize expressions.
   4373    TFF_NO_FUNCTION_ARGUMENTS: don't show function arguments.
   4374    TFF_UNQUALIFIED_NAME: do not print the qualifying scope of the
   4375        top-level entity.
   4376    TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS: do not omit template arguments
   4377        identical to their defaults.  */
   4378 
   4379 #define TFF_PLAIN_IDENTIFIER			(0)
   4380 #define TFF_SCOPE				(1)
   4381 #define TFF_CHASE_TYPEDEF			(1 << 1)
   4382 #define TFF_DECL_SPECIFIERS			(1 << 2)
   4383 #define TFF_CLASS_KEY_OR_ENUM			(1 << 3)
   4384 #define TFF_RETURN_TYPE				(1 << 4)
   4385 #define TFF_FUNCTION_DEFAULT_ARGUMENTS		(1 << 5)
   4386 #define TFF_EXCEPTION_SPECIFICATION		(1 << 6)
   4387 #define TFF_TEMPLATE_HEADER			(1 << 7)
   4388 #define TFF_TEMPLATE_NAME			(1 << 8)
   4389 #define TFF_EXPR_IN_PARENS			(1 << 9)
   4390 #define TFF_NO_FUNCTION_ARGUMENTS		(1 << 10)
   4391 #define TFF_UNQUALIFIED_NAME			(1 << 11)
   4392 #define TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS	(1 << 12)
   4393 
   4394 /* Returns the TEMPLATE_DECL associated to a TEMPLATE_TEMPLATE_PARM
   4395    node.  */
   4396 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL(NODE)	\
   4397   ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM)	\
   4398    ? TYPE_TI_TEMPLATE (NODE)				\
   4399    : TYPE_NAME (NODE))
   4400 
   4401 /* in lex.c  */
   4402 
   4403 extern void init_reswords (void);
   4404 
   4405 typedef struct GTY(()) operator_name_info_t {
   4406   /* The IDENTIFIER_NODE for the operator.  */
   4407   tree identifier;
   4408   /* The name of the operator.  */
   4409   const char *name;
   4410   /* The mangled name of the operator.  */
   4411   const char *mangled_name;
   4412   /* The arity of the operator.  */
   4413   int arity;
   4414 } operator_name_info_t;
   4415 
   4416 /* A mapping from tree codes to operator name information.  */
   4417 extern GTY(()) operator_name_info_t operator_name_info
   4418   [(int) MAX_TREE_CODES];
   4419 /* Similar, but for assignment operators.  */
   4420 extern GTY(()) operator_name_info_t assignment_operator_name_info
   4421   [(int) MAX_TREE_CODES];
   4422 
   4423 /* A type-qualifier, or bitmask therefore, using the TYPE_QUAL
   4424    constants.  */
   4425 
   4426 typedef int cp_cv_quals;
   4427 
   4428 /* A storage class.  */
   4429 
   4430 typedef enum cp_storage_class {
   4431   /* sc_none must be zero so that zeroing a cp_decl_specifier_seq
   4432      sets the storage_class field to sc_none.  */
   4433   sc_none = 0,
   4434   sc_auto,
   4435   sc_register,
   4436   sc_static,
   4437   sc_extern,
   4438   sc_mutable
   4439 } cp_storage_class;
   4440 
   4441 /* An individual decl-specifier.  */
   4442 
   4443 typedef enum cp_decl_spec {
   4444   ds_first,
   4445   ds_signed = ds_first,
   4446   ds_unsigned,
   4447   ds_short,
   4448   ds_long,
   4449   ds_const,
   4450   ds_volatile,
   4451   ds_restrict,
   4452   ds_inline,
   4453   ds_virtual,
   4454   ds_explicit,
   4455   ds_friend,
   4456   ds_typedef,
   4457   ds_constexpr,
   4458   ds_complex,
   4459   ds_thread,
   4460   ds_last
   4461 } cp_decl_spec;
   4462 
   4463 /* A decl-specifier-seq.  */
   4464 
   4465 typedef struct cp_decl_specifier_seq {
   4466   /* The number of times each of the keywords has been seen.  */
   4467   unsigned specs[(int) ds_last];
   4468   /* The location of the primary type. Mainly used for error
   4469      reporting.  */
   4470   location_t type_location;
   4471   /* The primary type, if any, given by the decl-specifier-seq.
   4472      Modifiers, like "short", "const", and "unsigned" are not
   4473      reflected here.  This field will be a TYPE, unless a typedef-name
   4474      was used, in which case it will be a TYPE_DECL.  */
   4475   tree type;
   4476   /* The attributes, if any, provided with the specifier sequence.  */
   4477   tree attributes;
   4478   /* If non-NULL, a built-in type that the user attempted to redefine
   4479      to some other type.  */
   4480   tree redefined_builtin_type;
   4481   /* The storage class specified -- or sc_none if no storage class was
   4482      explicitly specified.  */
   4483   cp_storage_class storage_class;
   4484   /* True iff TYPE_SPEC indicates a user-defined type.  */
   4485   BOOL_BITFIELD user_defined_type_p : 1;
   4486   /* True iff multiple types were (erroneously) specified for this
   4487      decl-specifier-seq.  */
   4488   BOOL_BITFIELD multiple_types_p : 1;
   4489   /* True iff multiple storage classes were (erroneously) specified
   4490      for this decl-specifier-seq or a combination of a storage class
   4491      with a typedef specifier.  */
   4492   BOOL_BITFIELD conflicting_specifiers_p : 1;
   4493   /* True iff at least one decl-specifier was found.  */
   4494   BOOL_BITFIELD any_specifiers_p : 1;
   4495   /* True iff at least one type-specifier was found.  */
   4496   BOOL_BITFIELD any_type_specifiers_p : 1;
   4497   /* True iff "int" was explicitly provided.  */
   4498   BOOL_BITFIELD explicit_int_p : 1;
   4499   /* True iff "__int128" was explicitly provided.  */
   4500   BOOL_BITFIELD explicit_int128_p : 1;
   4501   /* True iff "char" was explicitly provided.  */
   4502   BOOL_BITFIELD explicit_char_p : 1;
   4503 } cp_decl_specifier_seq;
   4504 
   4505 /* The various kinds of declarators.  */
   4506 
   4507 typedef enum cp_declarator_kind {
   4508   cdk_id,
   4509   cdk_function,
   4510   cdk_array,
   4511   cdk_pointer,
   4512   cdk_reference,
   4513   cdk_ptrmem,
   4514   cdk_error
   4515 } cp_declarator_kind;
   4516 
   4517 /* A declarator.  */
   4518 
   4519 typedef struct cp_declarator cp_declarator;
   4520 
   4521 typedef struct cp_parameter_declarator cp_parameter_declarator;
   4522 
   4523 /* A parameter, before it has been semantically analyzed.  */
   4524 struct cp_parameter_declarator {
   4525   /* The next parameter, or NULL_TREE if none.  */
   4526   cp_parameter_declarator *next;
   4527   /* The decl-specifiers-seq for the parameter.  */
   4528   cp_decl_specifier_seq decl_specifiers;
   4529   /* The declarator for the parameter.  */
   4530   cp_declarator *declarator;
   4531   /* The default-argument expression, or NULL_TREE, if none.  */
   4532   tree default_argument;
   4533   /* True iff this is the first parameter in the list and the
   4534      parameter sequence ends with an ellipsis.  */
   4535   bool ellipsis_p;
   4536 };
   4537 
   4538 /* A declarator.  */
   4539 struct cp_declarator {
   4540   /* The kind of declarator.  */
   4541   ENUM_BITFIELD (cp_declarator_kind) kind : 4;
   4542   /* Whether we parsed an ellipsis (`...') just before the declarator,
   4543      to indicate this is a parameter pack.  */
   4544   BOOL_BITFIELD parameter_pack_p : 1;
   4545   location_t id_loc; /* Currently only set for cdk_id and cdk_function. */
   4546   /* Attributes that apply to this declarator.  */
   4547   tree attributes;
   4548   /* For all but cdk_id and cdk_error, the contained declarator.  For
   4549      cdk_id and cdk_error, guaranteed to be NULL.  */
   4550   cp_declarator *declarator;
   4551   union {
   4552     /* For identifiers.  */
   4553     struct {
   4554       /* If non-NULL, the qualifying scope (a NAMESPACE_DECL or
   4555 	 *_TYPE) for this identifier.  */
   4556       tree qualifying_scope;
   4557       /* The unqualified name of the entity -- an IDENTIFIER_NODE,
   4558 	 BIT_NOT_EXPR, or TEMPLATE_ID_EXPR.  */
   4559       tree unqualified_name;
   4560       /* If this is the name of a function, what kind of special
   4561 	 function (if any).  */
   4562       special_function_kind sfk;
   4563     } id;
   4564     /* For functions.  */
   4565     struct {
   4566       /* The parameters to the function as a TREE_LIST of decl/default.  */
   4567       tree parameters;
   4568       /* The cv-qualifiers for the function.  */
   4569       cp_cv_quals qualifiers;
   4570       /* The exception-specification for the function.  */
   4571       tree exception_specification;
   4572       /* The late-specified return type, if any.  */
   4573       tree late_return_type;
   4574     } function;
   4575     /* For arrays.  */
   4576     struct {
   4577       /* The bounds to the array.  */
   4578       tree bounds;
   4579     } array;
   4580     /* For cdk_pointer and cdk_ptrmem.  */
   4581     struct {
   4582       /* The cv-qualifiers for the pointer.  */
   4583       cp_cv_quals qualifiers;
   4584       /* For cdk_ptrmem, the class type containing the member.  */
   4585       tree class_type;
   4586     } pointer;
   4587     /* For cdk_reference */
   4588     struct {
   4589       /* The cv-qualifiers for the reference.  These qualifiers are
   4590          only used to diagnose ill-formed code.  */
   4591       cp_cv_quals qualifiers;
   4592       /* Whether this is an rvalue reference */
   4593       bool rvalue_ref;
   4594     } reference;
   4595   } u;
   4596 };
   4597 
   4598 /* A level of template instantiation.  */
   4599 struct GTY(()) tinst_level {
   4600   /* The immediately deeper level in the chain.  */
   4601   struct tinst_level *next;
   4602 
   4603   /* The original node.  Can be either a DECL (for a function or static
   4604      data member) or a TYPE (for a class), depending on what we were
   4605      asked to instantiate.  */
   4606   tree decl;
   4607 
   4608   /* The location where the template is instantiated.  */
   4609   location_t locus;
   4610 
   4611   /* True if the location is in a system header.  */
   4612   bool in_system_header_p;
   4613 };
   4614 
   4615 /* A parameter list indicating for a function with no parameters,
   4616    e.g  "int f(void)".  */
   4617 extern cp_parameter_declarator *no_parameters;
   4618 
   4619 /* True if we saw "#pragma GCC java_exceptions".  */
   4620 extern bool pragma_java_exceptions;
   4621 
   4622 /* in call.c */
   4623 extern bool check_dtor_name			(tree, tree);
   4624 
   4625 extern tree build_conditional_expr		(tree, tree, tree,
   4626                                                  tsubst_flags_t);
   4627 extern tree build_addr_func			(tree);
   4628 extern tree build_call_a			(tree, int, tree*);
   4629 extern tree build_call_n			(tree, int, ...);
   4630 extern bool null_ptr_cst_p			(tree);
   4631 extern bool sufficient_parms_p			(const_tree);
   4632 extern tree type_decays_to			(tree);
   4633 extern tree build_user_type_conversion		(tree, tree, int);
   4634 extern tree build_new_function_call		(tree, VEC(tree,gc) **, bool,
   4635 						 tsubst_flags_t);
   4636 extern tree build_operator_new_call		(tree, VEC(tree,gc) **, tree *,
   4637 						 tree *, tree *);
   4638 extern tree build_new_method_call		(tree, tree, VEC(tree,gc) **,
   4639 						 tree, int, tree *,
   4640 						 tsubst_flags_t);
   4641 extern tree build_special_member_call		(tree, tree, VEC(tree,gc) **,
   4642 						 tree, int, tsubst_flags_t);
   4643 extern tree build_new_op			(enum tree_code, int, tree,
   4644 						 tree, tree, bool *,
   4645 						 tsubst_flags_t);
   4646 extern tree build_op_call			(tree, VEC(tree,gc) **,
   4647 						 tsubst_flags_t);
   4648 extern tree build_op_delete_call		(enum tree_code, tree, tree, bool, tree, tree);
   4649 extern bool can_convert				(tree, tree);
   4650 extern bool can_convert_arg			(tree, tree, tree, int);
   4651 extern bool can_convert_arg_bad			(tree, tree, tree, int);
   4652 extern bool enforce_access			(tree, tree, tree);
   4653 extern tree convert_default_arg			(tree, tree, tree, int);
   4654 extern tree convert_arg_to_ellipsis		(tree);
   4655 extern tree build_x_va_arg			(tree, tree);
   4656 extern tree cxx_type_promotes_to		(tree);
   4657 extern tree type_passed_as			(tree);
   4658 extern tree convert_for_arg_passing		(tree, tree);
   4659 extern bool is_properly_derived_from		(tree, tree);
   4660 extern tree set_up_extended_ref_temp		(tree, tree, tree *, tree *);
   4661 extern tree initialize_reference		(tree, tree, tree, tree *, tsubst_flags_t);
   4662 extern tree make_temporary_var_for_ref_to_temp	(tree, tree);
   4663 extern tree strip_top_quals			(tree);
   4664 extern bool reference_related_p			(tree, tree);
   4665 extern tree perform_implicit_conversion		(tree, tree, tsubst_flags_t);
   4666 extern tree perform_implicit_conversion_flags	(tree, tree, tsubst_flags_t, int);
   4667 extern tree build_integral_nontype_arg_conv	(tree, tree, tsubst_flags_t);
   4668 extern tree perform_direct_initialization_if_possible (tree, tree, bool,
   4669                                                        tsubst_flags_t);
   4670 extern tree in_charge_arg_for_name		(tree);
   4671 extern tree build_cxx_call			(tree, int, tree *);
   4672 extern bool is_std_init_list			(tree);
   4673 extern bool is_list_ctor			(tree);
   4674 #ifdef ENABLE_CHECKING
   4675 extern void validate_conversion_obstack		(void);
   4676 #endif /* ENABLE_CHECKING */
   4677 
   4678 /* in class.c */
   4679 extern tree build_vfield_ref			(tree, tree);
   4680 extern tree build_base_path			(enum tree_code, tree,
   4681 						 tree, int);
   4682 extern tree convert_to_base			(tree, tree, bool, bool,
   4683 						 tsubst_flags_t);
   4684 extern tree convert_to_base_statically		(tree, tree);
   4685 extern tree build_vtbl_ref			(tree, tree);
   4686 extern tree build_vfn_ref			(tree, tree);
   4687 extern tree get_vtable_decl			(tree, int);
   4688 extern void resort_type_method_vec		(void *, void *,
   4689 						 gt_pointer_operator, void *);
   4690 extern bool add_method				(tree, tree, tree);
   4691 extern bool currently_open_class		(tree);
   4692 extern tree currently_open_derived_class	(tree);
   4693 extern tree current_nonlambda_class_type	(void);
   4694 extern tree finish_struct			(tree, tree);
   4695 extern void finish_struct_1			(tree);
   4696 extern int resolves_to_fixed_type_p		(tree, int *);
   4697 extern void init_class_processing		(void);
   4698 extern int is_empty_class			(tree);
   4699 extern bool is_really_empty_class		(tree);
   4700 extern void pushclass				(tree);
   4701 extern void popclass				(void);
   4702 extern void push_nested_class			(tree);
   4703 extern void pop_nested_class			(void);
   4704 extern int current_lang_depth			(void);
   4705 extern void push_lang_context			(tree);
   4706 extern void pop_lang_context			(void);
   4707 extern tree instantiate_type			(tree, tree, tsubst_flags_t);
   4708 extern void print_class_statistics		(void);
   4709 extern void build_self_reference		(void);
   4710 extern int same_signature_p			(const_tree, const_tree);
   4711 extern void maybe_add_class_template_decl_list	(tree, tree, int);
   4712 extern void unreverse_member_declarations	(tree);
   4713 extern void invalidate_class_lookup_cache	(void);
   4714 extern void maybe_note_name_used_in_class	(tree, tree);
   4715 extern void note_name_declared_in_class		(tree, tree);
   4716 extern tree get_vtbl_decl_for_binfo		(tree);
   4717 extern void debug_class				(tree);
   4718 extern void debug_thunks			(tree);
   4719 extern tree cp_get_virtual_function_decl        (tree, tree);
   4720 extern tree cp_fold_obj_type_ref		(tree, tree);
   4721 extern bool cp_decl_is_base_field               (tree);
   4722 extern bool cp_decl_is_constructor              (tree);
   4723 extern bool cp_decl_is_destructor               (tree);
   4724 extern int cp_decl_is_const_member_func         (tree);
   4725 extern void set_linkage_according_to_type	(tree, tree);
   4726 extern void determine_key_method		(tree);
   4727 extern void check_for_override			(tree, tree);
   4728 extern void push_class_stack			(void);
   4729 extern void pop_class_stack			(void);
   4730 extern bool type_has_user_nondefault_constructor (tree);
   4731 extern tree in_class_defaulted_default_constructor (tree);
   4732 extern bool user_provided_p			(tree);
   4733 extern bool type_has_user_provided_constructor  (tree);
   4734 extern bool type_has_user_provided_default_constructor (tree);
   4735 extern tree default_init_uninitialized_part (tree);
   4736 extern bool synthesized_default_constructor_is_constexpr (tree);
   4737 extern bool type_has_constexpr_default_constructor (tree);
   4738 extern bool type_has_virtual_destructor		(tree);
   4739 extern bool type_has_move_constructor		(tree);
   4740 extern bool type_has_move_assign		(tree);
   4741 extern void defaulted_late_check		(tree);
   4742 extern bool defaultable_fn_check		(tree);
   4743 extern void fixup_type_variants			(tree);
   4744 extern void fixup_attribute_variants		(tree);
   4745 extern tree* decl_cloned_function_p		(const_tree, bool);
   4746 extern void clone_function_decl			(tree, int);
   4747 extern void adjust_clone_args			(tree);
   4748 
   4749 /* in cvt.c */
   4750 extern tree convert_to_reference		(tree, tree, int, int, tree);
   4751 extern tree convert_from_reference		(tree);
   4752 extern tree force_rvalue			(tree);
   4753 extern tree ocp_convert				(tree, tree, int, int);
   4754 extern tree cp_convert				(tree, tree);
   4755 extern tree cp_convert_and_check                (tree, tree);
   4756 extern tree cp_fold_convert			(tree, tree);
   4757 extern tree convert_to_void			(tree, impl_conv_void,
   4758                                  		 tsubst_flags_t);
   4759 extern tree convert_force			(tree, tree, int);
   4760 extern tree build_expr_type_conversion		(int, tree, bool);
   4761 extern tree type_promotes_to			(tree);
   4762 extern tree perform_qualification_conversions	(tree, tree);
   4763 
   4764 /* in name-lookup.c */
   4765 extern tree pushdecl				(tree);
   4766 extern tree pushdecl_maybe_friend		(tree, bool);
   4767 extern void maybe_push_cleanup_level		(tree);
   4768 extern tree pushtag				(tree, tree, tag_scope);
   4769 extern tree make_anon_name			(void);
   4770 extern tree pushdecl_top_level_maybe_friend	(tree, bool);
   4771 extern tree pushdecl_top_level_and_finish	(tree, tree);
   4772 extern tree check_for_out_of_scope_variable	(tree);
   4773 extern void print_other_binding_stack		(struct cp_binding_level *);
   4774 extern tree maybe_push_decl			(tree);
   4775 extern tree current_decl_namespace		(void);
   4776 
   4777 /* decl.c */
   4778 extern tree poplevel				(int, int, int);
   4779 extern void cxx_init_decl_processing		(void);
   4780 enum cp_tree_node_structure_enum cp_tree_node_structure
   4781 						(union lang_tree_node *);
   4782 extern void finish_scope			(void);
   4783 extern void push_switch				(tree);
   4784 extern void pop_switch				(void);
   4785 extern tree make_lambda_name			(void);
   4786 extern int decls_match				(tree, tree);
   4787 extern tree duplicate_decls			(tree, tree, bool);
   4788 extern tree declare_local_label			(tree);
   4789 extern tree define_label			(location_t, tree);
   4790 extern void check_goto				(tree);
   4791 extern bool check_omp_return			(void);
   4792 extern tree make_typename_type			(tree, tree, enum tag_types, tsubst_flags_t);
   4793 extern tree make_unbound_class_template		(tree, tree, tree, tsubst_flags_t);
   4794 extern tree build_library_fn_ptr		(const char *, tree);
   4795 extern tree build_cp_library_fn_ptr		(const char *, tree);
   4796 extern tree push_library_fn			(tree, tree, tree);
   4797 extern tree push_void_library_fn		(tree, tree);
   4798 extern tree push_throw_library_fn		(tree, tree);
   4799 extern tree check_tag_decl			(cp_decl_specifier_seq *);
   4800 extern tree shadow_tag				(cp_decl_specifier_seq *);
   4801 extern tree groktypename			(cp_decl_specifier_seq *, const cp_declarator *, bool);
   4802 extern tree start_decl				(const cp_declarator *, cp_decl_specifier_seq *, int, tree, tree, tree *);
   4803 extern void start_decl_1			(tree, bool);
   4804 extern bool check_array_initializer		(tree, tree, tree);
   4805 extern void cp_finish_decl			(tree, tree, bool, tree, int);
   4806 extern int cp_complete_array_type		(tree *, tree, bool);
   4807 extern tree build_ptrmemfunc_type		(tree);
   4808 extern tree build_ptrmem_type			(tree, tree);
   4809 /* the grokdeclarator prototype is in decl.h */
   4810 extern tree build_this_parm			(tree, cp_cv_quals);
   4811 extern int copy_fn_p				(const_tree);
   4812 extern bool move_fn_p                           (const_tree);
   4813 extern tree get_scope_of_declarator		(const cp_declarator *);
   4814 extern void grok_special_member_properties	(tree);
   4815 extern int grok_ctor_properties			(const_tree, const_tree);
   4816 extern bool grok_op_properties			(tree, bool);
   4817 extern tree xref_tag				(enum tag_types, tree, tag_scope, bool);
   4818 extern tree xref_tag_from_type			(tree, tree, tag_scope);
   4819 extern bool xref_basetypes			(tree, tree);
   4820 extern tree start_enum				(tree, tree, tree, bool, bool *);
   4821 extern void finish_enum_value_list		(tree);
   4822 extern void finish_enum				(tree);
   4823 extern void build_enumerator			(tree, tree, tree, location_t);
   4824 extern tree lookup_enumerator			(tree, tree);
   4825 extern void start_preparsed_function		(tree, tree, int);
   4826 extern int start_function			(cp_decl_specifier_seq *, const cp_declarator *, tree);
   4827 extern tree begin_function_body			(void);
   4828 extern void finish_function_body		(tree);
   4829 extern tree outer_curly_brace_block		(tree);
   4830 extern tree finish_function			(int);
   4831 extern tree grokmethod				(cp_decl_specifier_seq *, const cp_declarator *, tree);
   4832 extern void maybe_register_incomplete_var	(tree);
   4833 extern void maybe_commonize_var			(tree);
   4834 extern void complete_vars			(tree);
   4835 extern void finish_stmt				(void);
   4836 extern tree static_fn_type			(tree);
   4837 extern void revert_static_member_fn		(tree);
   4838 extern void fixup_anonymous_aggr		(tree);
   4839 extern int check_static_variable_definition	(tree, tree);
   4840 extern tree compute_array_index_type		(tree, tree, tsubst_flags_t);
   4841 extern tree check_default_argument		(tree, tree);
   4842 typedef int (*walk_namespaces_fn)		(tree, void *);
   4843 extern int walk_namespaces			(walk_namespaces_fn,
   4844 						 void *);
   4845 extern int wrapup_globals_for_namespace		(tree, void *);
   4846 extern tree create_implicit_typedef		(tree, tree);
   4847 extern int local_variable_p			(const_tree);
   4848 extern tree register_dtor_fn			(tree);
   4849 extern tmpl_spec_kind current_tmpl_spec_kind	(int);
   4850 extern tree cp_fname_init			(const char *, tree *);
   4851 extern tree cxx_builtin_function		(tree decl);
   4852 extern tree cxx_builtin_function_ext_scope	(tree decl);
   4853 extern tree check_elaborated_type_specifier	(enum tag_types, tree, bool);
   4854 extern void warn_extern_redeclared_static	(tree, tree);
   4855 extern tree cxx_comdat_group			(tree);
   4856 extern bool cp_missing_noreturn_ok_p		(tree);
   4857 extern void initialize_artificial_var		(tree, VEC(constructor_elt,gc) *);
   4858 extern tree check_var_type			(tree, tree);
   4859 extern tree reshape_init (tree, tree);
   4860 extern tree next_initializable_field (tree);
   4861 
   4862 extern bool defer_mark_used_calls;
   4863 extern GTY(()) VEC(tree, gc) *deferred_mark_used_calls;
   4864 extern tree finish_case_label			(location_t, tree, tree);
   4865 extern tree cxx_maybe_build_cleanup		(tree);
   4866 
   4867 /* in decl2.c */
   4868 extern bool check_java_method			(tree);
   4869 extern tree build_memfn_type			(tree, tree, cp_cv_quals);
   4870 extern tree change_return_type			(tree, tree);
   4871 extern void maybe_retrofit_in_chrg		(tree);
   4872 extern void maybe_make_one_only			(tree);
   4873 extern bool vague_linkage_p			(tree);
   4874 extern void grokclassfn				(tree, tree,
   4875 						 enum overload_flags);
   4876 extern tree grok_array_decl			(tree, tree);
   4877 extern tree delete_sanity			(tree, tree, bool, int);
   4878 extern tree check_classfn			(tree, tree, tree);
   4879 extern void check_member_template		(tree);
   4880 extern tree grokfield (const cp_declarator *, cp_decl_specifier_seq *,
   4881 		       tree, bool, tree, tree);
   4882 extern tree grokbitfield (const cp_declarator *, cp_decl_specifier_seq *,
   4883 			  tree, tree);
   4884 extern tree cp_reconstruct_complex_type		(tree, tree);
   4885 extern void cplus_decl_attributes		(tree *, tree, int);
   4886 extern void finish_anon_union			(tree);
   4887 extern void cp_write_global_declarations	(void);
   4888 extern void cp_process_pending_declarations     (location_t);
   4889 extern void cp_clear_deferred_fns               (void);
   4890 extern void cp_clear_conv_type_map              (void);
   4891 extern tree coerce_new_type			(tree);
   4892 extern tree coerce_delete_type			(tree);
   4893 extern void comdat_linkage			(tree);
   4894 extern void determine_visibility		(tree);
   4895 extern void constrain_class_visibility		(tree);
   4896 extern void import_export_decl			(tree);
   4897 extern tree build_cleanup			(tree);
   4898 extern tree build_offset_ref_call_from_tree	(tree, VEC(tree,gc) **);
   4899 extern bool decl_constant_var_p			(tree);
   4900 extern bool decl_maybe_constant_var_p		(tree);
   4901 extern void check_default_args			(tree);
   4902 extern void mark_used				(tree);
   4903 extern void finish_static_data_member_decl	(tree, tree, bool, tree, int);
   4904 extern tree cp_build_parm_decl			(tree, tree);
   4905 extern tree get_guard				(tree);
   4906 extern tree get_guard_cond			(tree);
   4907 extern tree set_guard				(tree);
   4908 extern tree cxx_callgraph_analyze_expr		(tree *, int *);
   4909 extern void mark_needed				(tree);
   4910 extern bool decl_needed_p			(tree);
   4911 extern void note_vague_linkage_fn		(tree);
   4912 extern tree build_artificial_parm		(tree, tree);
   4913 extern bool possibly_inlined_p			(tree);
   4914 extern int parm_index                           (tree);
   4915 
   4916 /* in error.c */
   4917 extern void init_error				(void);
   4918 extern const char *type_as_string		(tree, int);
   4919 extern const char *type_as_string_translate	(tree, int);
   4920 extern const char *decl_as_string		(tree, int);
   4921 extern const char *decl_as_string_translate	(tree, int);
   4922 extern const char *expr_as_string		(tree, int);
   4923 extern const char *lang_decl_name		(tree, int, bool);
   4924 extern const char *language_to_string		(enum languages);
   4925 extern const char *class_key_or_enum_as_string	(tree);
   4926 extern void print_instantiation_context		(void);
   4927 extern void maybe_warn_variadic_templates       (void);
   4928 extern void maybe_warn_cpp0x			(cpp0x_warn_str str);
   4929 extern bool pedwarn_cxx98                       (location_t, int, const char *, ...) ATTRIBUTE_GCC_DIAG(3,4);
   4930 extern location_t location_of                   (tree);
   4931 extern void qualified_name_lookup_error		(tree, tree, tree,
   4932 						 location_t);
   4933 
   4934 /* in except.c */
   4935 extern void init_exception_processing		(void);
   4936 extern tree expand_start_catch_block		(tree);
   4937 extern void expand_end_catch_block		(void);
   4938 extern tree build_exc_ptr			(void);
   4939 extern tree build_throw				(tree);
   4940 extern int nothrow_libfn_p			(const_tree);
   4941 extern void check_handlers			(tree);
   4942 extern tree finish_noexcept_expr		(tree, tsubst_flags_t);
   4943 extern void perform_deferred_noexcept_checks	(void);
   4944 extern bool nothrow_spec_p			(const_tree);
   4945 extern bool type_noexcept_p			(const_tree);
   4946 extern bool type_throw_all_p			(const_tree);
   4947 extern tree build_noexcept_spec			(tree, int);
   4948 extern void choose_personality_routine		(enum languages);
   4949 extern tree eh_type_info			(tree);
   4950 extern tree begin_eh_spec_block			(void);
   4951 extern void finish_eh_spec_block		(tree, tree);
   4952 extern tree build_eh_type_type			(tree);
   4953 extern tree cp_protect_cleanup_actions		(void);
   4954 
   4955 /* in expr.c */
   4956 extern tree cplus_expand_constant		(tree);
   4957 extern tree mark_rvalue_use			(tree);
   4958 extern tree mark_lvalue_use			(tree);
   4959 extern tree mark_type_use			(tree);
   4960 extern void mark_exp_read			(tree);
   4961 
   4962 /* friend.c */
   4963 extern int is_friend				(tree, tree);
   4964 extern void make_friend_class			(tree, tree, bool);
   4965 extern void add_friend				(tree, tree, bool);
   4966 extern tree do_friend				(tree, tree, tree, tree, enum overload_flags, bool);
   4967 
   4968 /* in init.c */
   4969 extern tree expand_member_init			(tree);
   4970 extern void emit_mem_initializers		(tree);
   4971 extern tree build_aggr_init			(tree, tree, int,
   4972                                                  tsubst_flags_t);
   4973 extern int is_class_type			(tree, int);
   4974 extern tree get_type_value			(tree);
   4975 extern tree build_zero_init			(tree, tree, bool);
   4976 extern tree build_value_init			(tree, tsubst_flags_t);
   4977 extern tree build_value_init_noctor		(tree, tsubst_flags_t);
   4978 extern tree build_offset_ref			(tree, tree, bool);
   4979 extern tree build_new				(VEC(tree,gc) **, tree, tree,
   4980 						 VEC(tree,gc) **, int,
   4981                                                  tsubst_flags_t);
   4982 extern tree get_temp_regvar			(tree, tree);
   4983 extern tree build_vec_init			(tree, tree, tree, bool, int,
   4984                                                  tsubst_flags_t);
   4985 extern tree build_delete			(tree, tree,
   4986 						 special_function_kind,
   4987 						 int, int);
   4988 extern void push_base_cleanups			(void);
   4989 extern tree build_vec_delete			(tree, tree,
   4990 						 special_function_kind, int);
   4991 extern tree create_temporary_var		(tree);
   4992 extern void initialize_vtbl_ptrs		(tree);
   4993 extern tree build_java_class_ref		(tree);
   4994 extern tree integral_constant_value		(tree);
   4995 extern int diagnose_uninitialized_cst_or_ref_member (tree, bool, bool);
   4996 
   4997 /* in lex.c */
   4998 extern void cxx_dup_lang_specific_decl		(tree);
   4999 extern void yyungetc				(int, int);
   5000 
   5001 extern tree unqualified_name_lookup_error	(tree);
   5002 extern tree unqualified_fn_lookup_error		(tree);
   5003 extern tree build_lang_decl			(enum tree_code, tree, tree);
   5004 extern tree build_lang_decl_loc			(location_t, enum tree_code, tree, tree);
   5005 extern void retrofit_lang_decl			(tree);
   5006 extern tree copy_decl				(tree);
   5007 extern tree copy_type				(tree);
   5008 extern tree cxx_make_type			(enum tree_code);
   5009 extern tree make_class_type			(enum tree_code);
   5010 extern bool cxx_init				(void);
   5011 extern void cxx_finish				(void);
   5012 extern bool in_main_input_context		(void);
   5013 
   5014 /* in method.c */
   5015 extern void init_method				(void);
   5016 extern tree make_thunk				(tree, bool, tree, tree);
   5017 extern void finish_thunk			(tree);
   5018 extern void use_thunk				(tree, bool);
   5019 extern bool trivial_fn_p			(tree);
   5020 extern bool maybe_explain_implicit_delete	(tree);
   5021 extern void synthesize_method			(tree);
   5022 extern tree lazily_declare_fn			(special_function_kind,
   5023 						 tree);
   5024 extern tree skip_artificial_parms_for		(const_tree, tree);
   5025 extern int num_artificial_parms_for		(const_tree);
   5026 extern tree make_alias_for			(tree, tree);
   5027 extern tree get_copy_ctor			(tree, tsubst_flags_t);
   5028 extern tree get_copy_assign			(tree);
   5029 extern tree get_default_ctor			(tree);
   5030 extern tree get_dtor				(tree, tsubst_flags_t);
   5031 extern tree locate_ctor				(tree);
   5032 
   5033 /* In optimize.c */
   5034 extern bool maybe_clone_body			(tree);
   5035 
   5036 /* in pt.c */
   5037 extern bool check_template_shadow		(tree);
   5038 extern tree get_innermost_template_args		(tree, int);
   5039 extern void maybe_begin_member_template_processing (tree);
   5040 extern void maybe_end_member_template_processing (void);
   5041 extern tree finish_member_template_decl		(tree);
   5042 extern void begin_template_parm_list		(void);
   5043 extern bool begin_specialization		(void);
   5044 extern void reset_specialization		(void);
   5045 extern void end_specialization			(void);
   5046 extern void begin_explicit_instantiation	(void);
   5047 extern void end_explicit_instantiation		(void);
   5048 extern tree check_explicit_specialization	(tree, tree, int, int);
   5049 extern tree make_auto				(void);
   5050 extern tree do_auto_deduction			(tree, tree, tree);
   5051 extern tree type_uses_auto			(tree);
   5052 extern void append_type_to_template_for_access_check (tree, tree, tree,
   5053 						      location_t);
   5054 extern tree splice_late_return_type		(tree, tree);
   5055 extern bool is_auto				(const_tree);
   5056 extern tree process_template_parm		(tree, location_t, tree,
   5057 						 bool, bool, unsigned);
   5058 extern tree end_template_parm_list		(tree);
   5059 void fixup_template_parms (void);
   5060 extern void end_template_decl			(void);
   5061 extern tree maybe_update_decl_type		(tree, tree);
   5062 extern bool check_default_tmpl_args             (tree, tree, int, int, int);
   5063 extern tree push_template_decl			(tree);
   5064 extern tree push_template_decl_real		(tree, bool);
   5065 extern bool redeclare_class_template		(tree, tree);
   5066 extern tree lookup_template_class		(tree, tree, tree, tree,
   5067 						 int, tsubst_flags_t);
   5068 extern tree lookup_template_function		(tree, tree);
   5069 extern int uses_template_parms			(tree);
   5070 extern int uses_template_parms_level		(tree, int);
   5071 extern tree instantiate_class_template		(tree);
   5072 extern tree instantiate_template		(tree, tree, tsubst_flags_t);
   5073 extern int fn_type_unification			(tree, tree, tree,
   5074 						 const tree *, unsigned int,
   5075 						 tree, unification_kind_t, int);
   5076 extern void mark_decl_instantiated		(tree, int);
   5077 extern int more_specialized_fn			(tree, tree, int);
   5078 extern void do_decl_instantiation		(tree, tree);
   5079 extern void do_type_instantiation		(tree, tree, tsubst_flags_t);
   5080 extern bool always_instantiate_p		(tree);
   5081 extern tree instantiate_decl			(tree, int, bool);
   5082 extern int comp_template_parms			(const_tree, const_tree);
   5083 extern bool uses_parameter_packs                (tree);
   5084 extern bool template_parameter_pack_p           (const_tree);
   5085 extern bool function_parameter_pack_p		(const_tree);
   5086 extern bool function_parameter_expanded_from_pack_p (tree, tree);
   5087 extern tree make_pack_expansion                 (tree);
   5088 extern bool check_for_bare_parameter_packs      (tree);
   5089 extern tree build_template_info			(tree, tree);
   5090 extern tree get_template_info			(const_tree);
   5091 extern VEC(qualified_typedef_usage_t,gc)* get_types_needing_access_check (tree);
   5092 extern int template_class_depth			(tree);
   5093 extern int is_specialization_of			(tree, tree);
   5094 extern bool is_specialization_of_friend		(tree, tree);
   5095 extern tree get_pattern_parm			(tree, tree);
   5096 extern int comp_template_args			(tree, tree);
   5097 extern tree maybe_process_partial_specialization (tree);
   5098 extern tree most_specialized_instantiation	(tree);
   5099 extern void print_candidates			(tree);
   5100 extern void instantiate_pending_templates	(int);
   5101 extern tree tsubst_default_argument		(tree, tree, tree);
   5102 extern tree tsubst (tree, tree, tsubst_flags_t, tree);
   5103 extern tree tsubst_copy_and_build		(tree, tree, tsubst_flags_t,
   5104 						 tree, bool, bool);
   5105 extern tree most_general_template		(tree);
   5106 extern tree get_mostly_instantiated_function_type (tree);
   5107 extern int problematic_instantiation_changed	(void);
   5108 extern void record_last_problematic_instantiation (void);
   5109 extern struct tinst_level *current_instantiation(void);
   5110 extern tree maybe_get_template_decl_from_type_decl (tree);
   5111 extern int processing_template_parmlist;
   5112 extern bool dependent_type_p			(tree);
   5113 extern bool dependent_scope_p			(tree);
   5114 extern bool any_dependent_template_arguments_p  (const_tree);
   5115 extern bool dependent_template_p		(tree);
   5116 extern bool dependent_template_id_p		(tree, tree);
   5117 extern bool type_dependent_expression_p		(tree);
   5118 extern bool any_type_dependent_arguments_p      (const VEC(tree,gc) *);
   5119 extern bool type_dependent_expression_p_push	(tree);
   5120 extern bool value_dependent_expression_p	(tree);
   5121 extern bool any_value_dependent_elements_p      (const_tree);
   5122 extern bool dependent_omp_for_p			(tree, tree, tree, tree);
   5123 extern tree resolve_typename_type		(tree, bool);
   5124 extern tree template_for_substitution		(tree);
   5125 extern tree build_non_dependent_expr		(tree);
   5126 extern void make_args_non_dependent		(VEC(tree,gc) *);
   5127 extern bool reregister_specialization		(tree, tree, tree);
   5128 extern tree fold_non_dependent_expr		(tree);
   5129 extern bool explicit_class_specialization_p     (tree);
   5130 extern int push_tinst_level                     (tree);
   5131 extern void pop_tinst_level                     (void);
   5132 extern struct tinst_level *outermost_tinst_level(void);
   5133 extern bool parameter_of_template_p		(tree, tree);
   5134 extern void init_template_processing		(void);
   5135 extern void print_template_statistics		(void);
   5136 bool template_template_parameter_p		(const_tree);
   5137 extern bool primary_template_instantiation_p    (const_tree);
   5138 extern tree get_primary_template_innermost_parameters	(const_tree);
   5139 extern tree get_template_parms_at_level (tree, int);
   5140 extern tree get_template_innermost_arguments	(const_tree);
   5141 extern tree get_template_argument_pack_elems	(const_tree);
   5142 extern tree get_function_template_decl		(const_tree);
   5143 extern tree resolve_nondeduced_context		(tree);
   5144 extern hashval_t iterative_hash_template_arg (tree arg, hashval_t val);
   5145 
   5146 /* in repo.c */
   5147 extern void init_repo				(void);
   5148 extern int repo_emit_p				(tree);
   5149 extern bool repo_export_class_p			(const_tree);
   5150 extern void finish_repo				(void);
   5151 
   5152 /* in rtti.c */
   5153 /* A vector of all tinfo decls that haven't been emitted yet.  */
   5154 extern GTY(()) VEC(tree,gc) *unemitted_tinfo_decls;
   5155 
   5156 extern void init_rtti_processing		(void);
   5157 extern tree build_typeid			(tree);
   5158 extern tree get_tinfo_decl			(tree);
   5159 extern tree get_typeid				(tree);
   5160 extern tree build_headof			(tree);
   5161 extern tree build_dynamic_cast			(tree, tree, tsubst_flags_t);
   5162 extern void emit_support_tinfos			(void);
   5163 extern bool emit_tinfo_decl			(tree);
   5164 
   5165 /* in search.c */
   5166 extern bool accessible_base_p			(tree, tree, bool);
   5167 extern tree lookup_base				(tree, tree, base_access,
   5168 						 base_kind *);
   5169 extern tree dcast_base_hint			(tree, tree);
   5170 extern int accessible_p				(tree, tree, bool);
   5171 extern tree lookup_field_1			(tree, tree, bool);
   5172 extern tree lookup_field			(tree, tree, int, bool);
   5173 extern int lookup_fnfields_1			(tree, tree);
   5174 extern tree lookup_fnfields_slot		(tree, tree);
   5175 extern int class_method_index_for_fn		(tree, tree);
   5176 extern tree lookup_fnfields			(tree, tree, int);
   5177 extern tree lookup_member			(tree, tree, int, bool);
   5178 extern int look_for_overrides			(tree, tree);
   5179 extern void get_pure_virtuals			(tree);
   5180 extern void maybe_suppress_debug_info		(tree);
   5181 extern void note_debug_info_needed		(tree);
   5182 extern void print_search_statistics		(void);
   5183 extern void reinit_search_statistics		(void);
   5184 extern tree current_scope			(void);
   5185 extern int at_function_scope_p			(void);
   5186 extern bool at_class_scope_p			(void);
   5187 extern bool at_namespace_scope_p		(void);
   5188 extern tree context_for_name_lookup		(tree);
   5189 extern tree lookup_conversions			(tree);
   5190 extern tree binfo_from_vbase			(tree);
   5191 extern tree binfo_for_vbase			(tree, tree);
   5192 extern tree look_for_overrides_here		(tree, tree);
   5193 #define dfs_skip_bases ((tree)1)
   5194 extern tree dfs_walk_all (tree, tree (*) (tree, void *),
   5195 			  tree (*) (tree, void *), void *);
   5196 extern tree dfs_walk_once (tree, tree (*) (tree, void *),
   5197 			   tree (*) (tree, void *), void *);
   5198 extern tree binfo_via_virtual			(tree, tree);
   5199 extern tree build_baselink			(tree, tree, tree, tree);
   5200 extern tree adjust_result_of_qualified_name_lookup
   5201 						(tree, tree, tree);
   5202 extern tree copied_binfo			(tree, tree);
   5203 extern tree original_binfo			(tree, tree);
   5204 extern int shared_member_p			(tree);
   5205 
   5206 
   5207 /* The representation of a deferred access check.  */
   5208 
   5209 typedef struct GTY(()) deferred_access_check {
   5210   /* The base class in which the declaration is referenced. */
   5211   tree binfo;
   5212   /* The declaration whose access must be checked.  */
   5213   tree decl;
   5214   /* The declaration that should be used in the error message.  */
   5215   tree diag_decl;
   5216 } deferred_access_check;
   5217 DEF_VEC_O(deferred_access_check);
   5218 DEF_VEC_ALLOC_O(deferred_access_check,gc);
   5219 
   5220 /* in semantics.c */
   5221 extern void push_deferring_access_checks	(deferring_kind);
   5222 extern void resume_deferring_access_checks	(void);
   5223 extern void stop_deferring_access_checks	(void);
   5224 extern void pop_deferring_access_checks		(void);
   5225 extern VEC (deferred_access_check,gc)* get_deferred_access_checks		(void);
   5226 extern void pop_to_parent_deferring_access_checks (void);
   5227 extern void perform_access_checks		(VEC (deferred_access_check,gc)*);
   5228 extern void perform_deferred_access_checks	(void);
   5229 extern void perform_or_defer_access_check	(tree, tree, tree);
   5230 extern bool speculative_access_check		(tree, tree, tree, bool);
   5231 extern int stmts_are_full_exprs_p		(void);
   5232 extern void init_cp_semantics			(void);
   5233 extern tree do_poplevel				(tree);
   5234 extern void add_decl_expr			(tree);
   5235 extern tree finish_expr_stmt			(tree);
   5236 extern tree begin_if_stmt			(void);
   5237 extern void finish_if_stmt_cond			(tree, tree);
   5238 extern tree finish_then_clause			(tree);
   5239 extern void begin_else_clause			(tree);
   5240 extern void finish_else_clause			(tree);
   5241 extern void finish_if_stmt			(tree);
   5242 extern tree begin_while_stmt			(void);
   5243 extern void finish_while_stmt_cond		(tree, tree);
   5244 extern void finish_while_stmt			(tree);
   5245 extern tree begin_do_stmt			(void);
   5246 extern void finish_do_body			(tree);
   5247 extern void finish_do_stmt			(tree, tree);
   5248 extern tree finish_return_stmt			(tree);
   5249 extern tree begin_for_scope			(tree *);
   5250 extern tree begin_for_stmt			(tree, tree);
   5251 extern void finish_for_init_stmt		(tree);
   5252 extern void finish_for_cond			(tree, tree);
   5253 extern void finish_for_expr			(tree, tree);
   5254 extern void finish_for_stmt			(tree);
   5255 extern tree begin_range_for_stmt		(tree, tree);
   5256 extern void finish_range_for_decl		(tree, tree, tree);
   5257 extern void finish_range_for_stmt		(tree);
   5258 extern tree finish_break_stmt			(void);
   5259 extern tree finish_continue_stmt		(void);
   5260 extern tree begin_switch_stmt			(void);
   5261 extern void finish_switch_cond			(tree, tree);
   5262 extern void finish_switch_stmt			(tree);
   5263 extern tree finish_goto_stmt			(tree);
   5264 extern tree begin_try_block			(void);
   5265 extern void finish_try_block			(tree);
   5266 extern void finish_handler_sequence		(tree);
   5267 extern tree begin_function_try_block		(tree *);
   5268 extern void finish_function_try_block		(tree);
   5269 extern void finish_function_handler_sequence    (tree, tree);
   5270 extern void finish_cleanup_try_block		(tree);
   5271 extern tree begin_handler			(void);
   5272 extern void finish_handler_parms		(tree, tree);
   5273 extern void finish_handler			(tree);
   5274 extern void finish_cleanup			(tree, tree);
   5275 extern bool literal_type_p (tree);
   5276 extern tree validate_constexpr_fundecl (tree);
   5277 extern tree register_constexpr_fundef (tree, tree);
   5278 extern bool check_constexpr_ctor_body (tree, tree);
   5279 extern tree ensure_literal_type_for_constexpr_object (tree);
   5280 extern bool potential_constant_expression (tree);
   5281 extern bool potential_rvalue_constant_expression (tree);
   5282 extern bool require_potential_constant_expression (tree);
   5283 extern bool require_potential_rvalue_constant_expression (tree);
   5284 extern tree cxx_constant_value (tree);
   5285 extern tree maybe_constant_value (tree);
   5286 extern tree maybe_constant_init (tree);
   5287 extern bool is_sub_constant_expr (tree);
   5288 extern bool reduced_constant_expression_p (tree);
   5289 extern VEC(tree,heap)* cx_error_context (void);
   5290 
   5291 enum {
   5292   BCS_NO_SCOPE = 1,
   5293   BCS_TRY_BLOCK = 2,
   5294   BCS_FN_BODY = 4
   5295 };
   5296 extern tree begin_compound_stmt			(unsigned int);
   5297 
   5298 extern void finish_compound_stmt		(tree);
   5299 extern tree finish_asm_stmt			(int, tree, tree, tree, tree,
   5300 						 tree);
   5301 extern tree finish_label_stmt			(tree);
   5302 extern void finish_label_decl			(tree);
   5303 extern tree finish_parenthesized_expr		(tree);
   5304 extern tree finish_non_static_data_member       (tree, tree, tree);
   5305 extern tree begin_stmt_expr			(void);
   5306 extern tree finish_stmt_expr_expr		(tree, tree);
   5307 extern tree finish_stmt_expr			(tree, bool);
   5308 extern tree stmt_expr_value_expr		(tree);
   5309 bool empty_expr_stmt_p				(tree);
   5310 extern tree perform_koenig_lookup		(tree, VEC(tree,gc) *, bool);
   5311 extern tree finish_call_expr			(tree, VEC(tree,gc) **, bool,
   5312 						 bool, tsubst_flags_t);
   5313 extern tree finish_increment_expr		(tree, enum tree_code);
   5314 extern tree finish_this_expr			(void);
   5315 extern tree finish_pseudo_destructor_expr       (tree, tree, tree);
   5316 extern tree finish_unary_op_expr		(enum tree_code, tree);
   5317 extern tree finish_compound_literal		(tree, tree);
   5318 extern tree finish_fname			(tree);
   5319 extern void finish_translation_unit		(void);
   5320 extern tree finish_template_type_parm		(tree, tree);
   5321 extern tree finish_template_template_parm       (tree, tree);
   5322 extern tree begin_class_definition		(tree, tree);
   5323 extern void finish_template_decl		(tree);
   5324 extern tree finish_template_type		(tree, tree, int);
   5325 extern tree finish_base_specifier		(tree, tree, bool);
   5326 extern void finish_member_declaration		(tree);
   5327 extern tree finish_id_expression		(tree, tree, tree,
   5328 						 cp_id_kind *,
   5329 						 bool, bool, bool *,
   5330 						 bool, bool, bool, bool,
   5331 						 const char **,
   5332                                                  location_t);
   5333 extern tree finish_typeof			(tree);
   5334 extern tree finish_offsetof			(tree);
   5335 extern void finish_decl_cleanup			(tree, tree);
   5336 extern void finish_eh_cleanup			(tree);
   5337 extern void emit_associated_thunks		(tree);
   5338 extern void finish_mem_initializers		(tree);
   5339 extern tree check_template_template_default_arg (tree);
   5340 extern bool expand_or_defer_fn_1		(tree);
   5341 extern void expand_or_defer_fn			(tree);
   5342 extern void add_typedef_to_current_template_for_access_check (tree, tree,
   5343 							      location_t);
   5344 extern void check_accessibility_of_qualified_id (tree, tree, tree);
   5345 extern tree finish_qualified_id_expr		(tree, tree, bool, bool,
   5346 						 bool, bool);
   5347 extern void simplify_aggr_init_expr		(tree *);
   5348 extern void finalize_nrv			(tree *, tree, tree);
   5349 extern void note_decl_for_pch			(tree);
   5350 extern tree finish_omp_clauses			(tree);
   5351 extern void finish_omp_threadprivate		(tree);
   5352 extern tree begin_omp_structured_block		(void);
   5353 extern tree finish_omp_structured_block		(tree);
   5354 extern tree begin_omp_parallel			(void);
   5355 extern tree finish_omp_parallel			(tree, tree);
   5356 extern tree begin_omp_task			(void);
   5357 extern tree finish_omp_task			(tree, tree);
   5358 extern tree finish_omp_for			(location_t, tree, tree,
   5359 						 tree, tree, tree, tree, tree);
   5360 extern void finish_omp_atomic			(enum tree_code, tree, tree);
   5361 extern void finish_omp_barrier			(void);
   5362 extern void finish_omp_flush			(void);
   5363 extern void finish_omp_taskwait			(void);
   5364 extern bool cxx_omp_create_clause_info		(tree, tree, bool, bool, bool);
   5365 extern tree baselink_for_fns                    (tree);
   5366 extern void finish_static_assert                (tree, tree, location_t,
   5367                                                  bool);
   5368 extern tree describable_type			(tree);
   5369 extern tree finish_decltype_type                (tree, bool, tsubst_flags_t);
   5370 extern tree finish_trait_expr			(enum cp_trait_kind, tree, tree);
   5371 extern tree build_lambda_expr                   (void);
   5372 extern tree build_lambda_object			(tree);
   5373 extern tree begin_lambda_type                   (tree);
   5374 extern tree lambda_capture_field_type		(tree);
   5375 extern tree lambda_return_type			(tree);
   5376 extern tree lambda_function			(tree);
   5377 extern void apply_lambda_return_type            (tree, tree);
   5378 extern tree add_capture                         (tree, tree, tree, bool, bool);
   5379 extern tree add_default_capture                 (tree, tree, tree);
   5380 extern void register_capture_members		(tree);
   5381 extern tree lambda_expr_this_capture            (tree);
   5382 extern tree nonlambda_method_basetype		(void);
   5383 extern void maybe_add_lambda_conv_op            (tree);
   5384 
   5385 /* in tree.c */
   5386 void cp_free_lang_data 				(tree t);
   5387 extern tree force_target_expr			(tree, tree);
   5388 extern tree build_target_expr_with_type		(tree, tree);
   5389 extern void lang_check_failed			(const char *, int,
   5390 						 const char *) ATTRIBUTE_NORETURN;
   5391 extern tree stabilize_expr			(tree, tree *);
   5392 extern void stabilize_call			(tree, tree *);
   5393 extern void stabilize_aggr_init			(tree, tree *);
   5394 extern bool stabilize_init			(tree, tree *);
   5395 extern tree add_stmt_to_compound		(tree, tree);
   5396 extern void init_tree				(void);
   5397 extern bool pod_type_p				(const_tree);
   5398 extern bool layout_pod_type_p			(const_tree);
   5399 extern bool std_layout_type_p			(const_tree);
   5400 extern bool trivial_type_p			(const_tree);
   5401 extern bool trivially_copyable_p		(const_tree);
   5402 extern bool type_has_nontrivial_default_init	(const_tree);
   5403 extern bool type_has_nontrivial_copy_init	(const_tree);
   5404 extern bool class_tmpl_impl_spec_p		(const_tree);
   5405 extern int zero_init_p				(const_tree);
   5406 extern tree strip_typedefs			(tree);
   5407 extern tree copy_binfo				(tree, tree, tree,
   5408 						 tree *, int);
   5409 extern int member_p				(const_tree);
   5410 extern cp_lvalue_kind real_lvalue_p		(const_tree);
   5411 extern cp_lvalue_kind lvalue_kind		(const_tree);
   5412 extern bool lvalue_or_rvalue_with_address_p	(const_tree);
   5413 extern bool builtin_valid_in_constant_expr_p    (const_tree);
   5414 extern tree build_min				(enum tree_code, tree, ...);
   5415 extern tree build_min_nt			(enum tree_code, ...);
   5416 extern tree build_min_non_dep			(enum tree_code, tree, ...);
   5417 extern tree build_min_non_dep_call_vec		(tree, tree, VEC(tree,gc) *);
   5418 extern tree build_cplus_new			(tree, tree);
   5419 extern tree build_aggr_init_expr		(tree, tree);
   5420 extern tree get_target_expr			(tree);
   5421 extern tree build_cplus_array_type		(tree, tree);
   5422 extern tree build_array_of_n_type		(tree, int);
   5423 extern tree build_array_copy			(tree);
   5424 extern tree build_vec_init_expr			(tree, tree);
   5425 extern void diagnose_non_constexpr_vec_init	(tree);
   5426 extern tree hash_tree_cons			(tree, tree, tree);
   5427 extern tree hash_tree_chain			(tree, tree);
   5428 extern tree build_qualified_name		(tree, tree, tree, bool);
   5429 extern int is_overloaded_fn			(tree);
   5430 extern tree get_fns				(tree);
   5431 extern tree get_first_fn			(tree);
   5432 extern tree ovl_cons				(tree, tree);
   5433 extern tree build_overload			(tree, tree);
   5434 extern bool non_static_member_function_p        (tree);
   5435 extern const char *cxx_printable_name		(tree, int);
   5436 extern const char *cxx_printable_name_translate	(tree, int);
   5437 extern tree build_exception_variant		(tree, tree);
   5438 extern tree bind_template_template_parm		(tree, tree);
   5439 extern tree array_type_nelts_total		(tree);
   5440 extern tree array_type_nelts_top		(tree);
   5441 extern tree break_out_target_exprs		(tree);
   5442 extern tree get_type_decl			(tree);
   5443 extern tree decl_namespace_context		(tree);
   5444 extern bool decl_anon_ns_mem_p			(const_tree);
   5445 extern tree lvalue_type				(tree);
   5446 extern tree error_type				(tree);
   5447 extern int varargs_function_p			(const_tree);
   5448 extern bool really_overloaded_fn		(tree);
   5449 extern bool cp_tree_equal			(tree, tree);
   5450 extern tree no_linkage_check			(tree, bool);
   5451 extern void debug_binfo				(tree);
   5452 extern tree build_dummy_object			(tree);
   5453 extern tree maybe_dummy_object			(tree, tree *);
   5454 extern int is_dummy_object			(const_tree);
   5455 extern const struct attribute_spec cxx_attribute_table[];
   5456 extern tree make_ptrmem_cst			(tree, tree);
   5457 extern tree cp_build_type_attribute_variant     (tree, tree);
   5458 extern tree cp_build_reference_type		(tree, bool);
   5459 extern tree move				(tree);
   5460 extern tree cp_build_qualified_type_real	(tree, int, tsubst_flags_t);
   5461 #define cp_build_qualified_type(TYPE, QUALS) \
   5462   cp_build_qualified_type_real ((TYPE), (QUALS), tf_warning_or_error)
   5463 extern bool cv_qualified_p			(const_tree);
   5464 extern tree cv_unqualified			(tree);
   5465 extern special_function_kind special_function_p (const_tree);
   5466 extern int count_trees				(tree);
   5467 extern int char_type_p				(tree);
   5468 extern void verify_stmt_tree			(tree);
   5469 extern linkage_kind decl_linkage		(tree);
   5470 extern duration_kind decl_storage_duration	(tree);
   5471 extern tree cp_walk_subtrees (tree*, int*, walk_tree_fn,
   5472 			      void*, struct pointer_set_t*);
   5473 #define cp_walk_tree(a,b,c,d) \
   5474 	walk_tree_1 (a, b, c, d, cp_walk_subtrees)
   5475 #define cp_walk_tree_without_duplicates(a,b,c) \
   5476 	walk_tree_without_duplicates_1 (a, b, c, cp_walk_subtrees)
   5477 extern tree fold_if_not_in_template		(tree);
   5478 extern tree rvalue				(tree);
   5479 extern tree convert_bitfield_to_declared_type   (tree);
   5480 extern tree cp_save_expr			(tree);
   5481 extern bool cast_valid_in_integral_constant_expression_p (tree);
   5482 extern bool cxx_type_hash_eq			(const_tree, const_tree);
   5483 
   5484 extern void cxx_print_statistics		(void);
   5485 
   5486 /* in ptree.c */
   5487 extern void cxx_print_xnode			(FILE *, tree, int);
   5488 extern void cxx_print_decl			(FILE *, tree, int);
   5489 extern void cxx_print_type			(FILE *, tree, int);
   5490 extern void cxx_print_identifier		(FILE *, tree, int);
   5491 extern void cxx_print_error_function		(diagnostic_context *,
   5492 						 const char *,
   5493 						 struct diagnostic_info *);
   5494 
   5495 /* in typeck.c */
   5496 extern bool cxx_mark_addressable		(tree);
   5497 extern int string_conv_p			(const_tree, const_tree, int);
   5498 extern tree cp_truthvalue_conversion		(tree);
   5499 extern tree condition_conversion		(tree);
   5500 extern tree require_complete_type		(tree);
   5501 extern tree require_complete_type_sfinae	(tree, tsubst_flags_t);
   5502 extern tree complete_type			(tree);
   5503 extern tree complete_type_or_else		(tree, tree);
   5504 extern tree complete_type_or_maybe_complain	(tree, tree, tsubst_flags_t);
   5505 extern int type_unknown_p			(const_tree);
   5506 enum { ce_derived, ce_normal, ce_exact };
   5507 extern bool comp_except_specs			(const_tree, const_tree, int);
   5508 extern bool comptypes				(tree, tree, int);
   5509 extern bool same_type_ignoring_top_level_qualifiers_p (tree, tree);
   5510 extern bool compparms				(const_tree, const_tree);
   5511 extern int comp_cv_qualification		(const_tree, const_tree);
   5512 extern int comp_cv_qual_signature		(tree, tree);
   5513 extern tree cxx_sizeof_or_alignof_expr		(tree, enum tree_code, bool);
   5514 extern tree cxx_sizeof_or_alignof_type		(tree, enum tree_code, bool);
   5515 extern tree cxx_sizeof_nowarn                   (tree);
   5516 extern tree is_bitfield_expr_with_lowered_type  (const_tree);
   5517 extern tree unlowered_expr_type                 (const_tree);
   5518 extern tree decay_conversion			(tree);
   5519 extern tree build_class_member_access_expr      (tree, tree, tree, bool,
   5520 						 tsubst_flags_t);
   5521 extern tree finish_class_member_access_expr     (tree, tree, bool,
   5522 						 tsubst_flags_t);
   5523 extern tree build_x_indirect_ref		(tree, ref_operator,
   5524                                                  tsubst_flags_t);
   5525 extern tree cp_build_indirect_ref		(tree, ref_operator,
   5526                                                  tsubst_flags_t);
   5527 extern tree build_array_ref			(location_t, tree, tree);
   5528 extern tree cp_build_array_ref			(location_t, tree, tree,
   5529 						 tsubst_flags_t);
   5530 extern tree get_member_function_from_ptrfunc	(tree *, tree);
   5531 extern tree cp_build_function_call              (tree, tree, tsubst_flags_t);
   5532 extern tree cp_build_function_call_nary         (tree, tsubst_flags_t, ...)
   5533 						ATTRIBUTE_SENTINEL;
   5534 extern tree cp_build_function_call_vec		(tree, VEC(tree,gc) **,
   5535 						 tsubst_flags_t);
   5536 extern tree build_x_binary_op			(enum tree_code, tree,
   5537 						 enum tree_code, tree,
   5538 						 enum tree_code, bool *,
   5539 						 tsubst_flags_t);
   5540 extern tree build_x_array_ref			(tree, tree, tsubst_flags_t);
   5541 extern tree build_x_unary_op			(enum tree_code, tree,
   5542                                                  tsubst_flags_t);
   5543 extern tree cp_build_addr_expr			(tree, tsubst_flags_t);
   5544 extern tree cp_build_addr_expr_strict		(tree, tsubst_flags_t);
   5545 extern tree cp_build_unary_op                   (enum tree_code, tree, int,
   5546                                                  tsubst_flags_t);
   5547 extern tree unary_complex_lvalue		(enum tree_code, tree);
   5548 extern tree build_x_conditional_expr		(tree, tree, tree,
   5549                                                  tsubst_flags_t);
   5550 extern tree build_x_compound_expr_from_list	(tree, expr_list_kind,
   5551 						 tsubst_flags_t);
   5552 extern tree build_x_compound_expr_from_vec	(VEC(tree,gc) *, const char *);
   5553 extern tree build_x_compound_expr		(tree, tree, tsubst_flags_t);
   5554 extern tree build_compound_expr                 (location_t, tree, tree);
   5555 extern tree cp_build_compound_expr		(tree, tree, tsubst_flags_t);
   5556 extern tree build_static_cast			(tree, tree, tsubst_flags_t);
   5557 extern tree build_reinterpret_cast		(tree, tree, tsubst_flags_t);
   5558 extern tree build_const_cast			(tree, tree, tsubst_flags_t);
   5559 extern tree build_c_cast			(location_t, tree, tree);
   5560 extern tree cp_build_c_cast			(tree, tree, tsubst_flags_t);
   5561 extern tree build_x_modify_expr			(tree, enum tree_code, tree,
   5562 						 tsubst_flags_t);
   5563 extern tree cp_build_modify_expr		(tree, enum tree_code, tree,
   5564 						 tsubst_flags_t);
   5565 extern tree convert_for_initialization		(tree, tree, tree, int,
   5566 						 impl_conv_rhs, tree, int,
   5567                                                  tsubst_flags_t);
   5568 extern int comp_ptr_ttypes			(tree, tree);
   5569 extern bool comp_ptr_ttypes_const		(tree, tree);
   5570 extern bool error_type_p			(const_tree);
   5571 extern int ptr_reasonably_similar		(const_tree, const_tree);
   5572 extern tree build_ptrmemfunc			(tree, tree, int, bool,
   5573 						 tsubst_flags_t);
   5574 extern int cp_type_quals			(const_tree);
   5575 extern int type_memfn_quals			(const_tree);
   5576 extern tree apply_memfn_quals			(tree, cp_cv_quals);
   5577 extern bool cp_has_mutable_p			(const_tree);
   5578 extern bool at_least_as_qualified_p		(const_tree, const_tree);
   5579 extern void cp_apply_type_quals_to_decl		(int, tree);
   5580 extern tree build_ptrmemfunc1			(tree, tree, tree);
   5581 extern void expand_ptrmemfunc_cst		(tree, tree *, tree *);
   5582 extern tree type_after_usual_arithmetic_conversions (tree, tree);
   5583 extern tree common_pointer_type                 (tree, tree);
   5584 extern tree composite_pointer_type		(tree, tree, tree, tree,
   5585 						 composite_pointer_operation,
   5586 						 tsubst_flags_t);
   5587 extern tree merge_types				(tree, tree);
   5588 extern tree strip_array_domain			(tree);
   5589 extern tree check_return_expr			(tree, bool *);
   5590 extern tree cp_build_binary_op                  (location_t,
   5591 						 enum tree_code, tree, tree,
   5592 						 tsubst_flags_t);
   5593 #define cxx_sizeof(T)  cxx_sizeof_or_alignof_type (T, SIZEOF_EXPR, true)
   5594 extern tree build_ptrmemfunc_access_expr	(tree, tree);
   5595 extern tree build_address			(tree);
   5596 extern tree build_typed_address			(tree, tree);
   5597 extern tree build_nop				(tree, tree);
   5598 extern tree non_reference			(tree);
   5599 extern tree lookup_anon_field			(tree, tree);
   5600 extern bool invalid_nonstatic_memfn_p		(const_tree, tsubst_flags_t);
   5601 extern tree convert_member_func_to_ptr		(tree, tree);
   5602 extern tree convert_ptrmem			(tree, tree, bool, bool,
   5603 						 tsubst_flags_t);
   5604 extern int lvalue_or_else			(tree, enum lvalue_use,
   5605                                                  tsubst_flags_t);
   5606 extern void check_template_keyword		(tree);
   5607 
   5608 /* in typeck2.c */
   5609 extern void require_complete_eh_spec_types	(tree, tree);
   5610 extern void cxx_incomplete_type_diagnostic	(const_tree, const_tree, diagnostic_t);
   5611 #undef cxx_incomplete_type_error
   5612 extern void cxx_incomplete_type_error		(const_tree, const_tree);
   5613 #define cxx_incomplete_type_error(V,T) \
   5614   (cxx_incomplete_type_diagnostic ((V), (T), DK_ERROR))
   5615 extern tree error_not_base_type			(tree, tree);
   5616 extern tree binfo_or_else			(tree, tree);
   5617 extern void cxx_readonly_error			(tree, enum lvalue_use);
   5618 extern void complete_type_check_abstract	(tree);
   5619 extern int abstract_virtuals_error		(tree, tree);
   5620 
   5621 extern tree store_init_value			(tree, tree, int);
   5622 extern void check_narrowing			(tree, tree);
   5623 extern tree digest_init				(tree, tree);
   5624 extern tree digest_init_flags			(tree, tree, int);
   5625 extern tree build_scoped_ref			(tree, tree, tree *);
   5626 extern tree build_x_arrow			(tree);
   5627 extern tree build_m_component_ref		(tree, tree);
   5628 extern tree build_functional_cast		(tree, tree, tsubst_flags_t);
   5629 extern tree add_exception_specifier		(tree, tree, int);
   5630 extern tree merge_exception_specifiers		(tree, tree);
   5631 
   5632 /* in mangle.c */
   5633 extern void init_mangle				(void);
   5634 extern void mangle_decl				(tree);
   5635 extern const char *mangle_type_string		(tree);
   5636 extern tree mangle_typeinfo_for_type		(tree);
   5637 extern tree mangle_typeinfo_string_for_type	(tree);
   5638 extern tree mangle_vtbl_for_type		(tree);
   5639 extern tree mangle_vtt_for_type			(tree);
   5640 extern tree mangle_ctor_vtbl_for_type		(tree, tree);
   5641 extern tree mangle_thunk			(tree, int, tree, tree);
   5642 extern tree mangle_conv_op_name_for_type	(tree);
   5643 extern tree mangle_guard_variable		(tree);
   5644 extern tree mangle_ref_init_variable		(tree);
   5645 
   5646 /* in dump.c */
   5647 extern bool cp_dump_tree			(void *, tree);
   5648 
   5649 /* In cp/cp-objcp-common.c.  */
   5650 
   5651 extern alias_set_type cxx_get_alias_set		(tree);
   5652 extern bool cxx_warn_unused_global_decl		(const_tree);
   5653 extern size_t cp_tree_size			(enum tree_code);
   5654 extern bool cp_var_mod_type_p			(tree, tree);
   5655 extern void cxx_initialize_diagnostics		(diagnostic_context *);
   5656 extern int cxx_types_compatible_p		(tree, tree);
   5657 extern void init_shadowed_var_for_decl		(void);
   5658 
   5659 /* LIPO support.  */
   5660 extern bool cp_is_compiler_generated_type        (tree);
   5661 extern void cp_clear_global_name_bindings       (tree);
   5662 extern bool
   5663 cp_is_non_sharable_global_decl                  (tree, void *);
   5664 extern void cp_lipo_dup_lang_type               (tree, tree);
   5665 extern void cp_lipo_copy_lang_type              (tree, tree);
   5666 extern int cp_get_lang_decl_size                (tree);
   5667 extern int cp_cmp_lang_type                     (tree, tree);
   5668 extern void cp_add_built_in_decl                (tree);
   5669 extern void cp_save_built_in_decl_pre_parsing (void);
   5670 extern void cp_restore_built_in_decl_pre_parsing (void);
   5671 extern void cp_save_built_in_decl_post_parsing (void);
   5672 extern void cp_restore_built_in_decl_post_parsing (void);
   5673 
   5674 
   5675 /* in cp-gimplify.c */
   5676 extern int cp_gimplify_expr			(tree *, gimple_seq *,
   5677 						 gimple_seq *);
   5678 extern void cp_genericize			(tree);
   5679 extern enum omp_clause_default_kind cxx_omp_predetermined_sharing (tree);
   5680 extern tree cxx_omp_clause_default_ctor		(tree, tree, tree);
   5681 extern tree cxx_omp_clause_copy_ctor		(tree, tree, tree);
   5682 extern tree cxx_omp_clause_assign_op		(tree, tree, tree);
   5683 extern tree cxx_omp_clause_dtor			(tree, tree);
   5684 extern void cxx_omp_finish_clause		(tree);
   5685 extern bool cxx_omp_privatize_by_reference	(const_tree);
   5686 
   5687 /* in name-lookup.c */
   5688 extern void suggest_alternatives_for (location_t, tree);
   5689 
   5690 /* -- end of C++ */
   5691 
   5692 #endif /* ! GCC_CP_TREE_H */
   5693