Home | History | Annotate | Line # | Download | only in cp
      1 /* Definitions for -*- C++ -*- parsing and type checking.
      2    Copyright (C) 1987-2022 Free Software Foundation, Inc.
      3    Contributed by Michael Tiemann (tiemann (at) cygnus.com)
      4 
      5 This file is part of GCC.
      6 
      7 GCC is free software; you can redistribute it and/or modify
      8 it under the terms of the GNU General Public License as published by
      9 the Free Software Foundation; either version 3, or (at your option)
     10 any later version.
     11 
     12 GCC is distributed in the hope that it will be useful,
     13 but WITHOUT ANY WARRANTY; without even the implied warranty of
     14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     15 GNU General Public License for more details.
     16 
     17 You should have received a copy of the GNU General Public License
     18 along with GCC; see the file COPYING3.  If not see
     19 <http://www.gnu.org/licenses/>.  */
     20 
     21 #ifndef GCC_CP_TREE_H
     22 #define GCC_CP_TREE_H
     23 
     24 #include "tm.h"
     25 #include "hard-reg-set.h"
     26 #include "function.h"
     27 
     28 /* In order for the format checking to accept the C++ front end
     29    diagnostic framework extensions, you must include this file before
     30    diagnostic-core.h, not after.  We override the definition of GCC_DIAG_STYLE
     31    in c-common.h.  */
     32 #undef GCC_DIAG_STYLE
     33 #define GCC_DIAG_STYLE __gcc_cxxdiag__
     34 #if defined(GCC_DIAGNOSTIC_CORE_H) || defined (GCC_C_COMMON_H)
     35 #error \
     36 In order for the format checking to accept the C++ front end diagnostic \
     37 framework extensions, you must include this file before diagnostic-core.h and \
     38 c-common.h, not after.
     39 #endif
     40 #include "c-family/c-common.h"
     41 #include "diagnostic.h"
     42 
     43 /* A tree node, together with a location, so that we can track locations
     44    (and ranges) during parsing.
     45 
     46    The location is redundant for node kinds that have locations,
     47    but not all node kinds do (e.g. constants, and references to
     48    params, locals, etc), so we stash a copy here.  */
     49 
     50 extern location_t cp_expr_location		(const_tree);
     51 
     52 class cp_expr
     53 {
     54 public:
     55   cp_expr () :
     56     m_value (NULL), m_loc (UNKNOWN_LOCATION) {}
     57 
     58   cp_expr (tree value) :
     59     m_value (value), m_loc (cp_expr_location (m_value)) {}
     60 
     61   cp_expr (tree value, location_t loc):
     62     m_value (value), m_loc (loc)
     63   {
     64     protected_set_expr_location (value, loc);
     65   }
     66 
     67   /* Implicit conversions to tree.  */
     68   operator tree () const { return m_value; }
     69   tree & operator* () { return m_value; }
     70   tree operator* () const { return m_value; }
     71   tree & operator-> () { return m_value; }
     72   tree operator-> () const { return m_value; }
     73 
     74   tree get_value () const { return m_value; }
     75   location_t get_location () const { return m_loc; }
     76   location_t get_start () const
     77   {
     78     source_range src_range = get_range_from_loc (line_table, m_loc);
     79     return src_range.m_start;
     80   }
     81   location_t get_finish () const
     82   {
     83     source_range src_range = get_range_from_loc (line_table, m_loc);
     84     return src_range.m_finish;
     85   }
     86 
     87   void set_location (location_t loc)
     88   {
     89     protected_set_expr_location (m_value, loc);
     90     m_loc = loc;
     91   }
     92 
     93   void set_range (location_t start, location_t finish)
     94   {
     95     set_location (make_location (m_loc, start, finish));
     96   }
     97 
     98   cp_expr& maybe_add_location_wrapper ()
     99   {
    100     m_value = maybe_wrap_with_location (m_value, m_loc);
    101     return *this;
    102   }
    103 
    104  private:
    105   tree m_value;
    106   location_t m_loc;
    107 };
    108 
    109 inline bool
    110 operator == (const cp_expr &lhs, tree rhs)
    111 {
    112   return lhs.get_value () == rhs;
    113 }
    114 
    115 
    116 enum cp_tree_index
    118 {
    119     CPTI_WCHAR_DECL,
    120     CPTI_VTABLE_ENTRY_TYPE,
    121     CPTI_DELTA_TYPE,
    122     CPTI_VTABLE_INDEX_TYPE,
    123     CPTI_CLEANUP_TYPE,
    124     CPTI_VTT_PARM_TYPE,
    125 
    126     CPTI_CLASS_TYPE,
    127     CPTI_UNKNOWN_TYPE,
    128     CPTI_INIT_LIST_TYPE,
    129     CPTI_EXPLICIT_VOID_LIST,
    130     CPTI_VTBL_TYPE,
    131     CPTI_VTBL_PTR_TYPE,
    132     CPTI_GLOBAL,
    133     CPTI_ABORT_FNDECL,
    134     CPTI_AGGR_TAG,
    135     CPTI_CONV_OP_MARKER,
    136 
    137     CPTI_CTOR_IDENTIFIER,
    138     CPTI_COMPLETE_CTOR_IDENTIFIER,
    139     CPTI_BASE_CTOR_IDENTIFIER,
    140     CPTI_DTOR_IDENTIFIER,
    141     CPTI_COMPLETE_DTOR_IDENTIFIER,
    142     CPTI_BASE_DTOR_IDENTIFIER,
    143     CPTI_DELETING_DTOR_IDENTIFIER,
    144     CPTI_CONV_OP_IDENTIFIER,
    145     CPTI_DELTA_IDENTIFIER,
    146     CPTI_IN_CHARGE_IDENTIFIER,
    147     CPTI_VTT_PARM_IDENTIFIER,
    148     CPTI_AS_BASE_IDENTIFIER,
    149     CPTI_THIS_IDENTIFIER,
    150     CPTI_PFN_IDENTIFIER,
    151     CPTI_VPTR_IDENTIFIER,
    152     CPTI_GLOBAL_IDENTIFIER,
    153     CPTI_ANON_IDENTIFIER,
    154     CPTI_AUTO_IDENTIFIER,
    155     CPTI_DECLTYPE_AUTO_IDENTIFIER,
    156     CPTI_INIT_LIST_IDENTIFIER,
    157     CPTI_FOR_RANGE__IDENTIFIER,
    158     CPTI_FOR_BEGIN__IDENTIFIER,
    159     CPTI_FOR_END__IDENTIFIER,
    160     CPTI_FOR_RANGE_IDENTIFIER,
    161     CPTI_FOR_BEGIN_IDENTIFIER,
    162     CPTI_FOR_END_IDENTIFIER,
    163     CPTI_ABI_TAG_IDENTIFIER,
    164     CPTI_ALIGNED_IDENTIFIER,
    165     CPTI_BEGIN_IDENTIFIER,
    166     CPTI_END_IDENTIFIER,
    167     CPTI_GET_IDENTIFIER,
    168     CPTI_GNU_IDENTIFIER,
    169     CPTI_TUPLE_ELEMENT_IDENTIFIER,
    170     CPTI_TUPLE_SIZE_IDENTIFIER,
    171     CPTI_TYPE_IDENTIFIER,
    172     CPTI_VALUE_IDENTIFIER,
    173     CPTI_FUN_IDENTIFIER,
    174     CPTI_CLOSURE_IDENTIFIER,
    175     CPTI_HEAP_UNINIT_IDENTIFIER,
    176     CPTI_HEAP_IDENTIFIER,
    177     CPTI_HEAP_DELETED_IDENTIFIER,
    178     CPTI_HEAP_VEC_UNINIT_IDENTIFIER,
    179     CPTI_HEAP_VEC_IDENTIFIER,
    180     CPTI_OMP_IDENTIFIER,
    181 
    182     CPTI_LANG_NAME_C,
    183     CPTI_LANG_NAME_CPLUSPLUS,
    184 
    185     CPTI_EMPTY_EXCEPT_SPEC,
    186     CPTI_NOEXCEPT_TRUE_SPEC,
    187     CPTI_NOEXCEPT_FALSE_SPEC,
    188     CPTI_NOEXCEPT_DEFERRED_SPEC,
    189 
    190     CPTI_NULLPTR,
    191     CPTI_NULLPTR_TYPE,
    192 
    193     CPTI_ANY_TARG,
    194 
    195     CPTI_MODULE_HWM,
    196     /* Nodes after here change during compilation, or should not be in
    197        the module's global tree table.  Such nodes must be locatable
    198        via name lookup or type-construction, as those are the only
    199        cross-TU matching capabilities remaining.  */
    200 
    201     /* We must find these via the global namespace.  */
    202     CPTI_STD,
    203     CPTI_ABI,
    204 
    205     /* These are created at init time, but the library/headers provide
    206        definitions.  */
    207     CPTI_ALIGN_TYPE,
    208     CPTI_TERMINATE_FN,
    209     CPTI_CALL_UNEXPECTED_FN,
    210 
    211     /* These are lazily inited.  */
    212     CPTI_CONST_TYPE_INFO_TYPE,
    213     CPTI_GET_EXCEPTION_PTR_FN,
    214     CPTI_BEGIN_CATCH_FN,
    215     CPTI_END_CATCH_FN,
    216     CPTI_ALLOCATE_EXCEPTION_FN,
    217     CPTI_FREE_EXCEPTION_FN,
    218     CPTI_THROW_FN,
    219     CPTI_RETHROW_FN,
    220     CPTI_ATEXIT_FN_PTR_TYPE,
    221     CPTI_ATEXIT,
    222     CPTI_DSO_HANDLE,
    223     CPTI_DCAST,
    224 
    225     CPTI_SOURCE_LOCATION_IMPL,
    226 
    227     CPTI_FALLBACK_DFLOAT32_TYPE,
    228     CPTI_FALLBACK_DFLOAT64_TYPE,
    229     CPTI_FALLBACK_DFLOAT128_TYPE,
    230 
    231     CPTI_MAX
    232 };
    233 
    234 extern GTY(()) tree cp_global_trees[CPTI_MAX];
    235 
    236 #define wchar_decl_node			cp_global_trees[CPTI_WCHAR_DECL]
    237 #define vtable_entry_type		cp_global_trees[CPTI_VTABLE_ENTRY_TYPE]
    238 /* The type used to represent an offset by which to adjust the `this'
    239    pointer in pointer-to-member types.  */
    240 #define delta_type_node			cp_global_trees[CPTI_DELTA_TYPE]
    241 /* The type used to represent an index into the vtable.  */
    242 #define vtable_index_type		cp_global_trees[CPTI_VTABLE_INDEX_TYPE]
    243 
    244 #define class_type_node			cp_global_trees[CPTI_CLASS_TYPE]
    245 #define unknown_type_node		cp_global_trees[CPTI_UNKNOWN_TYPE]
    246 #define init_list_type_node		cp_global_trees[CPTI_INIT_LIST_TYPE]
    247 #define explicit_void_list_node		cp_global_trees[CPTI_EXPLICIT_VOID_LIST]
    248 #define vtbl_type_node			cp_global_trees[CPTI_VTBL_TYPE]
    249 #define vtbl_ptr_type_node		cp_global_trees[CPTI_VTBL_PTR_TYPE]
    250 #define std_node			cp_global_trees[CPTI_STD]
    251 #define abi_node			cp_global_trees[CPTI_ABI]
    252 #define global_namespace		cp_global_trees[CPTI_GLOBAL]
    253 #define const_type_info_type_node	cp_global_trees[CPTI_CONST_TYPE_INFO_TYPE]
    254 #define conv_op_marker			cp_global_trees[CPTI_CONV_OP_MARKER]
    255 #define abort_fndecl			cp_global_trees[CPTI_ABORT_FNDECL]
    256 #define current_aggr			cp_global_trees[CPTI_AGGR_TAG]
    257 #define nullptr_node			cp_global_trees[CPTI_NULLPTR]
    258 #define nullptr_type_node		cp_global_trees[CPTI_NULLPTR_TYPE]
    259 /* std::align_val_t */
    260 #define align_type_node			cp_global_trees[CPTI_ALIGN_TYPE]
    261 
    262 /* We cache these tree nodes so as to call get_identifier less frequently.
    263    For identifiers for functions, including special member functions such
    264    as ctors and assignment operators, the nodes can be used (among other
    265    things) to iterate over their overloads defined by/for a type.  For
    266    example:
    267 
    268      tree ovlid = assign_op_identifier;
    269      tree overloads = get_class_binding (type, ovlid);
    270      for (ovl_iterator it (overloads); it; ++it) { ... }
    271 
    272    iterates over the set of implicitly and explicitly defined overloads
    273    of the assignment operator for type (including the copy and move
    274    assignment operators, whether deleted or not).  */
    275 
    276 /* The name of a constructor that takes an in-charge parameter to
    277    decide whether or not to construct virtual base classes.  */
    278 #define ctor_identifier			cp_global_trees[CPTI_CTOR_IDENTIFIER]
    279 /* The name of a constructor that constructs virtual base classes.  */
    280 #define complete_ctor_identifier	cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER]
    281 /* The name of a constructor that does not construct virtual base classes.  */
    282 #define base_ctor_identifier		cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER]
    283 /* The name of a destructor that takes an in-charge parameter to
    284    decide whether or not to destroy virtual base classes and whether
    285    or not to delete the object.  */
    286 #define dtor_identifier			cp_global_trees[CPTI_DTOR_IDENTIFIER]
    287 /* The name of a destructor that destroys virtual base classes.  */
    288 #define complete_dtor_identifier	cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER]
    289 /* The name of a destructor that does not destroy virtual base
    290    classes.  */
    291 #define base_dtor_identifier		cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER]
    292 /* The name of a destructor that destroys virtual base classes, and
    293    then deletes the entire object.  */
    294 #define deleting_dtor_identifier	cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER]
    295 
    296 /* The name used for conversion operators -- but note that actual
    297    conversion functions use special identifiers outside the identifier
    298    table.  */
    299 #define conv_op_identifier		cp_global_trees[CPTI_CONV_OP_IDENTIFIER]
    300 
    301 #define delta_identifier		cp_global_trees[CPTI_DELTA_IDENTIFIER]
    302 #define in_charge_identifier		cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER]
    303 /* The name of the parameter that contains a pointer to the VTT to use
    304    for this subobject constructor or destructor.  */
    305 #define vtt_parm_identifier		cp_global_trees[CPTI_VTT_PARM_IDENTIFIER]
    306 #define as_base_identifier		cp_global_trees[CPTI_AS_BASE_IDENTIFIER]
    307 #define this_identifier			cp_global_trees[CPTI_THIS_IDENTIFIER]
    308 #define pfn_identifier			cp_global_trees[CPTI_PFN_IDENTIFIER]
    309 #define vptr_identifier			cp_global_trees[CPTI_VPTR_IDENTIFIER]
    310 /* The name of the ::, std & anon namespaces.  */
    311 #define global_identifier		cp_global_trees[CPTI_GLOBAL_IDENTIFIER]
    312 #define anon_identifier			cp_global_trees[CPTI_ANON_IDENTIFIER]
    313 /* auto and declspec(auto) identifiers.  */
    314 #define auto_identifier			cp_global_trees[CPTI_AUTO_IDENTIFIER]
    315 #define decltype_auto_identifier	cp_global_trees[CPTI_DECLTYPE_AUTO_IDENTIFIER]
    316 #define init_list_identifier		cp_global_trees[CPTI_INIT_LIST_IDENTIFIER]
    317 #define for_range__identifier		cp_global_trees[CPTI_FOR_RANGE__IDENTIFIER]
    318 #define for_begin__identifier		cp_global_trees[CPTI_FOR_BEGIN__IDENTIFIER]
    319 #define for_end__identifier		cp_global_trees[CPTI_FOR_END__IDENTIFIER]
    320 #define for_range_identifier		cp_global_trees[CPTI_FOR_RANGE_IDENTIFIER]
    321 #define for_begin_identifier		cp_global_trees[CPTI_FOR_BEGIN_IDENTIFIER]
    322 #define for_end_identifier		cp_global_trees[CPTI_FOR_END_IDENTIFIER]
    323 #define abi_tag_identifier		cp_global_trees[CPTI_ABI_TAG_IDENTIFIER]
    324 #define aligned_identifier		cp_global_trees[CPTI_ALIGNED_IDENTIFIER]
    325 #define begin_identifier		cp_global_trees[CPTI_BEGIN_IDENTIFIER]
    326 #define end_identifier			cp_global_trees[CPTI_END_IDENTIFIER]
    327 #define get__identifier			cp_global_trees[CPTI_GET_IDENTIFIER]
    328 #define gnu_identifier			cp_global_trees[CPTI_GNU_IDENTIFIER]
    329 #define tuple_element_identifier	cp_global_trees[CPTI_TUPLE_ELEMENT_IDENTIFIER]
    330 #define tuple_size_identifier		cp_global_trees[CPTI_TUPLE_SIZE_IDENTIFIER]
    331 #define type_identifier			cp_global_trees[CPTI_TYPE_IDENTIFIER]
    332 #define value_identifier		cp_global_trees[CPTI_VALUE_IDENTIFIER]
    333 #define fun_identifier			cp_global_trees[CPTI_FUN_IDENTIFIER]
    334 #define closure_identifier		cp_global_trees[CPTI_CLOSURE_IDENTIFIER]
    335 #define heap_uninit_identifier		cp_global_trees[CPTI_HEAP_UNINIT_IDENTIFIER]
    336 #define heap_identifier			cp_global_trees[CPTI_HEAP_IDENTIFIER]
    337 #define heap_deleted_identifier		cp_global_trees[CPTI_HEAP_DELETED_IDENTIFIER]
    338 #define heap_vec_uninit_identifier	cp_global_trees[CPTI_HEAP_VEC_UNINIT_IDENTIFIER]
    339 #define heap_vec_identifier		cp_global_trees[CPTI_HEAP_VEC_IDENTIFIER]
    340 #define omp_identifier			cp_global_trees[CPTI_OMP_IDENTIFIER]
    341 #define lang_name_c			cp_global_trees[CPTI_LANG_NAME_C]
    342 #define lang_name_cplusplus		cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS]
    343 
    344 /* Exception specifiers used for throw(), noexcept(true),
    345    noexcept(false) and deferred noexcept.  We rely on these being
    346    uncloned.  */
    347 #define empty_except_spec		cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC]
    348 #define noexcept_true_spec		cp_global_trees[CPTI_NOEXCEPT_TRUE_SPEC]
    349 #define noexcept_false_spec		cp_global_trees[CPTI_NOEXCEPT_FALSE_SPEC]
    350 #define noexcept_deferred_spec		cp_global_trees[CPTI_NOEXCEPT_DEFERRED_SPEC]
    351 
    352 /* Exception handling function declarations.  */
    353 #define terminate_fn			cp_global_trees[CPTI_TERMINATE_FN]
    354 #define call_unexpected_fn		cp_global_trees[CPTI_CALL_UNEXPECTED_FN]
    355 #define get_exception_ptr_fn		cp_global_trees[CPTI_GET_EXCEPTION_PTR_FN]
    356 #define begin_catch_fn			cp_global_trees[CPTI_BEGIN_CATCH_FN]
    357 #define end_catch_fn			cp_global_trees[CPTI_END_CATCH_FN]
    358 #define allocate_exception_fn		cp_global_trees[CPTI_ALLOCATE_EXCEPTION_FN]
    359 #define free_exception_fn		cp_global_trees[CPTI_FREE_EXCEPTION_FN]
    360 #define throw_fn			cp_global_trees[CPTI_THROW_FN]
    361 #define rethrow_fn			cp_global_trees[CPTI_RETHROW_FN]
    362 
    363 /* The type of the function-pointer argument to "__cxa_atexit" (or
    364    "std::atexit", if "__cxa_atexit" is not being used).  */
    365 #define atexit_fn_ptr_type_node         cp_global_trees[CPTI_ATEXIT_FN_PTR_TYPE]
    366 
    367 /* A pointer to `std::atexit'.  */
    368 #define atexit_node			cp_global_trees[CPTI_ATEXIT]
    369 
    370 /* A pointer to `__dso_handle'.  */
    371 #define dso_handle_node			cp_global_trees[CPTI_DSO_HANDLE]
    372 
    373 /* The declaration of the dynamic_cast runtime.  */
    374 #define dynamic_cast_node		cp_global_trees[CPTI_DCAST]
    375 
    376 /* The type of a destructor.  */
    377 #define cleanup_type			cp_global_trees[CPTI_CLEANUP_TYPE]
    378 
    379 /* The type of the vtt parameter passed to subobject constructors and
    380    destructors.  */
    381 #define vtt_parm_type			cp_global_trees[CPTI_VTT_PARM_TYPE]
    382 
    383 /* A node which matches any template argument.  */
    384 #define any_targ_node			cp_global_trees[CPTI_ANY_TARG]
    385 
    386 /* std::source_location::__impl class.  */
    387 #define source_location_impl		cp_global_trees[CPTI_SOURCE_LOCATION_IMPL]
    388 
    389 /* Node to indicate default access. This must be distinct from the
    390    access nodes in tree.h.  */
    391 
    392 #define access_default_node		null_node
    393 
    394 /* Variant of dfloat{32,64,128}_type_node only used for fundamental
    395    rtti purposes if DFP is disabled.  */
    396 #define fallback_dfloat32_type		cp_global_trees[CPTI_FALLBACK_DFLOAT32_TYPE]
    397 #define fallback_dfloat64_type		cp_global_trees[CPTI_FALLBACK_DFLOAT64_TYPE]
    398 #define fallback_dfloat128_type		cp_global_trees[CPTI_FALLBACK_DFLOAT128_TYPE]
    399 
    400 
    401 #include "name-lookup.h"
    403 
    404 /* Usage of TREE_LANG_FLAG_?:
    405    0: IDENTIFIER_KIND_BIT_0 (in IDENTIFIER_NODE)
    406       NEW_EXPR_USE_GLOBAL (in NEW_EXPR).
    407       COND_EXPR_IS_VEC_DELETE (in COND_EXPR).
    408       DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR).
    409       CLEANUP_P (in TRY_BLOCK)
    410       AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR)
    411       PTRMEM_OK_P (in ADDR_EXPR, OFFSET_REF, SCOPE_REF)
    412       PAREN_STRING_LITERAL_P (in STRING_CST)
    413       CP_DECL_THREAD_LOCAL_P (in VAR_DECL)
    414       KOENIG_LOOKUP_P (in CALL_EXPR)
    415       STATEMENT_LIST_NO_SCOPE (in STATEMENT_LIST).
    416       EXPR_STMT_STMT_EXPR_RESULT (in EXPR_STMT)
    417       STMT_EXPR_NO_SCOPE (in STMT_EXPR)
    418       BIND_EXPR_TRY_BLOCK (in BIND_EXPR)
    419       TYPENAME_IS_ENUM_P (in TYPENAME_TYPE)
    420       OMP_FOR_GIMPLIFYING_P (in OMP_FOR, OMP_SIMD, OMP_DISTRIBUTE,
    421 			     and OMP_TASKLOOP)
    422       BASELINK_QUALIFIED_P (in BASELINK)
    423       TARGET_EXPR_IMPLICIT_P (in TARGET_EXPR)
    424       TEMPLATE_PARM_PARAMETER_PACK (in TEMPLATE_PARM_INDEX)
    425       ATTR_IS_DEPENDENT (in the TREE_LIST for an attribute)
    426       ABI_TAG_IMPLICIT (in the TREE_LIST for the argument of abi_tag)
    427       LAMBDA_CAPTURE_EXPLICIT_P (in a TREE_LIST in LAMBDA_EXPR_CAPTURE_LIST)
    428       PARENTHESIZED_LIST_P (in the TREE_LIST for a parameter-declaration-list)
    429       CONSTRUCTOR_IS_DIRECT_INIT (in CONSTRUCTOR)
    430       LAMBDA_EXPR_CAPTURES_THIS_P (in LAMBDA_EXPR)
    431       DECLTYPE_FOR_LAMBDA_CAPTURE (in DECLTYPE_TYPE)
    432       VEC_INIT_EXPR_IS_CONSTEXPR (in VEC_INIT_EXPR)
    433       DECL_OVERRIDE_P (in FUNCTION_DECL)
    434       IMPLICIT_CONV_EXPR_DIRECT_INIT (in IMPLICIT_CONV_EXPR)
    435       TRANSACTION_EXPR_IS_STMT (in TRANSACTION_EXPR)
    436       CONVERT_EXPR_VBASE_PATH (in CONVERT_EXPR)
    437       PACK_EXPANSION_LOCAL_P (in *_PACK_EXPANSION)
    438       TINFO_HAS_ACCESS_ERRORS (in TEMPLATE_INFO)
    439       SIZEOF_EXPR_TYPE_P (in SIZEOF_EXPR)
    440       COMPOUND_REQ_NOEXCEPT_P (in COMPOUND_REQ)
    441       WILDCARD_PACK_P (in WILDCARD_DECL)
    442       BLOCK_OUTER_CURLY_BRACE_P (in BLOCK)
    443       FOLD_EXPR_MODOP_P (*_FOLD_EXPR)
    444       IF_STMT_CONSTEXPR_P (IF_STMT)
    445       DECL_NAMESPACE_INLINE_P (in NAMESPACE_DECL)
    446       SWITCH_STMT_ALL_CASES_P (in SWITCH_STMT)
    447       REINTERPRET_CAST_P (in NOP_EXPR)
    448       ALIGNOF_EXPR_STD_P (in ALIGNOF_EXPR)
    449       OVL_DEDUP_P (in OVERLOAD)
    450       ATOMIC_CONSTR_MAP_INSTANTIATED_P (in ATOMIC_CONSTR)
    451    1: IDENTIFIER_KIND_BIT_1 (in IDENTIFIER_NODE)
    452       TI_PENDING_TEMPLATE_FLAG.
    453       TEMPLATE_PARMS_FOR_INLINE.
    454       DELETE_EXPR_USE_VEC (in DELETE_EXPR).
    455       (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out).
    456       ICS_ELLIPSIS_FLAG (in _CONV)
    457       DECL_INITIALIZED_P (in VAR_DECL)
    458       TYPENAME_IS_CLASS_P (in TYPENAME_TYPE)
    459       STMT_IS_FULL_EXPR_P (in _STMT)
    460       TARGET_EXPR_LIST_INIT_P (in TARGET_EXPR)
    461       LAMBDA_EXPR_MUTABLE_P (in LAMBDA_EXPR)
    462       DECL_FINAL_P (in FUNCTION_DECL)
    463       QUALIFIED_NAME_IS_TEMPLATE (in SCOPE_REF)
    464       CONSTRUCTOR_IS_DEPENDENT (in CONSTRUCTOR)
    465       TINFO_USED_TEMPLATE_ID (in TEMPLATE_INFO)
    466       PACK_EXPANSION_SIZEOF_P (in *_PACK_EXPANSION)
    467       OVL_USING_P (in OVERLOAD)
    468       IMPLICIT_CONV_EXPR_NONTYPE_ARG (in IMPLICIT_CONV_EXPR)
    469       BASELINK_FUNCTIONS_MAYBE_INCOMPLETE_P (in BASELINK)
    470       BIND_EXPR_VEC_DTOR (in BIND_EXPR)
    471       ATOMIC_CONSTR_EXPR_FROM_CONCEPT_P (in ATOMIC_CONSTR)
    472    2: IDENTIFIER_KIND_BIT_2 (in IDENTIFIER_NODE)
    473       ICS_THIS_FLAG (in _CONV)
    474       DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (in VAR_DECL)
    475       STATEMENT_LIST_TRY_BLOCK (in STATEMENT_LIST)
    476       TYPENAME_IS_RESOLVING_P (in TYPENAME_TYPE)
    477       TARGET_EXPR_DIRECT_INIT_P (in TARGET_EXPR)
    478       FNDECL_USED_AUTO (in FUNCTION_DECL)
    479       DECLTYPE_FOR_LAMBDA_PROXY (in DECLTYPE_TYPE)
    480       REF_PARENTHESIZED_P (in COMPONENT_REF, INDIRECT_REF, SCOPE_REF,
    481 			   VIEW_CONVERT_EXPR, PAREN_EXPR)
    482       AGGR_INIT_ZERO_FIRST (in AGGR_INIT_EXPR)
    483       CONSTRUCTOR_MUTABLE_POISON (in CONSTRUCTOR)
    484       OVL_HIDDEN_P (in OVERLOAD)
    485       IF_STMT_CONSTEVAL_P (in IF_STMT)
    486       SWITCH_STMT_NO_BREAK_P (in SWITCH_STMT)
    487       LAMBDA_EXPR_CAPTURE_OPTIMIZED (in LAMBDA_EXPR)
    488       IMPLICIT_CONV_EXPR_BRACED_INIT (in IMPLICIT_CONV_EXPR)
    489       PACK_EXPANSION_AUTO_P (in *_PACK_EXPANSION)
    490    3: IMPLICIT_RVALUE_P (in NON_LVALUE_EXPR or STATIC_CAST_EXPR)
    491       ICS_BAD_FLAG (in _CONV)
    492       FN_TRY_BLOCK_P (in TRY_BLOCK)
    493       BIND_EXPR_BODY_BLOCK (in BIND_EXPR)
    494       CALL_EXPR_ORDERED_ARGS (in CALL_EXPR, AGGR_INIT_EXPR)
    495       DECLTYPE_FOR_REF_CAPTURE (in DECLTYPE_TYPE)
    496       CONSTRUCTOR_C99_COMPOUND_LITERAL (in CONSTRUCTOR)
    497       OVL_NESTED_P (in OVERLOAD)
    498       DECL_MODULE_EXPORT_P (in _DECL)
    499       PACK_EXPANSION_FORCE_EXTRA_ARGS_P (in *_PACK_EXPANSION)
    500    4: IDENTIFIER_MARKED (IDENTIFIER_NODEs)
    501       TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR,
    502 	  CALL_EXPR, or FIELD_DECL).
    503       DECL_TINFO_P (in VAR_DECL, TYPE_DECL)
    504       FUNCTION_REF_QUALIFIED (in FUNCTION_TYPE, METHOD_TYPE)
    505       OVL_LOOKUP_P (in OVERLOAD)
    506       LOOKUP_FOUND_P (in RECORD_TYPE, UNION_TYPE, ENUMERAL_TYPE, NAMESPACE_DECL)
    507       FNDECL_MANIFESTLY_CONST_EVALUATED (in FUNCTION_DECL)
    508    5: IDENTIFIER_VIRTUAL_P (in IDENTIFIER_NODE)
    509       FUNCTION_RVALUE_QUALIFIED (in FUNCTION_TYPE, METHOD_TYPE)
    510       CALL_EXPR_REVERSE_ARGS (in CALL_EXPR, AGGR_INIT_EXPR)
    511       CONSTRUCTOR_PLACEHOLDER_BOUNDARY (in CONSTRUCTOR)
    512       OVL_EXPORT_P (in OVERLOAD)
    513    6: TYPE_MARKED_P (in _TYPE)
    514       DECL_NONTRIVIALLY_INITIALIZED_P (in VAR_DECL)
    515       RANGE_FOR_IVDEP (in RANGE_FOR_STMT)
    516       CALL_EXPR_OPERATOR_SYNTAX (in CALL_EXPR, AGGR_INIT_EXPR)
    517       CONSTRUCTOR_IS_DESIGNATED_INIT (in CONSTRUCTOR)
    518 
    519    Usage of TYPE_LANG_FLAG_?:
    520    0: TYPE_DEPENDENT_P
    521    1: TYPE_HAS_USER_CONSTRUCTOR.
    522    2: TYPE_HAS_LATE_RETURN_TYPE (in FUNCTION_TYPE, METHOD_TYPE)
    523       TYPE_PTRMEMFUNC_FLAG (in RECORD_TYPE)
    524    4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR
    525    5: CLASS_TYPE_P (in RECORD_TYPE and UNION_TYPE)
    526       ENUM_FIXED_UNDERLYING_TYPE_P (in ENUMERAL_TYPE)
    527       AUTO_IS_DECLTYPE (in TEMPLATE_TYPE_PARM)
    528    6: TYPE_DEPENDENT_P_VALID
    529 
    530    Usage of DECL_LANG_FLAG_?:
    531    0: DECL_TEMPLATE_PARM_P (in PARM_DECL, CONST_DECL, TYPE_DECL, or TEMPLATE_DECL)
    532       DECL_LOCAL_DECL_P (in FUNCTION_DECL, VAR_DECL)
    533       DECL_MUTABLE_P (in FIELD_DECL)
    534       DECL_DEPENDENT_P (in USING_DECL)
    535       LABEL_DECL_BREAK (in LABEL_DECL)
    536    1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL).
    537       DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL)
    538       DECL_MEMBER_TEMPLATE_P (in TEMPLATE_DECL)
    539       USING_DECL_TYPENAME_P (in USING_DECL)
    540       DECL_VLA_CAPTURE_P (in FIELD_DECL)
    541       DECL_ARRAY_PARAMETER_P (in PARM_DECL)
    542       LABEL_DECL_CONTINUE (in LABEL_DECL)
    543    2: DECL_THIS_EXTERN (in VAR_DECL, FUNCTION_DECL or PARM_DECL)
    544       DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL)
    545       DECL_CONSTRAINT_VAR_P (in a PARM_DECL)
    546       TEMPLATE_DECL_COMPLEX_ALIAS_P (in TEMPLATE_DECL)
    547       DECL_INSTANTIATING_NSDMI_P (in a FIELD_DECL)
    548       LABEL_DECL_CDTOR (in LABEL_DECL)
    549       USING_DECL_UNRELATED_P (in USING_DECL)
    550    3: DECL_IN_AGGR_P.
    551    4: DECL_C_BIT_FIELD (in a FIELD_DECL)
    552       DECL_ANON_UNION_VAR_P (in a VAR_DECL)
    553       DECL_SELF_REFERENCE_P (in a TYPE_DECL)
    554       DECL_INVALID_OVERRIDER_P (in a FUNCTION_DECL)
    555       DECL_UNINSTANIATED_TEMPLATE_FRIEND_P (in TEMPLATE_DECL)
    556    5: DECL_INTERFACE_KNOWN.
    557    6: DECL_THIS_STATIC (in VAR_DECL, FUNCTION_DECL or PARM_DECL)
    558       DECL_FIELD_IS_BASE (in FIELD_DECL)
    559       TYPE_DECL_ALIAS_P (in TYPE_DECL)
    560    7: DECL_THUNK_P (in a member FUNCTION_DECL)
    561       DECL_NORMAL_CAPTURE_P (in FIELD_DECL)
    562       DECL_DECLARED_CONSTINIT_P (in VAR_DECL)
    563    8: DECL_DECLARED_CONSTEXPR_P (in VAR_DECL, FUNCTION_DECL)
    564 
    565    Usage of language-independent fields in a language-dependent manner:
    566 
    567    TYPE_ALIAS_SET
    568      This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so
    569      forth as a substitute for the mark bits provided in `lang_type'.
    570      At present, only the six low-order bits are used.
    571 
    572    TYPE_LANG_SLOT_1
    573      For a FUNCTION_TYPE or METHOD_TYPE, this is TYPE_RAISES_EXCEPTIONS.
    574      For a POINTER_TYPE (to a METHOD_TYPE), this is TYPE_PTRMEMFUNC_TYPE.
    575      For an ENUMERAL_TYPE, BOUND_TEMPLATE_TEMPLATE_PARM_TYPE,
    576      RECORD_TYPE or UNION_TYPE this is TYPE_TEMPLATE_INFO,
    577 
    578   BINFO_VIRTUALS
    579      For a binfo, this is a TREE_LIST.  There is an entry for each
    580      virtual function declared either in BINFO or its direct and
    581      indirect primary bases.
    582 
    583      The BV_DELTA of each node gives the amount by which to adjust the
    584      `this' pointer when calling the function.  If the method is an
    585      overridden version of a base class method, then it is assumed
    586      that, prior to adjustment, the this pointer points to an object
    587      of the base class.
    588 
    589      The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable
    590      index of the vcall offset for this entry.
    591 
    592      The BV_FN is the declaration for the virtual function itself.
    593 
    594      If BV_LOST_PRIMARY is set, it means that this entry is for a lost
    595      primary virtual base and can be left null in the vtable.
    596 
    597    BINFO_VTABLE
    598      This is an expression with POINTER_TYPE that gives the value
    599      to which the vptr should be initialized.  Use get_vtbl_decl_for_binfo
    600      to extract the VAR_DECL for the complete vtable.
    601 
    602    DECL_VINDEX
    603      This field is NULL for a non-virtual function.  For a virtual
    604      function, it is eventually set to an INTEGER_CST indicating the
    605      index in the vtable at which this function can be found.  When
    606      a virtual function is declared, but before it is known what
    607      function is overridden, this field is the error_mark_node.
    608 
    609      Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is
    610      the virtual function this one overrides, and whose TREE_CHAIN is
    611      the old DECL_VINDEX.  */
    612 
    613 /* Language-specific tree checkers.  */
    614 
    615 #define VAR_OR_FUNCTION_DECL_CHECK(NODE) \
    616   TREE_CHECK2(NODE,VAR_DECL,FUNCTION_DECL)
    617 
    618 #define TYPE_FUNCTION_OR_TEMPLATE_DECL_CHECK(NODE) \
    619   TREE_CHECK3(NODE,TYPE_DECL,TEMPLATE_DECL,FUNCTION_DECL)
    620 
    621 #define TYPE_FUNCTION_OR_TEMPLATE_DECL_P(NODE) \
    622   (TREE_CODE (NODE) == TYPE_DECL || TREE_CODE (NODE) == TEMPLATE_DECL \
    623    || TREE_CODE (NODE) == FUNCTION_DECL)
    624 
    625 #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) \
    626   TREE_CHECK3(NODE,VAR_DECL,FUNCTION_DECL,PARM_DECL)
    627 
    628 #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) \
    629   TREE_CHECK4(NODE,VAR_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL)
    630 
    631 #define VAR_TEMPL_TYPE_FIELD_OR_FUNCTION_DECL_CHECK(NODE) \
    632   TREE_CHECK5(NODE,VAR_DECL,FIELD_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL)
    633 
    634 #define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE) \
    635   TREE_CHECK(NODE,BOUND_TEMPLATE_TEMPLATE_PARM)
    636 
    637 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
    638 
    639 /* Returns t iff the node can have a TEMPLATE_INFO field.  */
    640 
    641 inline tree
    642 template_info_decl_check (const_tree t, const char* f, int l, const char* fn)
    643 {
    644   switch (TREE_CODE (t))
    645     {
    646     case VAR_DECL:
    647     case FUNCTION_DECL:
    648     case FIELD_DECL:
    649     case TYPE_DECL:
    650     case CONCEPT_DECL:
    651     case TEMPLATE_DECL:
    652       return const_cast<tree>(t);
    653     default:
    654       break;
    655     }
    656   tree_check_failed (t, f, l, fn,
    657 		     VAR_DECL, FUNCTION_DECL, FIELD_DECL, TYPE_DECL,
    658 		     CONCEPT_DECL, TEMPLATE_DECL, 0);
    659   gcc_unreachable ();
    660 }
    661 
    662 #define TEMPLATE_INFO_DECL_CHECK(NODE) \
    663   template_info_decl_check ((NODE), __FILE__, __LINE__, __FUNCTION__)
    664 
    665 #define THUNK_FUNCTION_CHECK(NODE) __extension__			\
    666 ({  __typeof (NODE) const __t = (NODE);					\
    667     if (TREE_CODE (__t) != FUNCTION_DECL || !__t->decl_common.lang_specific \
    668 	|| !__t->decl_common.lang_specific->u.fn.thunk_p)		\
    669       tree_check_failed (__t, __FILE__, __LINE__, __FUNCTION__, 0);	\
    670      __t; })
    671 
    672 #else /* ENABLE_TREE_CHECKING */
    673 
    674 #define TEMPLATE_INFO_DECL_CHECK(NODE) (NODE)
    675 #define THUNK_FUNCTION_CHECK(NODE) (NODE)
    676 
    677 #endif /* ENABLE_TREE_CHECKING */
    678 
    679 /* Language-dependent contents of an identifier.  */
    681 
    682 struct GTY(()) lang_identifier {
    683   struct c_common_identifier c_common;
    684   cxx_binding *bindings;
    685 };
    686 
    687 /* Return a typed pointer version of T if it designates a
    688    C++ front-end identifier.  */
    689 inline lang_identifier*
    690 identifier_p (tree t)
    691 {
    692   if (TREE_CODE (t) == IDENTIFIER_NODE)
    693     return (lang_identifier*) t;
    694   return NULL;
    695 }
    696 
    697 #define LANG_IDENTIFIER_CAST(NODE) \
    698 	((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE))
    699 
    700 struct GTY(()) template_parm_index {
    701   struct tree_common common;
    702   int index;
    703   int level;
    704   int orig_level;
    705   tree decl;
    706 };
    707 
    708 struct GTY(()) ptrmem_cst {
    709   struct tree_common common;
    710   tree member;
    711   location_t locus;
    712 };
    713 typedef struct ptrmem_cst * ptrmem_cst_t;
    714 
    715 #define CLEANUP_P(NODE)		TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE))
    716 
    717 #define BIND_EXPR_TRY_BLOCK(NODE) \
    718   TREE_LANG_FLAG_0 (BIND_EXPR_CHECK (NODE))
    719 
    720 /* This BIND_EXPR is from build_vec_delete_1.  */
    721 #define BIND_EXPR_VEC_DTOR(NODE) \
    722   TREE_LANG_FLAG_1 (BIND_EXPR_CHECK (NODE))
    723 
    724 /* Used to mark the block around the member initializers and cleanups.  */
    725 #define BIND_EXPR_BODY_BLOCK(NODE) \
    726   TREE_LANG_FLAG_3 (BIND_EXPR_CHECK (NODE))
    727 #define FUNCTION_NEEDS_BODY_BLOCK(NODE) \
    728   (DECL_CONSTRUCTOR_P (NODE) || DECL_DESTRUCTOR_P (NODE) \
    729    || LAMBDA_FUNCTION_P (NODE))
    730 
    731 #define STATEMENT_LIST_NO_SCOPE(NODE) \
    732   TREE_LANG_FLAG_0 (STATEMENT_LIST_CHECK (NODE))
    733 #define STATEMENT_LIST_TRY_BLOCK(NODE) \
    734   TREE_LANG_FLAG_2 (STATEMENT_LIST_CHECK (NODE))
    735 
    736 /* Mark the outer curly brace BLOCK.  */
    737 #define BLOCK_OUTER_CURLY_BRACE_P(NODE)	TREE_LANG_FLAG_0 (BLOCK_CHECK (NODE))
    738 
    739 /* Nonzero if this statement should be considered a full-expression,
    740    i.e., if temporaries created during this statement should have
    741    their destructors run at the end of this statement.  */
    742 #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
    743 
    744 /* Marks the result of a statement expression.  */
    745 #define EXPR_STMT_STMT_EXPR_RESULT(NODE) \
    746   TREE_LANG_FLAG_0 (EXPR_STMT_CHECK (NODE))
    747 
    748 /* Nonzero if this statement-expression does not have an associated scope.  */
    749 #define STMT_EXPR_NO_SCOPE(NODE) \
    750    TREE_LANG_FLAG_0 (STMT_EXPR_CHECK (NODE))
    751 
    752 #define COND_EXPR_IS_VEC_DELETE(NODE) \
    753   TREE_LANG_FLAG_0 (COND_EXPR_CHECK (NODE))
    754 
    755 /* Nonzero if this NOP_EXPR is a reinterpret_cast.  Such conversions
    756    are not constexprs.  Other NOP_EXPRs are.  */
    757 #define REINTERPRET_CAST_P(NODE)		\
    758   TREE_LANG_FLAG_0 (NOP_EXPR_CHECK (NODE))
    759 
    760 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual
    761    sense of `same'.  */
    762 #define same_type_p(TYPE1, TYPE2) \
    763   comptypes ((TYPE1), (TYPE2), COMPARE_STRICT)
    764 
    765 /* Returns nonzero iff NODE is a declaration for the global function
    766    `main'.  */
    767 #define DECL_MAIN_P(NODE)				\
    768    (DECL_EXTERN_C_FUNCTION_P (NODE)			\
    769     && DECL_NAME (NODE) != NULL_TREE			\
    770     && MAIN_NAME_P (DECL_NAME (NODE))			\
    771     && flag_hosted)
    772 
    773 /* Lookup walker marking.  */
    774 #define LOOKUP_SEEN_P(NODE) TREE_VISITED (NODE)
    775 #define LOOKUP_FOUND_P(NODE) \
    776   TREE_LANG_FLAG_4 (TREE_CHECK4 (NODE,RECORD_TYPE,UNION_TYPE,ENUMERAL_TYPE,\
    777 				 NAMESPACE_DECL))
    778 
    779 /* These two accessors should only be used by OVL manipulators.
    780    Other users should use iterators and convenience functions.  */
    781 #define OVL_FUNCTION(NODE) \
    782   (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function)
    783 #define OVL_CHAIN(NODE) \
    784   (((struct tree_overload*)OVERLOAD_CHECK (NODE))->common.chain)
    785 
    786 /* If set, this or a subsequent overload contains decls that need deduping.  */
    787 #define OVL_DEDUP_P(NODE)	TREE_LANG_FLAG_0 (OVERLOAD_CHECK (NODE))
    788 /* If set, this was imported in a using declaration.   */
    789 #define OVL_USING_P(NODE)	TREE_LANG_FLAG_1 (OVERLOAD_CHECK (NODE))
    790 /* If set, this overload is a hidden decl.  */
    791 #define OVL_HIDDEN_P(NODE)	TREE_LANG_FLAG_2 (OVERLOAD_CHECK (NODE))
    792 /* If set, this overload contains a nested overload.  */
    793 #define OVL_NESTED_P(NODE)	TREE_LANG_FLAG_3 (OVERLOAD_CHECK (NODE))
    794 /* If set, this overload was constructed during lookup.  */
    795 #define OVL_LOOKUP_P(NODE)	TREE_LANG_FLAG_4 (OVERLOAD_CHECK (NODE))
    796 /* If set, this OVL_USING_P overload is exported.  */
    797 #define OVL_EXPORT_P(NODE)	TREE_LANG_FLAG_5 (OVERLOAD_CHECK (NODE))
    798 
    799 /* The first decl of an overload.  */
    800 #define OVL_FIRST(NODE)	ovl_first (NODE)
    801 /* The name of the overload set.  */
    802 #define OVL_NAME(NODE) DECL_NAME (OVL_FIRST (NODE))
    803 
    804 /* Whether this is a set of overloaded functions.  TEMPLATE_DECLS are
    805    always wrapped in an OVERLOAD, so we don't need to check them
    806    here.  */
    807 #define OVL_P(NODE) \
    808   (TREE_CODE (NODE) == FUNCTION_DECL || TREE_CODE (NODE) == OVERLOAD)
    809 /* Whether this is a single member overload.  */
    810 #define OVL_SINGLE_P(NODE) \
    811   (TREE_CODE (NODE) != OVERLOAD || !OVL_CHAIN (NODE))
    812 
    813 /* OVL_HIDDEN_P nodes come before other nodes.  */
    814 
    815 struct GTY(()) tree_overload {
    816   struct tree_common common;
    817   tree function;
    818 };
    819 
    820 /* Iterator for a 1 dimensional overload.  Permits iterating over the
    821    outer level of a 2-d overload when explicitly enabled.  */
    822 
    823 class ovl_iterator {
    824   tree ovl;
    825   const bool allow_inner; /* Only used when checking.  */
    826 
    827  public:
    828   explicit ovl_iterator (tree o, bool allow = false)
    829     : ovl (o), allow_inner (allow)
    830   {
    831   }
    832 
    833  public:
    834   operator bool () const
    835   {
    836     return ovl;
    837   }
    838   ovl_iterator &operator++ ()
    839   {
    840     ovl = TREE_CODE (ovl) != OVERLOAD ? NULL_TREE : OVL_CHAIN (ovl);
    841     return *this;
    842   }
    843   tree operator* () const
    844   {
    845     tree fn = TREE_CODE (ovl) != OVERLOAD ? ovl : OVL_FUNCTION (ovl);
    846 
    847     /* Check this is not an unexpected 2-dimensional overload.  */
    848     gcc_checking_assert (allow_inner || TREE_CODE (fn) != OVERLOAD);
    849 
    850     return fn;
    851   }
    852   bool operator== (const ovl_iterator &o) const
    853   {
    854     return ovl == o.ovl;
    855   }
    856   tree get_using () const
    857   {
    858     gcc_checking_assert (using_p ());
    859     return ovl;
    860   }
    861 
    862  public:
    863   /* Whether this overload was introduced by a using decl.  */
    864   bool using_p () const
    865   {
    866     return (TREE_CODE (ovl) == USING_DECL
    867 	    || (TREE_CODE (ovl) == OVERLOAD && OVL_USING_P (ovl)));
    868   }
    869   /* Whether this using is being exported.  */
    870   bool exporting_p () const
    871   {
    872     return OVL_EXPORT_P (get_using ());
    873   }
    874 
    875   bool hidden_p () const
    876   {
    877     return TREE_CODE (ovl) == OVERLOAD && OVL_HIDDEN_P (ovl);
    878   }
    879 
    880  public:
    881   tree remove_node (tree head)
    882   {
    883     return remove_node (head, ovl);
    884   }
    885   tree reveal_node (tree head)
    886   {
    887     return reveal_node (head, ovl);
    888   }
    889 
    890  protected:
    891   /* If we have a nested overload, point at the inner overload and
    892      return the next link on the outer one.  */
    893   tree maybe_push ()
    894   {
    895     tree r = NULL_TREE;
    896 
    897     if (ovl && TREE_CODE (ovl) == OVERLOAD && OVL_NESTED_P (ovl))
    898       {
    899 	r = OVL_CHAIN (ovl);
    900 	ovl = OVL_FUNCTION (ovl);
    901       }
    902     return r;
    903   }
    904   /* Restore an outer nested overload.  */
    905   void pop (tree outer)
    906   {
    907     gcc_checking_assert (!ovl);
    908     ovl = outer;
    909   }
    910 
    911  private:
    912   /* We make these static functions to avoid the address of the
    913      iterator escaping the local context.  */
    914   static tree remove_node (tree head, tree node);
    915   static tree reveal_node (tree ovl, tree node);
    916 };
    917 
    918 /* Treat a tree as a range of ovl_iterator, e.g.
    919    for (tree f : ovl_range (fns)) { ... }  */
    920 
    921 class ovl_range
    922 {
    923   tree t;
    924   bool allow;
    925 public:
    926   explicit ovl_range (tree t, bool allow = false): t(t), allow(allow) { }
    927   ovl_iterator begin() { return ovl_iterator (t, allow); }
    928   ovl_iterator end() { return ovl_iterator (NULL_TREE, allow); }
    929 };
    930 
    931 /* Iterator over a (potentially) 2 dimensional overload, which is
    932    produced by name lookup.  */
    933 
    934 class lkp_iterator : public ovl_iterator {
    935   typedef ovl_iterator parent;
    936 
    937   tree outer;
    938 
    939  public:
    940   explicit lkp_iterator (tree o)
    941     : parent (o, true), outer (maybe_push ())
    942   {
    943   }
    944 
    945  public:
    946   lkp_iterator &operator++ ()
    947   {
    948     bool repush = !outer;
    949 
    950     if (!parent::operator++ () && !repush)
    951       {
    952 	pop (outer);
    953 	repush = true;
    954       }
    955 
    956     if (repush)
    957       outer = maybe_push ();
    958 
    959     return *this;
    960   }
    961 };
    962 
    963 /* Treat a tree as a range of lkp_iterator, e.g.
    964    for (tree f : lkp_range (fns)) { ... }  */
    965 
    966 class lkp_range
    967 {
    968   tree t;
    969 public:
    970   lkp_range (tree t): t(t) { }
    971   lkp_iterator begin() { return lkp_iterator (t); }
    972   lkp_iterator end() { return lkp_iterator (NULL_TREE); }
    973 };
    974 
    975 /* hash traits for declarations.  Hashes potential overload sets via
    976    DECL_NAME.  */
    977 
    978 struct named_decl_hash : ggc_remove <tree> {
    979   typedef tree value_type; /* A DECL or OVERLOAD  */
    980   typedef tree compare_type; /* An identifier.  */
    981 
    982   inline static hashval_t hash (const value_type decl);
    983   inline static bool equal (const value_type existing, compare_type candidate);
    984 
    985   static const bool empty_zero_p = true;
    986   static inline void mark_empty (value_type &p) {p = NULL_TREE;}
    987   static inline bool is_empty (value_type p) {return !p;}
    988 
    989   /* Nothing is deletable.  Everything is insertable.  */
    990   static bool is_deleted (value_type) { return false; }
    991   static void mark_deleted (value_type) { gcc_unreachable (); }
    992 };
    993 
    994 /* Simplified unique_ptr clone to release a tree vec on exit.  */
    995 
    996 class releasing_vec
    997 {
    998 public:
    999   typedef vec<tree, va_gc> vec_t;
   1000 
   1001   releasing_vec (vec_t *v): v(v) { }
   1002   releasing_vec (): v(make_tree_vector ()) { }
   1003 
   1004   /* Copy ops are deliberately declared but not defined,
   1005      copies must always be elided.  */
   1006   releasing_vec (const releasing_vec &);
   1007   releasing_vec &operator= (const releasing_vec &);
   1008 
   1009   vec_t &operator* () const { return *v; }
   1010   vec_t *operator-> () const { return v; }
   1011   vec_t *get() const { return v; }
   1012   operator vec_t *() const { return v; }
   1013   vec_t ** operator& () { return &v; }
   1014 
   1015   /* Breaks pointer/value consistency for convenience.  This takes ptrdiff_t
   1016      rather than unsigned to avoid ambiguity with the built-in operator[]
   1017      (bootstrap/91828).  */
   1018   tree& operator[] (ptrdiff_t i) const { return (*v)[i]; }
   1019 
   1020   tree *begin() { return ::begin (v); }
   1021   tree *end() { return ::end (v); }
   1022 
   1023   void release () { release_tree_vector (v); v = NULL; }
   1024 
   1025   ~releasing_vec () { release_tree_vector (v); }
   1026 private:
   1027   vec_t *v;
   1028 };
   1029 /* Forwarding functions for vec_safe_* that might reallocate.  */
   1030 inline tree* vec_safe_push (releasing_vec& r, const tree &t CXX_MEM_STAT_INFO)
   1031 { return vec_safe_push (*&r, t PASS_MEM_STAT); }
   1032 inline bool vec_safe_reserve (releasing_vec& r, unsigned n, bool e = false CXX_MEM_STAT_INFO)
   1033 { return vec_safe_reserve (*&r, n, e PASS_MEM_STAT); }
   1034 inline unsigned vec_safe_length (releasing_vec &r)
   1035 { return r->length(); }
   1036 inline void vec_safe_splice (releasing_vec &r, vec<tree, va_gc> *p CXX_MEM_STAT_INFO)
   1037 { vec_safe_splice (*&r, p PASS_MEM_STAT); }
   1038 void release_tree_vector (releasing_vec &); // cause link error
   1039 
   1040 struct GTY(()) tree_template_decl {
   1041   struct tree_decl_common common;
   1042   tree arguments;
   1043   tree result;
   1044 };
   1045 
   1046 /* Returns true iff NODE is a BASELINK.  */
   1047 #define BASELINK_P(NODE) \
   1048   (TREE_CODE (NODE) == BASELINK)
   1049 /* The BINFO indicating the base in which lookup found the
   1050    BASELINK_FUNCTIONS.  */
   1051 #define BASELINK_BINFO(NODE) \
   1052   (((struct tree_baselink*) BASELINK_CHECK (NODE))->binfo)
   1053 /* The functions referred to by the BASELINK; either a FUNCTION_DECL,
   1054    a TEMPLATE_DECL, an OVERLOAD, or a TEMPLATE_ID_EXPR.  */
   1055 #define BASELINK_FUNCTIONS(NODE) \
   1056   (((struct tree_baselink*) BASELINK_CHECK (NODE))->functions)
   1057 /* If T is a BASELINK, grab the functions, otherwise just T, which is
   1058    expected to already be a (list of) functions.  */
   1059 #define MAYBE_BASELINK_FUNCTIONS(T) \
   1060   (BASELINK_P (T) ? BASELINK_FUNCTIONS (T) : T)
   1061 /* The BINFO in which the search for the functions indicated by this baselink
   1062    began.  This base is used to determine the accessibility of functions
   1063    selected by overload resolution.  */
   1064 #define BASELINK_ACCESS_BINFO(NODE) \
   1065   (((struct tree_baselink*) BASELINK_CHECK (NODE))->access_binfo)
   1066 /* For a type-conversion operator, the BASELINK_OPTYPE indicates the type
   1067    to which the conversion should occur.  This value is important if
   1068    the BASELINK_FUNCTIONS include a template conversion operator --
   1069    the BASELINK_OPTYPE can be used to determine what type the user
   1070    requested.  */
   1071 #define BASELINK_OPTYPE(NODE) \
   1072   (TREE_CHAIN (BASELINK_CHECK (NODE)))
   1073 /* Nonzero if this baselink was from a qualified lookup.  */
   1074 #define BASELINK_QUALIFIED_P(NODE) \
   1075   TREE_LANG_FLAG_0 (BASELINK_CHECK (NODE))
   1076 /* Nonzero if the overload set for this baselink might be incomplete due
   1077    to the lookup being performed from an incomplete-class context.  */
   1078 #define BASELINK_FUNCTIONS_MAYBE_INCOMPLETE_P(NODE) \
   1079   TREE_LANG_FLAG_1 (BASELINK_CHECK (NODE))
   1080 
   1081 struct GTY(()) tree_baselink {
   1082   struct tree_common common;
   1083   tree binfo;
   1084   tree functions;
   1085   tree access_binfo;
   1086 };
   1087 
   1088 /* The different kinds of ids that we encounter.  */
   1089 
   1090 enum cp_id_kind
   1091 {
   1092   /* Not an id at all.  */
   1093   CP_ID_KIND_NONE,
   1094   /* An unqualified-id that is not a template-id.  */
   1095   CP_ID_KIND_UNQUALIFIED,
   1096   /* An unqualified-id that is a dependent name.  */
   1097   CP_ID_KIND_UNQUALIFIED_DEPENDENT,
   1098   /* An unqualified template-id.  */
   1099   CP_ID_KIND_TEMPLATE_ID,
   1100   /* A qualified-id.  */
   1101   CP_ID_KIND_QUALIFIED
   1102 };
   1103 
   1104 
   1105 /* The various kinds of C++0x warnings we encounter. */
   1106 
   1107 enum cpp0x_warn_str
   1108 {
   1109   /* extended initializer lists */
   1110   CPP0X_INITIALIZER_LISTS,
   1111   /* explicit conversion operators */
   1112   CPP0X_EXPLICIT_CONVERSION,
   1113   /* variadic templates */
   1114   CPP0X_VARIADIC_TEMPLATES,
   1115   /* lambda expressions */
   1116   CPP0X_LAMBDA_EXPR,
   1117   /* C++0x auto */
   1118   CPP0X_AUTO,
   1119   /* scoped enums */
   1120   CPP0X_SCOPED_ENUMS,
   1121   /* defaulted and deleted functions */
   1122   CPP0X_DEFAULTED_DELETED,
   1123   /* inline namespaces */
   1124   CPP0X_INLINE_NAMESPACES,
   1125   /* override controls, override/final */
   1126   CPP0X_OVERRIDE_CONTROLS,
   1127   /* non-static data member initializers */
   1128   CPP0X_NSDMI,
   1129   /* user defined literals */
   1130   CPP0X_USER_DEFINED_LITERALS,
   1131   /* delegating constructors */
   1132   CPP0X_DELEGATING_CTORS,
   1133   /* inheriting constructors */
   1134   CPP0X_INHERITING_CTORS,
   1135   /* C++11 attributes */
   1136   CPP0X_ATTRIBUTES,
   1137   /* ref-qualified member functions */
   1138   CPP0X_REF_QUALIFIER
   1139 };
   1140 
   1141 /* The various kinds of operation used by composite_pointer_type. */
   1142 
   1143 enum composite_pointer_operation
   1144 {
   1145   /* comparison */
   1146   CPO_COMPARISON,
   1147   /* conversion */
   1148   CPO_CONVERSION,
   1149   /* conditional expression */
   1150   CPO_CONDITIONAL_EXPR
   1151 };
   1152 
   1153 /* Possible cases of expression list used by build_x_compound_expr_from_list. */
   1154 enum expr_list_kind {
   1155   ELK_INIT,		/* initializer */
   1156   ELK_MEM_INIT,		/* member initializer */
   1157   ELK_FUNC_CAST		/* functional cast */
   1158 };
   1159 
   1160 /* Possible cases of implicit bad rhs conversions. */
   1161 enum impl_conv_rhs {
   1162   ICR_DEFAULT_ARGUMENT, /* default argument */
   1163   ICR_CONVERTING,       /* converting */
   1164   ICR_INIT,             /* initialization */
   1165   ICR_ARGPASS,          /* argument passing */
   1166   ICR_RETURN,           /* return */
   1167   ICR_ASSIGN            /* assignment */
   1168 };
   1169 
   1170 /* Possible cases of implicit or explicit bad conversions to void. */
   1171 enum impl_conv_void {
   1172   ICV_CAST,            /* (explicit) conversion to void */
   1173   ICV_SECOND_OF_COND,  /* second operand of conditional expression */
   1174   ICV_THIRD_OF_COND,   /* third operand of conditional expression */
   1175   ICV_RIGHT_OF_COMMA,  /* right operand of comma operator */
   1176   ICV_LEFT_OF_COMMA,   /* left operand of comma operator */
   1177   ICV_STATEMENT,       /* statement */
   1178   ICV_THIRD_IN_FOR     /* for increment expression */
   1179 };
   1180 
   1181 /* Possible invalid uses of an abstract class that might not have a
   1182    specific associated declaration.  */
   1183 enum GTY(()) abstract_class_use {
   1184   ACU_UNKNOWN,			/* unknown or decl provided */
   1185   ACU_CAST,			/* cast to abstract class */
   1186   ACU_NEW,			/* new-expression of abstract class */
   1187   ACU_THROW,			/* throw-expression of abstract class */
   1188   ACU_CATCH,			/* catch-parameter of abstract class */
   1189   ACU_ARRAY,			/* array of abstract class */
   1190   ACU_RETURN,			/* return type of abstract class */
   1191   ACU_PARM			/* parameter type of abstract class */
   1192 };
   1193 
   1194 /* Macros for access to language-specific slots in an identifier.  */
   1195 
   1196 /* Identifiers map directly to block or class-scope bindings.
   1197    Namespace-scope bindings are held in hash tables on the respective
   1198    namespaces.  The identifier bindings are the innermost active
   1199    binding, from whence you can get the decl and/or implicit-typedef
   1200    of an elaborated type.   When not bound to a local entity the
   1201    values are NULL.  */
   1202 #define IDENTIFIER_BINDING(NODE) \
   1203   (LANG_IDENTIFIER_CAST (NODE)->bindings)
   1204 #define REAL_IDENTIFIER_TYPE_VALUE(NODE) TREE_TYPE (NODE)
   1205 #define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = (TYPE))
   1206 
   1207 /* Kinds of identifiers.  Values are carefully chosen.  */
   1208 enum cp_identifier_kind {
   1209   cik_normal = 0,	/* Not a special identifier.  */
   1210   cik_keyword = 1,	/* A keyword.  */
   1211   cik_ctor = 2,		/* Constructor (in-chg, complete or base).  */
   1212   cik_dtor = 3,		/* Destructor (in-chg, deleting, complete or
   1213 			   base).  */
   1214   cik_simple_op = 4,	/* Non-assignment operator name.  */
   1215   cik_assign_op = 5,	/* An assignment operator name.  */
   1216   cik_conv_op = 6,	/* Conversion operator name.  */
   1217   cik_reserved_for_udlit = 7,	/* Not yet in use  */
   1218   cik_max
   1219 };
   1220 
   1221 /* Kind bits.  */
   1222 #define IDENTIFIER_KIND_BIT_0(NODE) \
   1223   TREE_LANG_FLAG_0 (IDENTIFIER_NODE_CHECK (NODE))
   1224 #define IDENTIFIER_KIND_BIT_1(NODE) \
   1225   TREE_LANG_FLAG_1 (IDENTIFIER_NODE_CHECK (NODE))
   1226 #define IDENTIFIER_KIND_BIT_2(NODE) \
   1227   TREE_LANG_FLAG_2 (IDENTIFIER_NODE_CHECK (NODE))
   1228 
   1229 /* Used by various search routines.  */
   1230 #define IDENTIFIER_MARKED(NODE) \
   1231   TREE_LANG_FLAG_4 (IDENTIFIER_NODE_CHECK (NODE))
   1232 
   1233 /* Nonzero if this identifier is used as a virtual function name somewhere
   1234    (optimizes searches).  */
   1235 #define IDENTIFIER_VIRTUAL_P(NODE) \
   1236   TREE_LANG_FLAG_5 (IDENTIFIER_NODE_CHECK (NODE))
   1237 
   1238 /* True if this identifier is a reserved word.  C_RID_CODE (node) is
   1239    then the RID_* value of the keyword.  Value 1.  */
   1240 #define IDENTIFIER_KEYWORD_P(NODE)		\
   1241   ((!IDENTIFIER_KIND_BIT_2 (NODE))		\
   1242    & (!IDENTIFIER_KIND_BIT_1 (NODE))		\
   1243    & IDENTIFIER_KIND_BIT_0 (NODE))
   1244 
   1245 /* True if this identifier is the name of a constructor or
   1246    destructor.  Value 2 or 3.  */
   1247 #define IDENTIFIER_CDTOR_P(NODE)		\
   1248   ((!IDENTIFIER_KIND_BIT_2 (NODE))		\
   1249    & IDENTIFIER_KIND_BIT_1 (NODE))
   1250 
   1251 /* True if this identifier is the name of a constructor.  Value 2.  */
   1252 #define IDENTIFIER_CTOR_P(NODE)			\
   1253   (IDENTIFIER_CDTOR_P(NODE)			\
   1254     & (!IDENTIFIER_KIND_BIT_0 (NODE)))
   1255 
   1256 /* True if this identifier is the name of a destructor.  Value 3.  */
   1257 #define IDENTIFIER_DTOR_P(NODE)			\
   1258   (IDENTIFIER_CDTOR_P(NODE)			\
   1259     & IDENTIFIER_KIND_BIT_0 (NODE))
   1260 
   1261 /* True if this identifier is for any operator name (including
   1262    conversions).  Value 4, 5, 6 or 7.  */
   1263 #define IDENTIFIER_ANY_OP_P(NODE)		\
   1264   (IDENTIFIER_KIND_BIT_2 (NODE))
   1265 
   1266 /* True if this identifier is for an overloaded operator. Values 4, 5.  */
   1267 #define IDENTIFIER_OVL_OP_P(NODE)		\
   1268   (IDENTIFIER_ANY_OP_P (NODE)			\
   1269    & (!IDENTIFIER_KIND_BIT_1 (NODE)))
   1270 
   1271 /* True if this identifier is for any assignment. Values 5.  */
   1272 #define IDENTIFIER_ASSIGN_OP_P(NODE)		\
   1273   (IDENTIFIER_OVL_OP_P (NODE)			\
   1274    & IDENTIFIER_KIND_BIT_0 (NODE))
   1275 
   1276 /* True if this identifier is the name of a type-conversion
   1277    operator.  Value 7.  */
   1278 #define IDENTIFIER_CONV_OP_P(NODE)		\
   1279   (IDENTIFIER_ANY_OP_P (NODE)			\
   1280    & IDENTIFIER_KIND_BIT_1 (NODE)		\
   1281    & (!IDENTIFIER_KIND_BIT_0 (NODE)))
   1282 
   1283 /* True if this identifier is a new or delete operator.  */
   1284 #define IDENTIFIER_NEWDEL_OP_P(NODE)		\
   1285   (IDENTIFIER_OVL_OP_P (NODE)			\
   1286    && IDENTIFIER_OVL_OP_FLAGS (NODE) & OVL_OP_FLAG_ALLOC)
   1287 
   1288 /* True if this identifier is a new operator.  */
   1289 #define IDENTIFIER_NEW_OP_P(NODE)					\
   1290   (IDENTIFIER_OVL_OP_P (NODE)						\
   1291    && (IDENTIFIER_OVL_OP_FLAGS (NODE)					\
   1292        & (OVL_OP_FLAG_ALLOC | OVL_OP_FLAG_DELETE)) == OVL_OP_FLAG_ALLOC)
   1293 
   1294 /* Access a C++-specific index for identifier NODE.
   1295    Used to optimize operator mappings etc.  */
   1296 #define IDENTIFIER_CP_INDEX(NODE)		\
   1297   (IDENTIFIER_NODE_CHECK(NODE)->base.u.bits.address_space)
   1298 
   1299 /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only.  */
   1300 #define C_TYPE_FIELDS_READONLY(TYPE) \
   1301   (LANG_TYPE_CLASS_CHECK (TYPE)->fields_readonly)
   1302 
   1303 /* The tokens stored in the unparsed operand.  */
   1304 
   1305 #define DEFPARSE_TOKENS(NODE) \
   1306   (((struct tree_deferred_parse *)DEFERRED_PARSE_CHECK (NODE))->tokens)
   1307 #define DEFPARSE_INSTANTIATIONS(NODE) \
   1308   (((struct tree_deferred_parse *)DEFERRED_PARSE_CHECK (NODE))->instantiations)
   1309 
   1310 struct GTY (()) tree_deferred_parse {
   1311   struct tree_base base;
   1312   struct cp_token_cache *tokens;
   1313   vec<tree, va_gc> *instantiations;
   1314 };
   1315 
   1316 
   1317 #define DEFERRED_NOEXCEPT_PATTERN(NODE) \
   1318   (((struct tree_deferred_noexcept *)DEFERRED_NOEXCEPT_CHECK (NODE))->pattern)
   1319 #define DEFERRED_NOEXCEPT_ARGS(NODE) \
   1320   (((struct tree_deferred_noexcept *)DEFERRED_NOEXCEPT_CHECK (NODE))->args)
   1321 #define DEFERRED_NOEXCEPT_SPEC_P(NODE)				\
   1322   ((NODE) && (TREE_PURPOSE (NODE))				\
   1323    && (TREE_CODE (TREE_PURPOSE (NODE)) == DEFERRED_NOEXCEPT))
   1324 #define UNEVALUATED_NOEXCEPT_SPEC_P(NODE)				\
   1325   (DEFERRED_NOEXCEPT_SPEC_P (NODE)					\
   1326    && DEFERRED_NOEXCEPT_PATTERN (TREE_PURPOSE (NODE)) == NULL_TREE)
   1327 #define UNPARSED_NOEXCEPT_SPEC_P(NODE) \
   1328   ((NODE) && (TREE_PURPOSE (NODE)) \
   1329    && (TREE_CODE (TREE_PURPOSE (NODE)) == DEFERRED_PARSE))
   1330 
   1331 struct GTY (()) tree_deferred_noexcept {
   1332   struct tree_base base;
   1333   tree pattern;
   1334   tree args;
   1335 };
   1336 
   1337 
   1338 /* The condition associated with the static assertion.  This must be
   1339    an integral constant expression.  */
   1340 #define STATIC_ASSERT_CONDITION(NODE) \
   1341   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->condition)
   1342 
   1343 /* The message associated with the static assertion.  This must be a
   1344    string constant, which will be emitted as an error message when the
   1345    static assert condition is false.  */
   1346 #define STATIC_ASSERT_MESSAGE(NODE) \
   1347   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->message)
   1348 
   1349 /* Source location information for a static assertion.  */
   1350 #define STATIC_ASSERT_SOURCE_LOCATION(NODE) \
   1351   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->location)
   1352 
   1353 struct GTY (()) tree_static_assert {
   1354   struct tree_common common;
   1355   tree condition;
   1356   tree message;
   1357   location_t location;
   1358 };
   1359 
   1360 struct GTY (()) tree_argument_pack_select {
   1361   struct tree_common common;
   1362   tree argument_pack;
   1363   int index;
   1364 };
   1365 
   1366 /* The different kinds of traits that we encounter.  */
   1367 
   1368 enum cp_trait_kind
   1369 {
   1370   CPTK_BASES,
   1371   CPTK_DIRECT_BASES,
   1372   CPTK_HAS_NOTHROW_ASSIGN,
   1373   CPTK_HAS_NOTHROW_CONSTRUCTOR,
   1374   CPTK_HAS_NOTHROW_COPY,
   1375   CPTK_HAS_TRIVIAL_ASSIGN,
   1376   CPTK_HAS_TRIVIAL_CONSTRUCTOR,
   1377   CPTK_HAS_TRIVIAL_COPY,
   1378   CPTK_HAS_TRIVIAL_DESTRUCTOR,
   1379   CPTK_HAS_UNIQUE_OBJ_REPRESENTATIONS,
   1380   CPTK_HAS_VIRTUAL_DESTRUCTOR,
   1381   CPTK_IS_ABSTRACT,
   1382   CPTK_IS_AGGREGATE,
   1383   CPTK_IS_BASE_OF,
   1384   CPTK_IS_CLASS,
   1385   CPTK_IS_EMPTY,
   1386   CPTK_IS_ENUM,
   1387   CPTK_IS_FINAL,
   1388   CPTK_IS_LAYOUT_COMPATIBLE,
   1389   CPTK_IS_LITERAL_TYPE,
   1390   CPTK_IS_POINTER_INTERCONVERTIBLE_BASE_OF,
   1391   CPTK_IS_POD,
   1392   CPTK_IS_POLYMORPHIC,
   1393   CPTK_IS_SAME_AS,
   1394   CPTK_IS_STD_LAYOUT,
   1395   CPTK_IS_TRIVIAL,
   1396   CPTK_IS_TRIVIALLY_ASSIGNABLE,
   1397   CPTK_IS_TRIVIALLY_CONSTRUCTIBLE,
   1398   CPTK_IS_TRIVIALLY_COPYABLE,
   1399   CPTK_IS_UNION,
   1400   CPTK_UNDERLYING_TYPE,
   1401   CPTK_IS_ASSIGNABLE,
   1402   CPTK_IS_CONSTRUCTIBLE,
   1403   CPTK_IS_NOTHROW_ASSIGNABLE,
   1404   CPTK_IS_NOTHROW_CONSTRUCTIBLE
   1405 };
   1406 
   1407 /* The types that we are processing.  */
   1408 #define TRAIT_EXPR_TYPE1(NODE) \
   1409   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->type1)
   1410 
   1411 #define TRAIT_EXPR_TYPE2(NODE) \
   1412   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->type2)
   1413 
   1414 /* The specific trait that we are processing.  */
   1415 #define TRAIT_EXPR_KIND(NODE) \
   1416   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->kind)
   1417 
   1418 #define TRAIT_EXPR_LOCATION(NODE) \
   1419   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->locus)
   1420 
   1421 struct GTY (()) tree_trait_expr {
   1422   struct tree_common common;
   1423   tree type1;
   1424   tree type2;
   1425   location_t locus;
   1426   enum cp_trait_kind kind;
   1427 };
   1428 
   1429 /* Identifiers used for lambda types are almost anonymous.  Use this
   1430    spare flag to distinguish them (they also have the anonymous flag).  */
   1431 #define IDENTIFIER_LAMBDA_P(NODE) \
   1432   (IDENTIFIER_NODE_CHECK(NODE)->base.protected_flag)
   1433 
   1434 /* Based off of TYPE_UNNAMED_P.  */
   1435 #define LAMBDA_TYPE_P(NODE)					\
   1436   (TREE_CODE (NODE) == RECORD_TYPE				\
   1437    && TYPE_LINKAGE_IDENTIFIER (NODE)				\
   1438    && IDENTIFIER_LAMBDA_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
   1439 
   1440 /* Test if FUNCTION_DECL is a lambda function.  */
   1441 #define LAMBDA_FUNCTION_P(FNDECL)				\
   1442   (DECL_DECLARES_FUNCTION_P (FNDECL)				\
   1443    && DECL_OVERLOADED_OPERATOR_P (FNDECL)			\
   1444    && DECL_OVERLOADED_OPERATOR_IS (FNDECL, CALL_EXPR)		\
   1445    && LAMBDA_TYPE_P (CP_DECL_CONTEXT (FNDECL)))
   1446 
   1447 enum cp_lambda_default_capture_mode_type {
   1448   CPLD_NONE,
   1449   CPLD_COPY,
   1450   CPLD_REFERENCE
   1451 };
   1452 
   1453 /* The method of default capture, if any.  */
   1454 #define LAMBDA_EXPR_DEFAULT_CAPTURE_MODE(NODE) \
   1455   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->default_capture_mode)
   1456 
   1457 /* The capture-list, including `this'.  Each capture is stored as a FIELD_DECL
   1458  * so that the name, type, and field are all together, whether or not it has
   1459  * been added to the lambda's class type.
   1460    TREE_LIST:
   1461      TREE_PURPOSE: The FIELD_DECL for this capture.
   1462      TREE_VALUE: The initializer. This is part of a GNU extension.  */
   1463 #define LAMBDA_EXPR_CAPTURE_LIST(NODE) \
   1464   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->capture_list)
   1465 
   1466 /* During parsing of the lambda-introducer, the node in the capture-list
   1467    that holds the 'this' capture.  During parsing of the body, the
   1468    capture proxy for that node.  */
   1469 #define LAMBDA_EXPR_THIS_CAPTURE(NODE) \
   1470   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->this_capture)
   1471 
   1472 /* Predicate tracking whether `this' is in the effective capture set.  */
   1473 #define LAMBDA_EXPR_CAPTURES_THIS_P(NODE) \
   1474   LAMBDA_EXPR_THIS_CAPTURE(NODE)
   1475 
   1476 /* Predicate tracking whether the lambda was declared 'mutable'.  */
   1477 #define LAMBDA_EXPR_MUTABLE_P(NODE) \
   1478   TREE_LANG_FLAG_1 (LAMBDA_EXPR_CHECK (NODE))
   1479 
   1480 /* True iff uses of a const variable capture were optimized away.  */
   1481 #define LAMBDA_EXPR_CAPTURE_OPTIMIZED(NODE) \
   1482   TREE_LANG_FLAG_2 (LAMBDA_EXPR_CHECK (NODE))
   1483 
   1484 /* True if this TREE_LIST in LAMBDA_EXPR_CAPTURE_LIST is for an explicit
   1485    capture.  */
   1486 #define LAMBDA_CAPTURE_EXPLICIT_P(NODE) \
   1487   TREE_LANG_FLAG_0 (TREE_LIST_CHECK (NODE))
   1488 
   1489 /* The source location of the lambda.  */
   1490 #define LAMBDA_EXPR_LOCATION(NODE) \
   1491   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->locus)
   1492 
   1493 /* The mangling scope for the lambda: FUNCTION_DECL, PARM_DECL, VAR_DECL,
   1494    FIELD_DECL or NULL_TREE.  If this is NULL_TREE, we have no linkage.  */
   1495 #define LAMBDA_EXPR_EXTRA_SCOPE(NODE) \
   1496   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->extra_scope)
   1497 
   1498 /* If EXTRA_SCOPE, this is the number of the lambda within that scope.  */
   1499 #define LAMBDA_EXPR_DISCRIMINATOR(NODE) \
   1500   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->discriminator)
   1501 
   1502 /* During parsing of the lambda, a vector of capture proxies which need
   1503    to be pushed once we're done processing a nested lambda.  */
   1504 #define LAMBDA_EXPR_PENDING_PROXIES(NODE) \
   1505   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->pending_proxies)
   1506 
   1507 /* If NODE was regenerated via tsubst_lambda_expr, this is a TEMPLATE_INFO
   1508    whose TI_TEMPLATE is the immediate LAMBDA_EXPR from which NODE was
   1509    regenerated, and TI_ARGS is the full set of template arguments used
   1510    to regenerate NODE from the most general lambda.  */
   1511 #define LAMBDA_EXPR_REGEN_INFO(NODE) \
   1512   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->regen_info)
   1513 
   1514 /* The closure type of the lambda, which is also the type of the
   1515    LAMBDA_EXPR.  */
   1516 #define LAMBDA_EXPR_CLOSURE(NODE) \
   1517   (TREE_TYPE (LAMBDA_EXPR_CHECK (NODE)))
   1518 
   1519 struct GTY (()) tree_lambda_expr
   1520 {
   1521   struct tree_typed typed;
   1522   tree capture_list;
   1523   tree this_capture;
   1524   tree extra_scope;
   1525   tree regen_info;
   1526   vec<tree, va_gc> *pending_proxies;
   1527   location_t locus;
   1528   enum cp_lambda_default_capture_mode_type default_capture_mode : 8;
   1529   short int discriminator;
   1530 };
   1531 
   1532 /* Non-zero if this template specialization has access violations that
   1533    should be rechecked when the function is instantiated outside argument
   1534    deduction.  */
   1535 #define TINFO_HAS_ACCESS_ERRORS(NODE) \
   1536   (TREE_LANG_FLAG_0 (TEMPLATE_INFO_CHECK (NODE)))
   1537 #define FNDECL_HAS_ACCESS_ERRORS(NODE) \
   1538   (TINFO_HAS_ACCESS_ERRORS (DECL_TEMPLATE_INFO (NODE)))
   1539 
   1540 /* Non-zero if this variable template specialization was specified using a
   1541    template-id, so it's a partial or full specialization and not a definition
   1542    of the member template of a particular class specialization.  */
   1543 #define TINFO_USED_TEMPLATE_ID(NODE) \
   1544   (TREE_LANG_FLAG_1 (TEMPLATE_INFO_CHECK (NODE)))
   1545 
   1546 /* The representation of a deferred access check.  */
   1547 
   1548 struct GTY(()) deferred_access_check {
   1549   /* The base class in which the declaration is referenced. */
   1550   tree binfo;
   1551   /* The declaration whose access must be checked.  */
   1552   tree decl;
   1553   /* The declaration that should be used in the error message.  */
   1554   tree diag_decl;
   1555   /* The location of this access.  */
   1556   location_t loc;
   1557 };
   1558 
   1559 struct GTY(()) tree_template_info {
   1560   struct tree_base base;
   1561   tree tmpl;
   1562   tree args;
   1563   vec<deferred_access_check, va_gc> *deferred_access_checks;
   1564 };
   1565 
   1566 // Constraint information for a C++ declaration. Constraint information is
   1567 // comprised of:
   1568 //
   1569 // - a constraint expression introduced by the template header
   1570 // - a constraint expression introduced by a function declarator
   1571 // - the associated constraints, which are the conjunction of those,
   1572 //   and used for declaration matching
   1573 //
   1574 // The template and declarator requirements are kept to support pretty
   1575 // printing constrained declarations.
   1576 struct GTY(()) tree_constraint_info {
   1577   struct tree_base base;
   1578   tree template_reqs;
   1579   tree declarator_reqs;
   1580   tree associated_constr;
   1581 };
   1582 
   1583 // Require that pointer P is non-null before returning.
   1584 template<typename T>
   1585 inline T*
   1586 check_nonnull (T* p)
   1587 {
   1588   gcc_assert (p);
   1589   return p;
   1590 }
   1591 
   1592 /* Returns true iff T is non-null and represents constraint info.  */
   1593 inline tree_constraint_info *
   1594 check_constraint_info (tree t)
   1595 {
   1596   if (t && TREE_CODE (t) == CONSTRAINT_INFO)
   1597     return (tree_constraint_info *)t;
   1598   return NULL;
   1599 }
   1600 
   1601 /* Access the expression describing the template constraints. This may be
   1602    null if no constraints were introduced in the template parameter list,
   1603    a requirements clause after the template parameter list, or constraints
   1604    through a constrained-type-specifier.  */
   1605 #define CI_TEMPLATE_REQS(NODE) \
   1606   check_constraint_info (check_nonnull (NODE))->template_reqs
   1607 
   1608 /* Access the expression describing the trailing constraints. This is non-null
   1609    for any implicit instantiation of a constrained declaration. For a
   1610    templated declaration it is non-null only when a trailing requires-clause
   1611    was specified.  */
   1612 #define CI_DECLARATOR_REQS(NODE) \
   1613   check_constraint_info (check_nonnull (NODE))->declarator_reqs
   1614 
   1615 /* The computed associated constraint expression for a declaration.  */
   1616 #define CI_ASSOCIATED_CONSTRAINTS(NODE) \
   1617   check_constraint_info (check_nonnull (NODE))->associated_constr
   1618 
   1619 /* Access the constraint-expression introduced by the requires-clause
   1620    associate the template parameter list NODE.  */
   1621 #define TEMPLATE_PARMS_CONSTRAINTS(NODE) \
   1622   TREE_TYPE (TREE_LIST_CHECK (NODE))
   1623 
   1624 /* Access the logical constraints on the template parameter declaration
   1625    indicated by NODE.  */
   1626 #define TEMPLATE_PARM_CONSTRAINTS(NODE) \
   1627   TREE_TYPE (TREE_LIST_CHECK (NODE))
   1628 
   1629 /* Non-zero if the noexcept is present in a compound requirement.  */
   1630 #define COMPOUND_REQ_NOEXCEPT_P(NODE) \
   1631   TREE_LANG_FLAG_0 (TREE_CHECK (NODE, COMPOUND_REQ))
   1632 
   1633 /* A TREE_LIST whose TREE_VALUE is the constraints on the 'auto' placeholder
   1634    type NODE, used in an argument deduction constraint.  The TREE_PURPOSE
   1635    holds the set of template parameters that were in-scope when this 'auto'
   1636    was formed.  */
   1637 #define PLACEHOLDER_TYPE_CONSTRAINTS_INFO(NODE) \
   1638   DECL_SIZE_UNIT (TYPE_NAME (NODE))
   1639 
   1640 /* The constraints on the 'auto' placeholder type NODE.  */
   1641 #define PLACEHOLDER_TYPE_CONSTRAINTS(NODE)		   \
   1642   (PLACEHOLDER_TYPE_CONSTRAINTS_INFO (NODE)		   \
   1643    ? TREE_VALUE (PLACEHOLDER_TYPE_CONSTRAINTS_INFO (NODE)) \
   1644    : NULL_TREE)
   1645 
   1646 /* True if NODE is a constraint.  */
   1647 #define CONSTR_P(NODE)                  \
   1648   (TREE_CODE (NODE) == ATOMIC_CONSTR    \
   1649    || TREE_CODE (NODE) == CONJ_CONSTR   \
   1650    || TREE_CODE (NODE) == DISJ_CONSTR)
   1651 
   1652 /* Valid for any normalized constraint.  */
   1653 #define CONSTR_CHECK(NODE) \
   1654   TREE_CHECK3 (NODE, ATOMIC_CONSTR, CONJ_CONSTR, DISJ_CONSTR)
   1655 
   1656 /* The CONSTR_INFO stores normalization data for a constraint. It refers to
   1657    the original expression and the expression or declaration
   1658    from which the constraint was normalized.
   1659 
   1660    This is TREE_LIST whose TREE_PURPOSE is the original expression and whose
   1661    TREE_VALUE is a list of contexts.  */
   1662 #define CONSTR_INFO(NODE) \
   1663   TREE_TYPE (CONSTR_CHECK (NODE))
   1664 
   1665 /* The expression evaluated by the constraint.  */
   1666 #define CONSTR_EXPR(NODE) \
   1667   TREE_PURPOSE (CONSTR_INFO (NODE))
   1668 
   1669 /* The expression or declaration from which this constraint was normalized.
   1670    This is a TREE_LIST whose TREE_VALUE is either a template-id expression
   1671    denoting a concept check or the declaration introducing the constraint.
   1672    These are chained to other context objects.  */
   1673 #define CONSTR_CONTEXT(NODE) \
   1674   TREE_VALUE (CONSTR_INFO (NODE))
   1675 
   1676 /* The parameter mapping for an atomic constraint. */
   1677 #define ATOMIC_CONSTR_MAP(NODE) \
   1678   TREE_OPERAND (TREE_CHECK (NODE, ATOMIC_CONSTR), 0)
   1679 
   1680 /* Whether the parameter mapping of this atomic constraint
   1681    is already instantiated with concrete template arguments.
   1682    Used only in satisfy_atom and in the satisfaction cache.  */
   1683 #define ATOMIC_CONSTR_MAP_INSTANTIATED_P(NODE) \
   1684   TREE_LANG_FLAG_0 (ATOMIC_CONSTR_CHECK (NODE))
   1685 
   1686 /* Whether the expression for this atomic constraint belongs to a
   1687    concept definition.  */
   1688 #define ATOMIC_CONSTR_EXPR_FROM_CONCEPT_P(NODE) \
   1689   TREE_LANG_FLAG_1 (ATOMIC_CONSTR_CHECK (NODE))
   1690 
   1691 /* The expression of an atomic constraint. */
   1692 #define ATOMIC_CONSTR_EXPR(NODE) \
   1693   CONSTR_EXPR (ATOMIC_CONSTR_CHECK (NODE))
   1694 
   1695 /* The concept of a concept check. */
   1696 #define CHECK_CONSTR_CONCEPT(NODE) \
   1697   TREE_OPERAND (TREE_CHECK (NODE, CHECK_CONSTR), 0)
   1698 
   1699 /* The template arguments of a concept check. */
   1700 #define CHECK_CONSTR_ARGS(NODE) \
   1701   TREE_OPERAND (TREE_CHECK (NODE, CHECK_CONSTR), 1)
   1702 
   1703 /* Whether a PARM_DECL represents a local parameter in a
   1704    requires-expression.  */
   1705 #define CONSTRAINT_VAR_P(NODE) \
   1706   DECL_LANG_FLAG_2 (TREE_CHECK (NODE, PARM_DECL))
   1707 
   1708 /* The concept constraining this constrained template-parameter.  */
   1709 #define CONSTRAINED_PARM_CONCEPT(NODE) \
   1710   DECL_SIZE_UNIT (TYPE_DECL_CHECK (NODE))
   1711 /* Any extra template arguments specified for a constrained
   1712    template-parameter.  */
   1713 #define CONSTRAINED_PARM_EXTRA_ARGS(NODE) \
   1714   DECL_SIZE (TYPE_DECL_CHECK (NODE))
   1715 /* The first template parameter of CONSTRAINED_PARM_CONCEPT to be used as a
   1716    prototype for the constrained parameter in finish_shorthand_constraint,
   1717    attached for convenience.  */
   1718 #define CONSTRAINED_PARM_PROTOTYPE(NODE) \
   1719   DECL_INITIAL (TYPE_DECL_CHECK (NODE))
   1720 
   1721 /* Module flags on FUNCTION,VAR,TYPE,CONCEPT or NAMESPACE
   1722    A TEMPLATE_DECL holds them on the DECL_TEMPLATE_RESULT object --
   1723    it's just not practical to keep them consistent.  */
   1724 #define DECL_MODULE_CHECK(NODE)						\
   1725   TREE_NOT_CHECK (NODE, TEMPLATE_DECL)
   1726 
   1727 /* In the purview of a module (including header unit).  */
   1728 #define DECL_MODULE_PURVIEW_P(N) \
   1729   (DECL_LANG_SPECIFIC (DECL_MODULE_CHECK (N))->u.base.module_purview_p)
   1730 
   1731 /* True if the live version of the decl was imported.  */
   1732 #define DECL_MODULE_IMPORT_P(NODE) \
   1733   (DECL_LANG_SPECIFIC (DECL_MODULE_CHECK (NODE))->u.base.module_import_p)
   1734 
   1735 /* True if this decl is in the entity hash & array.  This means that
   1736    some variant was imported, even if DECL_MODULE_IMPORT_P is false.  */
   1737 #define DECL_MODULE_ENTITY_P(NODE) \
   1738   (DECL_LANG_SPECIFIC (DECL_MODULE_CHECK (NODE))->u.base.module_entity_p)
   1739 
   1740 /* DECL that has attached decls for ODR-relatedness.  */
   1741 #define DECL_MODULE_ATTACHMENTS_P(NODE)			\
   1742   (DECL_LANG_SPECIFIC (TREE_CHECK2(NODE,FUNCTION_DECL,VAR_DECL))\
   1743    ->u.base.module_attached_p)
   1744 
   1745 /* Whether this is an exported DECL.  Held on any decl that can appear
   1746    at namespace scope (function, var, type, template, const or
   1747    namespace).  templates copy from their template_result, consts have
   1748    it for unscoped enums.  */
   1749 #define DECL_MODULE_EXPORT_P(NODE) TREE_LANG_FLAG_3 (NODE)
   1750 
   1751 
   1752 /* The list of local parameters introduced by this requires-expression,
   1754    in the form of a chain of PARM_DECLs.  */
   1755 #define REQUIRES_EXPR_PARMS(NODE) \
   1756   TREE_OPERAND (TREE_CHECK (NODE, REQUIRES_EXPR), 0)
   1757 
   1758 /* A TREE_LIST of the requirements for this requires-expression.
   1759    The requirements are stored in lexical order within the TREE_VALUE
   1760    of each TREE_LIST node.  The TREE_PURPOSE of each node is unused.  */
   1761 #define REQUIRES_EXPR_REQS(NODE) \
   1762   TREE_OPERAND (TREE_CHECK (NODE, REQUIRES_EXPR), 1)
   1763 
   1764 /* Like PACK_EXPANSION_EXTRA_ARGS, for requires-expressions.  */
   1765 #define REQUIRES_EXPR_EXTRA_ARGS(NODE) \
   1766   TREE_OPERAND (TREE_CHECK (NODE, REQUIRES_EXPR), 2)
   1767 
   1768 enum cp_tree_node_structure_enum {
   1769   TS_CP_GENERIC,
   1770   TS_CP_IDENTIFIER,
   1771   TS_CP_TPI,
   1772   TS_CP_PTRMEM,
   1773   TS_CP_OVERLOAD,
   1774   TS_CP_BINDING_VECTOR,
   1775   TS_CP_BASELINK,
   1776   TS_CP_TEMPLATE_DECL,
   1777   TS_CP_DEFERRED_PARSE,
   1778   TS_CP_DEFERRED_NOEXCEPT,
   1779   TS_CP_STATIC_ASSERT,
   1780   TS_CP_ARGUMENT_PACK_SELECT,
   1781   TS_CP_TRAIT_EXPR,
   1782   TS_CP_LAMBDA_EXPR,
   1783   TS_CP_TEMPLATE_INFO,
   1784   TS_CP_CONSTRAINT_INFO,
   1785   TS_CP_USERDEF_LITERAL
   1786 };
   1787 
   1788 /* The resulting tree type.  */
   1789 union GTY((desc ("cp_tree_node_structure (&%h)"),
   1790        chain_next ("(union lang_tree_node *) c_tree_chain_next (&%h.generic)"))) lang_tree_node {
   1791   union tree_node GTY ((tag ("TS_CP_GENERIC"),
   1792 			desc ("tree_node_structure (&%h)"))) generic;
   1793   struct template_parm_index GTY ((tag ("TS_CP_TPI"))) tpi;
   1794   struct ptrmem_cst GTY ((tag ("TS_CP_PTRMEM"))) ptrmem;
   1795   struct tree_overload GTY ((tag ("TS_CP_OVERLOAD"))) overload;
   1796   struct tree_binding_vec GTY ((tag ("TS_CP_BINDING_VECTOR"))) binding_vec;
   1797   struct tree_baselink GTY ((tag ("TS_CP_BASELINK"))) baselink;
   1798   struct tree_template_decl GTY ((tag ("TS_CP_TEMPLATE_DECL"))) template_decl;
   1799   struct tree_deferred_parse GTY ((tag ("TS_CP_DEFERRED_PARSE"))) deferred_parse;
   1800   struct tree_deferred_noexcept GTY ((tag ("TS_CP_DEFERRED_NOEXCEPT"))) deferred_noexcept;
   1801   struct lang_identifier GTY ((tag ("TS_CP_IDENTIFIER"))) identifier;
   1802   struct tree_static_assert GTY ((tag ("TS_CP_STATIC_ASSERT")))
   1803     static_assertion;
   1804   struct tree_argument_pack_select GTY ((tag ("TS_CP_ARGUMENT_PACK_SELECT")))
   1805     argument_pack_select;
   1806   struct tree_trait_expr GTY ((tag ("TS_CP_TRAIT_EXPR")))
   1807     trait_expression;
   1808   struct tree_lambda_expr GTY ((tag ("TS_CP_LAMBDA_EXPR")))
   1809     lambda_expression;
   1810   struct tree_template_info GTY ((tag ("TS_CP_TEMPLATE_INFO")))
   1811     template_info;
   1812   struct tree_constraint_info GTY ((tag ("TS_CP_CONSTRAINT_INFO")))
   1813     constraint_info;
   1814   struct tree_userdef_literal GTY ((tag ("TS_CP_USERDEF_LITERAL")))
   1815     userdef_literal;
   1816 };
   1817 
   1818 
   1819 struct GTY(()) omp_declare_target_attr {
   1821   bool attr_syntax;
   1822 };
   1823 
   1824 /* Global state.  */
   1825 
   1826 struct GTY(()) saved_scope {
   1827   vec<cxx_saved_binding, va_gc> *old_bindings;
   1828   tree old_namespace;
   1829   vec<tree, va_gc> *decl_ns_list;
   1830   tree class_name;
   1831   tree class_type;
   1832   tree access_specifier;
   1833   tree function_decl;
   1834   vec<tree, va_gc> *lang_base;
   1835   tree lang_name;
   1836   tree template_parms;
   1837   cp_binding_level *x_previous_class_level;
   1838   tree x_saved_tree;
   1839 
   1840   /* Only used for uses of this in trailing return type.  */
   1841   tree x_current_class_ptr;
   1842   tree x_current_class_ref;
   1843 
   1844   int x_processing_template_decl;
   1845   int x_processing_specialization;
   1846   int x_processing_constraint;
   1847   int suppress_location_wrappers;
   1848   BOOL_BITFIELD x_processing_explicit_instantiation : 1;
   1849   BOOL_BITFIELD need_pop_function_context : 1;
   1850 
   1851   /* Nonzero if we are parsing the discarded statement of a constexpr
   1852      if-statement.  */
   1853   BOOL_BITFIELD discarded_stmt : 1;
   1854   /* Nonzero if we are parsing or instantiating the compound-statement
   1855      of consteval if statement.  Also set while processing an immediate
   1856      invocation.  */
   1857   BOOL_BITFIELD consteval_if_p : 1;
   1858 
   1859   int unevaluated_operand;
   1860   int inhibit_evaluation_warnings;
   1861   int noexcept_operand;
   1862   int ref_temp_count;
   1863 
   1864   struct stmt_tree_s x_stmt_tree;
   1865 
   1866   cp_binding_level *class_bindings;
   1867   cp_binding_level *bindings;
   1868 
   1869   hash_map<tree, tree> *GTY((skip)) x_local_specializations;
   1870   vec<omp_declare_target_attr, va_gc> *omp_declare_target_attribute;
   1871 
   1872   struct saved_scope *prev;
   1873 };
   1874 
   1875 extern GTY(()) struct saved_scope *scope_chain;
   1876 
   1877 /* The current open namespace.  */
   1878 
   1879 #define current_namespace scope_chain->old_namespace
   1880 
   1881 /* The stack for namespaces of current declarations.  */
   1882 
   1883 #define decl_namespace_list scope_chain->decl_ns_list
   1884 
   1885 /* IDENTIFIER_NODE: name of current class */
   1886 
   1887 #define current_class_name scope_chain->class_name
   1888 
   1889 /* _TYPE: the type of the current class */
   1890 
   1891 #define current_class_type scope_chain->class_type
   1892 
   1893 /* When parsing a class definition, the access specifier most recently
   1894    given by the user, or, if no access specifier was given, the
   1895    default value appropriate for the kind of class (i.e., struct,
   1896    class, or union).  */
   1897 
   1898 #define current_access_specifier scope_chain->access_specifier
   1899 
   1900 /* Pointer to the top of the language name stack.  */
   1901 
   1902 #define current_lang_base scope_chain->lang_base
   1903 #define current_lang_name scope_chain->lang_name
   1904 
   1905 /* When parsing a template declaration, a TREE_LIST represents the
   1906    active template parameters.  Each node in the list represents one
   1907    level of template parameters.  The innermost level is first in the
   1908    list.  The depth of each level is stored as an INTEGER_CST in the
   1909    TREE_PURPOSE of each node.  The parameters for that level are
   1910    stored in the TREE_VALUE.  */
   1911 
   1912 #define current_template_parms scope_chain->template_parms
   1913 #define current_template_depth \
   1914   (current_template_parms ? TMPL_PARMS_DEPTH (current_template_parms) : 0)
   1915 
   1916 #define processing_template_decl scope_chain->x_processing_template_decl
   1917 #define processing_specialization scope_chain->x_processing_specialization
   1918 #define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation
   1919 
   1920 #define in_discarded_stmt scope_chain->discarded_stmt
   1921 #define in_consteval_if_p scope_chain->consteval_if_p
   1922 
   1923 #define current_ref_temp_count scope_chain->ref_temp_count
   1924 
   1925 /* RAII sentinel to handle clearing processing_template_decl and restoring
   1926    it when done.  */
   1927 
   1928 class processing_template_decl_sentinel
   1929 {
   1930 public:
   1931   int saved;
   1932   processing_template_decl_sentinel (bool reset = true)
   1933     : saved (processing_template_decl)
   1934   {
   1935     if (reset)
   1936       processing_template_decl = 0;
   1937   }
   1938   ~processing_template_decl_sentinel()
   1939   {
   1940     processing_template_decl = saved;
   1941   }
   1942 };
   1943 
   1944 /* RAII sentinel to disable certain warnings during template substitution
   1945    and elsewhere.  */
   1946 
   1947 class warning_sentinel
   1948 {
   1949 public:
   1950   int &flag;
   1951   int val;
   1952   warning_sentinel(int& flag, bool suppress=true)
   1953     : flag(flag), val(flag) { if (suppress) flag = 0; }
   1954   ~warning_sentinel() { flag = val; }
   1955 };
   1956 
   1957 /* RAII sentinel to temporarily override input_location.  This will not set
   1958    input_location to UNKNOWN_LOCATION or BUILTINS_LOCATION.  */
   1959 
   1960 class iloc_sentinel
   1961 {
   1962   location_t saved_loc;
   1963 public:
   1964   iloc_sentinel (location_t loc): saved_loc (input_location)
   1965   {
   1966     if (loc >= RESERVED_LOCATION_COUNT)
   1967       input_location = loc;
   1968   }
   1969   ~iloc_sentinel ()
   1970   {
   1971     input_location = saved_loc;
   1972   }
   1973 };
   1974 
   1975 /* RAII sentinel that saves the value of a variable, optionally
   1976    overrides it right away, and restores its value when the sentinel
   1977    id destructed.  */
   1978 
   1979 template <typename T>
   1980 class temp_override
   1981 {
   1982   T& overridden_variable;
   1983   T saved_value;
   1984 public:
   1985   temp_override(T& var) : overridden_variable (var), saved_value (var) {}
   1986   temp_override(T& var, T overrider)
   1987     : overridden_variable (var), saved_value (var)
   1988   {
   1989     overridden_variable = overrider;
   1990   }
   1991   ~temp_override() { overridden_variable = saved_value; }
   1992 };
   1993 
   1994 /* Wrapping a template parameter in type_identity_t hides it from template
   1995    argument deduction.  */
   1996 #if __cpp_lib_type_identity
   1997 using std::type_identity_t;
   1998 #else
   1999 template <typename T>
   2000 struct type_identity { typedef T type; };
   2001 template <typename T>
   2002 using type_identity_t = typename type_identity<T>::type;
   2003 #endif
   2004 
   2005 /* Object generator function for temp_override, so you don't need to write the
   2006    type of the object as a template argument.
   2007 
   2008    Use as auto x = make_temp_override (flag); */
   2009 
   2010 template <typename T>
   2011 inline temp_override<T>
   2012 make_temp_override (T& var)
   2013 {
   2014   return { var };
   2015 }
   2016 
   2017 /* Likewise, but use as auto x = make_temp_override (flag, value); */
   2018 
   2019 template <typename T>
   2020 inline temp_override<T>
   2021 make_temp_override (T& var, type_identity_t<T> overrider)
   2022 {
   2023   return { var, overrider };
   2024 }
   2025 
   2026 /* The cached class binding level, from the most recently exited
   2027    class, or NULL if none.  */
   2028 
   2029 #define previous_class_level scope_chain->x_previous_class_level
   2030 
   2031 /* A map from local variable declarations in the body of the template
   2032    presently being instantiated to the corresponding instantiated
   2033    local variables.  */
   2034 
   2035 #define local_specializations scope_chain->x_local_specializations
   2036 
   2037 /* Nonzero if we are parsing the operand of a noexcept operator.  */
   2038 
   2039 #define cp_noexcept_operand scope_chain->noexcept_operand
   2040 
   2041 struct named_label_entry; /* Defined in decl.cc.  */
   2042 
   2043 struct named_label_hash : ggc_remove <named_label_entry *>
   2044 {
   2045   typedef named_label_entry *value_type;
   2046   typedef tree compare_type; /* An identifier.  */
   2047 
   2048   inline static hashval_t hash (value_type);
   2049   inline static bool equal (const value_type, compare_type);
   2050 
   2051   static const bool empty_zero_p = true;
   2052   inline static void mark_empty (value_type &p) {p = NULL;}
   2053   inline static bool is_empty (value_type p) {return !p;}
   2054 
   2055   /* Nothing is deletable.  Everything is insertable.  */
   2056   inline static bool is_deleted (value_type) { return false; }
   2057   inline static void mark_deleted (value_type) { gcc_unreachable (); }
   2058 };
   2059 
   2060 /* Global state pertinent to the current function.  */
   2061 
   2062 struct GTY(()) language_function {
   2063   struct c_language_function base;
   2064 
   2065   tree x_cdtor_label;
   2066   tree x_current_class_ptr;
   2067   tree x_current_class_ref;
   2068   tree x_eh_spec_block;
   2069   tree x_in_charge_parm;
   2070   tree x_vtt_parm;
   2071   tree x_return_value;
   2072 
   2073   BOOL_BITFIELD returns_value : 1;
   2074   BOOL_BITFIELD returns_null : 1;
   2075   BOOL_BITFIELD returns_abnormally : 1;
   2076   BOOL_BITFIELD infinite_loop: 1;
   2077   BOOL_BITFIELD x_in_function_try_handler : 1;
   2078   BOOL_BITFIELD x_in_base_initializer : 1;
   2079 
   2080   /* True if this function can throw an exception.  */
   2081   BOOL_BITFIELD can_throw : 1;
   2082 
   2083   BOOL_BITFIELD invalid_constexpr : 1;
   2084   BOOL_BITFIELD throwing_cleanup : 1;
   2085   BOOL_BITFIELD backward_goto : 1;
   2086 
   2087   hash_table<named_label_hash> *x_named_labels;
   2088 
   2089   cp_binding_level *bindings;
   2090 
   2091   /* Tracking possibly infinite loops.  This is a vec<tree> only because
   2092      vec<bool> doesn't work with gtype.  */
   2093   vec<tree, va_gc> *infinite_loops;
   2094 };
   2095 
   2096 /* The current C++-specific per-function global variables.  */
   2097 
   2098 #define cp_function_chain (cfun->language)
   2099 
   2100 /* In a constructor destructor, the point at which all derived class
   2101    destroying/construction has been done.  I.e., just before a
   2102    constructor returns, or before any base class destroying will be done
   2103    in a destructor.  */
   2104 
   2105 #define cdtor_label cp_function_chain->x_cdtor_label
   2106 
   2107 /* When we're processing a member function, current_class_ptr is the
   2108    PARM_DECL for the `this' pointer.  The current_class_ref is an
   2109    expression for `*this'.  */
   2110 
   2111 #define current_class_ptr			\
   2112   (*(cfun && cp_function_chain			\
   2113      ? &cp_function_chain->x_current_class_ptr	\
   2114      : &scope_chain->x_current_class_ptr))
   2115 #define current_class_ref			\
   2116   (*(cfun && cp_function_chain			\
   2117      ? &cp_function_chain->x_current_class_ref	\
   2118      : &scope_chain->x_current_class_ref))
   2119 
   2120 /* The EH_SPEC_BLOCK for the exception-specifiers for the current
   2121    function, if any.  */
   2122 
   2123 #define current_eh_spec_block cp_function_chain->x_eh_spec_block
   2124 
   2125 /* The `__in_chrg' parameter for the current function.  Only used for
   2126    constructors and destructors.  */
   2127 
   2128 #define current_in_charge_parm cp_function_chain->x_in_charge_parm
   2129 
   2130 /* The `__vtt_parm' parameter for the current function.  Only used for
   2131    constructors and destructors.  */
   2132 
   2133 #define current_vtt_parm cp_function_chain->x_vtt_parm
   2134 
   2135 /* A boolean flag to control whether we need to clean up the return value if a
   2136    local destructor throws.  Only used in functions that return by value a
   2137    class with a destructor.  Which 'tors don't, so we can use the same
   2138    field as current_vtt_parm.  */
   2139 
   2140 #define current_retval_sentinel current_vtt_parm
   2141 
   2142 /* Set to 0 at beginning of a function definition, set to 1 if
   2143    a return statement that specifies a return value is seen.  */
   2144 
   2145 #define current_function_returns_value cp_function_chain->returns_value
   2146 
   2147 /* Set to 0 at beginning of a function definition, set to 1 if
   2148    a return statement with no argument is seen.  */
   2149 
   2150 #define current_function_returns_null cp_function_chain->returns_null
   2151 
   2152 /* Set to 0 at beginning of a function definition, set to 1 if
   2153    a call to a noreturn function is seen.  */
   2154 
   2155 #define current_function_returns_abnormally \
   2156   cp_function_chain->returns_abnormally
   2157 
   2158 /* Set to 0 at beginning of a function definition, set to 1 if we see an
   2159    obvious infinite loop.  This can have false positives and false
   2160    negatives, so it should only be used as a heuristic.  */
   2161 
   2162 #define current_function_infinite_loop cp_function_chain->infinite_loop
   2163 
   2164 /* Nonzero if we are processing a base initializer.  Zero elsewhere.  */
   2165 #define in_base_initializer cp_function_chain->x_in_base_initializer
   2166 
   2167 #define in_function_try_handler cp_function_chain->x_in_function_try_handler
   2168 
   2169 /* Expression always returned from function, or error_mark_node
   2170    otherwise, for use by the automatic named return value optimization.  */
   2171 
   2172 #define current_function_return_value \
   2173   (cp_function_chain->x_return_value)
   2174 
   2175 /* In parser.cc.  */
   2176 extern tree cp_literal_operator_id (const char *);
   2177 
   2178 #define NON_ERROR(NODE) ((NODE) == error_mark_node ? NULL_TREE : (NODE))
   2179 
   2180 /* TRUE if a tree code represents a statement.  */
   2181 extern bool statement_code_p[MAX_TREE_CODES];
   2182 
   2183 #define STATEMENT_CODE_P(CODE) statement_code_p[(int) (CODE)]
   2184 
   2185 enum languages { lang_c, lang_cplusplus };
   2186 
   2187 /* Macros to make error reporting functions' lives easier.  */
   2188 #define TYPE_LINKAGE_IDENTIFIER(NODE) \
   2189   (TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (NODE)))
   2190 #define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
   2191 #define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
   2192 
   2193 /* Any kind of anonymous type.  */
   2194 #define TYPE_ANON_P(NODE)					\
   2195   (TYPE_LINKAGE_IDENTIFIER (NODE)				\
   2196    && IDENTIFIER_ANON_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
   2197 
   2198 /* Nonzero if NODE, a TYPE, has no name for linkage purposes.  */
   2199 #define TYPE_UNNAMED_P(NODE)					\
   2200   (TYPE_ANON_P (NODE)						\
   2201    && !IDENTIFIER_LAMBDA_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
   2202 
   2203 /* The _DECL for this _TYPE.  */
   2204 #define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
   2205 
   2206 /* Nonzero if T is a type that could resolve to any kind of concrete type
   2207    at instantiation time.  */
   2208 #define WILDCARD_TYPE_P(T)				\
   2209   (TREE_CODE (T) == TEMPLATE_TYPE_PARM			\
   2210    || TREE_CODE (T) == TYPENAME_TYPE			\
   2211    || TREE_CODE (T) == TYPEOF_TYPE			\
   2212    || TREE_CODE (T) == BOUND_TEMPLATE_TEMPLATE_PARM	\
   2213    || TREE_CODE (T) == DECLTYPE_TYPE			\
   2214    || TREE_CODE (T) == DEPENDENT_OPERATOR_TYPE)
   2215 
   2216 /* Nonzero if T is a class (or struct or union) type.  Also nonzero
   2217    for template type parameters, typename types, and instantiated
   2218    template template parameters.  Keep these checks in ascending code
   2219    order.  */
   2220 #define MAYBE_CLASS_TYPE_P(T) (WILDCARD_TYPE_P (T) || CLASS_TYPE_P (T))
   2221 
   2222 /* Set CLASS_TYPE_P for T to VAL.  T must be a class, struct, or
   2223    union type.  */
   2224 #define SET_CLASS_TYPE_P(T, VAL) \
   2225   (TYPE_LANG_FLAG_5 (RECORD_OR_UNION_CHECK (T)) = (VAL))
   2226 
   2227 /* Nonzero if T is a class type.  Zero for template type parameters,
   2228    typename types, and so forth.  */
   2229 #define CLASS_TYPE_P(T) \
   2230   (RECORD_OR_UNION_CODE_P (TREE_CODE (T)) && TYPE_LANG_FLAG_5 (T))
   2231 
   2232 /* Nonzero if T is a class type but not a union.  */
   2233 #define NON_UNION_CLASS_TYPE_P(T) \
   2234   (TREE_CODE (T) == RECORD_TYPE && TYPE_LANG_FLAG_5 (T))
   2235 
   2236 /* Keep these checks in ascending code order.  */
   2237 #define RECORD_OR_UNION_CODE_P(T)	\
   2238   ((T) == RECORD_TYPE || (T) == UNION_TYPE)
   2239 #define OVERLOAD_TYPE_P(T) \
   2240   (CLASS_TYPE_P (T) || TREE_CODE (T) == ENUMERAL_TYPE)
   2241 
   2242 /* True if this type is dependent.  This predicate is only valid if
   2243    TYPE_DEPENDENT_P_VALID is true.  */
   2244 #define TYPE_DEPENDENT_P(NODE) TYPE_LANG_FLAG_0 (NODE)
   2245 
   2246 /* True if dependent_type_p has been called for this type, with the
   2247    result that TYPE_DEPENDENT_P is valid.  */
   2248 #define TYPE_DEPENDENT_P_VALID(NODE) TYPE_LANG_FLAG_6(NODE)
   2249 
   2250 /* Nonzero if this type is const-qualified.  */
   2251 #define CP_TYPE_CONST_P(NODE)				\
   2252   ((cp_type_quals (NODE) & TYPE_QUAL_CONST) != 0)
   2253 
   2254 /* Nonzero if this type is volatile-qualified.  */
   2255 #define CP_TYPE_VOLATILE_P(NODE)			\
   2256   ((cp_type_quals (NODE) & TYPE_QUAL_VOLATILE) != 0)
   2257 
   2258 /* Nonzero if this type is restrict-qualified.  */
   2259 #define CP_TYPE_RESTRICT_P(NODE)			\
   2260   ((cp_type_quals (NODE) & TYPE_QUAL_RESTRICT) != 0)
   2261 
   2262 /* Nonzero if this type is const-qualified, but not
   2263    volatile-qualified.  Other qualifiers are ignored.  This macro is
   2264    used to test whether or not it is OK to bind an rvalue to a
   2265    reference.  */
   2266 #define CP_TYPE_CONST_NON_VOLATILE_P(NODE)				\
   2267   ((cp_type_quals (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE))	\
   2268    == TYPE_QUAL_CONST)
   2269 
   2270 #define FUNCTION_ARG_CHAIN(NODE) \
   2271   TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE)))
   2272 
   2273 /* Given a FUNCTION_DECL, returns the first TREE_LIST out of TYPE_ARG_TYPES
   2274    which refers to a user-written parameter.  */
   2275 #define FUNCTION_FIRST_USER_PARMTYPE(NODE) \
   2276   skip_artificial_parms_for ((NODE), TYPE_ARG_TYPES (TREE_TYPE (NODE)))
   2277 
   2278 /* Similarly, but for DECL_ARGUMENTS.  */
   2279 #define FUNCTION_FIRST_USER_PARM(NODE) \
   2280   skip_artificial_parms_for ((NODE), DECL_ARGUMENTS (NODE))
   2281 
   2282 /* Nonzero iff TYPE is derived from PARENT. Ignores accessibility and
   2283    ambiguity issues.  */
   2284 #define DERIVED_FROM_P(PARENT, TYPE) \
   2285   (lookup_base ((TYPE), (PARENT), ba_any, NULL, tf_none) != NULL_TREE)
   2286 
   2287 /* Gives the visibility specification for a class type.  */
   2288 #define CLASSTYPE_VISIBILITY(TYPE)		\
   2289 	DECL_VISIBILITY (TYPE_MAIN_DECL (TYPE))
   2290 #define CLASSTYPE_VISIBILITY_SPECIFIED(TYPE)	\
   2291 	DECL_VISIBILITY_SPECIFIED (TYPE_MAIN_DECL (TYPE))
   2292 
   2293 struct GTY (()) tree_pair_s {
   2294   tree purpose;
   2295   tree value;
   2296 };
   2297 typedef tree_pair_s *tree_pair_p;
   2298 
   2299 /* This structure provides additional information above and beyond
   2300    what is provide in the ordinary tree_type.  In the past, we used it
   2301    for the types of class types, template parameters types, typename
   2302    types, and so forth.  However, there can be many (tens to hundreds
   2303    of thousands) of template parameter types in a compilation, and
   2304    there's no need for this additional information in that case.
   2305    Therefore, we now use this data structure only for class types.
   2306 
   2307    In the past, it was thought that there would be relatively few
   2308    class types.  However, in the presence of heavy use of templates,
   2309    many (i.e., thousands) of classes can easily be generated.
   2310    Therefore, we should endeavor to keep the size of this structure to
   2311    a minimum.  */
   2312 struct GTY(()) lang_type {
   2313   unsigned char align;
   2314 
   2315   unsigned has_type_conversion : 1;
   2316   unsigned has_copy_ctor : 1;
   2317   unsigned has_default_ctor : 1;
   2318   unsigned const_needs_init : 1;
   2319   unsigned ref_needs_init : 1;
   2320   unsigned has_const_copy_assign : 1;
   2321   unsigned use_template : 2;
   2322 
   2323   unsigned has_mutable : 1;
   2324   unsigned com_interface : 1;
   2325   unsigned non_pod_class : 1;
   2326   unsigned nearly_empty_p : 1;
   2327   unsigned user_align : 1;
   2328   unsigned has_copy_assign : 1;
   2329   unsigned has_new : 1;
   2330   unsigned has_array_new : 1;
   2331 
   2332   unsigned gets_delete : 2;
   2333   unsigned interface_only : 1;
   2334   unsigned interface_unknown : 1;
   2335   unsigned contains_empty_class_p : 1;
   2336   unsigned anon_aggr : 1;
   2337   unsigned non_zero_init : 1;
   2338   unsigned empty_p : 1;
   2339   /* 32 bits allocated.  */
   2340 
   2341   unsigned vec_new_uses_cookie : 1;
   2342   unsigned declared_class : 1;
   2343   unsigned diamond_shaped : 1;
   2344   unsigned repeated_base : 1;
   2345   unsigned being_defined : 1;
   2346   unsigned debug_requested : 1;
   2347   unsigned fields_readonly : 1;
   2348   unsigned ptrmemfunc_flag : 1;
   2349 
   2350   unsigned lazy_default_ctor : 1;
   2351   unsigned lazy_copy_ctor : 1;
   2352   unsigned lazy_copy_assign : 1;
   2353   unsigned lazy_destructor : 1;
   2354   unsigned has_const_copy_ctor : 1;
   2355   unsigned has_complex_copy_ctor : 1;
   2356   unsigned has_complex_copy_assign : 1;
   2357   unsigned non_aggregate : 1;
   2358 
   2359   unsigned has_complex_dflt : 1;
   2360   unsigned has_list_ctor : 1;
   2361   unsigned non_std_layout : 1;
   2362   unsigned is_literal : 1;
   2363   unsigned lazy_move_ctor : 1;
   2364   unsigned lazy_move_assign : 1;
   2365   unsigned has_complex_move_ctor : 1;
   2366   unsigned has_complex_move_assign : 1;
   2367 
   2368   unsigned has_constexpr_ctor : 1;
   2369   unsigned unique_obj_representations : 1;
   2370   unsigned unique_obj_representations_set : 1;
   2371   bool erroneous : 1;
   2372   bool non_pod_aggregate : 1;
   2373 
   2374   /* When adding a flag here, consider whether or not it ought to
   2375      apply to a template instance if it applies to the template.  If
   2376      so, make sure to copy it in instantiate_class_template!  */
   2377 
   2378   /* There are some bits left to fill out a 32-bit word.  Keep track
   2379      of this by updating the size of this bitfield whenever you add or
   2380      remove a flag.  */
   2381   unsigned dummy : 3;
   2382 
   2383   tree primary_base;
   2384   vec<tree_pair_s, va_gc> *vcall_indices;
   2385   tree vtables;
   2386   tree typeinfo_var;
   2387   vec<tree, va_gc> *vbases;
   2388   tree as_base;
   2389   vec<tree, va_gc> *pure_virtuals;
   2390   tree friend_classes;
   2391   vec<tree, va_gc> * GTY((reorder ("resort_type_member_vec"))) members;
   2392   tree key_method;
   2393   tree decl_list;
   2394   tree befriending_classes;
   2395   /* In a RECORD_TYPE, information specific to Objective-C++, such
   2396      as a list of adopted protocols or a pointer to a corresponding
   2397      @interface.  See objc/objc-act.h for details.  */
   2398   tree objc_info;
   2399   /* FIXME reuse another field?  */
   2400   tree lambda_expr;
   2401 };
   2402 
   2403 /* We used to have a variant type for lang_type.  Keep the name of the
   2404    checking accessor for the sole survivor.  */
   2405 #define LANG_TYPE_CLASS_CHECK(NODE) (TYPE_LANG_SPECIFIC (NODE))
   2406 
   2407 /* Nonzero for _CLASSTYPE means that operator delete is defined.  */
   2408 #define TYPE_GETS_DELETE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->gets_delete)
   2409 #define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
   2410 #define TYPE_GETS_VEC_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 2)
   2411 
   2412 /* Nonzero if `new NODE[x]' should cause the allocation of extra
   2413    storage to indicate how many array elements are in use.  */
   2414 #define TYPE_VEC_NEW_USES_COOKIE(NODE)			\
   2415   (CLASS_TYPE_P (NODE)					\
   2416    && LANG_TYPE_CLASS_CHECK (NODE)->vec_new_uses_cookie)
   2417 
   2418 /* Nonzero means that this _CLASSTYPE node defines ways of converting
   2419    itself to other types.  */
   2420 #define TYPE_HAS_CONVERSION(NODE) \
   2421   (LANG_TYPE_CLASS_CHECK (NODE)->has_type_conversion)
   2422 
   2423 /* Nonzero means that NODE (a class type) has a default constructor --
   2424    but that it has not yet been declared.  */
   2425 #define CLASSTYPE_LAZY_DEFAULT_CTOR(NODE) \
   2426   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_default_ctor)
   2427 
   2428 /* Nonzero means that NODE (a class type) has a copy constructor --
   2429    but that it has not yet been declared.  */
   2430 #define CLASSTYPE_LAZY_COPY_CTOR(NODE) \
   2431   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_ctor)
   2432 
   2433 /* Nonzero means that NODE (a class type) has a move constructor --
   2434    but that it has not yet been declared.  */
   2435 #define CLASSTYPE_LAZY_MOVE_CTOR(NODE) \
   2436   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_move_ctor)
   2437 
   2438 /* Nonzero means that NODE (a class type) has an assignment operator
   2439    -- but that it has not yet been declared.  */
   2440 #define CLASSTYPE_LAZY_COPY_ASSIGN(NODE) \
   2441   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_assign)
   2442 
   2443 /* Nonzero means that NODE (a class type) has an assignment operator
   2444    -- but that it has not yet been declared.  */
   2445 #define CLASSTYPE_LAZY_MOVE_ASSIGN(NODE) \
   2446   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_move_assign)
   2447 
   2448 /* Nonzero means that NODE (a class type) has a destructor -- but that
   2449    it has not yet been declared.  */
   2450 #define CLASSTYPE_LAZY_DESTRUCTOR(NODE) \
   2451   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_destructor)
   2452 
   2453 /* Nonzero means that NODE (a class type) is final */
   2454 #define CLASSTYPE_FINAL(NODE) \
   2455   TYPE_FINAL_P (NODE)
   2456 
   2457 
   2458 /* Nonzero means that this _CLASSTYPE node overloads operator=(X&).  */
   2459 #define TYPE_HAS_COPY_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_copy_assign)
   2460 
   2461 /* True iff the class type NODE has an "operator =" whose parameter
   2462    has a parameter of type "const X&".  */
   2463 #define TYPE_HAS_CONST_COPY_ASSIGN(NODE) \
   2464   (LANG_TYPE_CLASS_CHECK (NODE)->has_const_copy_assign)
   2465 
   2466 /* Nonzero means that this _CLASSTYPE node has an X(X&) constructor.  */
   2467 #define TYPE_HAS_COPY_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_copy_ctor)
   2468 #define TYPE_HAS_CONST_COPY_CTOR(NODE) \
   2469   (LANG_TYPE_CLASS_CHECK (NODE)->has_const_copy_ctor)
   2470 
   2471 /* Nonzero if this class has an X(initializer_list<T>) constructor.  */
   2472 #define TYPE_HAS_LIST_CTOR(NODE) \
   2473   (LANG_TYPE_CLASS_CHECK (NODE)->has_list_ctor)
   2474 
   2475 /* Nonzero if this class has a constexpr constructor other than a copy/move
   2476    constructor.  Note that a class can have constexpr constructors for
   2477    static initialization even if it isn't a literal class.  */
   2478 #define TYPE_HAS_CONSTEXPR_CTOR(NODE) \
   2479   (LANG_TYPE_CLASS_CHECK (NODE)->has_constexpr_ctor)
   2480 
   2481 /* Nonzero if this class defines an overloaded operator new.  (An
   2482    operator new [] doesn't count.)  */
   2483 #define TYPE_HAS_NEW_OPERATOR(NODE) \
   2484   (LANG_TYPE_CLASS_CHECK (NODE)->has_new)
   2485 
   2486 /* Nonzero if this class defines an overloaded operator new[].  */
   2487 #define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \
   2488   (LANG_TYPE_CLASS_CHECK (NODE)->has_array_new)
   2489 
   2490 /* Nonzero means that this type is being defined.  I.e., the left brace
   2491    starting the definition of this type has been seen.  */
   2492 #define TYPE_BEING_DEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->being_defined)
   2493 
   2494 /* Nonzero means that this type is either complete or being defined, so we
   2495    can do lookup in it.  */
   2496 #define COMPLETE_OR_OPEN_TYPE_P(NODE) \
   2497   (COMPLETE_TYPE_P (NODE) || (CLASS_TYPE_P (NODE) && TYPE_BEING_DEFINED (NODE)))
   2498 
   2499 /* Mark bits for repeated base checks.  */
   2500 #define TYPE_MARKED_P(NODE) TREE_LANG_FLAG_6 (TYPE_CHECK (NODE))
   2501 
   2502 /* Nonzero if the class NODE has multiple paths to the same (virtual)
   2503    base object.  */
   2504 #define CLASSTYPE_DIAMOND_SHAPED_P(NODE) \
   2505   (LANG_TYPE_CLASS_CHECK(NODE)->diamond_shaped)
   2506 
   2507 /* Nonzero if the class NODE has multiple instances of the same base
   2508    type.  */
   2509 #define CLASSTYPE_REPEATED_BASE_P(NODE) \
   2510   (LANG_TYPE_CLASS_CHECK(NODE)->repeated_base)
   2511 
   2512 /* The member function with which the vtable will be emitted:
   2513    the first noninline non-pure-virtual member function.  NULL_TREE
   2514    if there is no key function or if this is a class template */
   2515 #define CLASSTYPE_KEY_METHOD(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->key_method)
   2516 
   2517 /* Vector of members.  During definition, it is unordered and only
   2518    member functions are present.  After completion it is sorted and
   2519    contains both member functions and non-functions.  STAT_HACK is
   2520    involved to preserve oneslot per name invariant.  */
   2521 #define CLASSTYPE_MEMBER_VEC(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->members)
   2522 
   2523 /* For class templates, this is a TREE_LIST of all member data,
   2524    functions, types, and friends in the order of declaration.
   2525    The TREE_PURPOSE of each TREE_LIST is NULL_TREE for a friend,
   2526    and the RECORD_TYPE for the class template otherwise.  */
   2527 #define CLASSTYPE_DECL_LIST(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->decl_list)
   2528 
   2529 /* A FUNCTION_DECL or OVERLOAD for the constructors for NODE.  These
   2530    are the constructors that take an in-charge parameter.  */
   2531 #define CLASSTYPE_CONSTRUCTORS(NODE) \
   2532   (get_class_binding_direct (NODE, ctor_identifier))
   2533 
   2534 /* A FUNCTION_DECL for the destructor for NODE.  This is the
   2535    destructors that take an in-charge parameter.  If
   2536    CLASSTYPE_LAZY_DESTRUCTOR is true, then this entry will be NULL
   2537    until the destructor is created with lazily_declare_fn.  */
   2538 #define CLASSTYPE_DESTRUCTOR(NODE) \
   2539   (get_class_binding_direct (NODE, dtor_identifier))
   2540 
   2541 /* Nonzero if NODE has a primary base class, i.e., a base class with
   2542    which it shares the virtual function table pointer.  */
   2543 #define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \
   2544   (CLASSTYPE_PRIMARY_BINFO (NODE) != NULL_TREE)
   2545 
   2546 /* If non-NULL, this is the binfo for the primary base class, i.e.,
   2547    the base class which contains the virtual function table pointer
   2548    for this class.  */
   2549 #define CLASSTYPE_PRIMARY_BINFO(NODE) \
   2550   (LANG_TYPE_CLASS_CHECK (NODE)->primary_base)
   2551 
   2552 /* A vector of BINFOs for the direct and indirect virtual base classes
   2553    that this type uses in a post-order depth-first left-to-right
   2554    order.  (In other words, these bases appear in the order that they
   2555    should be initialized.)  */
   2556 #define CLASSTYPE_VBASECLASSES(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vbases)
   2557 
   2558 /* The type corresponding to NODE when NODE is used as a base class,
   2559    i.e., NODE without virtual base classes or tail padding.  */
   2560 #define CLASSTYPE_AS_BASE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->as_base)
   2561 
   2562 /* True iff NODE is the CLASSTYPE_AS_BASE version of some type.  */
   2563 #define IS_FAKE_BASE_TYPE(NODE)					\
   2564   (TREE_CODE (NODE) == RECORD_TYPE				\
   2565    && TYPE_CONTEXT (NODE) && CLASS_TYPE_P (TYPE_CONTEXT (NODE))	\
   2566    && CLASSTYPE_AS_BASE (TYPE_CONTEXT (NODE)) == (NODE))
   2567 
   2568 /* These are the size and alignment of the type without its virtual
   2569    base classes, for when we use this type as a base itself.  */
   2570 #define CLASSTYPE_SIZE(NODE) TYPE_SIZE (CLASSTYPE_AS_BASE (NODE))
   2571 #define CLASSTYPE_SIZE_UNIT(NODE) TYPE_SIZE_UNIT (CLASSTYPE_AS_BASE (NODE))
   2572 #define CLASSTYPE_ALIGN(NODE) TYPE_ALIGN (CLASSTYPE_AS_BASE (NODE))
   2573 #define CLASSTYPE_USER_ALIGN(NODE) TYPE_USER_ALIGN (CLASSTYPE_AS_BASE (NODE))
   2574 
   2575 /* The alignment of NODE, without its virtual bases, in bytes.  */
   2576 #define CLASSTYPE_ALIGN_UNIT(NODE) \
   2577   (CLASSTYPE_ALIGN (NODE) / BITS_PER_UNIT)
   2578 
   2579 /* A vec<tree> of virtual functions which cannot be inherited by
   2580    derived classes.  When deriving from this type, the derived
   2581    class must provide its own definition for each of these functions.  */
   2582 #define CLASSTYPE_PURE_VIRTUALS(NODE) \
   2583   (LANG_TYPE_CLASS_CHECK (NODE)->pure_virtuals)
   2584 
   2585 /* Nonzero means that this type is an abstract class type.  */
   2586 #define ABSTRACT_CLASS_TYPE_P(NODE) \
   2587   (CLASS_TYPE_P (NODE) && CLASSTYPE_PURE_VIRTUALS(NODE))
   2588 
   2589 /* Nonzero means that this type has an X() constructor.  */
   2590 #define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) \
   2591   (LANG_TYPE_CLASS_CHECK (NODE)->has_default_ctor)
   2592 
   2593 /* Nonzero means that this type contains a mutable member.  */
   2594 #define CLASSTYPE_HAS_MUTABLE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_mutable)
   2595 #define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE))
   2596 
   2597 /* Nonzero means that this class type is not POD for the purpose of layout
   2598    (as defined in the ABI).  This is different from the language's POD.  */
   2599 #define CLASSTYPE_NON_LAYOUT_POD_P(NODE) \
   2600   (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_class)
   2601 
   2602 /* Nonzero means that this class type is a non-standard-layout class.  */
   2603 #define CLASSTYPE_NON_STD_LAYOUT(NODE) \
   2604   (LANG_TYPE_CLASS_CHECK (NODE)->non_std_layout)
   2605 
   2606 /* Nonzero means that this class type does have unique object
   2607    representations.  */
   2608 #define CLASSTYPE_UNIQUE_OBJ_REPRESENTATIONS(NODE) \
   2609   (LANG_TYPE_CLASS_CHECK (NODE)->unique_obj_representations)
   2610 
   2611 /* Nonzero means that this class type has
   2612    CLASSTYPE_UNIQUE_OBJ_REPRESENTATIONS computed.  */
   2613 #define CLASSTYPE_UNIQUE_OBJ_REPRESENTATIONS_SET(NODE) \
   2614   (LANG_TYPE_CLASS_CHECK (NODE)->unique_obj_representations_set)
   2615 
   2616 /* Nonzero means that this class contains pod types whose default
   2617    initialization is not a zero initialization (namely, pointers to
   2618    data members).  */
   2619 #define CLASSTYPE_NON_ZERO_INIT_P(NODE) \
   2620   (LANG_TYPE_CLASS_CHECK (NODE)->non_zero_init)
   2621 
   2622 /* Nonzero if this class is "empty" in the sense of the C++ ABI.  */
   2623 #define CLASSTYPE_EMPTY_P(NODE) \
   2624   (LANG_TYPE_CLASS_CHECK (NODE)->empty_p)
   2625 
   2626 /* Nonzero if this class is "nearly empty", i.e., contains only a
   2627    virtual function table pointer.  */
   2628 #define CLASSTYPE_NEARLY_EMPTY_P(NODE) \
   2629   (LANG_TYPE_CLASS_CHECK (NODE)->nearly_empty_p)
   2630 
   2631 /* Nonzero if this class contains an empty subobject.  */
   2632 #define CLASSTYPE_CONTAINS_EMPTY_CLASS_P(NODE) \
   2633   (LANG_TYPE_CLASS_CHECK (NODE)->contains_empty_class_p)
   2634 
   2635 /* A list of class types of which this type is a friend.  The
   2636    TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the
   2637    case of a template friend.  */
   2638 #define CLASSTYPE_FRIEND_CLASSES(NODE) \
   2639   (LANG_TYPE_CLASS_CHECK (NODE)->friend_classes)
   2640 
   2641 /* A list of the classes which grant friendship to this class.  */
   2642 #define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \
   2643   (LANG_TYPE_CLASS_CHECK (NODE)->befriending_classes)
   2644 
   2645 /* The associated LAMBDA_EXPR that made this class.  */
   2646 #define CLASSTYPE_LAMBDA_EXPR(NODE) \
   2647   (LANG_TYPE_CLASS_CHECK (NODE)->lambda_expr)
   2648 /* The extra mangling scope for this closure type.  */
   2649 #define LAMBDA_TYPE_EXTRA_SCOPE(NODE) \
   2650   (LAMBDA_EXPR_EXTRA_SCOPE (CLASSTYPE_LAMBDA_EXPR (NODE)))
   2651 
   2652 /* Say whether this node was declared as a "class" or a "struct".  */
   2653 #define CLASSTYPE_DECLARED_CLASS(NODE) \
   2654   (LANG_TYPE_CLASS_CHECK (NODE)->declared_class)
   2655 
   2656 /* Nonzero if this class has const members
   2657    which have no specified initialization.  */
   2658 #define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE)	\
   2659   (TYPE_LANG_SPECIFIC (NODE)				\
   2660    ? LANG_TYPE_CLASS_CHECK (NODE)->const_needs_init : 0)
   2661 #define SET_CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE, VALUE) \
   2662   (LANG_TYPE_CLASS_CHECK (NODE)->const_needs_init = (VALUE))
   2663 
   2664 /* Nonzero if this class has ref members
   2665    which have no specified initialization.  */
   2666 #define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE)		\
   2667   (TYPE_LANG_SPECIFIC (NODE)				\
   2668    ? LANG_TYPE_CLASS_CHECK (NODE)->ref_needs_init : 0)
   2669 #define SET_CLASSTYPE_REF_FIELDS_NEED_INIT(NODE, VALUE) \
   2670   (LANG_TYPE_CLASS_CHECK (NODE)->ref_needs_init = (VALUE))
   2671 
   2672 /* Nonzero if this class is included from a header file which employs
   2673    `#pragma interface', and it is not included in its implementation file.  */
   2674 #define CLASSTYPE_INTERFACE_ONLY(NODE) \
   2675   (LANG_TYPE_CLASS_CHECK (NODE)->interface_only)
   2676 
   2677 /* True if we have already determined whether or not vtables, VTTs,
   2678    typeinfo, and other similar per-class data should be emitted in
   2679    this translation unit.  This flag does not indicate whether or not
   2680    these items should be emitted; it only indicates that we know one
   2681    way or the other.  */
   2682 #define CLASSTYPE_INTERFACE_KNOWN(NODE) \
   2683   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown == 0)
   2684 /* The opposite of CLASSTYPE_INTERFACE_KNOWN.  */
   2685 #define CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
   2686   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown)
   2687 
   2688 #define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) \
   2689   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = !!(X))
   2690 #define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
   2691   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 1)
   2692 #define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) \
   2693   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 0)
   2694 
   2695 /* Nonzero if a _DECL node requires us to output debug info for this class.  */
   2696 #define CLASSTYPE_DEBUG_REQUESTED(NODE) \
   2697   (LANG_TYPE_CLASS_CHECK (NODE)->debug_requested)
   2698 
   2699 /* True if we saw errors while instantiating this class.  */
   2700 #define CLASSTYPE_ERRONEOUS(NODE) \
   2701   (LANG_TYPE_CLASS_CHECK (NODE)->erroneous)
   2702 
   2703 /* True if this class is non-layout-POD only because it was not an aggregate
   2704    before C++14.  If we run out of bits in lang_type, this could be replaced
   2705    with a hash_set only filled in when abi_version_crosses (17).  */
   2706 #define CLASSTYPE_NON_POD_AGGREGATE(NODE) \
   2707   (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_aggregate)
   2708 
   2709 /* Additional macros for inheritance information.  */
   2711 
   2712 /* Nonzero means that this class is on a path leading to a new vtable.  */
   2713 #define BINFO_VTABLE_PATH_MARKED(NODE) BINFO_FLAG_1 (NODE)
   2714 
   2715 /* Nonzero means B (a BINFO) has its own vtable.  Any copies will not
   2716    have this flag set.  */
   2717 #define BINFO_NEW_VTABLE_MARKED(B) (BINFO_FLAG_2 (B))
   2718 
   2719 /* Compare a BINFO_TYPE with another type for equality.  For a binfo,
   2720    this is functionally equivalent to using same_type_p, but
   2721    measurably faster.  At least one of the arguments must be a
   2722    BINFO_TYPE.  The other can be a BINFO_TYPE or a regular type.  If
   2723    BINFO_TYPE(T) ever stops being the main variant of the class the
   2724    binfo is for, this macro must change.  */
   2725 #define SAME_BINFO_TYPE_P(A, B) ((A) == (B))
   2726 
   2727 /* Any subobject that needs a new vtable must have a vptr and must not
   2728    be a non-virtual primary base (since it would then use the vtable from a
   2729    derived class and never become non-primary.)  */
   2730 #define SET_BINFO_NEW_VTABLE_MARKED(B)					 \
   2731   (BINFO_NEW_VTABLE_MARKED (B) = 1,					 \
   2732    gcc_assert (!BINFO_PRIMARY_P (B) || BINFO_VIRTUAL_P (B)),		 \
   2733    gcc_assert (TYPE_VFIELD (BINFO_TYPE (B))))
   2734 
   2735 /* Nonzero if this binfo is for a dependent base - one that should not
   2736    be searched.  */
   2737 #define BINFO_DEPENDENT_BASE_P(NODE) BINFO_FLAG_3 (NODE)
   2738 
   2739 /* Nonzero if this binfo has lost its primary base binfo (because that
   2740    is a nearly-empty virtual base that has been taken by some other
   2741    base in the complete hierarchy.  */
   2742 #define BINFO_LOST_PRIMARY_P(NODE) BINFO_FLAG_4 (NODE)
   2743 
   2744 /* Nonzero if this BINFO is a primary base class.  */
   2745 #define BINFO_PRIMARY_P(NODE) BINFO_FLAG_5(NODE)
   2746 
   2747 /* A vec<tree_pair_s> of the vcall indices associated with the class
   2749    NODE.  The PURPOSE of each element is a FUNCTION_DECL for a virtual
   2750    function.  The VALUE is the index into the virtual table where the
   2751    vcall offset for that function is stored, when NODE is a virtual
   2752    base.  */
   2753 #define CLASSTYPE_VCALL_INDICES(NODE) \
   2754   (LANG_TYPE_CLASS_CHECK (NODE)->vcall_indices)
   2755 
   2756 /* The various vtables for the class NODE.  The primary vtable will be
   2757    first, followed by the construction vtables and VTT, if any.  */
   2758 #define CLASSTYPE_VTABLES(NODE) \
   2759   (LANG_TYPE_CLASS_CHECK (NODE)->vtables)
   2760 
   2761 /* The std::type_info variable representing this class, or NULL if no
   2762    such variable has been created.  This field is only set for the
   2763    TYPE_MAIN_VARIANT of the class.  */
   2764 #define CLASSTYPE_TYPEINFO_VAR(NODE) \
   2765   (LANG_TYPE_CLASS_CHECK (NODE)->typeinfo_var)
   2766 
   2767 /* Accessor macros for the BINFO_VIRTUALS list.  */
   2768 
   2769 /* The number of bytes by which to adjust the `this' pointer when
   2770    calling this virtual function.  Subtract this value from the this
   2771    pointer. Always non-NULL, might be constant zero though.  */
   2772 #define BV_DELTA(NODE) (TREE_PURPOSE (NODE))
   2773 
   2774 /* If non-NULL, the vtable index at which to find the vcall offset
   2775    when calling this virtual function.  Add the value at that vtable
   2776    index to the this pointer.  */
   2777 #define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE))
   2778 
   2779 /* The function to call.  */
   2780 #define BV_FN(NODE) (TREE_VALUE (NODE))
   2781 
   2782 /* Whether or not this entry is for a lost primary virtual base.  */
   2783 #define BV_LOST_PRIMARY(NODE) (TREE_LANG_FLAG_0 (NODE))
   2784 
   2785 /* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
   2787    this type can raise.  Each TREE_VALUE is a _TYPE.  The TREE_VALUE
   2788    will be NULL_TREE to indicate a throw specification of `()', or
   2789    no exceptions allowed.  For a noexcept specification, TREE_VALUE
   2790    is NULL_TREE and TREE_PURPOSE is the constant-expression.  For
   2791    a deferred noexcept-specification, TREE_PURPOSE is a DEFERRED_NOEXCEPT
   2792    (for templates) or an OVERLOAD list of functions (for implicitly
   2793    declared functions).  */
   2794 #define TYPE_RAISES_EXCEPTIONS(NODE) \
   2795   TYPE_LANG_SLOT_1 (FUNC_OR_METHOD_CHECK (NODE))
   2796 
   2797 /* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'
   2798    or noexcept(true).  */
   2799 #define TYPE_NOTHROW_P(NODE) nothrow_spec_p (TYPE_RAISES_EXCEPTIONS (NODE))
   2800 
   2801 /* For FUNCTION_TYPE or METHOD_TYPE, true if NODE is noexcept.  This is the
   2802    case for things declared noexcept(true) and, with -fnothrow-opt, for
   2803    throw() functions.  */
   2804 #define TYPE_NOEXCEPT_P(NODE) type_noexcept_p (NODE)
   2805 
   2806 /* The binding level associated with the namespace.  */
   2807 #define NAMESPACE_LEVEL(NODE) \
   2808   (LANG_DECL_NS_CHECK (NODE)->level)
   2809 
   2810 /* Discriminator values for lang_decl.  */
   2812 
   2813 enum lang_decl_selector
   2814 {
   2815   lds_min,
   2816   lds_fn,
   2817   lds_ns,
   2818   lds_parm,
   2819   lds_decomp
   2820 };
   2821 
   2822 /* Flags shared by all forms of DECL_LANG_SPECIFIC.
   2823 
   2824    Some of the flags live here only to make lang_decl_min/fn smaller.  Do
   2825    not make this struct larger than 32 bits.  */
   2826 
   2827 struct GTY(()) lang_decl_base {
   2828   ENUM_BITFIELD(lang_decl_selector) selector : 3;
   2829   ENUM_BITFIELD(languages) language : 1;
   2830   unsigned use_template : 2;
   2831   unsigned not_really_extern : 1;	   /* var or fn */
   2832   unsigned initialized_in_class : 1;	   /* var or fn */
   2833 
   2834   unsigned threadprivate_or_deleted_p : 1; /* var or fn */
   2835   /* anticipated_p is no longer used for anticipated_decls (fn, type
   2836      or template).  It is used as DECL_OMP_PRIVATIZED_MEMBER in
   2837      var.  */
   2838   unsigned anticipated_p : 1;
   2839   unsigned friend_or_tls : 1;		   /* var, fn, type or template */
   2840   unsigned unknown_bound_p : 1;		   /* var */
   2841   unsigned odr_used : 1;		   /* var or fn */
   2842   unsigned concept_p : 1;                  /* applies to vars and functions */
   2843   unsigned var_declared_inline_p : 1;	   /* var */
   2844   unsigned dependent_init_p : 1;	   /* var */
   2845 
   2846   /* The following apply to VAR, FUNCTION, TYPE, CONCEPT, & NAMESPACE
   2847      decls.  */
   2848   // FIXME: Purview and Attachment are not the same thing, due to
   2849   // linkage-declarations.  The modules code presumes they are the
   2850   // same.  (For context, linkage-decl semantics was a very late
   2851   // change). We need a module_attachment_p flag, and this will allow
   2852   // some simplification of how we handle header unit entities.
   2853   // Hurrah!
   2854   unsigned module_purview_p : 1;	   /* in module purview (not GMF) */
   2855   unsigned module_import_p : 1;     	   /* from an import */
   2856   unsigned module_entity_p : 1;		   /* is in the entitity ary &
   2857 					      hash.  */
   2858   /* VAR_DECL or FUNCTION_DECL has attached decls.     */
   2859   unsigned module_attached_p : 1;
   2860 
   2861   /* 12 spare bits.  */
   2862 };
   2863 
   2864 /* True for DECL codes which have template info and access.  */
   2865 #define LANG_DECL_HAS_MIN(NODE)			\
   2866   (VAR_OR_FUNCTION_DECL_P (NODE)		\
   2867    || TREE_CODE (NODE) == FIELD_DECL		\
   2868    || TREE_CODE (NODE) == CONST_DECL		\
   2869    || TREE_CODE (NODE) == TYPE_DECL		\
   2870    || TREE_CODE (NODE) == TEMPLATE_DECL		\
   2871    || TREE_CODE (NODE) == USING_DECL            \
   2872    || TREE_CODE (NODE) == CONCEPT_DECL)
   2873 
   2874 /* DECL_LANG_SPECIFIC for the above codes.  */
   2875 
   2876 struct GTY(()) lang_decl_min {
   2877   struct lang_decl_base base; /* 32-bits.  */
   2878 
   2879   /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
   2880      THUNK_ALIAS.
   2881      In a FUNCTION_DECL for which DECL_THUNK_P does not hold,
   2882      VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this is
   2883      DECL_TEMPLATE_INFO.  */
   2884   tree template_info;
   2885 
   2886   /* In a DECL_THUNK_P FUNCTION_DECL, this is THUNK_VIRTUAL_OFFSET.
   2887      In a lambda-capture proxy VAR_DECL, this is DECL_CAPTURED_VARIABLE.
   2888      In a function-scope TREE_STATIC VAR_DECL or IMPLICIT_TYPEDEF_P TYPE_DECL,
   2889      this is DECL_DISCRIMINATOR.
   2890      In a DECL_LOCAL_DECL_P decl, this is the namespace decl it aliases.
   2891      Otherwise, in a class-scope DECL, this is DECL_ACCESS.   */
   2892   tree access;
   2893 };
   2894 
   2895 /* Additional DECL_LANG_SPECIFIC information for functions.  */
   2896 
   2897 struct GTY(()) lang_decl_fn {
   2898   struct lang_decl_min min;
   2899 
   2900   /* In a overloaded operator, this is the compressed operator code.  */
   2901   unsigned ovl_op_code : 6;
   2902   unsigned global_ctor_p : 1;
   2903   unsigned global_dtor_p : 1;
   2904 
   2905   unsigned static_function : 1;
   2906   unsigned pure_virtual : 1;
   2907   unsigned defaulted_p : 1;
   2908   unsigned has_in_charge_parm_p : 1;
   2909   unsigned has_vtt_parm_p : 1;
   2910   unsigned pending_inline_p : 1;
   2911   unsigned nonconverting : 1;
   2912   unsigned thunk_p : 1;
   2913 
   2914   unsigned this_thunk_p : 1;
   2915   unsigned omp_declare_reduction_p : 1;
   2916   unsigned has_dependent_explicit_spec_p : 1;
   2917   unsigned immediate_fn_p : 1;
   2918   unsigned maybe_deleted : 1;
   2919   unsigned coroutine_p : 1;
   2920   unsigned implicit_constexpr : 1;
   2921 
   2922   unsigned spare : 9;
   2923 
   2924   /* 32-bits padding on 64-bit host.  */
   2925 
   2926   /* For a non-thunk function decl, this is a tree list of
   2927      friendly classes. For a thunk function decl, it is the
   2928      thunked to function decl.  */
   2929   tree befriending_classes;
   2930 
   2931   /* For a virtual FUNCTION_DECL for which
   2932      DECL_THIS_THUNK_P does not hold, this is DECL_THUNKS. Both
   2933      this pointer and result pointer adjusting thunks are
   2934      chained here.  This pointer thunks to return pointer thunks
   2935      will be chained on the return pointer thunk.
   2936      For a DECL_CONSTUCTOR_P FUNCTION_DECL, this is the base from
   2937      whence we inherit.  Otherwise, it is the class in which a
   2938      (namespace-scope) friend is defined (if any).   */
   2939   tree context;
   2940 
   2941   union lang_decl_u5
   2942   {
   2943     /* In a non-thunk FUNCTION_DECL, this is DECL_CLONED_FUNCTION.  */
   2944     tree GTY ((tag ("0"))) cloned_function;
   2945 
   2946     /* In a FUNCTION_DECL for which THUNK_P holds this is the
   2947        THUNK_FIXED_OFFSET.  */
   2948     HOST_WIDE_INT GTY ((tag ("1"))) fixed_offset;
   2949   } GTY ((desc ("%1.thunk_p"))) u5;
   2950 
   2951   union lang_decl_u3
   2952   {
   2953     struct cp_token_cache * GTY ((tag ("1"))) pending_inline_info;
   2954     tree GTY ((tag ("0"))) saved_auto_return_type;
   2955   } GTY ((desc ("%1.pending_inline_p"))) u;
   2956 
   2957 };
   2958 
   2959 /* DECL_LANG_SPECIFIC for namespaces.  */
   2960 
   2961 struct GTY(()) lang_decl_ns {
   2962   struct lang_decl_base base; /* 32 bits.  */
   2963   cp_binding_level *level;
   2964 
   2965   /* Inline children.  Needs to be va_gc, because of PCH.  */
   2966   vec<tree, va_gc> *inlinees;
   2967 
   2968   /* Hash table of bound decls. It'd be nice to have this inline, but
   2969      as the hash_map has a dtor, we can't then put this struct into a
   2970      union (until moving to c++11).  */
   2971   hash_table<named_decl_hash> *bindings;
   2972 };
   2973 
   2974 /* DECL_LANG_SPECIFIC for parameters.  */
   2975 
   2976 struct GTY(()) lang_decl_parm {
   2977   struct lang_decl_base base; /* 32 bits.  */
   2978   int level;
   2979   int index;
   2980 };
   2981 
   2982 /* Additional DECL_LANG_SPECIFIC information for structured bindings.  */
   2983 
   2984 struct GTY(()) lang_decl_decomp {
   2985   struct lang_decl_min min;
   2986   /* The artificial underlying "e" variable of the structured binding
   2987      variable.  */
   2988   tree base;
   2989 };
   2990 
   2991 /* DECL_LANG_SPECIFIC for all types.  It would be nice to just make this a
   2992    union rather than a struct containing a union as its only field, but
   2993    tree.h declares it as a struct.  */
   2994 
   2995 struct GTY(()) lang_decl {
   2996   union GTY((desc ("%h.base.selector"))) lang_decl_u {
   2997      /* Nothing of only the base type exists.  */
   2998     struct lang_decl_base GTY ((default)) base;
   2999     struct lang_decl_min GTY((tag ("lds_min"))) min;
   3000     struct lang_decl_fn GTY ((tag ("lds_fn"))) fn;
   3001     struct lang_decl_ns GTY((tag ("lds_ns"))) ns;
   3002     struct lang_decl_parm GTY((tag ("lds_parm"))) parm;
   3003     struct lang_decl_decomp GTY((tag ("lds_decomp"))) decomp;
   3004   } u;
   3005 };
   3006 
   3007 /* Looks through a template (if present) to find what it declares.  */
   3008 #define STRIP_TEMPLATE(NODE) \
   3009   (TREE_CODE (NODE) == TEMPLATE_DECL ? DECL_TEMPLATE_RESULT (NODE) : NODE)
   3010 
   3011 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
   3012 
   3013 #define LANG_DECL_MIN_CHECK(NODE) __extension__			\
   3014 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
   3015    if (!LANG_DECL_HAS_MIN (NODE))				\
   3016      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   3017    &lt->u.min; })
   3018 
   3019 /* We want to be able to check DECL_CONSTRUCTOR_P and such on a function
   3020    template, not just on a FUNCTION_DECL.  So when looking for things in
   3021    lang_decl_fn, look down through a TEMPLATE_DECL into its result.  */
   3022 #define LANG_DECL_FN_CHECK(NODE) __extension__				\
   3023 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (STRIP_TEMPLATE (NODE));	\
   3024    if (!DECL_DECLARES_FUNCTION_P (NODE)					\
   3025        || lt->u.base.selector != lds_fn)				\
   3026      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);		\
   3027    &lt->u.fn; })
   3028 
   3029 #define LANG_DECL_NS_CHECK(NODE) __extension__				\
   3030 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);			\
   3031    if (TREE_CODE (NODE) != NAMESPACE_DECL				\
   3032        || lt->u.base.selector != lds_ns)				\
   3033      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);		\
   3034    &lt->u.ns; })
   3035 
   3036 #define LANG_DECL_PARM_CHECK(NODE) __extension__		\
   3037 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
   3038   if (TREE_CODE (NODE) != PARM_DECL				\
   3039       || lt->u.base.selector != lds_parm)			\
   3040     lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   3041   &lt->u.parm; })
   3042 
   3043 #define LANG_DECL_DECOMP_CHECK(NODE) __extension__		\
   3044 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
   3045   if (!VAR_P (NODE)						\
   3046       || lt->u.base.selector != lds_decomp)			\
   3047     lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
   3048   &lt->u.decomp; })
   3049 
   3050 #else
   3051 
   3052 #define LANG_DECL_MIN_CHECK(NODE) \
   3053   (&DECL_LANG_SPECIFIC (NODE)->u.min)
   3054 
   3055 #define LANG_DECL_FN_CHECK(NODE) \
   3056   (&DECL_LANG_SPECIFIC (STRIP_TEMPLATE (NODE))->u.fn)
   3057 
   3058 #define LANG_DECL_NS_CHECK(NODE) \
   3059   (&DECL_LANG_SPECIFIC (NODE)->u.ns)
   3060 
   3061 #define LANG_DECL_PARM_CHECK(NODE) \
   3062   (&DECL_LANG_SPECIFIC (NODE)->u.parm)
   3063 
   3064 #define LANG_DECL_DECOMP_CHECK(NODE) \
   3065   (&DECL_LANG_SPECIFIC (NODE)->u.decomp)
   3066 
   3067 #endif /* ENABLE_TREE_CHECKING */
   3068 
   3069 /* For a FUNCTION_DECL or a VAR_DECL, the language linkage for the
   3070    declaration.  Some entities (like a member function in a local
   3071    class, or a local variable) do not have linkage at all, and this
   3072    macro should not be used in those cases.
   3073 
   3074    Implementation note: A FUNCTION_DECL without DECL_LANG_SPECIFIC was
   3075    created by language-independent code, and has C linkage.  Most
   3076    VAR_DECLs have C++ linkage, and do not have DECL_LANG_SPECIFIC, but
   3077    we do create DECL_LANG_SPECIFIC for variables with non-C++ linkage.  */
   3078 #define DECL_LANGUAGE(NODE)				\
   3079   (DECL_LANG_SPECIFIC (NODE)				\
   3080    ? DECL_LANG_SPECIFIC (NODE)->u.base.language		\
   3081    : (TREE_CODE (NODE) == FUNCTION_DECL			\
   3082       ? lang_c : lang_cplusplus))
   3083 
   3084 /* Set the language linkage for NODE to LANGUAGE.  */
   3085 #define SET_DECL_LANGUAGE(NODE, LANGUAGE) \
   3086   (DECL_LANG_SPECIFIC (NODE)->u.base.language = (LANGUAGE))
   3087 
   3088 /* For FUNCTION_DECLs and TEMPLATE_DECLs: nonzero means that this function
   3089    is a constructor.  */
   3090 #define DECL_CONSTRUCTOR_P(NODE) \
   3091   DECL_CXX_CONSTRUCTOR_P (STRIP_TEMPLATE (NODE))
   3092 
   3093 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete
   3094    object.  */
   3095 #define DECL_COMPLETE_CONSTRUCTOR_P(NODE)		\
   3096   (DECL_NAME (NODE) == complete_ctor_identifier)
   3097 
   3098 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base
   3099    object.  */
   3100 #define DECL_BASE_CONSTRUCTOR_P(NODE)		\
   3101   (DECL_NAME (NODE) == base_ctor_identifier)
   3102 
   3103 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the
   3104    specialized in-charge constructor or the specialized not-in-charge
   3105    constructor.  */
   3106 #define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE)		\
   3107   (DECL_NAME (NODE) == ctor_identifier)
   3108 
   3109 /* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor.  */
   3110 #define DECL_COPY_CONSTRUCTOR_P(NODE) \
   3111   (DECL_CONSTRUCTOR_P (NODE) && copy_fn_p (NODE) > 0)
   3112 
   3113 /* Nonzero if NODE (a FUNCTION_DECL) is a move constructor.  */
   3114 #define DECL_MOVE_CONSTRUCTOR_P(NODE) \
   3115   (DECL_CONSTRUCTOR_P (NODE) && move_fn_p (NODE))
   3116 
   3117 /* Nonzero if NODE (a FUNCTION_DECL or TEMPLATE_DECL)
   3118    is a destructor.  */
   3119 #define DECL_DESTRUCTOR_P(NODE)				\
   3120   DECL_CXX_DESTRUCTOR_P (STRIP_TEMPLATE (NODE))
   3121 
   3122 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the
   3123    specialized in-charge constructor, in-charge deleting constructor,
   3124    or the base destructor.  */
   3125 #define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE)			\
   3126   (DECL_NAME (NODE) == dtor_identifier)
   3127 
   3128 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
   3129    object.  */
   3130 #define DECL_COMPLETE_DESTRUCTOR_P(NODE)		\
   3131   (DECL_NAME (NODE) == complete_dtor_identifier)
   3132 
   3133 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base
   3134    object.  */
   3135 #define DECL_BASE_DESTRUCTOR_P(NODE)		\
   3136   (DECL_NAME (NODE) == base_dtor_identifier)
   3137 
   3138 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
   3139    object that deletes the object after it has been destroyed.  */
   3140 #define DECL_DELETING_DESTRUCTOR_P(NODE)		\
   3141   (DECL_NAME (NODE) == deleting_dtor_identifier)
   3142 
   3143 /* Nonzero if either DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P or
   3144    DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P is true of NODE.  */
   3145 #define DECL_MAYBE_IN_CHARGE_CDTOR_P(NODE)              \
   3146   (DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P (NODE)            \
   3147    || DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P (NODE))
   3148 
   3149 /* Nonzero if NODE (a _DECL) is a cloned constructor or
   3150    destructor.  */
   3151 #define DECL_CLONED_FUNCTION_P(NODE)		\
   3152   (DECL_NAME (NODE)				\
   3153    && IDENTIFIER_CDTOR_P (DECL_NAME (NODE))	\
   3154    && !DECL_MAYBE_IN_CHARGE_CDTOR_P (NODE))
   3155 
   3156 /* If DECL_CLONED_FUNCTION_P holds, this is the function that was
   3157    cloned.  */
   3158 #define DECL_CLONED_FUNCTION(NODE)		\
   3159   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))->u.fn.u5.cloned_function)
   3160 
   3161 /* Perform an action for each clone of FN, if FN is a function with
   3162    clones.  This macro should be used like:
   3163 
   3164       FOR_EACH_CLONE (clone, fn)
   3165 	{ ... }
   3166 
   3167   */
   3168 #define FOR_EACH_CLONE(CLONE, FN)			\
   3169   if (!(TREE_CODE (FN) == FUNCTION_DECL			\
   3170 	&& DECL_MAYBE_IN_CHARGE_CDTOR_P (FN)))          \
   3171     ;							\
   3172   else							\
   3173     for (CLONE = DECL_CHAIN (FN);			\
   3174 	 CLONE && DECL_CLONED_FUNCTION_P (CLONE);	\
   3175 	 CLONE = DECL_CHAIN (CLONE))
   3176 
   3177 /* Nonzero if NODE has DECL_DISCRIMINATOR and not DECL_ACCESS.  */
   3178 #define DECL_DISCRIMINATOR_P(NODE)				\
   3179   (((TREE_CODE (NODE) == VAR_DECL && TREE_STATIC (NODE))	\
   3180     || DECL_IMPLICIT_TYPEDEF_P (NODE))				\
   3181    && DECL_FUNCTION_SCOPE_P (NODE))
   3182 
   3183 /* Discriminator for name mangling.  */
   3184 #define DECL_DISCRIMINATOR(NODE) (LANG_DECL_MIN_CHECK (NODE)->access)
   3185 
   3186 /* The index of a user-declared parameter in its function, starting at 1.
   3187    All artificial parameters will have index 0.  */
   3188 #define DECL_PARM_INDEX(NODE) \
   3189   (LANG_DECL_PARM_CHECK (NODE)->index)
   3190 
   3191 /* The level of a user-declared parameter in its function, starting at 1.
   3192    A parameter of the function will have level 1; a parameter of the first
   3193    nested function declarator (i.e. t in void f (void (*p)(T t))) will have
   3194    level 2.  */
   3195 #define DECL_PARM_LEVEL(NODE) \
   3196   (LANG_DECL_PARM_CHECK (NODE)->level)
   3197 
   3198 /* Nonzero if the VTT parm has been added to NODE.  */
   3199 #define DECL_HAS_VTT_PARM_P(NODE) \
   3200   (LANG_DECL_FN_CHECK (NODE)->has_vtt_parm_p)
   3201 
   3202 /* Nonzero if NODE is a user-defined conversion operator.  */
   3203 #define DECL_CONV_FN_P(NODE) IDENTIFIER_CONV_OP_P (DECL_NAME (NODE))
   3204 
   3205 /* The type to which conversion operator FN converts to.   */
   3206 #define DECL_CONV_FN_TYPE(FN) \
   3207   TREE_TYPE ((gcc_checking_assert (DECL_CONV_FN_P (FN)), DECL_NAME (FN)))
   3208 
   3209 /* Nonzero if NODE, a static data member, was declared in its class as an
   3210    array of unknown bound.  */
   3211 #define VAR_HAD_UNKNOWN_BOUND(NODE)			\
   3212   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))		\
   3213    ? DECL_LANG_SPECIFIC (NODE)->u.base.unknown_bound_p	\
   3214    : false)
   3215 #define SET_VAR_HAD_UNKNOWN_BOUND(NODE) \
   3216   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))->u.base.unknown_bound_p = true)
   3217 
   3218 /* True iff decl NODE is for an overloaded operator.  */
   3219 #define DECL_OVERLOADED_OPERATOR_P(NODE)		\
   3220   IDENTIFIER_ANY_OP_P (DECL_NAME (NODE))
   3221 
   3222 /* Nonzero if NODE is an assignment operator (including += and such).  */
   3223 #define DECL_ASSIGNMENT_OPERATOR_P(NODE)		 \
   3224   IDENTIFIER_ASSIGN_OP_P (DECL_NAME (NODE))
   3225 
   3226 /* NODE is a function_decl for an overloaded operator.  Return its
   3227    compressed (raw) operator code.  Note that this is not a TREE_CODE.  */
   3228 #define DECL_OVERLOADED_OPERATOR_CODE_RAW(NODE)		\
   3229   (LANG_DECL_FN_CHECK (NODE)->ovl_op_code)
   3230 
   3231 /* DECL is an overloaded operator.  Test whether it is for TREE_CODE
   3232    (a literal constant).  */
   3233 #define DECL_OVERLOADED_OPERATOR_IS(DECL, CODE)			\
   3234   (DECL_OVERLOADED_OPERATOR_CODE_RAW (DECL) == OVL_OP_##CODE)
   3235 
   3236 /* For FUNCTION_DECLs: nonzero means that this function is a
   3237    constructor or a destructor with an extra in-charge parameter to
   3238    control whether or not virtual bases are constructed.  */
   3239 #define DECL_HAS_IN_CHARGE_PARM_P(NODE) \
   3240   (LANG_DECL_FN_CHECK (NODE)->has_in_charge_parm_p)
   3241 
   3242 /* Nonzero if DECL is a declaration of __builtin_constant_p.  */
   3243 #define DECL_IS_BUILTIN_CONSTANT_P(NODE)		\
   3244  (TREE_CODE (NODE) == FUNCTION_DECL			\
   3245   && DECL_BUILT_IN_CLASS (NODE) == BUILT_IN_NORMAL	\
   3246   && DECL_FUNCTION_CODE (NODE) == BUILT_IN_CONSTANT_P)
   3247 
   3248 /* Nonzero for _DECL means that this decl appears in (or will appear
   3249    in) as a member in a RECORD_TYPE or UNION_TYPE node.  It is also for
   3250    detecting circularity in case members are multiply defined.  In the
   3251    case of a VAR_DECL, it means that no definition has been seen, even
   3252    if an initializer has been.  */
   3253 #define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3 (NODE))
   3254 
   3255 /* Nonzero for a VAR_DECL means that the variable's initialization (if
   3256    any) has been processed.  (In general, DECL_INITIALIZED_P is
   3257    !DECL_EXTERNAL, but static data members may be initialized even if
   3258    not defined.)  */
   3259 #define DECL_INITIALIZED_P(NODE) \
   3260    (TREE_LANG_FLAG_1 (VAR_DECL_CHECK (NODE)))
   3261 
   3262 /* Nonzero for a VAR_DECL iff an explicit initializer was provided
   3263    or a non-trivial constructor is called.  */
   3264 #define DECL_NONTRIVIALLY_INITIALIZED_P(NODE)	\
   3265    (TREE_LANG_FLAG_6 (VAR_DECL_CHECK (NODE)))
   3266 
   3267 /* Nonzero for a VAR_DECL that was initialized with a
   3268    constant-expression.  */
   3269 #define DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P(NODE) \
   3270   (TREE_LANG_FLAG_2 (VAR_DECL_CHECK (NODE)))
   3271 
   3272 /* Nonzero if the DECL was initialized in the class definition itself,
   3273    rather than outside the class.  This is used for both static member
   3274    VAR_DECLS, and FUNCTION_DECLS that are defined in the class.  */
   3275 #define DECL_INITIALIZED_IN_CLASS_P(DECL) \
   3276   (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL)) \
   3277    ->u.base.initialized_in_class)
   3278 
   3279 /* Nonzero if the DECL is used in the sense of 3.2 [basic.def.odr].
   3280    Only available for decls with DECL_LANG_SPECIFIC.  */
   3281 #define DECL_ODR_USED(DECL) \
   3282   (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL)) \
   3283    ->u.base.odr_used)
   3284 
   3285 /* Nonzero for FUNCTION_DECL means that this is a friend that is
   3286    either not pushed into a namespace/looked up in a class (because it
   3287    is a dependent type, in an uninstantiated template), or it has
   3288    /only/ been subject to hidden friend injection from one or more
   3289    befriending classes.  Once another decl matches, the flag is
   3290    cleared.  There are requirements on its default parms.  */
   3291 #define DECL_UNIQUE_FRIEND_P(NODE) \
   3292   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE)) \
   3293    ->u.base.friend_or_tls)
   3294 
   3295 /* True of a TEMPLATE_DECL that is a template class friend.  Such
   3296    decls are not pushed until instantiated (as they may depend on
   3297    parameters of the befriending class).  DECL_CHAIN is the
   3298    befriending class.  */
   3299 #define DECL_UNINSTANTIATED_TEMPLATE_FRIEND_P(NODE) \
   3300   (DECL_LANG_FLAG_4 (TEMPLATE_DECL_CHECK (NODE)))
   3301 
   3302 /* Nonzero if the thread-local variable was declared with __thread as
   3303    opposed to thread_local.  */
   3304 #define DECL_GNU_TLS_P(NODE)				\
   3305   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))		\
   3306    && DECL_LANG_SPECIFIC (NODE)->u.base.friend_or_tls)
   3307 #define SET_DECL_GNU_TLS_P(NODE)				\
   3308   (retrofit_lang_decl (VAR_DECL_CHECK (NODE)),			\
   3309    DECL_LANG_SPECIFIC (NODE)->u.base.friend_or_tls = true)
   3310 
   3311 /* A TREE_LIST of the types which have befriended this FUNCTION_DECL.  */
   3312 #define DECL_BEFRIENDING_CLASSES(NODE) \
   3313   (LANG_DECL_FN_CHECK (NODE)->befriending_classes)
   3314 
   3315 /* Nonzero for FUNCTION_DECL means that this decl is a static
   3316    member function.  */
   3317 #define DECL_STATIC_FUNCTION_P(NODE) \
   3318   (LANG_DECL_FN_CHECK (NODE)->static_function)
   3319 
   3320 /* Nonzero for FUNCTION_DECL means that this decl is a non-static
   3321    member function.  */
   3322 #define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \
   3323   (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE)
   3324 
   3325 /* Nonzero for FUNCTION_DECL means that this decl is a member function
   3326    (static or non-static).  */
   3327 #define DECL_FUNCTION_MEMBER_P(NODE) \
   3328   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE))
   3329 
   3330 /* Nonzero for FUNCTION_DECL means that this member function
   3331    has `this' as const X *const.  */
   3332 #define DECL_CONST_MEMFUNC_P(NODE)					 \
   3333   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
   3334    && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE				 \
   3335 				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
   3336 
   3337 /* Nonzero for FUNCTION_DECL means that this member function
   3338    has `this' as volatile X *const.  */
   3339 #define DECL_VOLATILE_MEMFUNC_P(NODE)					 \
   3340   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
   3341    && CP_TYPE_VOLATILE_P (TREE_TYPE (TREE_VALUE				 \
   3342 				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
   3343 
   3344 /* Nonzero for a DECL means that this member is a non-static member.  */
   3345 #define DECL_NONSTATIC_MEMBER_P(NODE)		\
   3346   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)	\
   3347    || TREE_CODE (NODE) == FIELD_DECL)
   3348 
   3349 /* Nonzero for a FIELD_DECL means that this member object type
   3350    is mutable.  */
   3351 #define DECL_MUTABLE_P(NODE) (DECL_LANG_FLAG_0 (FIELD_DECL_CHECK (NODE)))
   3352 
   3353 /* Nonzero for _DECL means that this constructor or conversion function is
   3354    non-converting.  */
   3355 #define DECL_NONCONVERTING_P(NODE) \
   3356   (LANG_DECL_FN_CHECK (NODE)->nonconverting)
   3357 
   3358 /* Nonzero for FUNCTION_DECL means that this member function is a pure
   3359    virtual function.  */
   3360 #define DECL_PURE_VIRTUAL_P(NODE) \
   3361   (LANG_DECL_FN_CHECK (NODE)->pure_virtual)
   3362 
   3363 /* Nonzero for FUNCTION_DECL means that this member function (either
   3364    a constructor or a conversion function) has an explicit specifier
   3365    with a value-dependent expression.  */
   3366 #define DECL_HAS_DEPENDENT_EXPLICIT_SPEC_P(NODE) \
   3367   (LANG_DECL_FN_CHECK (NODE)->has_dependent_explicit_spec_p)
   3368 
   3369 /* Nonzero for a defaulted FUNCTION_DECL for which we haven't decided yet if
   3370    it's deleted; we will decide in synthesize_method.  */
   3371 #define DECL_MAYBE_DELETED(NODE) \
   3372   (LANG_DECL_FN_CHECK (NODE)->maybe_deleted)
   3373 
   3374 /* True (in a FUNCTION_DECL) if NODE is a virtual function that is an
   3375    invalid overrider for a function from a base class.  Once we have
   3376    complained about an invalid overrider we avoid complaining about it
   3377    again.  */
   3378 #define DECL_INVALID_OVERRIDER_P(NODE) \
   3379   (DECL_LANG_FLAG_4 (NODE))
   3380 
   3381 /* True (in a FUNCTION_DECL) if NODE is a function declared with
   3382    an override virt-specifier */
   3383 #define DECL_OVERRIDE_P(NODE) (TREE_LANG_FLAG_0 (NODE))
   3384 
   3385 /* The thunks associated with NODE, a FUNCTION_DECL.  */
   3386 #define DECL_THUNKS(NODE) \
   3387   (DECL_VIRTUAL_P (NODE) ? LANG_DECL_FN_CHECK (NODE)->context : NULL_TREE)
   3388 
   3389 /* Set DECL_THUNKS.  */
   3390 #define SET_DECL_THUNKS(NODE,THUNKS) \
   3391   (LANG_DECL_FN_CHECK (NODE)->context = (THUNKS))
   3392 
   3393 /* If NODE, a FUNCTION_DECL, is a C++11 inheriting constructor, then this
   3394    is the constructor it inherits from.  */
   3395 #define DECL_INHERITED_CTOR(NODE) \
   3396   (DECL_DECLARES_FUNCTION_P (NODE) && DECL_CONSTRUCTOR_P (NODE) \
   3397    ? LANG_DECL_FN_CHECK (NODE)->context : NULL_TREE)
   3398 
   3399 /* And this is the base that constructor comes from.  */
   3400 #define DECL_INHERITED_CTOR_BASE(NODE)			\
   3401   (DECL_INHERITED_CTOR (NODE)				\
   3402    ? DECL_CONTEXT (flag_new_inheriting_ctors		\
   3403 		   ? strip_inheriting_ctors (NODE)	\
   3404 		   : DECL_INHERITED_CTOR (NODE))	\
   3405    : NULL_TREE)
   3406 
   3407 /* Set the inherited base.  */
   3408 #define SET_DECL_INHERITED_CTOR(NODE,INH) \
   3409   (LANG_DECL_FN_CHECK (NODE)->context = (INH))
   3410 
   3411 /* Nonzero if NODE is a thunk, rather than an ordinary function.  */
   3412 #define DECL_THUNK_P(NODE)			\
   3413   (TREE_CODE (NODE) == FUNCTION_DECL		\
   3414    && DECL_LANG_SPECIFIC (NODE)			\
   3415    && LANG_DECL_FN_CHECK (NODE)->thunk_p)
   3416 
   3417 /* Set DECL_THUNK_P for node.  */
   3418 #define SET_DECL_THUNK_P(NODE, THIS_ADJUSTING)			\
   3419   (LANG_DECL_FN_CHECK (NODE)->thunk_p = 1,			\
   3420    LANG_DECL_FN_CHECK (NODE)->this_thunk_p = (THIS_ADJUSTING))
   3421 
   3422 /* Nonzero if NODE is a this pointer adjusting thunk.  */
   3423 #define DECL_THIS_THUNK_P(NODE)			\
   3424   (DECL_THUNK_P (NODE) && LANG_DECL_FN_CHECK (NODE)->this_thunk_p)
   3425 
   3426 /* Nonzero if NODE is a result pointer adjusting thunk.  */
   3427 #define DECL_RESULT_THUNK_P(NODE)			\
   3428   (DECL_THUNK_P (NODE) && !LANG_DECL_FN_CHECK (NODE)->this_thunk_p)
   3429 
   3430 /* Nonzero if NODE is a FUNCTION_DECL, but not a thunk.  */
   3431 #define DECL_NON_THUNK_FUNCTION_P(NODE)				\
   3432   (TREE_CODE (NODE) == FUNCTION_DECL && !DECL_THUNK_P (NODE))
   3433 
   3434 /* Nonzero if NODE is `extern "C"'.  */
   3435 #define DECL_EXTERN_C_P(NODE) \
   3436   (DECL_LANGUAGE (NODE) == lang_c)
   3437 
   3438 /* Nonzero if NODE is an `extern "C"' function.  */
   3439 #define DECL_EXTERN_C_FUNCTION_P(NODE) \
   3440   (DECL_NON_THUNK_FUNCTION_P (NODE) && DECL_EXTERN_C_P (NODE))
   3441 
   3442 /* Non-zero if this variable is declared `constinit' specifier.  */
   3443 #define DECL_DECLARED_CONSTINIT_P(NODE)		\
   3444   (DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE)))
   3445 
   3446 /* True if DECL is declared 'constexpr'.  */
   3447 #define DECL_DECLARED_CONSTEXPR_P(DECL) \
   3448   DECL_LANG_FLAG_8 (VAR_OR_FUNCTION_DECL_CHECK (STRIP_TEMPLATE (DECL)))
   3449 
   3450 /* True if FNDECL is an immediate function.  */
   3451 #define DECL_IMMEDIATE_FUNCTION_P(NODE) \
   3452   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (STRIP_TEMPLATE (NODE)))	\
   3453    ? LANG_DECL_FN_CHECK (NODE)->immediate_fn_p				\
   3454    : false)
   3455 #define SET_DECL_IMMEDIATE_FUNCTION_P(NODE) \
   3456   (retrofit_lang_decl (FUNCTION_DECL_CHECK (NODE)),			\
   3457    LANG_DECL_FN_CHECK (NODE)->immediate_fn_p = true)
   3458 
   3459 // True if NODE was declared as 'concept'.  The flag implies that the
   3460 // declaration is constexpr, that the declaration cannot be specialized or
   3461 // refined, and that the result type must be convertible to bool.
   3462 #define DECL_DECLARED_CONCEPT_P(NODE) \
   3463   (DECL_LANG_SPECIFIC (NODE)->u.base.concept_p)
   3464 
   3465 /* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a
   3466    template function.  */
   3467 #define DECL_PRETTY_FUNCTION_P(NODE) \
   3468   (DECL_NAME (NODE) \
   3469    && id_equal (DECL_NAME (NODE), "__PRETTY_FUNCTION__"))
   3470 
   3471 /* For a DECL, true if it is __func__ or similar.  */
   3472 #define DECL_FNAME_P(NODE)					\
   3473   (VAR_P (NODE) && DECL_NAME (NODE) && DECL_ARTIFICIAL (NODE)	\
   3474    && DECL_HAS_VALUE_EXPR_P (NODE)				\
   3475    && (id_equal (DECL_NAME (NODE), "__PRETTY_FUNCTION__")	\
   3476        || id_equal (DECL_NAME (NODE), "__FUNCTION__")		\
   3477        || id_equal (DECL_NAME (NODE), "__func__")))
   3478 
   3479 /* Nonzero if the variable was declared to be thread-local.
   3480    We need a special C++ version of this test because the middle-end
   3481    DECL_THREAD_LOCAL_P uses the symtab, so we can't use it for
   3482    templates.  */
   3483 #define CP_DECL_THREAD_LOCAL_P(NODE) \
   3484   (TREE_LANG_FLAG_0 (VAR_DECL_CHECK (NODE)))
   3485 
   3486 /* The _TYPE context in which this _DECL appears.  This field holds the
   3487    class where a virtual function instance is actually defined.  */
   3488 #define DECL_CLASS_CONTEXT(NODE) \
   3489   (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE)
   3490 
   3491 /* For a non-member friend function, the class (if any) in which this
   3492    friend was defined.  For example, given:
   3493 
   3494      struct S { friend void f () { ... } };
   3495 
   3496    the DECL_FRIEND_CONTEXT for `f' will be `S'.  */
   3497 #define DECL_FRIEND_CONTEXT(NODE)				\
   3498   ((DECL_DECLARES_FUNCTION_P (NODE) && !DECL_VIRTUAL_P (NODE)	\
   3499     && !DECL_CONSTRUCTOR_P (NODE))				\
   3500    ? LANG_DECL_FN_CHECK (NODE)->context				\
   3501    : NULL_TREE)
   3502 
   3503 /* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT.  */
   3504 #define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \
   3505   (LANG_DECL_FN_CHECK (NODE)->context = (CONTEXT))
   3506 
   3507 #define CP_DECL_CONTEXT(NODE) \
   3508   (!DECL_FILE_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : global_namespace)
   3509 #define CP_TYPE_CONTEXT(NODE) \
   3510   (!TYPE_FILE_SCOPE_P (NODE) ? TYPE_CONTEXT (NODE) : global_namespace)
   3511 #define FROB_CONTEXT(NODE) \
   3512   ((NODE) == global_namespace ? DECL_CONTEXT (NODE) : (NODE))
   3513 
   3514 /* 1 iff NODE has namespace scope, including the global namespace.  */
   3515 #define DECL_NAMESPACE_SCOPE_P(NODE)				\
   3516   (!DECL_TEMPLATE_PARM_P (NODE)					\
   3517    && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL)
   3518 
   3519 #define TYPE_NAMESPACE_SCOPE_P(NODE) \
   3520   (TREE_CODE (CP_TYPE_CONTEXT (NODE)) == NAMESPACE_DECL)
   3521 
   3522 #define NAMESPACE_SCOPE_P(NODE) \
   3523   ((DECL_P (NODE) && DECL_NAMESPACE_SCOPE_P (NODE)) \
   3524    || (TYPE_P (NODE) && TYPE_NAMESPACE_SCOPE_P (NODE)))
   3525 
   3526 /* 1 iff NODE is a class member.  */
   3527 #define DECL_CLASS_SCOPE_P(NODE) \
   3528   (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE)))
   3529 
   3530 #define TYPE_CLASS_SCOPE_P(NODE) \
   3531   (TYPE_CONTEXT (NODE) && TYPE_P (TYPE_CONTEXT (NODE)))
   3532 
   3533 /* 1 iff NODE is function-local.  */
   3534 #define DECL_FUNCTION_SCOPE_P(NODE) \
   3535   (DECL_CONTEXT (NODE) \
   3536    && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL)
   3537 
   3538 #define TYPE_FUNCTION_SCOPE_P(NODE) \
   3539   (TYPE_CONTEXT (NODE) && TREE_CODE (TYPE_CONTEXT (NODE)) == FUNCTION_DECL)
   3540 
   3541 /* 1 iff VAR_DECL node NODE is a type-info decl.  This flag is set for
   3542    both the primary typeinfo object and the associated NTBS name.  */
   3543 #define DECL_TINFO_P(NODE)			\
   3544   TREE_LANG_FLAG_4 (TREE_CHECK2 (NODE,VAR_DECL,TYPE_DECL))
   3545 
   3546 /* 1 iff VAR_DECL node NODE is virtual table or VTT.  We forward to
   3547    DECL_VIRTUAL_P from the common code, as that has the semantics we
   3548    need.  But we want a more descriptive name.  */
   3549 #define DECL_VTABLE_OR_VTT_P(NODE) DECL_VIRTUAL_P (VAR_DECL_CHECK (NODE))
   3550 
   3551 /* 1 iff FUNCTION_TYPE or METHOD_TYPE has a ref-qualifier (either & or &&). */
   3552 #define FUNCTION_REF_QUALIFIED(NODE) \
   3553   TREE_LANG_FLAG_4 (FUNC_OR_METHOD_CHECK (NODE))
   3554 
   3555 /* 1 iff FUNCTION_TYPE or METHOD_TYPE has &&-ref-qualifier.  */
   3556 #define FUNCTION_RVALUE_QUALIFIED(NODE) \
   3557   TREE_LANG_FLAG_5 (FUNC_OR_METHOD_CHECK (NODE))
   3558 
   3559 /* 1 iff NODE is function-local, but for types.  */
   3560 #define LOCAL_CLASS_P(NODE)				\
   3561   (decl_function_context (TYPE_MAIN_DECL (NODE)) != NULL_TREE)
   3562 
   3563 /* The nesting depth of namespace, class or function.  Makes is_ancestor much
   3564    simpler.  Only 8 bits available.  */
   3565 #define SCOPE_DEPTH(NODE) \
   3566   (NAMESPACE_DECL_CHECK (NODE)->base.u.bits.address_space)
   3567 
   3568 /* Whether the namepace is an inline namespace.  */
   3569 #define DECL_NAMESPACE_INLINE_P(NODE) \
   3570   TREE_LANG_FLAG_0 (NAMESPACE_DECL_CHECK (NODE))
   3571 
   3572 /* In a NAMESPACE_DECL, a vector of inline namespaces.  */
   3573 #define DECL_NAMESPACE_INLINEES(NODE) \
   3574    (LANG_DECL_NS_CHECK (NODE)->inlinees)
   3575 
   3576 /* Pointer to hash_map from IDENTIFIERS to DECLS  */
   3577 #define DECL_NAMESPACE_BINDINGS(NODE) \
   3578    (LANG_DECL_NS_CHECK (NODE)->bindings)
   3579 
   3580 /* In a NAMESPACE_DECL, points to the original namespace if this is
   3581    a namespace alias.  */
   3582 #define DECL_NAMESPACE_ALIAS(NODE) \
   3583 	DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE))
   3584 #define ORIGINAL_NAMESPACE(NODE)  \
   3585   (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE))
   3586 
   3587 /* Nonzero if NODE is the std namespace.  */
   3588 #define DECL_NAMESPACE_STD_P(NODE)			\
   3589   ((NODE) == std_node)
   3590 
   3591 /* In a TREE_LIST in an attribute list, indicates that the attribute
   3592    must be applied at instantiation time.  */
   3593 #define ATTR_IS_DEPENDENT(NODE) TREE_LANG_FLAG_0 (TREE_LIST_CHECK (NODE))
   3594 
   3595 /* In a TREE_LIST in the argument of attribute abi_tag, indicates that the tag
   3596    was inherited from a template parameter, not explicitly indicated.  */
   3597 #define ABI_TAG_IMPLICIT(NODE) TREE_LANG_FLAG_0 (TREE_LIST_CHECK (NODE))
   3598 
   3599 /* In a TREE_LIST for a parameter-declaration-list, indicates that all the
   3600    parameters in the list have declarators enclosed in ().  */
   3601 #define PARENTHESIZED_LIST_P(NODE) TREE_LANG_FLAG_0 (TREE_LIST_CHECK (NODE))
   3602 
   3603 /* Non zero if this is a using decl for a dependent scope. */
   3604 #define DECL_DEPENDENT_P(NODE) DECL_LANG_FLAG_0 (USING_DECL_CHECK (NODE))
   3605 
   3606 /* The scope named in a using decl.  */
   3607 #define USING_DECL_SCOPE(NODE) DECL_RESULT_FLD (USING_DECL_CHECK (NODE))
   3608 
   3609 /* The decls named by a using decl.  */
   3610 #define USING_DECL_DECLS(NODE) DECL_INITIAL (USING_DECL_CHECK (NODE))
   3611 
   3612 /* Non zero if the using decl refers to a dependent type.  */
   3613 #define USING_DECL_TYPENAME_P(NODE) DECL_LANG_FLAG_1 (USING_DECL_CHECK (NODE))
   3614 
   3615 /* True if member using decl NODE refers to a non-inherited NODE.  */
   3616 #define USING_DECL_UNRELATED_P(NODE) DECL_LANG_FLAG_2 (USING_DECL_CHECK (NODE))
   3617 
   3618 /* True iff the CONST_DECL is a class-scope clone from C++20 using enum,
   3619    created by handle_using_decl.  */
   3620 #define CONST_DECL_USING_P(NODE)			\
   3621   (TREE_CODE (NODE) == CONST_DECL			\
   3622    && TREE_TYPE (NODE)					\
   3623    && TREE_CODE (TREE_TYPE (NODE)) == ENUMERAL_TYPE	\
   3624    && DECL_CONTEXT (NODE) != TREE_TYPE (NODE))
   3625 
   3626 /* In a FUNCTION_DECL, this is nonzero if this function was defined in
   3627    the class definition.  We have saved away the text of the function,
   3628    but have not yet processed it.  */
   3629 #define DECL_PENDING_INLINE_P(NODE) \
   3630   (LANG_DECL_FN_CHECK (NODE)->pending_inline_p)
   3631 
   3632 /* If DECL_PENDING_INLINE_P holds, this is the saved text of the
   3633    function.  */
   3634 #define DECL_PENDING_INLINE_INFO(NODE) \
   3635   (LANG_DECL_FN_CHECK (NODE)->u.pending_inline_info)
   3636 
   3637 /* Nonzero for TYPE_DECL means that it was written 'using name = type'.  */
   3638 #define TYPE_DECL_ALIAS_P(NODE) \
   3639   DECL_LANG_FLAG_6 (TYPE_DECL_CHECK (NODE))
   3640 
   3641 /* Nonzero for TEMPLATE_DECL means that it is a 'complex' alias template.  */
   3642 #define TEMPLATE_DECL_COMPLEX_ALIAS_P(NODE) \
   3643   DECL_LANG_FLAG_2 (TEMPLATE_DECL_CHECK (NODE))
   3644 
   3645 /* Nonzero for a type which is an alias for another type; i.e, a type
   3646    which declaration was written 'using name-of-type =
   3647    another-type'.  */
   3648 #define TYPE_ALIAS_P(NODE)			\
   3649   (TYPE_P (NODE)				\
   3650    && TYPE_NAME (NODE)				\
   3651    && TREE_CODE (TYPE_NAME (NODE)) == TYPE_DECL	\
   3652    && TYPE_DECL_ALIAS_P (TYPE_NAME (NODE)))
   3653 
   3654 /* If non-NULL for a VAR_DECL, FUNCTION_DECL, TYPE_DECL, TEMPLATE_DECL,
   3655    or CONCEPT_DECL, the entity is either a template specialization (if
   3656    DECL_USE_TEMPLATE is nonzero) or the abstract instance of the
   3657    template itself.
   3658 
   3659    In either case, DECL_TEMPLATE_INFO is a TEMPLATE_INFO, whose
   3660    TI_TEMPLATE is the TEMPLATE_DECL of which this entity is a
   3661    specialization or abstract instance.  The TI_ARGS is the
   3662    template arguments used to specialize the template.
   3663 
   3664    Consider:
   3665 
   3666       template <typename T> struct S { friend void f(T) {} };
   3667 
   3668    In this case, S<int>::f is, from the point of view of the compiler,
   3669    an instantiation of a template -- but, from the point of view of
   3670    the language, each instantiation of S results in a wholly unrelated
   3671    global function f.  In this case, DECL_TEMPLATE_INFO for S<int>::f
   3672    will be non-NULL, but DECL_USE_TEMPLATE will be zero.
   3673 
   3674    In a friend declaration, TI_TEMPLATE can be an overload set, or
   3675    identifier.  */
   3676 #define DECL_TEMPLATE_INFO(NODE) \
   3677   (DECL_LANG_SPECIFIC (TEMPLATE_INFO_DECL_CHECK (NODE)) \
   3678    ->u.min.template_info)
   3679 
   3680 /* For a lambda capture proxy, its captured variable.  */
   3681 #define DECL_CAPTURED_VARIABLE(NODE) \
   3682   (LANG_DECL_MIN_CHECK (NODE)->access)
   3683 
   3684 /* For a VAR_DECL, indicates that the variable is actually a
   3685    non-static data member of anonymous union that has been promoted to
   3686    variable status.  */
   3687 #define DECL_ANON_UNION_VAR_P(NODE) \
   3688   (DECL_LANG_FLAG_4 (VAR_DECL_CHECK (NODE)))
   3689 
   3690 /* Template information for a RECORD_TYPE or UNION_TYPE.  */
   3691 #define CLASSTYPE_TEMPLATE_INFO(NODE) \
   3692   (TYPE_LANG_SLOT_1 (RECORD_OR_UNION_CHECK (NODE)))
   3693 
   3694 /* Template information for a template template parameter.  */
   3695 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) \
   3696   (TYPE_LANG_SLOT_1 (BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK (NODE)))
   3697 
   3698 /* Template information for an ENUMERAL_, RECORD_, UNION_TYPE, or
   3699    BOUND_TEMPLATE_TEMPLATE_PARM type.  This ignores any alias
   3700    templateness of NODE.  It'd be nice if this could unconditionally
   3701    access the slot, rather than return NULL if given a
   3702    non-templatable type.  */
   3703 #define TYPE_TEMPLATE_INFO(NODE)					\
   3704   (TREE_CODE (NODE) == ENUMERAL_TYPE					\
   3705    || TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM			\
   3706    || RECORD_OR_UNION_TYPE_P (NODE)					\
   3707    ? TYPE_LANG_SLOT_1 (NODE) : NULL_TREE)
   3708 
   3709 /* Template information (if any) for an alias type.  */
   3710 #define TYPE_ALIAS_TEMPLATE_INFO(NODE)					\
   3711   (DECL_LANG_SPECIFIC (TYPE_NAME (NODE))				\
   3712    ? DECL_TEMPLATE_INFO (TYPE_NAME (NODE))				\
   3713    : NULL_TREE)
   3714 
   3715 /* If NODE is a type alias, this accessor returns the template info
   3716    for the alias template (if any).  Otherwise behave as
   3717    TYPE_TEMPLATE_INFO.  */
   3718 #define TYPE_TEMPLATE_INFO_MAYBE_ALIAS(NODE)				\
   3719   (typedef_variant_p (NODE)						\
   3720    ? TYPE_ALIAS_TEMPLATE_INFO (NODE)					\
   3721    : TYPE_TEMPLATE_INFO (NODE))
   3722 
   3723 /* Set the template information for a non-alias n ENUMERAL_, RECORD_,
   3724    or UNION_TYPE to VAL.  ALIAS's are dealt with separately.  */
   3725 #define SET_TYPE_TEMPLATE_INFO(NODE, VAL)				\
   3726   (TREE_CODE (NODE) == ENUMERAL_TYPE		\
   3727    || (CLASS_TYPE_P (NODE) && !TYPE_ALIAS_P (NODE))			\
   3728    ? (TYPE_LANG_SLOT_1 (NODE) = (VAL))					\
   3729    : (DECL_TEMPLATE_INFO (TYPE_NAME (NODE)) = (VAL)))			\
   3730 
   3731 #define TI_TEMPLATE(NODE) \
   3732   ((struct tree_template_info*)TEMPLATE_INFO_CHECK (NODE))->tmpl
   3733 #define TI_ARGS(NODE) \
   3734   ((struct tree_template_info*)TEMPLATE_INFO_CHECK (NODE))->args
   3735 #define TI_PENDING_TEMPLATE_FLAG(NODE) \
   3736   TREE_LANG_FLAG_1 (TEMPLATE_INFO_CHECK (NODE))
   3737 /* For a given TREE_VEC containing a template argument list,
   3738    this property contains the number of arguments that are not
   3739    defaulted.  */
   3740 #define NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
   3741   TREE_CHAIN (TREE_VEC_CHECK (NODE))
   3742 
   3743 /* Below are the setter and getter of the NON_DEFAULT_TEMPLATE_ARGS_COUNT
   3744    property.  */
   3745 #define SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE, INT_VALUE) \
   3746   NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) = build_int_cst (NULL_TREE, INT_VALUE)
   3747 #if CHECKING_P
   3748 #define GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
   3749     int_cst_value (NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE))
   3750 #else
   3751 #define GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
   3752   NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE) \
   3753   ? int_cst_value (NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE)) \
   3754   : TREE_VEC_LENGTH (INNERMOST_TEMPLATE_ARGS (NODE))
   3755 #endif
   3756 
   3757 /* The list of access checks that were deferred during parsing
   3758    which need to be performed at template instantiation time.
   3759 
   3760    FIXME this should be associated with the TEMPLATE_DECL, not the
   3761    TEMPLATE_INFO.  */
   3762 #define TI_DEFERRED_ACCESS_CHECKS(NODE) \
   3763   ((struct tree_template_info*)TEMPLATE_INFO_CHECK \
   3764      (NODE))->deferred_access_checks
   3765 
   3766 /* We use TREE_VECs to hold template arguments.  If there is only one
   3767    level of template arguments, then the TREE_VEC contains the
   3768    arguments directly.  If there is more than one level of template
   3769    arguments, then each entry in the TREE_VEC is itself a TREE_VEC,
   3770    containing the template arguments for a single level.  The first
   3771    entry in the outer TREE_VEC is the outermost level of template
   3772    parameters; the last is the innermost.
   3773 
   3774    It is incorrect to ever form a template argument vector containing
   3775    only one level of arguments, but which is a TREE_VEC containing as
   3776    its only entry the TREE_VEC for that level.
   3777 
   3778    For each TREE_VEC containing the template arguments for a single
   3779    level, it's possible to get or set the number of non defaulted
   3780    template arguments by using the accessor macros
   3781    GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT or
   3782    SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT.  */
   3783 
   3784 /* Nonzero if the template arguments is actually a vector of vectors,
   3785    rather than just a vector.  */
   3786 #define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE)		     \
   3787   (NODE && TREE_VEC_LENGTH (NODE) && TREE_VEC_ELT (NODE, 0)  \
   3788    && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC)
   3789 
   3790 /* The depth of a template argument vector.  When called directly by
   3791    the parser, we use a TREE_LIST rather than a TREE_VEC to represent
   3792    template arguments.  In that case, there is only one level of template
   3793    arguments.  We may even see NULL_TREE if there are 0 levels of
   3794    template arguments, as in cp_parser_requires_expression.   */
   3795 #define TMPL_ARGS_DEPTH(NODE)						\
   3796   ((NODE) == NULL_TREE ? 0						\
   3797    : TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE)	\
   3798    : 1)
   3799 
   3800 /* The LEVELth level of the template ARGS.  The outermost level of
   3801    args is level 1, not level 0.  */
   3802 #define TMPL_ARGS_LEVEL(ARGS, LEVEL)		\
   3803   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS)	\
   3804    ? TREE_VEC_ELT (ARGS, (LEVEL) - 1) : (ARGS))
   3805 
   3806 /* Set the LEVELth level of the template ARGS to VAL.  This macro does
   3807    not work with single-level argument vectors.  */
   3808 #define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL)	\
   3809   (TREE_VEC_ELT (ARGS, (LEVEL) - 1) = (VAL))
   3810 
   3811 /* Accesses the IDXth parameter in the LEVELth level of the ARGS.  */
   3812 #define TMPL_ARG(ARGS, LEVEL, IDX)				\
   3813   (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX))
   3814 
   3815 /* Given a single level of template arguments in NODE, return the
   3816    number of arguments.  */
   3817 #define NUM_TMPL_ARGS(NODE)				\
   3818   (TREE_VEC_LENGTH (NODE))
   3819 
   3820 /* Returns the innermost level of template arguments in ARGS.  */
   3821 #define INNERMOST_TEMPLATE_ARGS(NODE) \
   3822   (get_innermost_template_args ((NODE), 1))
   3823 
   3824 /* The number of levels of template parameters given by NODE.  */
   3825 #define TMPL_PARMS_DEPTH(NODE) \
   3826   ((HOST_WIDE_INT) TREE_INT_CST_LOW (TREE_PURPOSE (NODE)))
   3827 
   3828 /* The TEMPLATE_DECL instantiated or specialized by NODE.  This
   3829    TEMPLATE_DECL will be the immediate parent, not the most general
   3830    template.  For example, in:
   3831 
   3832       template <class T> struct S { template <class U> void f(U); }
   3833 
   3834    the FUNCTION_DECL for S<int>::f<double> will have, as its
   3835    DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'.
   3836 
   3837    As a special case, for a member friend template of a template
   3838    class, this value will not be a TEMPLATE_DECL, but rather an
   3839    IDENTIFIER_NODE or OVERLOAD indicating the name of the template and
   3840    any explicit template arguments provided.  For example, in:
   3841 
   3842      template <class T> struct S { friend void f<int>(int, double); }
   3843 
   3844    the DECL_TI_TEMPLATE will be an IDENTIFIER_NODE for `f' and the
   3845    DECL_TI_ARGS will be {int}.
   3846 
   3847    For a FIELD_DECL with a non-static data member initializer, this value
   3848    is the FIELD_DECL it was instantiated from.  */
   3849 #define DECL_TI_TEMPLATE(NODE)      TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
   3850 
   3851 /* The template arguments used to obtain this decl from the most
   3852    general form of DECL_TI_TEMPLATE.  For the example given for
   3853    DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}.  These
   3854    are always the full set of arguments required to instantiate this
   3855    declaration from the most general template specialized here.  */
   3856 #define DECL_TI_ARGS(NODE)	    TI_ARGS (DECL_TEMPLATE_INFO (NODE))
   3857 
   3858 /* The TEMPLATE_DECL associated with NODE, a class type.  Even if NODE
   3859    will be generated from a partial specialization, the TEMPLATE_DECL
   3860    referred to here will be the original template.  For example,
   3861    given:
   3862 
   3863       template <typename T> struct S {};
   3864       template <typename T> struct S<T*> {};
   3865 
   3866    the CLASSTYPE_TI_TEMPLATE for S<int*> will be S, not the S<T*>.
   3867 
   3868    For a member class template, CLASSTYPE_TI_TEMPLATE always refers to the
   3869    partial instantiation rather than the primary template.  CLASSTYPE_TI_ARGS
   3870    are for the primary template if the partial instantiation isn't
   3871    specialized, or for the explicit specialization if it is, e.g.
   3872 
   3873       template <class T> class C { template <class U> class D; }
   3874       template <> template <class U> class C<int>::D;  */
   3875 #define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
   3876 #define CLASSTYPE_TI_ARGS(NODE)     TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
   3877 
   3878 /* For a template instantiation TYPE, returns the TYPE corresponding
   3879    to the primary template.  Otherwise returns TYPE itself.  */
   3880 #define CLASSTYPE_PRIMARY_TEMPLATE_TYPE(TYPE)				\
   3881   ((CLASSTYPE_USE_TEMPLATE ((TYPE))					\
   3882     && !CLASSTYPE_TEMPLATE_SPECIALIZATION ((TYPE)))			\
   3883    ? TREE_TYPE (DECL_TEMPLATE_RESULT (DECL_PRIMARY_TEMPLATE		\
   3884 				      (CLASSTYPE_TI_TEMPLATE ((TYPE))))) \
   3885    : (TYPE))
   3886 
   3887 /* Like CLASS_TI_TEMPLATE, but also works for ENUMERAL_TYPEs.  */
   3888 #define TYPE_TI_TEMPLATE(NODE)			\
   3889   (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE)))
   3890 
   3891 /* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
   3892 #define TYPE_TI_ARGS(NODE)			\
   3893   (TI_ARGS (TYPE_TEMPLATE_INFO (NODE)))
   3894 
   3895 #define INNERMOST_TEMPLATE_PARMS(NODE)  TREE_VALUE (NODE)
   3896 
   3897 /* Nonzero if NODE (a TEMPLATE_DECL) is a member template, in the
   3898    sense of [temp.mem].  */
   3899 #define DECL_MEMBER_TEMPLATE_P(NODE) \
   3900   (DECL_LANG_FLAG_1 (TEMPLATE_DECL_CHECK (NODE)))
   3901 
   3902 /* Nonzero if the NODE corresponds to the template parameters for a
   3903    member template, whose inline definition is being processed after
   3904    the class definition is complete.  */
   3905 #define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE)
   3906 
   3907 /* Determine if a declaration (PARM_DECL or FIELD_DECL) is a pack.  */
   3908 #define DECL_PACK_P(NODE) \
   3909   (DECL_P (NODE) && PACK_EXPANSION_P (TREE_TYPE (NODE)))
   3910 
   3911 /* Determines if NODE is an expansion of one or more parameter packs,
   3912    e.g., a TYPE_PACK_EXPANSION or EXPR_PACK_EXPANSION.  */
   3913 #define PACK_EXPANSION_P(NODE)                 \
   3914   (TREE_CODE (NODE) == TYPE_PACK_EXPANSION     \
   3915    || TREE_CODE (NODE) == EXPR_PACK_EXPANSION)
   3916 
   3917 /* Extracts the type or expression pattern from a TYPE_PACK_EXPANSION or
   3918    EXPR_PACK_EXPANSION.  */
   3919 #define PACK_EXPANSION_PATTERN(NODE)                            \
   3920   (TREE_CODE (NODE) == TYPE_PACK_EXPANSION ? TREE_TYPE (NODE)    \
   3921    : TREE_OPERAND (NODE, 0))
   3922 
   3923 /* Sets the type or expression pattern for a TYPE_PACK_EXPANSION or
   3924    EXPR_PACK_EXPANSION.  */
   3925 #define SET_PACK_EXPANSION_PATTERN(NODE,VALUE)  \
   3926   if (TREE_CODE (NODE) == TYPE_PACK_EXPANSION)  \
   3927     TREE_TYPE (NODE) = VALUE;                   \
   3928   else                                          \
   3929     TREE_OPERAND (NODE, 0) = VALUE
   3930 
   3931 /* The list of parameter packs used in the PACK_EXPANSION_* node. The
   3932    TREE_VALUE of each TREE_LIST contains the parameter packs.  */
   3933 #define PACK_EXPANSION_PARAMETER_PACKS(NODE)		\
   3934   *(TREE_CODE (NODE) == EXPR_PACK_EXPANSION		\
   3935     ? &TREE_OPERAND (NODE, 1)				\
   3936     : &TYPE_MIN_VALUE_RAW (TYPE_PACK_EXPANSION_CHECK (NODE)))
   3937 
   3938 /* Any additional template args to be applied when substituting into
   3939    the pattern, set by tsubst_pack_expansion for partial instantiations.
   3940    If this is a TREE_LIST, the TREE_VALUE of the first element is the
   3941    usual template argument TREE_VEC, and the TREE_PURPOSE of later elements
   3942    are enclosing functions that provided function parameter packs we'll need
   3943    to map appropriately.  */
   3944 #define PACK_EXPANSION_EXTRA_ARGS(NODE)		\
   3945   *(TREE_CODE (NODE) == TYPE_PACK_EXPANSION	\
   3946     ? &TYPE_MAX_VALUE_RAW (NODE)			\
   3947     : &TREE_OPERAND ((NODE), 2))
   3948 
   3949 /* True iff this pack expansion is within a function context.  */
   3950 #define PACK_EXPANSION_LOCAL_P(NODE) TREE_LANG_FLAG_0 (NODE)
   3951 
   3952 /* True iff this pack expansion is for sizeof....  */
   3953 #define PACK_EXPANSION_SIZEOF_P(NODE) TREE_LANG_FLAG_1 (NODE)
   3954 
   3955 /* True iff this pack expansion is for auto... in lambda init-capture.  */
   3956 #define PACK_EXPANSION_AUTO_P(NODE) TREE_LANG_FLAG_2 (NODE)
   3957 
   3958 /* True if we must use PACK_EXPANSION_EXTRA_ARGS and avoid partial
   3959    instantiation of this pack expansion.  */
   3960 #define PACK_EXPANSION_FORCE_EXTRA_ARGS_P(NODE) TREE_LANG_FLAG_3 (NODE)
   3961 
   3962 /* True iff the wildcard can match a template parameter pack.  */
   3963 #define WILDCARD_PACK_P(NODE) TREE_LANG_FLAG_0 (NODE)
   3964 
   3965 /* Determine if this is an argument pack.  */
   3966 #define ARGUMENT_PACK_P(NODE)                          \
   3967   (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK              \
   3968    || TREE_CODE (NODE) == NONTYPE_ARGUMENT_PACK)
   3969 
   3970 /* The arguments stored in an argument pack. Arguments are stored in a
   3971    TREE_VEC, which may have length zero.  */
   3972 #define ARGUMENT_PACK_ARGS(NODE)                               \
   3973   (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK? TREE_TYPE (NODE)    \
   3974    : TREE_OPERAND (NODE, 0))
   3975 
   3976 /* Set the arguments stored in an argument pack. VALUE must be a
   3977    TREE_VEC.  */
   3978 #define SET_ARGUMENT_PACK_ARGS(NODE,VALUE)     \
   3979   if (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK)  \
   3980     TREE_TYPE (NODE) = VALUE;                           \
   3981   else                                                  \
   3982     TREE_OPERAND (NODE, 0) = VALUE
   3983 
   3984 /* Whether the argument pack is "incomplete", meaning that more
   3985    arguments can still be deduced. Incomplete argument packs are only
   3986    used when the user has provided an explicit template argument list
   3987    for a variadic function template. Some of the explicit template
   3988    arguments will be placed into the beginning of the argument pack,
   3989    but additional arguments might still be deduced.  */
   3990 #define ARGUMENT_PACK_INCOMPLETE_P(NODE)        \
   3991   TREE_ADDRESSABLE (ARGUMENT_PACK_ARGS (NODE))
   3992 
   3993 /* When ARGUMENT_PACK_INCOMPLETE_P, stores the explicit template
   3994    arguments used to fill this pack.  */
   3995 #define ARGUMENT_PACK_EXPLICIT_ARGS(NODE)       \
   3996   TREE_TYPE (ARGUMENT_PACK_ARGS (NODE))
   3997 
   3998 /* In an ARGUMENT_PACK_SELECT, the argument pack from which an
   3999    argument will be selected.  */
   4000 #define ARGUMENT_PACK_SELECT_FROM_PACK(NODE)				\
   4001   (((struct tree_argument_pack_select *)ARGUMENT_PACK_SELECT_CHECK (NODE))->argument_pack)
   4002 
   4003 /* In an ARGUMENT_PACK_SELECT, the index of the argument we want to
   4004    select.  */
   4005 #define ARGUMENT_PACK_SELECT_INDEX(NODE)				\
   4006   (((struct tree_argument_pack_select *)ARGUMENT_PACK_SELECT_CHECK (NODE))->index)
   4007 
   4008 #define FOLD_EXPR_CHECK(NODE)						\
   4009   TREE_CHECK4 (NODE, UNARY_LEFT_FOLD_EXPR, UNARY_RIGHT_FOLD_EXPR,	\
   4010 	       BINARY_LEFT_FOLD_EXPR, BINARY_RIGHT_FOLD_EXPR)
   4011 
   4012 #define BINARY_FOLD_EXPR_CHECK(NODE) \
   4013   TREE_CHECK2 (NODE, BINARY_LEFT_FOLD_EXPR, BINARY_RIGHT_FOLD_EXPR)
   4014 
   4015 /* True if NODE is UNARY_FOLD_EXPR or a BINARY_FOLD_EXPR */
   4016 #define FOLD_EXPR_P(NODE)				\
   4017   (TREE_CODE (NODE) == UNARY_LEFT_FOLD_EXPR		\
   4018    || TREE_CODE (NODE) == UNARY_RIGHT_FOLD_EXPR		\
   4019    || TREE_CODE (NODE) == BINARY_LEFT_FOLD_EXPR		\
   4020    || TREE_CODE (NODE) == BINARY_RIGHT_FOLD_EXPR)
   4021 
   4022 /* True when NODE is a fold over a compound assignment operator. */
   4023 #define FOLD_EXPR_MODIFY_P(NODE) \
   4024   TREE_LANG_FLAG_0 (FOLD_EXPR_CHECK (NODE))
   4025 
   4026 /* An INTEGER_CST containing the tree code of the folded operator. */
   4027 #define FOLD_EXPR_OP_RAW(NODE) \
   4028   TREE_OPERAND (FOLD_EXPR_CHECK (NODE), 0)
   4029 
   4030 /* The tree code of the folded operator.  */
   4031 #define FOLD_EXPR_OP(NODE) \
   4032   ((enum tree_code) TREE_INT_CST_LOW (FOLD_EXPR_OP_RAW (NODE)))
   4033 
   4034 /* The expression containing an unexpanded parameter pack. */
   4035 #define FOLD_EXPR_PACK(NODE) \
   4036   TREE_OPERAND (FOLD_EXPR_CHECK (NODE), 1)
   4037 
   4038 /* In a binary fold expression, the argument with no unexpanded
   4039    parameter packs. */
   4040 #define FOLD_EXPR_INIT(NODE) \
   4041   TREE_OPERAND (BINARY_FOLD_EXPR_CHECK (NODE), 2)
   4042 
   4043 /* In a FUNCTION_DECL, the saved auto-return pattern.  */
   4044 #define DECL_SAVED_AUTO_RETURN_TYPE(NODE)		\
   4045   (LANG_DECL_FN_CHECK (FUNCTION_DECL_CHECK (NODE))	\
   4046    ->u.saved_auto_return_type)
   4047 
   4048 /* True if NODE is an implicit INDIRECT_REF from convert_from_reference.  */
   4049 #define REFERENCE_REF_P(NODE)				\
   4050   (INDIRECT_REF_P (NODE)				\
   4051    && TREE_TYPE (TREE_OPERAND (NODE, 0))		\
   4052    && TYPE_REF_P (TREE_TYPE (TREE_OPERAND ((NODE), 0))))
   4053 
   4054 /* True iff this represents an lvalue being treated as an rvalue during return
   4055    or throw as per [class.copy.elision].  */
   4056 #define IMPLICIT_RVALUE_P(NODE) \
   4057   TREE_LANG_FLAG_3 (TREE_CHECK2 ((NODE), NON_LVALUE_EXPR, STATIC_CAST_EXPR))
   4058 
   4059 #define NEW_EXPR_USE_GLOBAL(NODE) \
   4060   TREE_LANG_FLAG_0 (NEW_EXPR_CHECK (NODE))
   4061 #define DELETE_EXPR_USE_GLOBAL(NODE) \
   4062   TREE_LANG_FLAG_0 (DELETE_EXPR_CHECK (NODE))
   4063 #define DELETE_EXPR_USE_VEC(NODE) \
   4064   TREE_LANG_FLAG_1 (DELETE_EXPR_CHECK (NODE))
   4065 
   4066 #define CALL_OR_AGGR_INIT_CHECK(NODE) \
   4067   TREE_CHECK2 ((NODE), CALL_EXPR, AGGR_INIT_EXPR)
   4068 
   4069 /* In a CALL_EXPR appearing in a template, true if Koenig lookup
   4070    should be performed at instantiation time.  */
   4071 #define KOENIG_LOOKUP_P(NODE) TREE_LANG_FLAG_0 (CALL_EXPR_CHECK (NODE))
   4072 
   4073 /* True if the arguments to NODE should be evaluated in left-to-right
   4074    order regardless of PUSH_ARGS_REVERSED.  */
   4075 #define CALL_EXPR_ORDERED_ARGS(NODE) \
   4076   TREE_LANG_FLAG_3 (CALL_OR_AGGR_INIT_CHECK (NODE))
   4077 
   4078 /* True if the arguments to NODE should be evaluated in right-to-left
   4079    order regardless of PUSH_ARGS_REVERSED.  */
   4080 #define CALL_EXPR_REVERSE_ARGS(NODE) \
   4081   TREE_LANG_FLAG_5 (CALL_OR_AGGR_INIT_CHECK (NODE))
   4082 
   4083 /* True if CALL_EXPR was written as an operator expression, not a function
   4084    call.  */
   4085 #define CALL_EXPR_OPERATOR_SYNTAX(NODE) \
   4086   TREE_LANG_FLAG_6 (CALL_OR_AGGR_INIT_CHECK (NODE))
   4087 
   4088 /* A TREE_LIST containing the result of phase 1 name lookup of the operator
   4089    overloads that are pertinent to the dependent operator expression whose
   4090    type is NODE.  Each TREE_PURPOSE is an IDENTIFIER_NODE and TREE_VALUE is
   4091    the corresponding (possibly empty) lookup result.  The TREE_TYPE of the
   4092    first TREE_LIST node points back to NODE.  */
   4093 #define DEPENDENT_OPERATOR_TYPE_SAVED_LOOKUPS(NODE) \
   4094   TYPE_VALUES_RAW (DEPENDENT_OPERATOR_TYPE_CHECK (NODE))
   4095 
   4096 /* Guarded helper for the above accessor macro that takes a (templated)
   4097    operator expression instead of the type thereof.  */
   4098 inline tree
   4099 templated_operator_saved_lookups (tree t)
   4100 {
   4101   tree type = TREE_TYPE (EXPR_CHECK (t));
   4102   if (type && TREE_CODE (type) == DEPENDENT_OPERATOR_TYPE)
   4103     return DEPENDENT_OPERATOR_TYPE_SAVED_LOOKUPS (type);
   4104   else
   4105     return NULL_TREE;
   4106 }
   4107 
   4108 /* Indicates whether a string literal has been parenthesized. Such
   4109    usages are disallowed in certain circumstances.  */
   4110 
   4111 #define PAREN_STRING_LITERAL_P(NODE) \
   4112   TREE_LANG_FLAG_0 (STRING_CST_CHECK (NODE))
   4113 
   4114 /* Indicates whether a COMPONENT_REF or a SCOPE_REF has been parenthesized, an
   4115    INDIRECT_REF comes from parenthesizing a _DECL, or a PAREN_EXPR identifies a
   4116    parenthesized initializer relevant for decltype(auto).  Currently only set
   4117    some of the time in C++14 mode.  */
   4118 
   4119 #define REF_PARENTHESIZED_P(NODE) \
   4120   TREE_LANG_FLAG_2 (TREE_CHECK5 ((NODE), COMPONENT_REF, INDIRECT_REF, SCOPE_REF, VIEW_CONVERT_EXPR, PAREN_EXPR))
   4121 
   4122 /* Nonzero if this AGGR_INIT_EXPR provides for initialization via a
   4123    constructor call, rather than an ordinary function call.  */
   4124 #define AGGR_INIT_VIA_CTOR_P(NODE) \
   4125   TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE))
   4126 
   4127 /* Nonzero if expanding this AGGR_INIT_EXPR should first zero-initialize
   4128    the object.  */
   4129 #define AGGR_INIT_ZERO_FIRST(NODE) \
   4130   TREE_LANG_FLAG_2 (AGGR_INIT_EXPR_CHECK (NODE))
   4131 
   4132 /* Nonzero means that the call is the jump from a thunk to the
   4133    thunked-to function.  */
   4134 #define AGGR_INIT_FROM_THUNK_P(NODE) \
   4135   (AGGR_INIT_EXPR_CHECK (NODE)->base.protected_flag)
   4136 
   4137 /* AGGR_INIT_EXPR accessors.  These are equivalent to the CALL_EXPR
   4138    accessors, except for AGGR_INIT_EXPR_SLOT (which takes the place of
   4139    CALL_EXPR_STATIC_CHAIN).  */
   4140 
   4141 #define AGGR_INIT_EXPR_FN(NODE) TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 1)
   4142 #define AGGR_INIT_EXPR_SLOT(NODE) \
   4143   TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 2)
   4144 #define AGGR_INIT_EXPR_ARG(NODE, I) \
   4145   TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), (I) + 3)
   4146 #define aggr_init_expr_nargs(NODE) (VL_EXP_OPERAND_LENGTH(NODE) - 3)
   4147 
   4148 /* AGGR_INIT_EXPR_ARGP returns a pointer to the argument vector for NODE.
   4149    We can't use &AGGR_INIT_EXPR_ARG (NODE, 0) because that will complain if
   4150    the argument count is zero when checking is enabled.  Instead, do
   4151    the pointer arithmetic to advance past the 3 fixed operands in a
   4152    AGGR_INIT_EXPR.  That produces a valid pointer to just past the end of
   4153    the operand array, even if it's not valid to dereference it.  */
   4154 #define AGGR_INIT_EXPR_ARGP(NODE) \
   4155   (&(TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 0)) + 3)
   4156 
   4157 /* Abstract iterators for AGGR_INIT_EXPRs.  */
   4158 
   4159 /* Structure containing iterator state.  */
   4160 struct aggr_init_expr_arg_iterator {
   4161   tree t;	/* the aggr_init_expr */
   4162   int n;	/* argument count */
   4163   int i;	/* next argument index */
   4164 };
   4165 
   4166 /* Initialize the abstract argument list iterator object ITER with the
   4167    arguments from AGGR_INIT_EXPR node EXP.  */
   4168 inline void
   4169 init_aggr_init_expr_arg_iterator (tree exp,
   4170 				       aggr_init_expr_arg_iterator *iter)
   4171 {
   4172   iter->t = exp;
   4173   iter->n = aggr_init_expr_nargs (exp);
   4174   iter->i = 0;
   4175 }
   4176 
   4177 /* Return the next argument from abstract argument list iterator object ITER,
   4178    and advance its state.  Return NULL_TREE if there are no more arguments.  */
   4179 inline tree
   4180 next_aggr_init_expr_arg (aggr_init_expr_arg_iterator *iter)
   4181 {
   4182   tree result;
   4183   if (iter->i >= iter->n)
   4184     return NULL_TREE;
   4185   result = AGGR_INIT_EXPR_ARG (iter->t, iter->i);
   4186   iter->i++;
   4187   return result;
   4188 }
   4189 
   4190 /* Initialize the abstract argument list iterator object ITER, then advance
   4191    past and return the first argument.  Useful in for expressions, e.g.
   4192      for (arg = first_aggr_init_expr_arg (exp, &iter); arg;
   4193           arg = next_aggr_init_expr_arg (&iter))   */
   4194 inline tree
   4195 first_aggr_init_expr_arg (tree exp, aggr_init_expr_arg_iterator *iter)
   4196 {
   4197   init_aggr_init_expr_arg_iterator (exp, iter);
   4198   return next_aggr_init_expr_arg (iter);
   4199 }
   4200 
   4201 /* Test whether there are more arguments in abstract argument list iterator
   4202    ITER, without changing its state.  */
   4203 inline bool
   4204 more_aggr_init_expr_args_p (const aggr_init_expr_arg_iterator *iter)
   4205 {
   4206   return (iter->i < iter->n);
   4207 }
   4208 
   4209 /* Iterate through each argument ARG of AGGR_INIT_EXPR CALL, using variable
   4210    ITER (of type aggr_init_expr_arg_iterator) to hold the iteration state.  */
   4211 #define FOR_EACH_AGGR_INIT_EXPR_ARG(arg, iter, call)			\
   4212   for ((arg) = first_aggr_init_expr_arg ((call), &(iter)); (arg);	\
   4213        (arg) = next_aggr_init_expr_arg (&(iter)))
   4214 
   4215 /* VEC_INIT_EXPR accessors.  */
   4216 #define VEC_INIT_EXPR_SLOT(NODE) TREE_OPERAND (VEC_INIT_EXPR_CHECK (NODE), 0)
   4217 #define VEC_INIT_EXPR_INIT(NODE) TREE_OPERAND (VEC_INIT_EXPR_CHECK (NODE), 1)
   4218 
   4219 /* Indicates that a VEC_INIT_EXPR is a potential constant expression.
   4220    Only set when the current function is constexpr.  */
   4221 #define VEC_INIT_EXPR_IS_CONSTEXPR(NODE) \
   4222   TREE_LANG_FLAG_0 (VEC_INIT_EXPR_CHECK (NODE))
   4223 
   4224 /* Indicates that a VEC_INIT_EXPR is expressing value-initialization.  */
   4225 #define VEC_INIT_EXPR_VALUE_INIT(NODE) \
   4226   TREE_LANG_FLAG_1 (VEC_INIT_EXPR_CHECK (NODE))
   4227 
   4228 /* If T is a VEC_INIT_EXPR, return it, possibly stripping a TARGET_EXPR
   4229    wrapper.  Otherwise, return null.  */
   4230 inline tree
   4231 get_vec_init_expr (tree t)
   4232 {
   4233   if (t && TREE_CODE (t) == TARGET_EXPR)
   4234     t = TARGET_EXPR_INITIAL (t);
   4235   if (t && TREE_CODE (t) == VEC_INIT_EXPR)
   4236     return t;
   4237   return NULL_TREE;
   4238 }
   4239 
   4240 /* The condition under which this MUST_NOT_THROW_EXPR actually blocks
   4241    exceptions.  NULL_TREE means 'true'.  */
   4242 #define MUST_NOT_THROW_COND(NODE) \
   4243   TREE_OPERAND (MUST_NOT_THROW_EXPR_CHECK (NODE), 1)
   4244 
   4245 /* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a
   4246    TEMPLATE_DECL.  This macro determines whether or not a given class
   4247    type is really a template type, as opposed to an instantiation or
   4248    specialization of one.  */
   4249 #define CLASSTYPE_IS_TEMPLATE(NODE)  \
   4250   (CLASSTYPE_TEMPLATE_INFO (NODE)    \
   4251    && !CLASSTYPE_USE_TEMPLATE (NODE) \
   4252    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
   4253 
   4254 /* The name used by the user to name the typename type.  Typically,
   4255    this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the
   4256    corresponding TYPE_DECL.  However, this may also be a
   4257    TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'.  */
   4258 #define TYPENAME_TYPE_FULLNAME(NODE) \
   4259   (TYPE_VALUES_RAW (TYPENAME_TYPE_CHECK (NODE)))
   4260 
   4261 /* True if a TYPENAME_TYPE was declared as an "enum".  */
   4262 #define TYPENAME_IS_ENUM_P(NODE) \
   4263   (TREE_LANG_FLAG_0 (TYPENAME_TYPE_CHECK (NODE)))
   4264 
   4265 /* True if a TYPENAME_TYPE was declared as a "class", "struct", or
   4266    "union".  */
   4267 #define TYPENAME_IS_CLASS_P(NODE) \
   4268   (TREE_LANG_FLAG_1 (TYPENAME_TYPE_CHECK (NODE)))
   4269 
   4270 /* True if a TYPENAME_TYPE is in the process of being resolved.  */
   4271 #define TYPENAME_IS_RESOLVING_P(NODE) \
   4272   (TREE_LANG_FLAG_2 (TYPENAME_TYPE_CHECK (NODE)))
   4273 
   4274 /* [class.virtual]
   4275 
   4276    A class that declares or inherits a virtual function is called a
   4277    polymorphic class.  */
   4278 #define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE))
   4279 
   4280 /* Nonzero if this class has a virtual function table pointer.  */
   4281 #define TYPE_CONTAINS_VPTR_P(NODE)		\
   4282   (TYPE_POLYMORPHIC_P (NODE) || CLASSTYPE_VBASECLASSES (NODE))
   4283 
   4284 /* Nonzero if NODE is a FUNCTION_DECL or VARIABLE_DECL (for a decl
   4285    with namespace scope) declared in a local scope.  */
   4286 #define DECL_LOCAL_DECL_P(NODE) \
   4287   DECL_LANG_FLAG_0 (VAR_OR_FUNCTION_DECL_CHECK (NODE))
   4288 
   4289 /* The namespace-scope decl a DECL_LOCAL_DECL_P aliases.  */
   4290 #define DECL_LOCAL_DECL_ALIAS(NODE)			\
   4291   DECL_ACCESS ((gcc_checking_assert (DECL_LOCAL_DECL_P (NODE)), NODE))
   4292 
   4293 /* Nonzero if NODE is the target for genericization of 'return' stmts
   4294    in constructors/destructors of targetm.cxx.cdtor_returns_this targets.  */
   4295 #define LABEL_DECL_CDTOR(NODE) \
   4296   DECL_LANG_FLAG_2 (LABEL_DECL_CHECK (NODE))
   4297 
   4298 /* True if NODE was declared with auto in its return type, but it has
   4299    started compilation and so the return type might have been changed by
   4300    return type deduction; its declared return type should be found in
   4301    DECL_SAVED_AUTO_RETURN_TYPE (NODE).   */
   4302 #define FNDECL_USED_AUTO(NODE) \
   4303   TREE_LANG_FLAG_2 (FUNCTION_DECL_CHECK (NODE))
   4304 
   4305 /* True if NODE is needed for a manifestly constant-evaluated expression.
   4306    This doesn't especially need to be a flag, since currently it's only
   4307    used for error recovery; if we run out of function flags it could move
   4308    to an attribute.  */
   4309 #define FNDECL_MANIFESTLY_CONST_EVALUATED(NODE) \
   4310   TREE_LANG_FLAG_4 (FUNCTION_DECL_CHECK (NODE))
   4311 
   4312 /* True for artificial decls added for OpenMP privatized non-static
   4313    data members.  */
   4314 #define DECL_OMP_PRIVATIZED_MEMBER(NODE) \
   4315   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))->u.base.anticipated_p)
   4316 
   4317 /* Nonzero if NODE is an artificial FUNCTION_DECL for
   4318    #pragma omp declare reduction.  */
   4319 #define DECL_OMP_DECLARE_REDUCTION_P(NODE) \
   4320   (LANG_DECL_FN_CHECK (DECL_COMMON_CHECK (NODE))->omp_declare_reduction_p)
   4321 
   4322 /* Nonzero if DECL has been declared threadprivate by
   4323    #pragma omp threadprivate.  */
   4324 #define CP_DECL_THREADPRIVATE_P(DECL) \
   4325   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (DECL))->u.base.threadprivate_or_deleted_p)
   4326 
   4327 /* Nonzero if NODE is a VAR_DECL which has been declared inline.  */
   4328 #define DECL_VAR_DECLARED_INLINE_P(NODE) \
   4329   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))			\
   4330    ? DECL_LANG_SPECIFIC (NODE)->u.base.var_declared_inline_p	\
   4331    : false)
   4332 #define SET_DECL_VAR_DECLARED_INLINE_P(NODE) \
   4333   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))->u.base.var_declared_inline_p \
   4334    = true)
   4335 
   4336 /* True if NODE is a constant variable with a value-dependent initializer.  */
   4337 #define DECL_DEPENDENT_INIT_P(NODE)				\
   4338   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))			\
   4339    && DECL_LANG_SPECIFIC (NODE)->u.base.dependent_init_p)
   4340 #define SET_DECL_DEPENDENT_INIT_P(NODE, X) \
   4341   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))->u.base.dependent_init_p = (X))
   4342 
   4343 /* Nonzero if NODE is an artificial VAR_DECL for a C++17 structured binding
   4344    declaration or one of VAR_DECLs for the user identifiers in it.  */
   4345 #define DECL_DECOMPOSITION_P(NODE) \
   4346   (VAR_P (NODE) && DECL_LANG_SPECIFIC (NODE)			\
   4347    ? DECL_LANG_SPECIFIC (NODE)->u.base.selector == lds_decomp		\
   4348    : false)
   4349 
   4350 /* The underlying artificial VAR_DECL for structured binding.  */
   4351 #define DECL_DECOMP_BASE(NODE) \
   4352   (LANG_DECL_DECOMP_CHECK (NODE)->base)
   4353 
   4354 /* Nonzero if NODE is an inline VAR_DECL.  In C++17, static data members
   4355    declared with constexpr specifier are implicitly inline variables.  */
   4356 #define DECL_INLINE_VAR_P(NODE) \
   4357   (DECL_VAR_DECLARED_INLINE_P (NODE)				\
   4358    || (cxx_dialect >= cxx17					\
   4359        && DECL_DECLARED_CONSTEXPR_P (NODE)			\
   4360        && DECL_CLASS_SCOPE_P (NODE)))
   4361 
   4362 /* Nonzero if DECL was declared with '= delete'.  */
   4363 #define DECL_DELETED_FN(DECL) \
   4364   (LANG_DECL_FN_CHECK (DECL)->min.base.threadprivate_or_deleted_p)
   4365 
   4366 /* Nonzero if DECL was declared with '= default' (maybe implicitly).  */
   4367 #define DECL_DEFAULTED_FN(DECL) \
   4368   (LANG_DECL_FN_CHECK (DECL)->defaulted_p)
   4369 
   4370 /* Nonzero if DECL is explicitly defaulted in the class body.  */
   4371 #define DECL_DEFAULTED_IN_CLASS_P(DECL)					\
   4372   (DECL_DEFAULTED_FN (DECL) && DECL_INITIALIZED_IN_CLASS_P (DECL))
   4373 /* Nonzero if DECL was defaulted outside the class body.  */
   4374 #define DECL_DEFAULTED_OUTSIDE_CLASS_P(DECL)				\
   4375   (DECL_DEFAULTED_FN (DECL)						\
   4376    && !(DECL_ARTIFICIAL (DECL) || DECL_INITIALIZED_IN_CLASS_P (DECL)))
   4377 
   4378 /* Record whether a typedef for type `int' was actually `signed int'.  */
   4379 #define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP)
   4380 
   4381 /* Returns nonzero if DECL has external linkage, as specified by the
   4382    language standard.  (This predicate may hold even when the
   4383    corresponding entity is not actually given external linkage in the
   4384    object file; see decl_linkage for details.)  */
   4385 #define DECL_EXTERNAL_LINKAGE_P(DECL) \
   4386   (decl_linkage (DECL) == lk_external)
   4387 
   4388 /* Keep these codes in ascending code order.  */
   4389 
   4390 #define INTEGRAL_CODE_P(CODE)	\
   4391   ((CODE) == ENUMERAL_TYPE	\
   4392    || (CODE) == BOOLEAN_TYPE	\
   4393    || (CODE) == INTEGER_TYPE)
   4394 
   4395 /* [basic.fundamental]
   4396 
   4397    Types  bool, char, wchar_t, and the signed and unsigned integer types
   4398    are collectively called integral types.
   4399 
   4400    Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration
   4401    types as well, which is incorrect in C++.  Keep these checks in
   4402    ascending code order.  */
   4403 #define CP_INTEGRAL_TYPE_P(TYPE)		\
   4404   (TREE_CODE (TYPE) == BOOLEAN_TYPE		\
   4405    || TREE_CODE (TYPE) == INTEGER_TYPE)
   4406 
   4407 /* Returns true if TYPE is an integral or enumeration name.  Keep
   4408    these checks in ascending code order.  */
   4409 #define INTEGRAL_OR_ENUMERATION_TYPE_P(TYPE) \
   4410    (TREE_CODE (TYPE) == ENUMERAL_TYPE || CP_INTEGRAL_TYPE_P (TYPE))
   4411 
   4412 /* Returns true if TYPE is an integral or unscoped enumeration type.  */
   4413 #define INTEGRAL_OR_UNSCOPED_ENUMERATION_TYPE_P(TYPE) \
   4414    (UNSCOPED_ENUM_P (TYPE) || CP_INTEGRAL_TYPE_P (TYPE))
   4415 
   4416 /* True if the class type TYPE is a literal type.  */
   4417 #define CLASSTYPE_LITERAL_P(TYPE)              \
   4418    (LANG_TYPE_CLASS_CHECK (TYPE)->is_literal)
   4419 
   4420 /* [basic.fundamental]
   4421 
   4422    Integral and floating types are collectively called arithmetic
   4423    types.
   4424 
   4425    As a GNU extension, we also accept complex types.
   4426 
   4427    Keep these checks in ascending code order.  */
   4428 #define ARITHMETIC_TYPE_P(TYPE) \
   4429   (CP_INTEGRAL_TYPE_P (TYPE) \
   4430    || TREE_CODE (TYPE) == REAL_TYPE \
   4431    || TREE_CODE (TYPE) == COMPLEX_TYPE)
   4432 
   4433 /* True iff TYPE is cv decltype(nullptr).  */
   4434 #define NULLPTR_TYPE_P(TYPE) (TREE_CODE (TYPE) == NULLPTR_TYPE)
   4435 
   4436 /* [basic.types]
   4437 
   4438    Arithmetic types, enumeration types, pointer types,
   4439    pointer-to-member types, and std::nullptr_t are collectively called
   4440    scalar types.
   4441 
   4442    Keep these checks in ascending code order.  */
   4443 #define SCALAR_TYPE_P(TYPE)			\
   4444   (TYPE_PTRDATAMEM_P (TYPE)			\
   4445    || TREE_CODE (TYPE) == ENUMERAL_TYPE		\
   4446    || ARITHMETIC_TYPE_P (TYPE)			\
   4447    || TYPE_PTR_P (TYPE)				\
   4448    || TYPE_PTRMEMFUNC_P (TYPE)                  \
   4449    || NULLPTR_TYPE_P (TYPE))
   4450 
   4451 /* Determines whether this type is a C++0x scoped enumeration
   4452    type. Scoped enumerations types are introduced via "enum class" or
   4453    "enum struct", e.g.,
   4454 
   4455      enum class Color {
   4456        Red, Green, Blue
   4457      };
   4458 
   4459    Scoped enumeration types are different from normal (unscoped)
   4460    enumeration types in several ways:
   4461 
   4462      - The enumerators of a scoped enumeration type are only available
   4463        within the scope of the enumeration type and not in the
   4464        enclosing scope. For example, the Red color can be referred to
   4465        with "Color::Red" but not "Red".
   4466 
   4467      - Scoped enumerators and enumerations do not implicitly convert
   4468        to integers or 'bool'.
   4469 
   4470      - The underlying type of the enum is well-defined.  */
   4471 #define SCOPED_ENUM_P(TYPE)                                             \
   4472   (TREE_CODE (TYPE) == ENUMERAL_TYPE && ENUM_IS_SCOPED (TYPE))
   4473 
   4474 /* Determine whether this is an unscoped enumeration type.  */
   4475 #define UNSCOPED_ENUM_P(TYPE)                                           \
   4476   (TREE_CODE (TYPE) == ENUMERAL_TYPE && !ENUM_IS_SCOPED (TYPE))
   4477 
   4478 /* Set the flag indicating whether an ENUMERAL_TYPE is a C++0x scoped
   4479    enumeration type (1) or a normal (unscoped) enumeration type
   4480    (0).  */
   4481 #define SET_SCOPED_ENUM_P(TYPE, VAL)                    \
   4482   (ENUM_IS_SCOPED (TYPE) = (VAL))
   4483 
   4484 #define SET_OPAQUE_ENUM_P(TYPE, VAL)                    \
   4485   (ENUM_IS_OPAQUE (TYPE) = (VAL))
   4486 
   4487 #define OPAQUE_ENUM_P(TYPE)				\
   4488   (TREE_CODE (TYPE) == ENUMERAL_TYPE && ENUM_IS_OPAQUE (TYPE))
   4489 
   4490 /* Determines whether an ENUMERAL_TYPE has an explicit
   4491    underlying type.  */
   4492 #define ENUM_FIXED_UNDERLYING_TYPE_P(NODE) (TYPE_LANG_FLAG_5 (NODE))
   4493 
   4494 /* Returns the underlying type of the given enumeration type. The
   4495    underlying type is determined in different ways, depending on the
   4496    properties of the enum:
   4497 
   4498      - In C++0x, the underlying type can be explicitly specified, e.g.,
   4499 
   4500          enum E1 : char { ... } // underlying type is char
   4501 
   4502      - In a C++0x scoped enumeration, the underlying type is int
   4503        unless otherwises specified:
   4504 
   4505          enum class E2 { ... } // underlying type is int
   4506 
   4507      - Otherwise, the underlying type is determined based on the
   4508        values of the enumerators. In this case, the
   4509        ENUM_UNDERLYING_TYPE will not be set until after the definition
   4510        of the enumeration is completed by finish_enum.  */
   4511 #define ENUM_UNDERLYING_TYPE(TYPE) \
   4512   TREE_TYPE (ENUMERAL_TYPE_CHECK (TYPE))
   4513 
   4514 /* [dcl.init.aggr]
   4515 
   4516    An aggregate is an array or a class with no user-provided
   4517    constructors, no brace-or-equal-initializers for non-static data
   4518    members, no private or protected non-static data members, no
   4519    base classes, and no virtual functions.
   4520 
   4521    As an extension, we also treat vectors as aggregates.  Keep these
   4522    checks in ascending code order.  */
   4523 #define CP_AGGREGATE_TYPE_P(TYPE)				\
   4524   (gnu_vector_type_p (TYPE)					\
   4525    || TREE_CODE (TYPE) == ARRAY_TYPE				\
   4526    || (CLASS_TYPE_P (TYPE) && COMPLETE_TYPE_P (TYPE) && !CLASSTYPE_NON_AGGREGATE (TYPE)))
   4527 
   4528 /* Nonzero for a class type means that the class type has a
   4529    user-declared constructor.  */
   4530 #define TYPE_HAS_USER_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1 (NODE))
   4531 
   4532 /* Nonzero means that the FUNCTION_TYPE or METHOD_TYPE has a
   4533    late-specified return type.  */
   4534 #define TYPE_HAS_LATE_RETURN_TYPE(NODE) \
   4535   (TYPE_LANG_FLAG_2 (FUNC_OR_METHOD_CHECK (NODE)))
   4536 
   4537 /* When appearing in an INDIRECT_REF, it means that the tree structure
   4538    underneath is actually a call to a constructor.  This is needed
   4539    when the constructor must initialize local storage (which can
   4540    be automatically destroyed), rather than allowing it to allocate
   4541    space from the heap.
   4542 
   4543    When appearing in a SAVE_EXPR, it means that underneath
   4544    is a call to a constructor.
   4545 
   4546    When appearing in a CONSTRUCTOR, the expression is an unconverted
   4547    compound literal.
   4548 
   4549    When appearing in a FIELD_DECL, it means that this field
   4550    has been duly initialized in its constructor.  */
   4551 #define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4 (NODE))
   4552 
   4553 /* True if NODE is a brace-enclosed initializer.  */
   4554 #define BRACE_ENCLOSED_INITIALIZER_P(NODE) \
   4555   (TREE_CODE (NODE) == CONSTRUCTOR && TREE_TYPE (NODE) == init_list_type_node)
   4556 
   4557 /* True if NODE is a compound-literal, i.e., a brace-enclosed
   4558    initializer cast to a particular type.  This is mostly only set during
   4559    template parsing; once the initializer has been digested into an actual
   4560    value of the type, the expression is represented by a TARGET_EXPR.  */
   4561 #define COMPOUND_LITERAL_P(NODE) \
   4562   (TREE_CODE (NODE) == CONSTRUCTOR && TREE_HAS_CONSTRUCTOR (NODE))
   4563 
   4564 #define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \
   4565 				   && vec_safe_is_empty(CONSTRUCTOR_ELTS(NODE))\
   4566 				   && !TREE_HAS_CONSTRUCTOR (NODE))
   4567 
   4568 /* True if NODE is a init-list used as a direct-initializer, i.e.
   4569    B b{1,2}, not B b({1,2}) or B b = {1,2}.  */
   4570 #define CONSTRUCTOR_IS_DIRECT_INIT(NODE) (TREE_LANG_FLAG_0 (CONSTRUCTOR_CHECK (NODE)))
   4571 
   4572 /* True if this CONSTRUCTOR is instantiation-dependent and needs to be
   4573    substituted.  */
   4574 #define CONSTRUCTOR_IS_DEPENDENT(NODE) \
   4575   (TREE_LANG_FLAG_1 (CONSTRUCTOR_CHECK (NODE)))
   4576 
   4577 /* True if this CONSTRUCTOR should not be used as a variable initializer
   4578    because it was loaded from a constexpr variable with mutable fields.  */
   4579 #define CONSTRUCTOR_MUTABLE_POISON(NODE) \
   4580   (TREE_LANG_FLAG_2 (CONSTRUCTOR_CHECK (NODE)))
   4581 
   4582 /* True if this typed CONSTRUCTOR represents C99 compound-literal syntax rather
   4583    than C++11 functional cast syntax.  */
   4584 #define CONSTRUCTOR_C99_COMPOUND_LITERAL(NODE) \
   4585   (TREE_LANG_FLAG_3 (CONSTRUCTOR_CHECK (NODE)))
   4586 
   4587 /* True if this CONSTRUCTOR contains PLACEHOLDER_EXPRs referencing the
   4588    CONSTRUCTOR's type not nested inside another CONSTRUCTOR marked with
   4589    CONSTRUCTOR_PLACEHOLDER_BOUNDARY.  */
   4590 #define CONSTRUCTOR_PLACEHOLDER_BOUNDARY(NODE) \
   4591   (TREE_LANG_FLAG_5 (CONSTRUCTOR_CHECK (NODE)))
   4592 
   4593 #define DIRECT_LIST_INIT_P(NODE) \
   4594    (BRACE_ENCLOSED_INITIALIZER_P (NODE) && CONSTRUCTOR_IS_DIRECT_INIT (NODE))
   4595 
   4596 /* True if this is a designated initializer (when we allow initializer-clauses
   4597    mixed with designated-initializer-clauses set whenever there is at least
   4598    one designated-initializer-clause), or a C99 designator.  */
   4599 #define CONSTRUCTOR_IS_DESIGNATED_INIT(NODE) \
   4600   (TREE_LANG_FLAG_6 (CONSTRUCTOR_CHECK (NODE)))
   4601 
   4602 /* True if this CONSTRUCTOR comes from a parenthesized list of values, e.g.
   4603    A(1, 2, 3).  */
   4604 #define CONSTRUCTOR_IS_PAREN_INIT(NODE) \
   4605   (CONSTRUCTOR_CHECK(NODE)->base.private_flag)
   4606 
   4607 /* True if reshape_init built this sub-CONSTRUCTOR to undo the brace elision
   4608    of the original CONSTRUCTOR.  This flag is used during C++20 aggregate
   4609    CTAD.  */
   4610 #define CONSTRUCTOR_BRACES_ELIDED_P(NODE) \
   4611   (CONSTRUCTOR_CHECK (NODE)->base.protected_flag)
   4612 
   4613 /* True if NODE represents a conversion for direct-initialization in a
   4614    template.  Set by perform_implicit_conversion_flags.  */
   4615 #define IMPLICIT_CONV_EXPR_DIRECT_INIT(NODE) \
   4616   (TREE_LANG_FLAG_0 (IMPLICIT_CONV_EXPR_CHECK (NODE)))
   4617 
   4618 /* True if NODE represents a dependent conversion of a non-type template
   4619    argument.  Set by maybe_convert_nontype_argument.  */
   4620 #define IMPLICIT_CONV_EXPR_NONTYPE_ARG(NODE) \
   4621   (TREE_LANG_FLAG_1 (IMPLICIT_CONV_EXPR_CHECK (NODE)))
   4622 
   4623 /* True if NODE represents a conversion for braced-init-list in a
   4624    template.  Set by perform_implicit_conversion_flags.  */
   4625 #define IMPLICIT_CONV_EXPR_BRACED_INIT(NODE) \
   4626   (TREE_LANG_FLAG_2 (IMPLICIT_CONV_EXPR_CHECK (NODE)))
   4627 
   4628 /* Nonzero means that an object of this type cannot be initialized using
   4629    an initializer list.  */
   4630 #define CLASSTYPE_NON_AGGREGATE(NODE) \
   4631   (LANG_TYPE_CLASS_CHECK (NODE)->non_aggregate)
   4632 #define TYPE_NON_AGGREGATE_CLASS(NODE) \
   4633   (CLASS_TYPE_P (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
   4634 
   4635 /* Nonzero if there is a non-trivial X::op=(cv X&) for this class.  */
   4636 #define TYPE_HAS_COMPLEX_COPY_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_copy_assign)
   4637 
   4638 /* Nonzero if there is a non-trivial X::X(cv X&) for this class.  */
   4639 #define TYPE_HAS_COMPLEX_COPY_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_copy_ctor)
   4640 
   4641 /* Nonzero if there is a non-trivial X::op=(X&&) for this class.  */
   4642 #define TYPE_HAS_COMPLEX_MOVE_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_move_assign)
   4643 
   4644 /* Nonzero if there is a non-trivial X::X(X&&) for this class.  */
   4645 #define TYPE_HAS_COMPLEX_MOVE_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_move_ctor)
   4646 
   4647 /* Nonzero if there is no trivial default constructor for this class.  */
   4648 #define TYPE_HAS_COMPLEX_DFLT(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_dflt)
   4649 
   4650 /* Nonzero if TYPE has a trivial destructor.  From [class.dtor]:
   4651 
   4652      A destructor is trivial if it is an implicitly declared
   4653      destructor and if:
   4654 
   4655        - all of the direct base classes of its class have trivial
   4656 	 destructors,
   4657 
   4658        - for all of the non-static data members of its class that are
   4659 	 of class type (or array thereof), each such class has a
   4660 	 trivial destructor.  */
   4661 #define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \
   4662   (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE))
   4663 
   4664 /* Nonzero for _TYPE node means that this type does not have a trivial
   4665    destructor.  Therefore, destroying an object of this type will
   4666    involve a call to a destructor.  This can apply to objects of
   4667    ARRAY_TYPE if the type of the elements needs a destructor.  */
   4668 #define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \
   4669   (TYPE_LANG_FLAG_4 (NODE))
   4670 
   4671 /* Nonzero for class type means that the default constructor is trivial.  */
   4672 #define TYPE_HAS_TRIVIAL_DFLT(NODE) \
   4673   (TYPE_HAS_DEFAULT_CONSTRUCTOR (NODE) && ! TYPE_HAS_COMPLEX_DFLT (NODE))
   4674 
   4675 /* Nonzero for class type means that copy initialization of this type can use
   4676    a bitwise copy.  */
   4677 #define TYPE_HAS_TRIVIAL_COPY_CTOR(NODE) \
   4678   (TYPE_HAS_COPY_CTOR (NODE) && ! TYPE_HAS_COMPLEX_COPY_CTOR (NODE))
   4679 
   4680 /* Nonzero for class type means that assignment of this type can use
   4681    a bitwise copy.  */
   4682 #define TYPE_HAS_TRIVIAL_COPY_ASSIGN(NODE) \
   4683   (TYPE_HAS_COPY_ASSIGN (NODE) && ! TYPE_HAS_COMPLEX_COPY_ASSIGN (NODE))
   4684 
   4685 /* Returns true if NODE is a pointer-to-data-member.  */
   4686 #define TYPE_PTRDATAMEM_P(NODE)			\
   4687   (TREE_CODE (NODE) == OFFSET_TYPE)
   4688 
   4689 /* Returns true if NODE is a pointer.  */
   4690 #define TYPE_PTR_P(NODE)			\
   4691   (TREE_CODE (NODE) == POINTER_TYPE)
   4692 
   4693 /* Returns true if NODE is a reference.  */
   4694 #define TYPE_REF_P(NODE)			\
   4695   (TREE_CODE (NODE) == REFERENCE_TYPE)
   4696 
   4697 /* Returns true if NODE is a pointer or a reference.  */
   4698 #define INDIRECT_TYPE_P(NODE)			\
   4699   (TYPE_PTR_P (NODE) || TYPE_REF_P (NODE))
   4700 
   4701 /* Returns true if NODE is an object type:
   4702 
   4703      [basic.types]
   4704 
   4705      An object type is a (possibly cv-qualified) type that is not a
   4706      function type, not a reference type, and not a void type.
   4707 
   4708    Keep these checks in ascending order, for speed.  */
   4709 #define TYPE_OBJ_P(NODE)			\
   4710   (!TYPE_REF_P (NODE)				\
   4711    && !VOID_TYPE_P (NODE)  		        \
   4712    && !FUNC_OR_METHOD_TYPE_P (NODE))
   4713 
   4714 /* Returns true if NODE is a pointer to an object.  Keep these checks
   4715    in ascending tree code order.  */
   4716 #define TYPE_PTROB_P(NODE)					\
   4717   (TYPE_PTR_P (NODE) && TYPE_OBJ_P (TREE_TYPE (NODE)))
   4718 
   4719 /* Returns true if NODE is a reference to an object.  Keep these checks
   4720    in ascending tree code order.  */
   4721 #define TYPE_REF_OBJ_P(NODE)					\
   4722   (TYPE_REF_P (NODE) && TYPE_OBJ_P (TREE_TYPE (NODE)))
   4723 
   4724 /* Returns true if NODE is a pointer to an object, or a pointer to
   4725    void.  Keep these checks in ascending tree code order.  */
   4726 #define TYPE_PTROBV_P(NODE)					\
   4727   (TYPE_PTR_P (NODE)						\
   4728    && !FUNC_OR_METHOD_TYPE_P (TREE_TYPE (NODE)))
   4729 
   4730 /* Returns true if NODE is a pointer to function type.  */
   4731 #define TYPE_PTRFN_P(NODE)				\
   4732   (TYPE_PTR_P (NODE)			                \
   4733    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
   4734 
   4735 /* Returns true if NODE is a reference to function type.  */
   4736 #define TYPE_REFFN_P(NODE)				\
   4737   (TYPE_REF_P (NODE)					\
   4738    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
   4739 
   4740 /* Returns true if NODE is a pointer to member function type.  */
   4741 #define TYPE_PTRMEMFUNC_P(NODE)		\
   4742   (TREE_CODE (NODE) == RECORD_TYPE	\
   4743    && TYPE_PTRMEMFUNC_FLAG (NODE))
   4744 
   4745 #define TYPE_PTRMEMFUNC_FLAG(NODE) \
   4746   (TYPE_LANG_FLAG_2 (RECORD_TYPE_CHECK (NODE)))
   4747 
   4748 /* Returns true if NODE is a pointer-to-member.  */
   4749 #define TYPE_PTRMEM_P(NODE) \
   4750   (TYPE_PTRDATAMEM_P (NODE) || TYPE_PTRMEMFUNC_P (NODE))
   4751 
   4752 /* Returns true if NODE is a pointer or a pointer-to-member.  */
   4753 #define TYPE_PTR_OR_PTRMEM_P(NODE) \
   4754   (TYPE_PTR_P (NODE) || TYPE_PTRMEM_P (NODE))
   4755 
   4756 /* Indicates when overload resolution may resolve to a pointer to
   4757    member function. [expr.unary.op]/3 */
   4758 #define PTRMEM_OK_P(NODE) \
   4759   TREE_LANG_FLAG_0 (TREE_CHECK3 ((NODE), ADDR_EXPR, OFFSET_REF, SCOPE_REF))
   4760 
   4761 /* Get the POINTER_TYPE to the METHOD_TYPE associated with this
   4762    pointer to member function.  TYPE_PTRMEMFUNC_P _must_ be true,
   4763    before using this macro.  */
   4764 #define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \
   4765   (cp_build_qualified_type (TREE_TYPE (TYPE_FIELDS (NODE)),\
   4766 			    cp_type_quals (NODE)))
   4767 
   4768 /* As above, but can be used in places that want an lvalue at the expense
   4769    of not necessarily having the correct cv-qualifiers.  */
   4770 #define TYPE_PTRMEMFUNC_FN_TYPE_RAW(NODE) \
   4771   (TREE_TYPE (TYPE_FIELDS (NODE)))
   4772 
   4773 /* Returns `A' for a type like `int (A::*)(double)' */
   4774 #define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \
   4775   TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
   4776 
   4777 /* The canonical internal RECORD_TYPE from the POINTER_TYPE to
   4778    METHOD_TYPE.  */
   4779 #define TYPE_PTRMEMFUNC_TYPE(NODE) \
   4780   TYPE_LANG_SLOT_1 (NODE)
   4781 
   4782 /* For a pointer-to-member type of the form `T X::*', this is `X'.
   4783    For a type like `void (X::*)() const', this type is `X', not `const
   4784    X'.  To get at the `const X' you have to look at the
   4785    TYPE_PTRMEM_POINTED_TO_TYPE; there, the first parameter will have
   4786    type `const X*'.  */
   4787 #define TYPE_PTRMEM_CLASS_TYPE(NODE)			\
   4788   (TYPE_PTRDATAMEM_P (NODE)					\
   4789    ? TYPE_OFFSET_BASETYPE (NODE)		\
   4790    : TYPE_PTRMEMFUNC_OBJECT_TYPE (NODE))
   4791 
   4792 /* For a pointer-to-member type of the form `T X::*', this is `T'.  */
   4793 #define TYPE_PTRMEM_POINTED_TO_TYPE(NODE)		\
   4794    (TYPE_PTRDATAMEM_P (NODE)				\
   4795     ? TREE_TYPE (NODE)					\
   4796     : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
   4797 
   4798 /* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for
   4799    `X'.  */
   4800 #define PTRMEM_CST_CLASS(NODE) \
   4801   TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE)))
   4802 
   4803 /* For a pointer-to-member constant `X::Y' this is the _DECL for
   4804    `Y'.  */
   4805 #define PTRMEM_CST_MEMBER(NODE) \
   4806   (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member)
   4807 
   4808 /* For a pointer-to-member constant `X::Y' this is a location where
   4809    the address of the member has been taken.  */
   4810 #define PTRMEM_CST_LOCATION(NODE) \
   4811   (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->locus)
   4812 
   4813 /* The expression in question for a TYPEOF_TYPE.  */
   4814 #define TYPEOF_TYPE_EXPR(NODE) (TYPE_VALUES_RAW (TYPEOF_TYPE_CHECK (NODE)))
   4815 
   4816 /* The type in question for an UNDERLYING_TYPE.  */
   4817 #define UNDERLYING_TYPE_TYPE(NODE) \
   4818   (TYPE_VALUES_RAW (UNDERLYING_TYPE_CHECK (NODE)))
   4819 
   4820 /* The type in question for BASES.  */
   4821 #define BASES_TYPE(NODE) \
   4822   (TYPE_VALUES_RAW (BASES_CHECK (NODE)))
   4823 
   4824 #define BASES_DIRECT(NODE) \
   4825   TREE_LANG_FLAG_0 (BASES_CHECK (NODE))
   4826 
   4827 /* The expression in question for a DECLTYPE_TYPE.  */
   4828 #define DECLTYPE_TYPE_EXPR(NODE) (TYPE_VALUES_RAW (DECLTYPE_TYPE_CHECK (NODE)))
   4829 
   4830 /* Whether the DECLTYPE_TYPE_EXPR of NODE was originally parsed as an
   4831    id-expression or a member-access expression. When false, it was
   4832    parsed as a full expression.  */
   4833 #define DECLTYPE_TYPE_ID_EXPR_OR_MEMBER_ACCESS_P(NODE) \
   4834   (DECLTYPE_TYPE_CHECK (NODE))->type_common.string_flag
   4835 
   4836 /* These flags indicate that we want different semantics from normal
   4837    decltype: lambda capture just drops references,
   4838    lambda proxies look through implicit dereference.  */
   4839 #define DECLTYPE_FOR_LAMBDA_CAPTURE(NODE) \
   4840   TREE_LANG_FLAG_0 (DECLTYPE_TYPE_CHECK (NODE))
   4841 #define DECLTYPE_FOR_LAMBDA_PROXY(NODE) \
   4842   TREE_LANG_FLAG_2 (DECLTYPE_TYPE_CHECK (NODE))
   4843 #define DECLTYPE_FOR_REF_CAPTURE(NODE) \
   4844   TREE_LANG_FLAG_3 (DECLTYPE_TYPE_CHECK (NODE))
   4845 
   4846 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
   4847    specified in its declaration.  This can also be set for an
   4848    erroneously declared PARM_DECL.  */
   4849 #define DECL_THIS_EXTERN(NODE) \
   4850   DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
   4851 
   4852 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
   4853    specified in its declaration.  This can also be set for an
   4854    erroneously declared PARM_DECL.  */
   4855 #define DECL_THIS_STATIC(NODE) \
   4856   DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
   4857 
   4858 /* Nonzero for FIELD_DECL node means that this field is a lambda capture
   4859    field for an array of runtime bound.  */
   4860 #define DECL_VLA_CAPTURE_P(NODE) \
   4861   DECL_LANG_FLAG_1 (FIELD_DECL_CHECK (NODE))
   4862 
   4863 /* Nonzero for PARM_DECL node means that this is an array function
   4864    parameter, i.e, a[] rather than *a.  */
   4865 #define DECL_ARRAY_PARAMETER_P(NODE) \
   4866   DECL_LANG_FLAG_1 (PARM_DECL_CHECK (NODE))
   4867 
   4868 /* Nonzero for a FIELD_DECL who's NSMDI is currently being
   4869    instantiated.  */
   4870 #define DECL_INSTANTIATING_NSDMI_P(NODE) \
   4871   DECL_LANG_FLAG_2 (FIELD_DECL_CHECK (NODE))
   4872 
   4873 /* Nonzero for FIELD_DECL node means that this field is a base class
   4874    of the parent object, as opposed to a member field.  */
   4875 #define DECL_FIELD_IS_BASE(NODE) \
   4876   DECL_LANG_FLAG_6 (FIELD_DECL_CHECK (NODE))
   4877 
   4878 /* Nonzero for FIELD_DECL node means that this field is a simple (no
   4879    explicit initializer) lambda capture field, making it invisible to
   4880    name lookup in unevaluated contexts.  */
   4881 #define DECL_NORMAL_CAPTURE_P(NODE) \
   4882   DECL_LANG_FLAG_7 (FIELD_DECL_CHECK (NODE))
   4883 
   4884 /* Nonzero if TYPE is an anonymous union or struct type.  We have to use a
   4885    flag for this because "A union for which objects or pointers are
   4886    declared is not an anonymous union" [class.union].  */
   4887 #define ANON_AGGR_TYPE_P(NODE)				\
   4888   (CLASS_TYPE_P (NODE) && LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr)
   4889 #define SET_ANON_AGGR_TYPE_P(NODE)			\
   4890   (LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr = 1)
   4891 
   4892 /* Nonzero if TYPE is an anonymous union type.  */
   4893 #define ANON_UNION_TYPE_P(NODE) \
   4894   (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE))
   4895 
   4896 /* For an ANON_AGGR_TYPE_P the single FIELD_DECL it is used with.  */
   4897 #define ANON_AGGR_TYPE_FIELD(NODE) \
   4898   (LANG_TYPE_CLASS_CHECK (NODE)->typeinfo_var)
   4899 
   4900 /* Define fields and accessors for nodes representing declared names.  */
   4901 
   4902 /* True if TYPE is an unnamed structured type with a typedef for
   4903    linkage purposes.  In that case TYPE_NAME and TYPE_STUB_DECL of the
   4904    MAIN-VARIANT are different. */
   4905 #define TYPE_WAS_UNNAMED(NODE)				\
   4906   (TYPE_NAME (TYPE_MAIN_VARIANT (NODE))			\
   4907    != TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
   4908 
   4909 /* C++: all of these are overloaded!  These apply only to TYPE_DECLs.  */
   4910 
   4911 /* The format of each node in the DECL_FRIENDLIST is as follows:
   4912 
   4913    The TREE_PURPOSE will be the name of a function, i.e., an
   4914    IDENTIFIER_NODE.  The TREE_VALUE will be itself a TREE_LIST, whose
   4915    TREE_VALUEs are friends with the given name.  */
   4916 #define DECL_FRIENDLIST(NODE)		(DECL_INITIAL (NODE))
   4917 #define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
   4918 #define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
   4919 
   4920 /* The DECL_ACCESS, if non-NULL, is a TREE_LIST.  The TREE_PURPOSE of
   4921    each node is a type; the TREE_VALUE is the access granted for this
   4922    DECL in that type.  The DECL_ACCESS is set by access declarations.
   4923    For example, if a member that would normally be public in a
   4924    derived class is made protected, then the derived class and the
   4925    protected_access_node will appear in the DECL_ACCESS for the node.  */
   4926 #define DECL_ACCESS(NODE) (LANG_DECL_MIN_CHECK (NODE)->access)
   4927 
   4928 /* Nonzero if the FUNCTION_DECL is a global constructor.  */
   4929 #define DECL_GLOBAL_CTOR_P(NODE) \
   4930   (LANG_DECL_FN_CHECK (NODE)->global_ctor_p)
   4931 
   4932 /* Nonzero if the FUNCTION_DECL is a global destructor.  */
   4933 #define DECL_GLOBAL_DTOR_P(NODE) \
   4934   (LANG_DECL_FN_CHECK (NODE)->global_dtor_p)
   4935 
   4936 /* Accessor macros for C++ template decl nodes.  */
   4937 
   4938 /* The DECL_TEMPLATE_PARMS are a list.  The TREE_PURPOSE of each node
   4939    is a INT_CST whose TREE_INT_CST_LOW indicates the level of the
   4940    template parameters, with 1 being the outermost set of template
   4941    parameters.  The TREE_VALUE is a vector, whose elements are the
   4942    template parameters at each level.  Each element in the vector is a
   4943    TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a
   4944    non-type parameter), or a TYPE_DECL (if the parameter is a type
   4945    parameter) or a TEMPLATE_DECL (if the parameter is a template
   4946    parameter).  The TREE_PURPOSE is the default value, if any.  The
   4947    TEMPLATE_PARM_INDEX for the parameter is available as the
   4948    DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a
   4949    TYPE_DECL).
   4950 
   4951    FIXME: CONST_CAST_TREE is a hack that hopefully will go away after
   4952    tree is converted to C++ class hiearchy.  */
   4953 #define DECL_TEMPLATE_PARMS(NODE)       \
   4954    ((struct tree_template_decl *)CONST_CAST_TREE (TEMPLATE_DECL_CHECK (NODE)))->arguments
   4955 #define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
   4956    INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
   4957 #define DECL_NTPARMS(NODE) \
   4958    TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
   4959 /* For function, method, class-data templates.
   4960 
   4961    FIXME: CONST_CAST_TREE is a hack that hopefully will go away after
   4962    tree is converted to C++ class hiearchy.  */
   4963 #define DECL_TEMPLATE_RESULT(NODE)      \
   4964    ((struct tree_template_decl *)CONST_CAST_TREE(TEMPLATE_DECL_CHECK (NODE)))->result
   4965 /* For a function template at namespace scope, DECL_TEMPLATE_INSTANTIATIONS
   4966    lists all instantiations and specializations of the function so that
   4967    tsubst_friend_function can reassign them to another template if we find
   4968    that the namespace-scope template is really a partial instantiation of a
   4969    friend template.
   4970 
   4971    For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds
   4972    all instantiations and specializations of the class type, including
   4973    partial instantiations and partial specializations, so that if we
   4974    explicitly specialize a partial instantiation we can walk the list
   4975    in maybe_process_partial_specialization and reassign them or complain
   4976    as appropriate.
   4977 
   4978    In both cases, the TREE_PURPOSE of each node contains the arguments
   4979    used; the TREE_VALUE contains the generated variable.  The template
   4980    arguments are always complete.  For example, given:
   4981 
   4982       template <class T> struct S1 {
   4983 	template <class U> struct S2 {};
   4984 	template <class U> struct S2<U*> {};
   4985       };
   4986 
   4987    the record for the partial specialization will contain, as its
   4988    argument list, { {T}, {U*} }, and will be on the
   4989    DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template
   4990    <class U> struct S1<T>::S2'.
   4991 
   4992    This list is not used for other templates.  */
   4993 #define DECL_TEMPLATE_INSTANTIATIONS(NODE) \
   4994   DECL_SIZE_UNIT (TEMPLATE_DECL_CHECK (NODE))
   4995 
   4996 /* For a class template, this list contains the partial
   4997    specializations of this template.  (Full specializations are not
   4998    recorded on this list.)  The TREE_PURPOSE holds the arguments used
   4999    in the partial specialization (e.g., for `template <class T> struct
   5000    S<T*, int>' this will be `T*, int'.)  The arguments will also include
   5001    any outer template arguments.  The TREE_VALUE holds the TEMPLATE_DECL
   5002    for the partial specialization.  The TREE_TYPE is the _TYPE node for
   5003    the partial specialization.
   5004 
   5005    This list is not used for other templates.  */
   5006 #define DECL_TEMPLATE_SPECIALIZATIONS(NODE)     \
   5007   DECL_SIZE (TEMPLATE_DECL_CHECK (NODE))
   5008 
   5009 /* Nonzero for a DECL which is actually a template parameter.  Keep
   5010    these checks in ascending tree code order.   */
   5011 #define DECL_TEMPLATE_PARM_P(NODE)		\
   5012   (DECL_LANG_FLAG_0 (NODE)			\
   5013    && (TREE_CODE (NODE) == CONST_DECL		\
   5014        || TREE_CODE (NODE) == PARM_DECL		\
   5015        || TREE_CODE (NODE) == TYPE_DECL		\
   5016        || TREE_CODE (NODE) == TEMPLATE_DECL))
   5017 
   5018 /* Nonzero for a raw template parameter node.  */
   5019 #define TEMPLATE_PARM_P(NODE)					\
   5020   (TREE_CODE (NODE) == TEMPLATE_TYPE_PARM			\
   5021    || TREE_CODE (NODE) == TEMPLATE_TEMPLATE_PARM		\
   5022    || TREE_CODE (NODE) == TEMPLATE_PARM_INDEX)
   5023 
   5024 /* Mark NODE as a template parameter.  */
   5025 #define SET_DECL_TEMPLATE_PARM_P(NODE) \
   5026   (DECL_LANG_FLAG_0 (NODE) = 1)
   5027 
   5028 /* Nonzero if NODE is a template template parameter.  */
   5029 #define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \
   5030   (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE))
   5031 
   5032 /* Nonzero for a DECL that represents a function template.  */
   5033 #define DECL_FUNCTION_TEMPLATE_P(NODE)                          \
   5034   (TREE_CODE (NODE) == TEMPLATE_DECL                            \
   5035    && DECL_TEMPLATE_RESULT (NODE) != NULL_TREE			\
   5036    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
   5037 
   5038 /* Nonzero for a DECL that represents a class template or alias
   5039    template.  */
   5040 #define DECL_TYPE_TEMPLATE_P(NODE)				\
   5041   (TREE_CODE (NODE) == TEMPLATE_DECL				\
   5042    && DECL_TEMPLATE_RESULT (NODE) != NULL_TREE			\
   5043    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL)
   5044 
   5045 /* Nonzero for a DECL that represents a class template.  */
   5046 #define DECL_CLASS_TEMPLATE_P(NODE)				\
   5047   (DECL_TYPE_TEMPLATE_P (NODE)					\
   5048    && DECL_IMPLICIT_TYPEDEF_P (DECL_TEMPLATE_RESULT (NODE)))
   5049 
   5050 /* Nonzero for a TEMPLATE_DECL that represents an alias template.  */
   5051 #define DECL_ALIAS_TEMPLATE_P(NODE)			\
   5052   (DECL_TYPE_TEMPLATE_P (NODE)				\
   5053    && !DECL_ARTIFICIAL (DECL_TEMPLATE_RESULT (NODE)))
   5054 
   5055 /* Nonzero for a NODE which declares a type.  */
   5056 #define DECL_DECLARES_TYPE_P(NODE) \
   5057   (TREE_CODE (NODE) == TYPE_DECL || DECL_TYPE_TEMPLATE_P (NODE))
   5058 
   5059 /* Nonzero if NODE declares a function.  */
   5060 #define DECL_DECLARES_FUNCTION_P(NODE) \
   5061   (TREE_CODE (NODE) == FUNCTION_DECL || DECL_FUNCTION_TEMPLATE_P (NODE))
   5062 
   5063 /* Nonzero if NODE is the typedef implicitly generated for a type when
   5064    the type is declared.  In C++, `struct S {};' is roughly
   5065    equivalent to `struct S {}; typedef struct S S;' in C.
   5066    DECL_IMPLICIT_TYPEDEF_P will hold for the typedef indicated in this
   5067    example.  In C++, there is a second implicit typedef for each
   5068    class, called the injected-class-name, in the scope of `S' itself, so that
   5069    you can say `S::S'.  DECL_SELF_REFERENCE_P will hold for that typedef.  */
   5070 #define DECL_IMPLICIT_TYPEDEF_P(NODE) \
   5071   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_2 (NODE))
   5072 #define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \
   5073   (DECL_LANG_FLAG_2 (NODE) = 1)
   5074 #define DECL_SELF_REFERENCE_P(NODE) \
   5075   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_4 (NODE))
   5076 #define SET_DECL_SELF_REFERENCE_P(NODE) \
   5077   (DECL_LANG_FLAG_4 (NODE) = 1)
   5078 
   5079 /* A `primary' template is one that has its own template header and is not
   5080    a partial specialization.  A member function of a class template is a
   5081    template, but not primary.  A member template is primary.  Friend
   5082    templates are primary, too.  */
   5083 
   5084 /* Returns the primary template corresponding to these parameters.  */
   5085 #define TPARMS_PRIMARY_TEMPLATE(NODE) (TREE_TYPE (NODE))
   5086 
   5087 #define DECL_PRIMARY_TEMPLATE(NODE) \
   5088   (TPARMS_PRIMARY_TEMPLATE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)))
   5089 
   5090 /* Returns nonzero if NODE is a primary template.  */
   5091 #define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == (NODE))
   5092 
   5093 /* Nonzero iff NODE is a specialization of a template.  The value
   5094    indicates the type of specializations:
   5095 
   5096      1=implicit instantiation
   5097 
   5098      2=partial or explicit specialization, e.g.:
   5099 
   5100         template <> int min<int> (int, int),
   5101 
   5102      3=explicit instantiation, e.g.:
   5103 
   5104         template int min<int> (int, int);
   5105 
   5106    Note that NODE will be marked as a specialization even if the
   5107    template it is instantiating is not a primary template.  For
   5108    example, given:
   5109 
   5110      template <typename T> struct O {
   5111        void f();
   5112        struct I {};
   5113      };
   5114 
   5115    both O<int>::f and O<int>::I will be marked as instantiations.
   5116 
   5117    If DECL_USE_TEMPLATE is nonzero, then DECL_TEMPLATE_INFO will also
   5118    be non-NULL.  */
   5119 #define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC (NODE)->u.base.use_template)
   5120 
   5121 /* Like DECL_USE_TEMPLATE, but for class types.  */
   5122 #define CLASSTYPE_USE_TEMPLATE(NODE) \
   5123   (LANG_TYPE_CLASS_CHECK (NODE)->use_template)
   5124 
   5125 /* True if NODE is a specialization of a primary template.  */
   5126 #define CLASSTYPE_SPECIALIZATION_OF_PRIMARY_TEMPLATE_P(NODE)	\
   5127   (CLASS_TYPE_P (NODE)						\
   5128    && CLASSTYPE_USE_TEMPLATE (NODE)				\
   5129    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
   5130 
   5131 #define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
   5132 #define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
   5133   (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
   5134 
   5135 #define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
   5136 #define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
   5137 
   5138 /* Returns true for an explicit or partial specialization of a class
   5139    template.  */
   5140 #define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
   5141   (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
   5142 #define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
   5143   (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
   5144 
   5145 #define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
   5146 #define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
   5147 #define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
   5148   (CLASSTYPE_USE_TEMPLATE (NODE) == 1)
   5149 #define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
   5150   (CLASSTYPE_USE_TEMPLATE (NODE) = 1)
   5151 
   5152 #define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
   5153 #define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
   5154 #define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
   5155   (CLASSTYPE_USE_TEMPLATE (NODE) == 3)
   5156 #define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
   5157   (CLASSTYPE_USE_TEMPLATE (NODE) = 3)
   5158 
   5159 /* Nonzero if DECL is a friend function which is an instantiation
   5160    from the point of view of the compiler, but not from the point of
   5161    view of the language.  For example given:
   5162       template <class T> struct S { friend void f(T) {}; };
   5163    the declaration of `void f(int)' generated when S<int> is
   5164    instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be
   5165    a DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION.  */
   5166 #define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \
   5167   (DECL_LANG_SPECIFIC (DECL) && DECL_TEMPLATE_INFO (DECL) \
   5168    && !DECL_USE_TEMPLATE (DECL))
   5169 
   5170 /* Nonzero if DECL is a function generated from a function 'temploid',
   5171    i.e. template, member of class template, or dependent friend.  */
   5172 #define DECL_TEMPLOID_INSTANTIATION(DECL)		\
   5173   (DECL_TEMPLATE_INSTANTIATION (DECL)			\
   5174    || DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION (DECL))
   5175 
   5176 /* Nonzero if DECL is either defined implicitly by the compiler or
   5177    generated from a temploid.  */
   5178 #define DECL_GENERATED_P(DECL) \
   5179   (DECL_TEMPLOID_INSTANTIATION (DECL) || DECL_DEFAULTED_FN (DECL))
   5180 
   5181 /* Nonzero iff we are currently processing a declaration for an
   5182    entity with its own template parameter list, and which is not a
   5183    full specialization.  */
   5184 #define PROCESSING_REAL_TEMPLATE_DECL_P() \
   5185   (!processing_template_parmlist \
   5186    && current_template_depth > template_class_depth (current_scope ()))
   5187 
   5188 /* Nonzero if this VAR_DECL or FUNCTION_DECL has already been
   5189    instantiated, i.e. its definition has been generated from the
   5190    pattern given in the template.  */
   5191 #define DECL_TEMPLATE_INSTANTIATED(NODE) \
   5192   DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE))
   5193 
   5194 /* We know what we're doing with this decl now.  */
   5195 #define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
   5196 
   5197 /* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
   5198    so that assemble_external will work properly.  So we have this flag to
   5199    tell us whether the decl is really not external.
   5200 
   5201    This flag does not indicate whether or not the decl is defined in the
   5202    current translation unit; it indicates whether or not we should emit the
   5203    decl at the end of compilation if it is defined and needed.  */
   5204 #define DECL_NOT_REALLY_EXTERN(NODE) \
   5205   (DECL_LANG_SPECIFIC (NODE)->u.base.not_really_extern)
   5206 
   5207 #define DECL_REALLY_EXTERN(NODE) \
   5208   (DECL_EXTERNAL (NODE)				\
   5209    && (!DECL_LANG_SPECIFIC (NODE) || !DECL_NOT_REALLY_EXTERN (NODE)))
   5210 
   5211 /* A thunk is a stub function.
   5212 
   5213    A thunk is an alternate entry point for an ordinary FUNCTION_DECL.
   5214    The address of the ordinary FUNCTION_DECL is given by the
   5215    DECL_INITIAL, which is always an ADDR_EXPR whose operand is a
   5216    FUNCTION_DECL.  The job of the thunk is to either adjust the this
   5217    pointer before transferring control to the FUNCTION_DECL, or call
   5218    FUNCTION_DECL and then adjust the result value. Note, the result
   5219    pointer adjusting thunk must perform a call to the thunked
   5220    function, (or be implemented via passing some invisible parameter
   5221    to the thunked function, which is modified to perform the
   5222    adjustment just before returning).
   5223 
   5224    A thunk may perform either, or both, of the following operations:
   5225 
   5226    o Adjust the this or result pointer by a constant offset.
   5227    o Adjust the this or result pointer by looking up a vcall or vbase offset
   5228      in the vtable.
   5229 
   5230    A this pointer adjusting thunk converts from a base to a derived
   5231    class, and hence adds the offsets. A result pointer adjusting thunk
   5232    converts from a derived class to a base, and hence subtracts the
   5233    offsets.  If both operations are performed, then the constant
   5234    adjustment is performed first for this pointer adjustment and last
   5235    for the result pointer adjustment.
   5236 
   5237    The constant adjustment is given by THUNK_FIXED_OFFSET.  If the
   5238    vcall or vbase offset is required, THUNK_VIRTUAL_OFFSET is
   5239    used. For this pointer adjusting thunks, it is the vcall offset
   5240    into the vtable.  For result pointer adjusting thunks it is the
   5241    binfo of the virtual base to convert to.  Use that binfo's vbase
   5242    offset.
   5243 
   5244    It is possible to have equivalent covariant thunks.  These are
   5245    distinct virtual covariant thunks whose vbase offsets happen to
   5246    have the same value.  THUNK_ALIAS is used to pick one as the
   5247    canonical thunk, which will get all the this pointer adjusting
   5248    thunks attached to it.  */
   5249 
   5250 /* An integer indicating how many bytes should be subtracted from the
   5251    this or result pointer when this function is called.  */
   5252 #define THUNK_FIXED_OFFSET(DECL) \
   5253   (DECL_LANG_SPECIFIC (THUNK_FUNCTION_CHECK (DECL))->u.fn.u5.fixed_offset)
   5254 
   5255 /* A tree indicating how to perform the virtual adjustment. For a this
   5256    adjusting thunk it is the number of bytes to be added to the vtable
   5257    to find the vcall offset. For a result adjusting thunk, it is the
   5258    binfo of the relevant virtual base.  If NULL, then there is no
   5259    virtual adjust.  (The vptr is always located at offset zero from
   5260    the this or result pointer.)  (If the covariant type is within the
   5261    class hierarchy being laid out, the vbase index is not yet known
   5262    at the point we need to create the thunks, hence the need to use
   5263    binfos.)  */
   5264 
   5265 #define THUNK_VIRTUAL_OFFSET(DECL) \
   5266   (LANG_DECL_MIN_CHECK (FUNCTION_DECL_CHECK (DECL))->access)
   5267 
   5268 /* A thunk which is equivalent to another thunk.  */
   5269 #define THUNK_ALIAS(DECL) \
   5270   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.min.template_info)
   5271 
   5272 /* For thunk NODE, this is the FUNCTION_DECL thunked to.  It is
   5273    possible for the target to be a thunk too.  */
   5274 #define THUNK_TARGET(NODE)				\
   5275   (LANG_DECL_FN_CHECK (NODE)->befriending_classes)
   5276 
   5277 /* True for a SCOPE_REF iff the "template" keyword was used to
   5278    indicate that the qualified name denotes a template.  */
   5279 #define QUALIFIED_NAME_IS_TEMPLATE(NODE) \
   5280   (TREE_LANG_FLAG_1 (SCOPE_REF_CHECK (NODE)))
   5281 
   5282 /* [coroutines]
   5283 */
   5284 
   5285 /* True if NODE is a co-routine FUNCTION_DECL.  */
   5286 #define DECL_COROUTINE_P(NODE) \
   5287   (LANG_DECL_FN_CHECK (DECL_COMMON_CHECK (NODE))->coroutine_p)
   5288 
   5289 /* For a FUNCTION_DECL of a coroutine, this holds the ACTOR helper function
   5290    decl.  */
   5291 #define DECL_ACTOR_FN(NODE) \
   5292   (coro_get_actor_function ((NODE)))
   5293 
   5294 /* For a FUNCTION_DECL of a coroutine, this holds the DESTROY helper function
   5295   decl.  */
   5296 #define DECL_DESTROY_FN(NODE) \
   5297   (coro_get_destroy_function ((NODE)))
   5298 
   5299 /* For a FUNCTION_DECL of a coroutine helper (ACTOR or DESTROY), this points
   5300    back to the original (ramp) function.  */
   5301 #define DECL_RAMP_FN(NODE) \
   5302   (coro_get_ramp_function (NODE))
   5303 
   5304 /* True for an OMP_ATOMIC that has dependent parameters.  These are stored
   5305    as an expr in operand 1, and integer_zero_node or clauses in operand 0.  */
   5306 #define OMP_ATOMIC_DEPENDENT_P(NODE) \
   5307   (TREE_CODE (TREE_OPERAND (OMP_ATOMIC_CHECK (NODE), 0)) == INTEGER_CST \
   5308    || TREE_CODE (TREE_OPERAND (OMP_ATOMIC_CHECK (NODE), 0)) == OMP_CLAUSE)
   5309 
   5310 /* Used while gimplifying continue statements bound to OMP_FOR nodes.  */
   5311 #define OMP_FOR_GIMPLIFYING_P(NODE) \
   5312   (TREE_LANG_FLAG_0 (OMP_LOOPING_CHECK (NODE)))
   5313 
   5314 /* A language-specific token attached to the OpenMP data clauses to
   5315    hold code (or code fragments) related to ctors, dtors, and op=.
   5316    See semantics.cc for details.  */
   5317 #define CP_OMP_CLAUSE_INFO(NODE) \
   5318   TREE_TYPE (OMP_CLAUSE_RANGE_CHECK (NODE, OMP_CLAUSE_PRIVATE, \
   5319 				     OMP_CLAUSE__CONDTEMP_))
   5320 
   5321 /* Nonzero if this transaction expression's body contains statements.  */
   5322 #define TRANSACTION_EXPR_IS_STMT(NODE) \
   5323    TREE_LANG_FLAG_0 (TRANSACTION_EXPR_CHECK (NODE))
   5324 
   5325 /* These macros provide convenient access to the various _STMT nodes
   5326    created when parsing template declarations.  */
   5327 #define TRY_STMTS(NODE)		TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0)
   5328 #define TRY_HANDLERS(NODE)	TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1)
   5329 
   5330 #define EH_SPEC_STMTS(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 0)
   5331 #define EH_SPEC_RAISES(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 1)
   5332 
   5333 #define USING_STMT_NAMESPACE(NODE) TREE_OPERAND (USING_STMT_CHECK (NODE), 0)
   5334 
   5335 /* Nonzero if this try block is a function try block.  */
   5336 #define FN_TRY_BLOCK_P(NODE)	TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE))
   5337 #define HANDLER_PARMS(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 0)
   5338 #define HANDLER_BODY(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 1)
   5339 #define HANDLER_TYPE(NODE)	TREE_TYPE (HANDLER_CHECK (NODE))
   5340 
   5341 /* CLEANUP_STMT accessors.  The statement(s) covered, the cleanup to run
   5342    and the VAR_DECL for which this cleanup exists.  */
   5343 #define CLEANUP_BODY(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0)
   5344 #define CLEANUP_EXPR(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1)
   5345 #define CLEANUP_DECL(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 2)
   5346 
   5347 /* IF_STMT accessors. These give access to the condition of the if
   5348    statement, the then block of the if statement, and the else block
   5349    of the if statement if it exists.  */
   5350 #define IF_COND(NODE)		TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
   5351 #define THEN_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
   5352 #define ELSE_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
   5353 #define IF_SCOPE(NODE)		TREE_OPERAND (IF_STMT_CHECK (NODE), 3)
   5354 #define IF_STMT_CONSTEXPR_P(NODE) TREE_LANG_FLAG_0 (IF_STMT_CHECK (NODE))
   5355 #define IF_STMT_CONSTEVAL_P(NODE) TREE_LANG_FLAG_2 (IF_STMT_CHECK (NODE))
   5356 
   5357 /* Like PACK_EXPANSION_EXTRA_ARGS, for constexpr if.  IF_SCOPE is used while
   5358    building an IF_STMT; IF_STMT_EXTRA_ARGS is used after it is complete.  */
   5359 #define IF_STMT_EXTRA_ARGS(NODE) IF_SCOPE (NODE)
   5360 
   5361 /* RANGE_FOR_STMT accessors. These give access to the declarator,
   5362    expression, body, and scope of the statement, respectively.  */
   5363 #define RANGE_FOR_DECL(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 0)
   5364 #define RANGE_FOR_EXPR(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 1)
   5365 #define RANGE_FOR_BODY(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 2)
   5366 #define RANGE_FOR_SCOPE(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 3)
   5367 #define RANGE_FOR_UNROLL(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 4)
   5368 #define RANGE_FOR_INIT_STMT(NODE) TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 5)
   5369 #define RANGE_FOR_IVDEP(NODE)	TREE_LANG_FLAG_6 (RANGE_FOR_STMT_CHECK (NODE))
   5370 
   5371 /* STMT_EXPR accessor.  */
   5372 #define STMT_EXPR_STMT(NODE)	TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
   5373 
   5374 /* EXPR_STMT accessor. This gives the expression associated with an
   5375    expression statement.  */
   5376 #define EXPR_STMT_EXPR(NODE)	TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
   5377 
   5378 /* True if this TARGET_EXPR was created by build_cplus_new, and so we can
   5379    discard it if it isn't useful.  */
   5380 #define TARGET_EXPR_IMPLICIT_P(NODE) \
   5381   TREE_LANG_FLAG_0 (TARGET_EXPR_CHECK (NODE))
   5382 
   5383 /* True if this TARGET_EXPR is the result of list-initialization of a
   5384    temporary.  */
   5385 #define TARGET_EXPR_LIST_INIT_P(NODE) \
   5386   TREE_LANG_FLAG_1 (TARGET_EXPR_CHECK (NODE))
   5387 
   5388 /* True if this TARGET_EXPR expresses direct-initialization of an object
   5389    to be named later.  */
   5390 #define TARGET_EXPR_DIRECT_INIT_P(NODE) \
   5391   TREE_LANG_FLAG_2 (TARGET_EXPR_CHECK (NODE))
   5392 
   5393 /* True if NODE is a TARGET_EXPR that just expresses a copy of its INITIAL; if
   5394    the initializer has void type, it's doing something more complicated.  */
   5395 #define SIMPLE_TARGET_EXPR_P(NODE)				\
   5396   (TREE_CODE (NODE) == TARGET_EXPR				\
   5397    && TARGET_EXPR_INITIAL (NODE)				\
   5398    && !VOID_TYPE_P (TREE_TYPE (TARGET_EXPR_INITIAL (NODE))))
   5399 
   5400 /* True if T is a TARGET_EXPR for which we'll need to replace_decl to use it as
   5401    an initializer.  */
   5402 inline bool
   5403 target_expr_needs_replace (tree t)
   5404 {
   5405   if (!t || TREE_CODE (t) != TARGET_EXPR)
   5406     return false;
   5407   tree init = TARGET_EXPR_INITIAL (t);
   5408   if (!init || !VOID_TYPE_P (TREE_TYPE (init)))
   5409     return false;
   5410   while (TREE_CODE (init) == COMPOUND_EXPR)
   5411     init = TREE_OPERAND (init, 1);
   5412   return TREE_CODE (init) != AGGR_INIT_EXPR;
   5413 }
   5414 
   5415 /* True if EXPR expresses direct-initialization of a TYPE.  */
   5416 #define DIRECT_INIT_EXPR_P(TYPE,EXPR)					\
   5417   (TREE_CODE (EXPR) == TARGET_EXPR && TREE_LANG_FLAG_2 (EXPR)		\
   5418    && same_type_ignoring_top_level_qualifiers_p (TYPE, TREE_TYPE (EXPR)))
   5419 
   5420 /* True if this CONVERT_EXPR is for a conversion to virtual base in
   5421    an NSDMI, and should be re-evaluated when used in a constructor.  */
   5422 #define CONVERT_EXPR_VBASE_PATH(NODE) \
   5423   TREE_LANG_FLAG_0 (CONVERT_EXPR_CHECK (NODE))
   5424 
   5425 /* True if SIZEOF_EXPR argument is type.  */
   5426 #define SIZEOF_EXPR_TYPE_P(NODE) \
   5427   TREE_LANG_FLAG_0 (SIZEOF_EXPR_CHECK (NODE))
   5428 
   5429 /* True if the ALIGNOF_EXPR was spelled "alignof".  */
   5430 #define ALIGNOF_EXPR_STD_P(NODE) \
   5431   TREE_LANG_FLAG_0 (ALIGNOF_EXPR_CHECK (NODE))
   5432 
   5433 /* OMP_DEPOBJ accessors. These give access to the depobj expression of the
   5434    #pragma omp depobj directive and the clauses, respectively.  If
   5435    OMP_DEPOBJ_CLAUSES is INTEGER_CST, it is instead the update clause kind
   5436    or OMP_CLAUSE_DEPEND_LAST for destroy clause.  */
   5437 #define OMP_DEPOBJ_DEPOBJ(NODE)	 TREE_OPERAND (OMP_DEPOBJ_CHECK (NODE), 0)
   5438 #define OMP_DEPOBJ_CLAUSES(NODE) TREE_OPERAND (OMP_DEPOBJ_CHECK (NODE), 1)
   5439 
   5440 /* An enumeration of the kind of tags that C++ accepts.  */
   5441 enum tag_types {
   5442   none_type = 0, /* Not a tag type.  */
   5443   record_type,   /* "struct" types.  */
   5444   class_type,    /* "class" types.  */
   5445   union_type,    /* "union" types.  */
   5446   enum_type,     /* "enum" types.  */
   5447   typename_type, /* "typename" types.  */
   5448   scope_type	 /* namespace or tagged type name followed by :: */
   5449 };
   5450 
   5451 /* The various kinds of lvalues we distinguish.  */
   5452 enum cp_lvalue_kind_flags {
   5453   clk_none = 0,     /* Things that are not an lvalue.  */
   5454   clk_ordinary = 1, /* An ordinary lvalue.  */
   5455   clk_rvalueref = 2,/* An xvalue (rvalue formed using an rvalue reference) */
   5456   clk_class = 4,    /* A prvalue of class or array type.  */
   5457   clk_bitfield = 8, /* An lvalue for a bit-field.  */
   5458   clk_packed = 16,  /* An lvalue for a packed field.  */
   5459   clk_implicit_rval = 1<<5 /* An lvalue being treated as an xvalue.  */
   5460 };
   5461 
   5462 /* This type is used for parameters and variables which hold
   5463    combinations of the flags in enum cp_lvalue_kind_flags.  */
   5464 typedef int cp_lvalue_kind;
   5465 
   5466 /* Various kinds of template specialization, instantiation, etc.  */
   5467 enum tmpl_spec_kind {
   5468   tsk_none,		   /* Not a template at all.  */
   5469   tsk_invalid_member_spec, /* An explicit member template
   5470 			      specialization, but the enclosing
   5471 			      classes have not all been explicitly
   5472 			      specialized.  */
   5473   tsk_invalid_expl_inst,   /* An explicit instantiation containing
   5474 			      template parameter lists.  */
   5475   tsk_excessive_parms,	   /* A template declaration with too many
   5476 			      template parameter lists.  */
   5477   tsk_insufficient_parms,  /* A template declaration with too few
   5478 			      parameter lists.  */
   5479   tsk_template,		   /* A template declaration.  */
   5480   tsk_expl_spec,	   /* An explicit specialization.  */
   5481   tsk_expl_inst		   /* An explicit instantiation.  */
   5482 };
   5483 
   5484 /* The various kinds of access.  BINFO_ACCESS depends on these being
   5485    two bit quantities.  The numerical values are important; they are
   5486    used to initialize RTTI data structures, so changing them changes
   5487    the ABI.  */
   5488 enum access_kind {
   5489   ak_none = 0,		   /* Inaccessible.  */
   5490   ak_public = 1,	   /* Accessible, as a `public' thing.  */
   5491   ak_protected = 2,	   /* Accessible, as a `protected' thing.  */
   5492   ak_private = 3	   /* Accessible, as a `private' thing.  */
   5493 };
   5494 
   5495 /* The various kinds of special functions.  If you add to this list,
   5496    you should update special_function_p as well.  */
   5497 enum special_function_kind {
   5498   sfk_none = 0,		   /* Not a special function.  This enumeral
   5499 			      must have value zero; see
   5500 			      special_function_p.  */
   5501   /* The following are ordered, for use by member synthesis fns.  */
   5502   sfk_destructor,	   /* A destructor.  */
   5503   sfk_constructor,	   /* A constructor.  */
   5504   sfk_inheriting_constructor, /* An inheriting constructor */
   5505   sfk_copy_constructor,    /* A copy constructor.  */
   5506   sfk_move_constructor,    /* A move constructor.  */
   5507   sfk_copy_assignment,     /* A copy assignment operator.  */
   5508   sfk_move_assignment,     /* A move assignment operator.  */
   5509   /* The following are unordered.  */
   5510   sfk_complete_destructor, /* A destructor for complete objects.  */
   5511   sfk_base_destructor,     /* A destructor for base subobjects.  */
   5512   sfk_deleting_destructor, /* A destructor for complete objects that
   5513 			      deletes the object after it has been
   5514 			      destroyed.  */
   5515   sfk_conversion,	   /* A conversion operator.  */
   5516   sfk_deduction_guide,	   /* A class template deduction guide.  */
   5517   sfk_comparison,	   /* A comparison operator (e.g. ==, <, <=>).  */
   5518   sfk_virtual_destructor   /* Used by member synthesis fns.  */
   5519 };
   5520 
   5521 /* The various kinds of linkage.  From [basic.link],
   5522 
   5523       A name is said to have linkage when it might denote the same
   5524       object, reference, function, type, template, namespace or value
   5525       as a name introduced in another scope:
   5526 
   5527       -- When a name has external linkage, the entity it denotes can
   5528 	 be referred to from scopes of other translation units or from
   5529 	 other scopes of the same translation unit.
   5530 
   5531       -- When a name has internal linkage, the entity it denotes can
   5532 	 be referred to by names from other scopes in the same
   5533 	 translation unit.
   5534 
   5535       -- When a name has no linkage, the entity it denotes cannot be
   5536 	 referred to by names from other scopes.  */
   5537 
   5538 enum linkage_kind {
   5539   lk_none,			/* No linkage.  */
   5540   lk_internal,			/* Internal linkage.  */
   5541   lk_external			/* External linkage.  */
   5542 };
   5543 
   5544 enum duration_kind {
   5545   dk_static,
   5546   dk_thread,
   5547   dk_auto,
   5548   dk_dynamic
   5549 };
   5550 
   5551 /* Bitmask flags to control type substitution.  */
   5552 enum tsubst_flags {
   5553   tf_none = 0,			 /* nothing special */
   5554   tf_error = 1 << 0,		 /* give error messages  */
   5555   tf_warning = 1 << 1,	 	 /* give warnings too  */
   5556   tf_ignore_bad_quals = 1 << 2,	 /* ignore bad cvr qualifiers */
   5557   tf_keep_type_decl = 1 << 3,	 /* retain typedef type decls
   5558 				    (make_typename_type use) */
   5559   tf_ptrmem_ok = 1 << 4,	 /* pointers to member ok (internal
   5560 				    instantiate_type use) */
   5561   tf_user = 1 << 5,		 /* found template must be a user template
   5562 				    (lookup_template_class use) */
   5563   tf_conv = 1 << 6,		 /* We are determining what kind of
   5564 				    conversion might be permissible,
   5565 				    not actually performing the
   5566 				    conversion.  */
   5567   tf_decltype = 1 << 7,          /* We are the operand of decltype.
   5568 				    Used to implement the special rules
   5569 				    for calls in decltype (5.2.2/11).  */
   5570   tf_partial = 1 << 8,		 /* Doing initial explicit argument
   5571 				    substitution in fn_type_unification.  */
   5572   tf_fndecl_type = 1 << 9,   /* Substituting the type of a function
   5573 				declaration.  */
   5574   tf_no_cleanup = 1 << 10,   /* Do not build a cleanup
   5575 				(build_target_expr and friends) */
   5576   tf_norm = 1 << 11,		 /* Build diagnostic information during
   5577 				    constraint normalization.  */
   5578   tf_tst_ok = 1 << 12,		 /* Allow a typename-specifier to name
   5579 				    a template (C++17 or later).  */
   5580   tf_dguide = 1 << 13,		/* Building a deduction guide from a ctor.  */
   5581   /* Convenient substitution flags combinations.  */
   5582   tf_warning_or_error = tf_warning | tf_error
   5583 };
   5584 
   5585 /* This type is used for parameters and variables which hold
   5586    combinations of the flags in enum tsubst_flags.  */
   5587 typedef int tsubst_flags_t;
   5588 
   5589 /* The kind of checking we can do looking in a class hierarchy.  */
   5590 enum base_access_flags {
   5591   ba_any = 0,  /* Do not check access, allow an ambiguous base,
   5592 		      prefer a non-virtual base */
   5593   ba_unique = 1 << 0,  /* Must be a unique base.  */
   5594   ba_check_bit = 1 << 1,   /* Check access.  */
   5595   ba_check = ba_unique | ba_check_bit,
   5596   ba_ignore_scope = 1 << 2 /* Ignore access allowed by local scope.  */
   5597 };
   5598 
   5599 /* This type is used for parameters and variables which hold
   5600    combinations of the flags in enum base_access_flags.  */
   5601 typedef int base_access;
   5602 
   5603 /* The various kinds of access check during parsing.  */
   5604 enum deferring_kind {
   5605   dk_no_deferred = 0, /* Check access immediately */
   5606   dk_deferred = 1,    /* Deferred check */
   5607   dk_no_check = 2     /* No access check */
   5608 };
   5609 
   5610 /* The kind of base we can find, looking in a class hierarchy.
   5611    Values <0 indicate we failed.  */
   5612 enum base_kind {
   5613   bk_inaccessible = -3,   /* The base is inaccessible */
   5614   bk_ambig = -2,	  /* The base is ambiguous */
   5615   bk_not_base = -1,	  /* It is not a base */
   5616   bk_same_type = 0,	  /* It is the same type */
   5617   bk_proper_base = 1,	  /* It is a proper base */
   5618   bk_via_virtual = 2	  /* It is a proper base, but via a virtual
   5619 			     path. This might not be the canonical
   5620 			     binfo.  */
   5621 };
   5622 
   5623 /* Node for "pointer to (virtual) function".
   5624    This may be distinct from ptr_type_node so gdb can distinguish them.  */
   5625 #define vfunc_ptr_type_node  vtable_entry_type
   5626 
   5627 
   5628 /* For building calls to `delete'.  */
   5629 extern GTY(()) tree integer_two_node;
   5630 
   5631 /* The number of function bodies which we are currently processing.
   5632    (Zero if we are at namespace scope, one inside the body of a
   5633    function, two inside the body of a function in a local class, etc.)  */
   5634 extern int function_depth;
   5635 
   5636 /* Nonzero if we are inside spec_hasher::equal, which affects
   5637    comparison of PARM_DECLs in cp_tree_equal.  */
   5638 extern int comparing_specializations;
   5639 
   5640 /* Nonzero if we want different dependent aliases to compare as unequal.
   5641    FIXME we should always do this except during deduction/ordering.  */
   5642 extern int comparing_dependent_aliases;
   5643 
   5644 /* In parser.cc.  */
   5645 
   5646 /* Nonzero if we are parsing an unevaluated operand: an operand to
   5647    sizeof, typeof, or alignof.  This is a count since operands to
   5648    sizeof can be nested.  */
   5649 
   5650 extern int cp_unevaluated_operand;
   5651 
   5652 /* RAII class used to inhibit the evaluation of operands during parsing
   5653    and template instantiation. Evaluation warnings are also inhibited. */
   5654 
   5655 class cp_unevaluated
   5656 {
   5657 public:
   5658   cp_unevaluated ();
   5659   ~cp_unevaluated ();
   5660 };
   5661 
   5662 /* The reverse: an RAII class used for nested contexts that are evaluated even
   5663    if the enclosing context is not.  */
   5664 
   5665 class cp_evaluated
   5666 {
   5667 public:
   5668   int uneval;
   5669   int inhibit;
   5670   cp_evaluated (bool reset = true)
   5671     : uneval(cp_unevaluated_operand), inhibit(c_inhibit_evaluation_warnings)
   5672   { if (reset)
   5673       cp_unevaluated_operand = c_inhibit_evaluation_warnings = 0; }
   5674   ~cp_evaluated ()
   5675   { cp_unevaluated_operand = uneval;
   5676     c_inhibit_evaluation_warnings = inhibit; }
   5677 };
   5678 
   5679 /* in pt.cc  */
   5680 
   5681 /* These values are used for the `STRICT' parameter to type_unification and
   5682    fn_type_unification.  Their meanings are described with the
   5683    documentation for fn_type_unification.  */
   5684 
   5685 enum unification_kind_t {
   5686   DEDUCE_CALL,
   5687   DEDUCE_CONV,
   5688   DEDUCE_EXACT
   5689 };
   5690 
   5691 // An RAII class used to create a new pointer map for local
   5692 // specializations. When the stack goes out of scope, the
   5693 // previous pointer map is restored.
   5694 enum lss_policy { lss_blank, lss_copy, lss_nop };
   5695 class local_specialization_stack
   5696 {
   5697 public:
   5698   local_specialization_stack (lss_policy = lss_blank);
   5699   ~local_specialization_stack ();
   5700 
   5701   hash_map<tree, tree> *saved;
   5702 };
   5703 
   5704 /* Entry in the specialization hash table.  */
   5705 struct GTY((for_user)) spec_entry
   5706 {
   5707   tree tmpl;  /* The general template this is a specialization of.  */
   5708   tree args;  /* The args for this (maybe-partial) specialization.  */
   5709   tree spec;  /* The specialization itself.  */
   5710 };
   5711 
   5712 /* in class.cc */
   5713 
   5714 extern int current_class_depth;
   5715 
   5716 /* in decl.cc */
   5717 
   5718 /* An array of static vars & fns.  */
   5719 extern GTY(()) vec<tree, va_gc> *static_decls;
   5720 
   5721 /* An array of vtable-needing types that have no key function, or have
   5722    an emitted key function.  */
   5723 extern GTY(()) vec<tree, va_gc> *keyed_classes;
   5724 
   5725 /* Here's where we control how name mangling takes place.  */
   5727 
   5728 /* Cannot use '$' up front, because this confuses gdb
   5729    (names beginning with '$' are gdb-local identifiers).
   5730 
   5731    Note that all forms in which the '$' is significant are long enough
   5732    for direct indexing (meaning that if we know there is a '$'
   5733    at a particular location, we can index into the string at
   5734    any other location that provides distinguishing characters).  */
   5735 
   5736 /* Define NO_DOT_IN_LABEL in your favorite tm file if your assembler
   5737    doesn't allow '.' in symbol names.  */
   5738 #ifndef NO_DOT_IN_LABEL
   5739 
   5740 #define JOINER '.'
   5741 #define JOIN_STR "."
   5742 
   5743 #define AUTO_TEMP_NAME "_.tmp_"
   5744 #define VFIELD_BASE ".vf"
   5745 #define VFIELD_NAME "_vptr."
   5746 #define VFIELD_NAME_FORMAT "_vptr.%s"
   5747 
   5748 #else /* NO_DOT_IN_LABEL */
   5749 
   5750 #ifndef NO_DOLLAR_IN_LABEL
   5751 
   5752 #define JOINER '$'
   5753 #define JOIN_STR "$"
   5754 
   5755 #define AUTO_TEMP_NAME "_$tmp_"
   5756 #define VFIELD_BASE "$vf"
   5757 #define VFIELD_NAME "_vptr$"
   5758 #define VFIELD_NAME_FORMAT "_vptr$%s"
   5759 
   5760 #else /* NO_DOLLAR_IN_LABEL */
   5761 
   5762 #define JOIN_STR "_"
   5763 
   5764 #define VTABLE_NAME "__vt_"
   5765 #define VTABLE_NAME_P(ID_NODE) \
   5766   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
   5767 	     sizeof (VTABLE_NAME) - 1))
   5768 #define VFIELD_BASE "__vfb"
   5769 #define VFIELD_NAME "__vptr_"
   5770 #define VFIELD_NAME_P(ID_NODE) \
   5771   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
   5772 	    sizeof (VFIELD_NAME) - 1))
   5773 #define VFIELD_NAME_FORMAT "__vptr_%s"
   5774 
   5775 #endif	/* NO_DOLLAR_IN_LABEL */
   5776 #endif	/* NO_DOT_IN_LABEL */
   5777 
   5778 #define UDLIT_OP_ANSI_PREFIX "operator\"\""
   5779 #define UDLIT_OP_ANSI_FORMAT UDLIT_OP_ANSI_PREFIX "%s"
   5780 #define UDLIT_OP_MANGLED_PREFIX "li"
   5781 #define UDLIT_OP_MANGLED_FORMAT UDLIT_OP_MANGLED_PREFIX "%s"
   5782 #define UDLIT_OPER_P(ID_NODE) \
   5783   (!strncmp (IDENTIFIER_POINTER (ID_NODE), \
   5784              UDLIT_OP_ANSI_PREFIX, \
   5785 	     sizeof (UDLIT_OP_ANSI_PREFIX) - 1))
   5786 #define UDLIT_OP_SUFFIX(ID_NODE) \
   5787   (IDENTIFIER_POINTER (ID_NODE) + sizeof (UDLIT_OP_ANSI_PREFIX) - 1)
   5788 
   5789 #if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
   5790 
   5791 #define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
   5792   && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
   5793   && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
   5794 
   5795 #define VFIELD_NAME_P(ID_NODE) \
   5796   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
   5797 
   5798 #endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
   5799 
   5800 
   5801 /* Nonzero if we're done parsing and into end-of-file activities.
   5803    Two if we're done with front-end processing.  */
   5804 
   5805 extern int at_eof;
   5806 
   5807 /* True if note_mangling_alias should enqueue mangling aliases for
   5808    later generation, rather than emitting them right away.  */
   5809 
   5810 extern bool defer_mangling_aliases;
   5811 
   5812 /* True if noexcept is part of the type (i.e. in C++17).  */
   5813 
   5814 extern bool flag_noexcept_type;
   5815 
   5816 /* A list of namespace-scope objects which have constructors or
   5817    destructors which reside in the global scope.  The decl is stored
   5818    in the TREE_VALUE slot and the initializer is stored in the
   5819    TREE_PURPOSE slot.  */
   5820 extern GTY(()) tree static_aggregates;
   5821 /* Likewise, for thread local storage.  */
   5822 extern GTY(()) tree tls_aggregates;
   5823 
   5824 /* A hash-map mapping from variable decls to the dynamic initializer for
   5825    the decl.  This is currently only used by OpenMP.  */
   5826 extern GTY(()) decl_tree_map *dynamic_initializers;
   5827 
   5828 enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, TYPENAME_FLAG };
   5829 
   5830 /* These are uses as bits in flags passed to various functions to
   5831    control their behavior.  Despite the LOOKUP_ prefix, many of these
   5832    do not control name lookup.  ??? Functions using these flags should
   5833    probably be modified to accept explicit boolean flags for the
   5834    behaviors relevant to them.  */
   5835 /* Check for access violations.  */
   5836 #define LOOKUP_PROTECT (1 << 0)
   5837 #define LOOKUP_NORMAL (LOOKUP_PROTECT)
   5838 /* Even if the function found by lookup is a virtual function, it
   5839    should be called directly.  */
   5840 #define LOOKUP_NONVIRTUAL (1 << 1)
   5841 /* Non-converting (i.e., "explicit") constructors are not tried.  This flag
   5842    indicates that we are not performing direct-initialization.  */
   5843 #define LOOKUP_ONLYCONVERTING (1 << 2)
   5844 #define LOOKUP_IMPLICIT (LOOKUP_NORMAL | LOOKUP_ONLYCONVERTING)
   5845 /* If a temporary is created, it should be created so that it lives
   5846    as long as the current variable bindings; otherwise it only lives
   5847    until the end of the complete-expression.  It also forces
   5848    direct-initialization in cases where other parts of the compiler
   5849    have already generated a temporary, such as reference
   5850    initialization and the catch parameter.  */
   5851 #define DIRECT_BIND (1 << 3)
   5852 /* We're performing a user-defined conversion, so more user-defined
   5853    conversions are not permitted (only built-in conversions).  */
   5854 #define LOOKUP_NO_CONVERSION (1 << 4)
   5855 /* The user has explicitly called a destructor.  (Therefore, we do
   5856    not need to check that the object is non-NULL before calling the
   5857    destructor.)  */
   5858 #define LOOKUP_DESTRUCTOR (1 << 5)
   5859 /* Do not permit references to bind to temporaries.  */
   5860 #define LOOKUP_NO_TEMP_BIND (1 << 6)
   5861 /* We're trying to treat an lvalue as an rvalue.  */
   5862 /* FIXME remove when we extend the P1825 semantics to all standard modes, the
   5863    C++20 approach uses IMPLICIT_RVALUE_P instead.  */
   5864 #define LOOKUP_PREFER_RVALUE (LOOKUP_NO_TEMP_BIND << 1)
   5865 /* We're inside an init-list, so narrowing conversions are ill-formed.  */
   5866 #define LOOKUP_NO_NARROWING (LOOKUP_PREFER_RVALUE << 1)
   5867 /* We're looking up a constructor for list-initialization.  */
   5868 #define LOOKUP_LIST_INIT_CTOR (LOOKUP_NO_NARROWING << 1)
   5869 /* This is the first parameter of a copy constructor.  */
   5870 #define LOOKUP_COPY_PARM (LOOKUP_LIST_INIT_CTOR << 1)
   5871 /* We only want to consider list constructors.  */
   5872 #define LOOKUP_LIST_ONLY (LOOKUP_COPY_PARM << 1)
   5873 /* Return after determining which function to call and checking access.
   5874    Used by sythesized_method_walk to determine which functions will
   5875    be called to initialize subobjects, in order to determine exception
   5876    specification and possible implicit delete.
   5877    This is kind of a hack, but exiting early avoids problems with trying
   5878    to perform argument conversions when the class isn't complete yet.  */
   5879 #define LOOKUP_SPECULATIVE (LOOKUP_LIST_ONLY << 1)
   5880 /* Used by calls from defaulted functions to limit the overload set to avoid
   5881    cycles trying to declare them (core issue 1092).  */
   5882 #define LOOKUP_DEFAULTED (LOOKUP_SPECULATIVE << 1)
   5883 /* Used in calls to store_init_value to suppress its usual call to
   5884    digest_init.  */
   5885 #define LOOKUP_ALREADY_DIGESTED (LOOKUP_DEFAULTED << 1)
   5886 /* Like LOOKUP_NO_TEMP_BIND, but also prevent binding to xvalues.  */
   5887 #define LOOKUP_NO_RVAL_BIND (LOOKUP_ALREADY_DIGESTED << 1)
   5888 /* Used by case_conversion to disregard non-integral conversions.  */
   5889 #define LOOKUP_NO_NON_INTEGRAL (LOOKUP_NO_RVAL_BIND << 1)
   5890 /* Used for delegating constructors in order to diagnose self-delegation.  */
   5891 #define LOOKUP_DELEGATING_CONS (LOOKUP_NO_NON_INTEGRAL << 1)
   5892 /* Allow initialization of a flexible array members.  */
   5893 #define LOOKUP_ALLOW_FLEXARRAY_INIT (LOOKUP_DELEGATING_CONS << 1)
   5894 /* We're looking for either a rewritten comparison operator candidate or the
   5895    operator to use on the former's result.  We distinguish between the two by
   5896    knowing that comparisons other than == and <=> must be the latter, as must
   5897    a <=> expression trying to rewrite to <=> without reversing.  */
   5898 #define LOOKUP_REWRITTEN (LOOKUP_ALLOW_FLEXARRAY_INIT << 1)
   5899 /* Reverse the order of the two arguments for comparison rewriting.  First we
   5900    swap the arguments in add_operator_candidates, then we swap the conversions
   5901    in add_candidate (so that they correspond to the original order of the
   5902    args), then we swap the conversions back in build_new_op_1 (so they
   5903    correspond to the order of the args in the candidate).  */
   5904 #define LOOKUP_REVERSED (LOOKUP_REWRITTEN << 1)
   5905 /* We're initializing an aggregate from a parenthesized list of values.  */
   5906 #define LOOKUP_AGGREGATE_PAREN_INIT (LOOKUP_REVERSED << 1)
   5907 
   5908 /* These flags are used by the conversion code.
   5909    CONV_IMPLICIT   :  Perform implicit conversions (standard and user-defined).
   5910    CONV_STATIC     :  Perform the explicit conversions for static_cast.
   5911    CONV_CONST      :  Perform the explicit conversions for const_cast.
   5912    CONV_REINTERPRET:  Perform the explicit conversions for reinterpret_cast.
   5913    CONV_PRIVATE    :  Perform upcasts to private bases.
   5914    CONV_FORCE_TEMP :  Require a new temporary when converting to the same
   5915 		      aggregate type.  */
   5916 
   5917 #define CONV_IMPLICIT    1
   5918 #define CONV_STATIC      2
   5919 #define CONV_CONST       4
   5920 #define CONV_REINTERPRET 8
   5921 #define CONV_PRIVATE	 16
   5922 #define CONV_FORCE_TEMP  32
   5923 #define CONV_FOLD	 64
   5924 #define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
   5925 			  | CONV_REINTERPRET)
   5926 #define CONV_C_CAST      (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
   5927 			  | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
   5928 #define CONV_BACKEND_CONVERT (CONV_OLD_CONVERT | CONV_FOLD)
   5929 
   5930 /* Used by build_expr_type_conversion to indicate which types are
   5931    acceptable as arguments to the expression under consideration.  */
   5932 
   5933 #define WANT_INT	1 /* integer types, including bool */
   5934 #define WANT_FLOAT	2 /* floating point types */
   5935 #define WANT_ENUM	4 /* enumerated types */
   5936 #define WANT_POINTER	8 /* pointer types */
   5937 #define WANT_NULL      16 /* null pointer constant */
   5938 #define WANT_VECTOR_OR_COMPLEX 32 /* vector or complex types */
   5939 #define WANT_ARITH	(WANT_INT | WANT_FLOAT | WANT_VECTOR_OR_COMPLEX)
   5940 
   5941 /* Used with comptypes, and related functions, to guide type
   5942    comparison.  */
   5943 
   5944 #define COMPARE_STRICT	      0 /* Just check if the types are the
   5945 				   same.  */
   5946 #define COMPARE_BASE	      1 /* Check to see if the second type is
   5947 				   derived from the first.  */
   5948 #define COMPARE_DERIVED	      2 /* Like COMPARE_BASE, but in
   5949 				   reverse.  */
   5950 #define COMPARE_REDECLARATION 4 /* The comparison is being done when
   5951 				   another declaration of an existing
   5952 				   entity is seen.  */
   5953 #define COMPARE_STRUCTURAL    8 /* The comparison is intended to be
   5954 				   structural. The actual comparison
   5955 				   will be identical to
   5956 				   COMPARE_STRICT.  */
   5957 
   5958 /* Used with start function.  */
   5959 #define SF_DEFAULT	     0  /* No flags.  */
   5960 #define SF_PRE_PARSED	     1  /* The function declaration has
   5961 				   already been parsed.  */
   5962 #define SF_INCLASS_INLINE    2  /* The function is an inline, defined
   5963 				   in the class body.  */
   5964 
   5965 /* Used with start_decl's initialized parameter.  */
   5966 #define SD_UNINITIALIZED     0
   5967 #define SD_INITIALIZED       1
   5968 /* Like SD_INITIALIZED, but also mark the new decl as DECL_DECOMPOSITION_P.  */
   5969 #define SD_DECOMPOSITION     2
   5970 #define SD_DEFAULTED         3
   5971 #define SD_DELETED           4
   5972 
   5973 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2
   5974    is derived from TYPE1, or if TYPE2 is a pointer (reference) to a
   5975    class derived from the type pointed to (referred to) by TYPE1.  */
   5976 #define same_or_base_type_p(TYPE1, TYPE2) \
   5977   comptypes ((TYPE1), (TYPE2), COMPARE_BASE)
   5978 
   5979 /* These macros are used to access a TEMPLATE_PARM_INDEX.  */
   5980 #define TEMPLATE_PARM_INDEX_CAST(NODE) \
   5981 	((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE))
   5982 #define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index)
   5983 #define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level)
   5984 #define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE))
   5985 #define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level)
   5986 #define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl)
   5987 #define TEMPLATE_PARM_PARAMETER_PACK(NODE) \
   5988   (TREE_LANG_FLAG_0 (TEMPLATE_PARM_INDEX_CHECK (NODE)))
   5989 
   5990 /* These macros are for accessing the fields of TEMPLATE_TYPE_PARM,
   5991    TEMPLATE_TEMPLATE_PARM and BOUND_TEMPLATE_TEMPLATE_PARM nodes.  */
   5992 #define TEMPLATE_TYPE_PARM_INDEX(NODE)					\
   5993   (TYPE_VALUES_RAW (TREE_CHECK3 ((NODE), TEMPLATE_TYPE_PARM,		\
   5994 				 TEMPLATE_TEMPLATE_PARM,		\
   5995 				 BOUND_TEMPLATE_TEMPLATE_PARM)))
   5996 #define TEMPLATE_TYPE_IDX(NODE) \
   5997   (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   5998 #define TEMPLATE_TYPE_LEVEL(NODE) \
   5999   (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   6000 #define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \
   6001   (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   6002 #define TEMPLATE_TYPE_DECL(NODE) \
   6003   (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   6004 #define TEMPLATE_TYPE_PARAMETER_PACK(NODE) \
   6005   (TEMPLATE_PARM_PARAMETER_PACK (TEMPLATE_TYPE_PARM_INDEX (NODE)))
   6006 
   6007 /* For a C++17 class deduction placeholder, the template it represents.  */
   6008 #define CLASS_PLACEHOLDER_TEMPLATE(NODE) \
   6009   (DECL_INITIAL (TYPE_NAME (TEMPLATE_TYPE_PARM_CHECK (NODE))))
   6010 
   6011 /* Contexts in which auto deduction occurs. These flags are
   6012    used to control diagnostics in do_auto_deduction.  */
   6013 
   6014 enum auto_deduction_context
   6015 {
   6016   adc_unspecified,   /* Not given */
   6017   adc_variable_type, /* Variable initializer deduction */
   6018   adc_return_type,   /* Return type deduction */
   6019   adc_unify,         /* Template argument deduction */
   6020   adc_requirement,   /* Argument deduction constraint */
   6021   adc_decomp_type    /* Decomposition declaration initializer deduction */
   6022 };
   6023 
   6024 /* True iff this TEMPLATE_TYPE_PARM represents decltype(auto).  */
   6025 #define AUTO_IS_DECLTYPE(NODE) \
   6026   (TYPE_LANG_FLAG_5 (TEMPLATE_TYPE_PARM_CHECK (NODE)))
   6027 
   6028 /* These constants can used as bit flags in the process of tree formatting.
   6029 
   6030    TFF_PLAIN_IDENTIFIER: unqualified part of a name.
   6031    TFF_SCOPE: include the class and namespace scope of the name.
   6032    TFF_CHASE_TYPEDEF: print the original type-id instead of the typedef-name.
   6033    TFF_DECL_SPECIFIERS: print decl-specifiers.
   6034    TFF_CLASS_KEY_OR_ENUM: precede a class-type name (resp. enum name) with
   6035        a class-key (resp. `enum').
   6036    TFF_RETURN_TYPE: include function return type.
   6037    TFF_FUNCTION_DEFAULT_ARGUMENTS: include function default parameter values.
   6038    TFF_EXCEPTION_SPECIFICATION: show function exception specification.
   6039    TFF_TEMPLATE_HEADER: show the template<...> header in a
   6040        template-declaration.
   6041    TFF_TEMPLATE_NAME: show only template-name.
   6042    TFF_EXPR_IN_PARENS: parenthesize expressions.
   6043    TFF_NO_FUNCTION_ARGUMENTS: don't show function arguments.
   6044    TFF_UNQUALIFIED_NAME: do not print the qualifying scope of the
   6045        top-level entity.
   6046    TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS: do not omit template arguments
   6047        identical to their defaults.
   6048    TFF_NO_TEMPLATE_BINDINGS: do not print information about the template
   6049        arguments for a function template specialization.
   6050    TFF_POINTER: we are printing a pointer type.  */
   6051 
   6052 #define TFF_PLAIN_IDENTIFIER			(0)
   6053 #define TFF_SCOPE				(1)
   6054 #define TFF_CHASE_TYPEDEF			(1 << 1)
   6055 #define TFF_DECL_SPECIFIERS			(1 << 2)
   6056 #define TFF_CLASS_KEY_OR_ENUM			(1 << 3)
   6057 #define TFF_RETURN_TYPE				(1 << 4)
   6058 #define TFF_FUNCTION_DEFAULT_ARGUMENTS		(1 << 5)
   6059 #define TFF_EXCEPTION_SPECIFICATION		(1 << 6)
   6060 #define TFF_TEMPLATE_HEADER			(1 << 7)
   6061 #define TFF_TEMPLATE_NAME			(1 << 8)
   6062 #define TFF_EXPR_IN_PARENS			(1 << 9)
   6063 #define TFF_NO_FUNCTION_ARGUMENTS		(1 << 10)
   6064 #define TFF_UNQUALIFIED_NAME			(1 << 11)
   6065 #define TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS	(1 << 12)
   6066 #define TFF_NO_TEMPLATE_BINDINGS		(1 << 13)
   6067 #define TFF_POINTER		                (1 << 14)
   6068 
   6069 /* These constants can be used as bit flags to control strip_typedefs.
   6070 
   6071    STF_USER_VISIBLE: use heuristics to try to avoid stripping user-facing
   6072        aliases of internal details.  This is intended for diagnostics,
   6073        where it should (for example) give more useful "aka" types.
   6074 
   6075    STF_STRIP_DEPENDENT: allow the stripping of aliases with dependent
   6076        template parameters, relying on code elsewhere to report any
   6077        appropriate diagnostics.  */
   6078 const unsigned int STF_USER_VISIBLE = 1U;
   6079 const unsigned int STF_STRIP_DEPENDENT = 1U << 1;
   6080 
   6081 /* Returns the TEMPLATE_DECL associated to a TEMPLATE_TEMPLATE_PARM
   6082    node.  */
   6083 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL(NODE)	\
   6084   ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM)	\
   6085    ? TYPE_TI_TEMPLATE (NODE)				\
   6086    : TYPE_NAME (NODE))
   6087 
   6088 /* in lex.cc  */
   6089 
   6090 extern void init_reswords (void);
   6091 
   6092 /* Various flags for the overloaded operator information.  */
   6093 enum ovl_op_flags {
   6094   OVL_OP_FLAG_NONE = 0,	/* Don't care.  */
   6095   OVL_OP_FLAG_UNARY = 1,	/* Is unary.  */
   6096   OVL_OP_FLAG_BINARY = 2,	/* Is binary.  */
   6097   OVL_OP_FLAG_AMBIARY = 3,	/* May be unary or binary.  */
   6098   OVL_OP_FLAG_ALLOC = 4,  	/* operator new or delete.  */
   6099   OVL_OP_FLAG_DELETE = 1,	/* operator delete.  */
   6100   OVL_OP_FLAG_VEC = 2		/* vector new or delete.  */
   6101 };
   6102 
   6103 /* Compressed operator codes.  Order is determined by operators.def
   6104    and does not match that of tree_codes.  */
   6105 enum ovl_op_code {
   6106   OVL_OP_ERROR_MARK,
   6107   OVL_OP_NOP_EXPR,
   6108 #define DEF_OPERATOR(NAME, CODE, MANGLING, FLAGS) OVL_OP_##CODE,
   6109 #define DEF_ASSN_OPERATOR(NAME, CODE, MANGLING) /* NOTHING */
   6110 #include "operators.def"
   6111   OVL_OP_MAX
   6112 };
   6113 
   6114 /* Make sure it fits in lang_decl_fn::ovl_op_code. */
   6115 STATIC_ASSERT (OVL_OP_MAX < (1 << 6));
   6116 
   6117 struct GTY(()) ovl_op_info_t {
   6118   /* The IDENTIFIER_NODE for the operator.  */
   6119   tree identifier;
   6120   /* The name of the operator.  */
   6121   const char *name;
   6122   /* The mangled name of the operator.  */
   6123   const char *mangled_name;
   6124   /* The (regular) tree code.  */
   6125   enum tree_code tree_code : 16;
   6126   /* The (compressed) operator code.  */
   6127   enum ovl_op_code ovl_op_code : 8;
   6128   /* The ovl_op_flags of the operator */
   6129   unsigned flags : 8;
   6130 };
   6131 
   6132 /* Overloaded operator info indexed by ass_op_p & ovl_op_code.  */
   6133 extern GTY(()) ovl_op_info_t ovl_op_info[2][OVL_OP_MAX];
   6134 /* Mapping from tree_codes to ovl_op_codes.  */
   6135 extern GTY(()) unsigned char ovl_op_mapping[MAX_TREE_CODES];
   6136 /* Mapping for ambi-ary operators from the binary to the unary.  */
   6137 extern GTY(()) unsigned char ovl_op_alternate[OVL_OP_MAX];
   6138 
   6139 /* Given an ass_op_p boolean and a tree code, return a pointer to its
   6140    overloaded operator info.  Tree codes for non-overloaded operators
   6141    map to the error-operator.  */
   6142 #define OVL_OP_INFO(IS_ASS_P, TREE_CODE)			\
   6143   (&ovl_op_info[(IS_ASS_P) != 0][ovl_op_mapping[(TREE_CODE)]])
   6144 /* Overloaded operator info for an identifier for which
   6145    IDENTIFIER_OVL_OP_P is true.  */
   6146 #define IDENTIFIER_OVL_OP_INFO(NODE) \
   6147   (&ovl_op_info[IDENTIFIER_KIND_BIT_0 (NODE)][IDENTIFIER_CP_INDEX (NODE)])
   6148 #define IDENTIFIER_OVL_OP_FLAGS(NODE) \
   6149   (IDENTIFIER_OVL_OP_INFO (NODE)->flags)
   6150 
   6151 inline tree ovl_op_identifier (bool isass, tree_code code)
   6152 { return OVL_OP_INFO(isass, code)->identifier; }
   6153 inline tree ovl_op_identifier (tree_code code) { return ovl_op_identifier (false, code); }
   6154 #define assign_op_identifier (ovl_op_info[true][OVL_OP_NOP_EXPR].identifier)
   6155 #define call_op_identifier (ovl_op_info[false][OVL_OP_CALL_EXPR].identifier)
   6156 
   6157 /* A type-qualifier, or bitmask therefore, using the TYPE_QUAL
   6158    constants.  */
   6159 
   6160 typedef int cp_cv_quals;
   6161 
   6162 /* Non-static member functions have an optional virt-specifier-seq.
   6163    There is a VIRT_SPEC value for each virt-specifier.
   6164    They can be combined by bitwise-or to form the complete set of
   6165    virt-specifiers for a member function.  */
   6166 enum virt_specifier
   6167   {
   6168     VIRT_SPEC_UNSPECIFIED = 0x0,
   6169     VIRT_SPEC_FINAL       = 0x1,
   6170     VIRT_SPEC_OVERRIDE    = 0x2
   6171   };
   6172 
   6173 /* A type-qualifier, or bitmask therefore, using the VIRT_SPEC
   6174    constants.  */
   6175 
   6176 typedef int cp_virt_specifiers;
   6177 
   6178 /* Wherever there is a function-cv-qual, there could also be a ref-qualifier:
   6179 
   6180    [dcl.fct]
   6181    The return type, the parameter-type-list, the ref-qualifier, and
   6182    the cv-qualifier-seq, but not the default arguments or the exception
   6183    specification, are part of the function type.
   6184 
   6185    REF_QUAL_NONE    Ordinary member function with no ref-qualifier
   6186    REF_QUAL_LVALUE  Member function with the &-ref-qualifier
   6187    REF_QUAL_RVALUE  Member function with the &&-ref-qualifier */
   6188 
   6189 enum cp_ref_qualifier {
   6190   REF_QUAL_NONE = 0,
   6191   REF_QUAL_LVALUE = 1,
   6192   REF_QUAL_RVALUE = 2
   6193 };
   6194 
   6195 /* A storage class.  */
   6196 
   6197 enum cp_storage_class {
   6198   /* sc_none must be zero so that zeroing a cp_decl_specifier_seq
   6199      sets the storage_class field to sc_none.  */
   6200   sc_none = 0,
   6201   sc_auto,
   6202   sc_register,
   6203   sc_static,
   6204   sc_extern,
   6205   sc_mutable
   6206 };
   6207 
   6208 /* An individual decl-specifier.  This is used to index the array of
   6209    locations for the declspecs in struct cp_decl_specifier_seq
   6210    below.  */
   6211 
   6212 enum cp_decl_spec {
   6213   ds_first,
   6214   ds_signed = ds_first,
   6215   ds_unsigned,
   6216   ds_short,
   6217   ds_long,
   6218   ds_const,
   6219   ds_volatile,
   6220   ds_restrict,
   6221   ds_inline,
   6222   ds_virtual,
   6223   ds_explicit,
   6224   ds_friend,
   6225   ds_typedef,
   6226   ds_alias,
   6227   ds_constexpr,
   6228   ds_complex,
   6229   ds_constinit,
   6230   ds_consteval,
   6231   ds_thread,
   6232   ds_type_spec,
   6233   ds_redefined_builtin_type_spec,
   6234   ds_attribute,
   6235   ds_std_attribute,
   6236   ds_storage_class,
   6237   ds_long_long,
   6238   ds_concept,
   6239   ds_last /* This enumerator must always be the last one.  */
   6240 };
   6241 
   6242 /* A decl-specifier-seq.  */
   6243 
   6244 struct cp_decl_specifier_seq {
   6245   /* An array of locations for the declaration sepecifiers, indexed by
   6246      enum cp_decl_spec_word.  */
   6247   location_t locations[ds_last];
   6248   /* The primary type, if any, given by the decl-specifier-seq.
   6249      Modifiers, like "short", "const", and "unsigned" are not
   6250      reflected here.  This field will be a TYPE, unless a typedef-name
   6251      was used, in which case it will be a TYPE_DECL.  */
   6252   tree type;
   6253   /* The attributes, if any, provided with the specifier sequence.  */
   6254   tree attributes;
   6255   /* The c++11 attributes that follows the type specifier.  */
   6256   tree std_attributes;
   6257   /* If non-NULL, a built-in type that the user attempted to redefine
   6258      to some other type.  */
   6259   tree redefined_builtin_type;
   6260   /* The explicit-specifier, if any.  */
   6261   tree explicit_specifier;
   6262   /* The storage class specified -- or sc_none if no storage class was
   6263      explicitly specified.  */
   6264   cp_storage_class storage_class;
   6265   /* For the __intN declspec, this stores the index into the int_n_* arrays.  */
   6266   int int_n_idx;
   6267   /* True iff TYPE_SPEC defines a class or enum.  */
   6268   BOOL_BITFIELD type_definition_p : 1;
   6269   /* True iff multiple types were (erroneously) specified for this
   6270      decl-specifier-seq.  */
   6271   BOOL_BITFIELD multiple_types_p : 1;
   6272   /* True iff multiple storage classes were (erroneously) specified
   6273      for this decl-specifier-seq or a combination of a storage class
   6274      with a typedef specifier.  */
   6275   BOOL_BITFIELD conflicting_specifiers_p : 1;
   6276   /* True iff at least one decl-specifier was found.  */
   6277   BOOL_BITFIELD any_specifiers_p : 1;
   6278   /* True iff at least one type-specifier was found.  */
   6279   BOOL_BITFIELD any_type_specifiers_p : 1;
   6280   /* True iff "int" was explicitly provided.  */
   6281   BOOL_BITFIELD explicit_int_p : 1;
   6282   /* True iff "__intN" was explicitly provided.  */
   6283   BOOL_BITFIELD explicit_intN_p : 1;
   6284   /* True iff "char" was explicitly provided.  */
   6285   BOOL_BITFIELD explicit_char_p : 1;
   6286   /* True iff ds_thread is set for __thread, not thread_local.  */
   6287   BOOL_BITFIELD gnu_thread_keyword_p : 1;
   6288   /* True iff the type is a decltype.  */
   6289   BOOL_BITFIELD decltype_p : 1;
   6290   /* True iff the alternate "__intN__" form of the __intN type has been
   6291      used.  */
   6292   BOOL_BITFIELD int_n_alt: 1;
   6293 };
   6294 
   6295 /* The various kinds of declarators.  */
   6296 
   6297 enum cp_declarator_kind {
   6298   cdk_id,
   6299   cdk_function,
   6300   cdk_array,
   6301   cdk_pointer,
   6302   cdk_reference,
   6303   cdk_ptrmem,
   6304   cdk_decomp,
   6305   cdk_error
   6306 };
   6307 
   6308 /* A declarator.  */
   6309 
   6310 typedef struct cp_declarator cp_declarator;
   6311 
   6312 typedef struct cp_parameter_declarator cp_parameter_declarator;
   6313 
   6314 /* A parameter, before it has been semantically analyzed.  */
   6315 struct cp_parameter_declarator {
   6316   /* The next parameter, or NULL_TREE if none.  */
   6317   cp_parameter_declarator *next;
   6318   /* The decl-specifiers-seq for the parameter.  */
   6319   cp_decl_specifier_seq decl_specifiers;
   6320   /* The declarator for the parameter.  */
   6321   cp_declarator *declarator;
   6322   /* The default-argument expression, or NULL_TREE, if none.  */
   6323   tree default_argument;
   6324   /* True iff this is a template parameter pack.  */
   6325   bool template_parameter_pack_p;
   6326   /* Location within source.  */
   6327   location_t loc;
   6328 };
   6329 
   6330 /* A declarator.  */
   6331 struct cp_declarator {
   6332   /* The kind of declarator.  */
   6333   ENUM_BITFIELD (cp_declarator_kind) kind : 4;
   6334   /* Whether we parsed an ellipsis (`...') just before the declarator,
   6335      to indicate this is a parameter pack.  */
   6336   BOOL_BITFIELD parameter_pack_p : 1;
   6337   /* If this declarator is parenthesized, this the open-paren.  It is
   6338      UNKNOWN_LOCATION when not parenthesized.  */
   6339   location_t parenthesized;
   6340   /* Currently only set for cdk_id, cdk_decomp and cdk_function.  */
   6341   location_t id_loc;
   6342   /* If this declarator is part of an init-declarator, the location of the
   6343      initializer.  */
   6344   location_t init_loc;
   6345   /* GNU Attributes that apply to this declarator.  If the declarator
   6346      is a pointer or a reference, these attribute apply to the type
   6347      pointed to.  */
   6348   tree attributes;
   6349   /* Standard C++11 attributes that apply to this declarator.  If the
   6350      declarator is a pointer or a reference, these attributes apply
   6351      to the pointer, rather than to the type pointed to.  */
   6352   tree std_attributes;
   6353   /* For all but cdk_id, cdk_decomp and cdk_error, the contained declarator.
   6354      For cdk_id, cdk_decomp and cdk_error, guaranteed to be NULL.  */
   6355   cp_declarator *declarator;
   6356   union {
   6357     /* For identifiers.  */
   6358     struct {
   6359       /* If non-NULL, the qualifying scope (a NAMESPACE_DECL or
   6360 	 *_TYPE) for this identifier.  */
   6361       tree qualifying_scope;
   6362       /* The unqualified name of the entity -- an IDENTIFIER_NODE,
   6363 	 BIT_NOT_EXPR, or TEMPLATE_ID_EXPR.  */
   6364       tree unqualified_name;
   6365       /* If this is the name of a function, what kind of special
   6366 	 function (if any).  */
   6367       special_function_kind sfk;
   6368     } id;
   6369     /* For functions.  */
   6370     struct {
   6371       /* The parameters to the function as a TREE_LIST of decl/default.  */
   6372       tree parameters;
   6373       /* The cv-qualifiers for the function.  */
   6374       cp_cv_quals qualifiers;
   6375       /* The virt-specifiers for the function.  */
   6376       cp_virt_specifiers virt_specifiers;
   6377       /* The ref-qualifier for the function.  */
   6378       cp_ref_qualifier ref_qualifier;
   6379       /* The transaction-safety qualifier for the function.  */
   6380       tree tx_qualifier;
   6381       /* The exception-specification for the function.  */
   6382       tree exception_specification;
   6383       /* The late-specified return type, if any.  */
   6384       tree late_return_type;
   6385       /* The trailing requires-clause, if any. */
   6386       tree requires_clause;
   6387       location_t parens_loc;
   6388     } function;
   6389     /* For arrays.  */
   6390     struct {
   6391       /* The bounds to the array.  */
   6392       tree bounds;
   6393     } array;
   6394     /* For cdk_pointer and cdk_ptrmem.  */
   6395     struct {
   6396       /* The cv-qualifiers for the pointer.  */
   6397       cp_cv_quals qualifiers;
   6398       /* For cdk_ptrmem, the class type containing the member.  */
   6399       tree class_type;
   6400     } pointer;
   6401     /* For cdk_reference */
   6402     struct {
   6403       /* The cv-qualifiers for the reference.  These qualifiers are
   6404          only used to diagnose ill-formed code.  */
   6405       cp_cv_quals qualifiers;
   6406       /* Whether this is an rvalue reference */
   6407       bool rvalue_ref;
   6408     } reference;
   6409   } u;
   6410 };
   6411 
   6412 /* A level of template instantiation.  */
   6413 struct GTY((chain_next ("%h.next"))) tinst_level {
   6414   /* The immediately deeper level in the chain.  */
   6415   struct tinst_level *next;
   6416 
   6417   /* The original node.  TLDCL can be a DECL (for a function or static
   6418      data member), a TYPE (for a class), depending on what we were
   6419      asked to instantiate, or a TREE_LIST with the template as PURPOSE
   6420      and the template args as VALUE, if we are substituting for
   6421      overload resolution.  In all these cases, TARGS is NULL.
   6422      However, to avoid creating TREE_LIST objects for substitutions if
   6423      we can help, we store PURPOSE and VALUE in TLDCL and TARGS,
   6424      respectively.  So TLDCL stands for TREE_LIST or DECL (the
   6425      template is a DECL too), whereas TARGS stands for the template
   6426      arguments.  */
   6427   tree tldcl, targs;
   6428 
   6429   /* For modules we need to know (a) the modules on the path of
   6430      instantiation and (b) the transitive imports along that path.
   6431      Note that these two bitmaps may be inherited from NEXT, if this
   6432      decl is in the same module as NEXT (or has no new information).  */
   6433   bitmap path;
   6434   bitmap visible;
   6435 
   6436  private:
   6437   /* Return TRUE iff the original node is a split list.  */
   6438   bool split_list_p () const { return targs; }
   6439 
   6440   /* Return TRUE iff the original node is a TREE_LIST object.  */
   6441   bool tree_list_p () const
   6442   {
   6443     return !split_list_p () && TREE_CODE (tldcl) == TREE_LIST;
   6444   }
   6445 
   6446   /* Return TRUE iff the original node is not a list, split or not.  */
   6447   bool not_list_p () const
   6448   {
   6449     return !split_list_p () && !tree_list_p ();
   6450   }
   6451 
   6452   /* Convert (in place) the original node from a split list to a
   6453      TREE_LIST.  */
   6454   tree to_list ();
   6455 
   6456  public:
   6457   /* Release storage for OBJ and node, if it's a TREE_LIST.  */
   6458   static void free (tinst_level *obj);
   6459 
   6460   /* Return TRUE iff the original node is a list, split or not.  */
   6461   bool list_p () const { return !not_list_p (); }
   6462 
   6463   /* Return the original node; if it's a split list, make it a
   6464      TREE_LIST first, so that it can be returned as a single tree
   6465      object.  */
   6466   tree get_node () {
   6467     if (!split_list_p ()) return tldcl;
   6468     else return to_list ();
   6469   }
   6470 
   6471   /* Return the original node if it's a DECL or a TREE_LIST, but do
   6472      NOT convert a split list to a TREE_LIST: return NULL instead.  */
   6473   tree maybe_get_node () const {
   6474     if (!split_list_p ()) return tldcl;
   6475     else return NULL_TREE;
   6476   }
   6477 
   6478   /* The location where the template is instantiated.  */
   6479   location_t locus;
   6480 
   6481   /* errorcount + sorrycount when we pushed this level.  */
   6482   unsigned short errors;
   6483 
   6484   /* Count references to this object.  If refcount reaches
   6485      refcount_infinity value, we don't increment or decrement the
   6486      refcount anymore, as the refcount isn't accurate anymore.
   6487      The object can be still garbage collected if unreferenced from
   6488      anywhere, which might keep referenced objects referenced longer than
   6489      otherwise necessary.  Hitting the infinity is rare though.  */
   6490   unsigned short refcount;
   6491 
   6492   /* Infinity value for the above refcount.  */
   6493   static const unsigned short refcount_infinity = (unsigned short) ~0;
   6494 };
   6495 
   6496 /* BUILT_IN_FRONTEND function codes.  */
   6497 enum cp_built_in_function {
   6498   CP_BUILT_IN_IS_CONSTANT_EVALUATED,
   6499   CP_BUILT_IN_INTEGER_PACK,
   6500   CP_BUILT_IN_IS_CORRESPONDING_MEMBER,
   6501   CP_BUILT_IN_IS_POINTER_INTERCONVERTIBLE_WITH_CLASS,
   6502   CP_BUILT_IN_SOURCE_LOCATION,
   6503   CP_BUILT_IN_LAST
   6504 };
   6505 
   6506 bool decl_spec_seq_has_spec_p (const cp_decl_specifier_seq *, cp_decl_spec);
   6507 
   6508 /* Return the type of the `this' parameter of FNTYPE.  */
   6509 
   6510 inline tree
   6511 type_of_this_parm (const_tree fntype)
   6512 {
   6513   function_args_iterator iter;
   6514   gcc_assert (TREE_CODE (fntype) == METHOD_TYPE);
   6515   function_args_iter_init (&iter, fntype);
   6516   return function_args_iter_cond (&iter);
   6517 }
   6518 
   6519 /* Return the class of the `this' parameter of FNTYPE.  */
   6520 
   6521 inline tree
   6522 class_of_this_parm (const_tree fntype)
   6523 {
   6524   return TREE_TYPE (type_of_this_parm (fntype));
   6525 }
   6526 
   6527 /* A parameter list indicating for a function with no parameters,
   6528    e.g  "int f(void)".  */
   6529 extern cp_parameter_declarator *no_parameters;
   6530 
   6531 /* Various dump ids.  */
   6532 extern int class_dump_id;
   6533 extern int module_dump_id;
   6534 extern int raw_dump_id;
   6535 
   6536 /* in call.cc */
   6537 extern bool check_dtor_name			(tree, tree);
   6538 int magic_varargs_p				(tree);
   6539 
   6540 extern tree build_conditional_expr		(const op_location_t &,
   6541 						 tree, tree, tree,
   6542                                                  tsubst_flags_t);
   6543 extern tree build_addr_func			(tree, tsubst_flags_t);
   6544 extern void set_flags_from_callee		(tree);
   6545 extern tree build_call_a			(tree, int, tree*);
   6546 extern tree build_call_n			(tree, int, ...);
   6547 extern bool null_ptr_cst_p			(tree);
   6548 extern bool null_member_pointer_value_p		(tree);
   6549 extern bool sufficient_parms_p			(const_tree);
   6550 extern tree type_decays_to			(tree);
   6551 extern tree extract_call_expr			(tree);
   6552 extern tree build_trivial_dtor_call		(tree, bool = false);
   6553 extern bool ref_conv_binds_directly_p		(tree, tree);
   6554 extern tree build_user_type_conversion		(tree, tree, int,
   6555 						 tsubst_flags_t);
   6556 extern tree build_new_function_call		(tree, vec<tree, va_gc> **,
   6557 						 tsubst_flags_t);
   6558 extern tree build_operator_new_call		(tree, vec<tree, va_gc> **,
   6559 						 tree *, tree *, tree, tree,
   6560 						 tree *, tsubst_flags_t);
   6561 extern tree build_new_method_call		(tree, tree,
   6562 						 vec<tree, va_gc> **, tree,
   6563 						 int, tree *, tsubst_flags_t);
   6564 extern tree build_special_member_call		(tree, tree,
   6565 						 vec<tree, va_gc> **,
   6566 						 tree, int, tsubst_flags_t);
   6567 extern tree build_new_op			(const op_location_t &,
   6568 						 enum tree_code,
   6569 						 int, tree, tree, tree, tree,
   6570 						 tree *, tsubst_flags_t);
   6571 /* Wrapper that leaves out the usually-null op3 and overload parms.  */
   6572 inline tree build_new_op (const op_location_t &loc, enum tree_code code,
   6573 			  int flags, tree arg1, tree arg2,
   6574 			  tsubst_flags_t complain)
   6575 {
   6576   return build_new_op (loc, code, flags, arg1, arg2, NULL_TREE, NULL_TREE,
   6577 		       NULL, complain);
   6578 }
   6579 extern tree build_op_call			(tree, vec<tree, va_gc> **,
   6580 						 tsubst_flags_t);
   6581 extern tree build_op_subscript			(const op_location_t &, tree,
   6582 						 vec<tree, va_gc> **, tree *,
   6583 						 tsubst_flags_t);
   6584 extern bool aligned_allocation_fn_p		(tree);
   6585 extern tree destroying_delete_p			(tree);
   6586 extern bool usual_deallocation_fn_p		(tree);
   6587 extern tree build_op_delete_call		(enum tree_code, tree, tree,
   6588 						 bool, tree, tree,
   6589 						 tsubst_flags_t);
   6590 extern bool can_convert				(tree, tree, tsubst_flags_t);
   6591 extern bool can_convert_standard		(tree, tree, tsubst_flags_t);
   6592 extern bool can_convert_arg			(tree, tree, tree, int,
   6593 						 tsubst_flags_t);
   6594 extern bool can_convert_arg_bad			(tree, tree, tree, int,
   6595 						 tsubst_flags_t);
   6596 extern int conv_flags				(int, int, tree, tree, int);
   6597 extern struct conversion * good_conversion	(tree, tree, tree, int, tsubst_flags_t);
   6598 extern location_t get_fndecl_argument_location  (tree, int);
   6599 extern void complain_about_bad_argument	(location_t arg_loc,
   6600 						 tree from_type, tree to_type,
   6601 						 tree fndecl, int parmnum);
   6602 extern void maybe_inform_about_fndecl_for_bogus_argument_init (tree, int);
   6603 extern tree perform_dguide_overload_resolution	(tree, const vec<tree, va_gc> *,
   6604 						 tsubst_flags_t);
   6605 
   6606 
   6607 /* A class for recording information about access failures (e.g. private
   6608    fields), so that we can potentially supply a fix-it hint about
   6609    an accessor (from a context in which the constness of the object
   6610    is known).  */
   6611 
   6612 class access_failure_info
   6613 {
   6614  public:
   6615   access_failure_info () : m_was_inaccessible (false),
   6616     m_basetype_path (NULL_TREE),
   6617     m_decl (NULL_TREE), m_diag_decl (NULL_TREE) {}
   6618 
   6619   void record_access_failure (tree basetype_path, tree decl, tree diag_decl);
   6620 
   6621   bool was_inaccessible_p () const { return m_was_inaccessible; }
   6622   tree get_decl () const { return m_decl; }
   6623   tree get_diag_decl () const { return m_diag_decl; }
   6624   tree get_any_accessor (bool const_p) const;
   6625   void maybe_suggest_accessor (bool const_p) const;
   6626   static void add_fixit_hint (rich_location *richloc, tree accessor);
   6627 
   6628  private:
   6629   bool m_was_inaccessible;
   6630   tree m_basetype_path;
   6631   tree m_decl;
   6632   tree m_diag_decl;
   6633 };
   6634 
   6635 extern void complain_about_access		(tree, tree, tree, bool,
   6636 						 access_kind);
   6637 extern void push_defarg_context			(tree);
   6638 extern void pop_defarg_context			(void);
   6639 extern tree convert_default_arg			(tree, tree, tree, int,
   6640 						 tsubst_flags_t);
   6641 extern tree convert_arg_to_ellipsis		(tree, tsubst_flags_t);
   6642 extern tree build_x_va_arg			(location_t, tree, tree);
   6643 extern tree cxx_type_promotes_to		(tree);
   6644 extern tree type_passed_as			(tree);
   6645 extern tree convert_for_arg_passing		(tree, tree, tsubst_flags_t);
   6646 extern bool is_properly_derived_from		(tree, tree);
   6647 extern tree initialize_reference		(tree, tree, int,
   6648 						 tsubst_flags_t);
   6649 extern tree extend_ref_init_temps		(tree, tree,
   6650 						 vec<tree, va_gc>**,
   6651 						 tree * = NULL);
   6652 extern tree make_temporary_var_for_ref_to_temp	(tree, tree);
   6653 extern bool type_has_extended_temps		(tree);
   6654 extern tree strip_top_quals			(tree);
   6655 extern bool reference_related_p			(tree, tree);
   6656 extern bool reference_compatible_p		(tree, tree);
   6657 extern int remaining_arguments			(tree);
   6658 extern tree build_implicit_conv_flags		(tree, tree, int);
   6659 extern tree perform_implicit_conversion		(tree, tree, tsubst_flags_t);
   6660 extern tree perform_implicit_conversion_flags	(tree, tree, tsubst_flags_t, int);
   6661 extern tree build_converted_constant_expr	(tree, tree, tsubst_flags_t);
   6662 extern tree build_converted_constant_bool_expr	(tree, tsubst_flags_t);
   6663 extern tree perform_direct_initialization_if_possible (tree, tree, bool,
   6664                                                        tsubst_flags_t);
   6665 extern vec<tree,va_gc> *resolve_args (vec<tree,va_gc>*, tsubst_flags_t);
   6666 extern tree in_charge_arg_for_name		(tree);
   6667 extern bool in_immediate_context		();
   6668 extern tree build_cxx_call			(tree, int, tree *,
   6669 						 tsubst_flags_t,
   6670 						 tree = NULL_TREE);
   6671 extern bool is_std_init_list			(tree);
   6672 extern bool is_list_ctor			(tree);
   6673 extern void validate_conversion_obstack		(void);
   6674 extern void mark_versions_used			(tree);
   6675 extern int unsafe_return_slot_p			(tree);
   6676 extern bool make_safe_copy_elision		(tree, tree);
   6677 extern bool cp_handle_deprecated_or_unavailable (tree, tsubst_flags_t = tf_warning_or_error);
   6678 extern void cp_warn_deprecated_use_scopes	(tree);
   6679 extern tree get_function_version_dispatcher	(tree);
   6680 
   6681 /* in class.cc */
   6682 extern tree build_vfield_ref			(tree, tree);
   6683 extern tree build_if_in_charge			(tree true_stmt, tree false_stmt = void_node);
   6684 extern tree build_base_path			(enum tree_code, tree,
   6685 						 tree, int, tsubst_flags_t);
   6686 extern tree convert_to_base			(tree, tree, bool, bool,
   6687 						 tsubst_flags_t);
   6688 extern tree convert_to_base_statically		(tree, tree);
   6689 extern bool is_empty_base_ref			(tree);
   6690 extern tree build_vtbl_ref			(tree, tree);
   6691 extern tree build_vfn_ref			(tree, tree);
   6692 extern tree get_vtable_decl			(tree, int);
   6693 extern bool add_method				(tree, tree, bool);
   6694 extern tree declared_access			(tree);
   6695 extern bool maybe_push_used_methods		(tree);
   6696 extern tree currently_open_class		(tree);
   6697 extern tree currently_open_derived_class	(tree);
   6698 extern tree outermost_open_class		(void);
   6699 extern tree current_nonlambda_class_type	(void);
   6700 extern tree finish_struct			(tree, tree);
   6701 extern void finish_struct_1			(tree);
   6702 extern int resolves_to_fixed_type_p		(tree, int * = NULL);
   6703 extern void init_class_processing		(void);
   6704 extern int is_empty_class			(tree);
   6705 extern bool is_really_empty_class		(tree, bool);
   6706 extern void pushclass				(tree);
   6707 extern void popclass				(void);
   6708 extern void push_nested_class			(tree);
   6709 extern void pop_nested_class			(void);
   6710 extern int current_lang_depth			(void);
   6711 extern void push_lang_context			(tree);
   6712 extern void pop_lang_context			(void);
   6713 extern tree instantiate_type			(tree, tree, tsubst_flags_t);
   6714 extern void build_self_reference		(void);
   6715 extern int same_signature_p			(const_tree, const_tree);
   6716 extern tree lookup_vfn_in_binfo			(tree, tree);
   6717 extern void maybe_add_class_template_decl_list	(tree, tree, int);
   6718 extern void unreverse_member_declarations	(tree);
   6719 extern bool is_empty_field			(tree);
   6720 extern void invalidate_class_lookup_cache	(void);
   6721 extern void maybe_note_name_used_in_class	(tree, tree);
   6722 extern void note_name_declared_in_class		(tree, tree);
   6723 extern tree get_vtbl_decl_for_binfo		(tree);
   6724 extern bool vptr_via_virtual_p			(tree);
   6725 extern void debug_class				(tree);
   6726 extern void debug_thunks			(tree);
   6727 extern void set_linkage_according_to_type	(tree, tree);
   6728 extern void determine_key_method		(tree);
   6729 extern void check_for_override			(tree, tree);
   6730 extern void push_class_stack			(void);
   6731 extern void pop_class_stack			(void);
   6732 extern bool default_ctor_p			(const_tree);
   6733 extern bool type_has_user_nondefault_constructor (tree);
   6734 extern tree in_class_defaulted_default_constructor (tree);
   6735 extern bool user_provided_p			(tree);
   6736 extern bool type_has_user_provided_constructor  (tree);
   6737 extern bool type_has_non_user_provided_default_constructor (tree);
   6738 extern bool vbase_has_user_provided_move_assign (tree);
   6739 extern tree default_init_uninitialized_part (tree);
   6740 extern bool trivial_default_constructor_is_constexpr (tree);
   6741 extern bool type_has_constexpr_default_constructor (tree);
   6742 extern bool type_has_constexpr_destructor	(tree);
   6743 extern bool type_has_virtual_destructor		(tree);
   6744 extern bool classtype_has_move_assign_or_move_ctor_p (tree, bool user_declared);
   6745 extern bool classtype_has_non_deleted_move_ctor (tree);
   6746 extern tree classtype_has_depr_implicit_copy	(tree);
   6747 extern bool classtype_has_op (tree, tree_code);
   6748 extern tree classtype_has_defaulted_op (tree, tree_code);
   6749 extern bool type_build_ctor_call		(tree);
   6750 extern bool type_build_dtor_call		(tree);
   6751 extern void explain_non_literal_class		(tree);
   6752 extern void inherit_targ_abi_tags		(tree);
   6753 extern void defaulted_late_check		(tree);
   6754 extern bool defaultable_fn_check		(tree);
   6755 extern void check_abi_tags			(tree);
   6756 extern tree missing_abi_tags			(tree);
   6757 extern void fixup_type_variants			(tree);
   6758 extern void fixup_attribute_variants		(tree);
   6759 extern void build_cdtor_clones 			(tree, bool, bool, bool);
   6760 extern void clone_cdtor				(tree, bool);
   6761 extern tree copy_operator_fn			(tree, tree_code code);
   6762 extern void adjust_clone_args			(tree);
   6763 extern void deduce_noexcept_on_destructor       (tree);
   6764 extern bool uniquely_derived_from_p             (tree, tree);
   6765 extern bool publicly_uniquely_derived_p         (tree, tree);
   6766 extern tree common_enclosing_class		(tree, tree);
   6767 
   6768 /* in cvt.cc */
   6769 extern tree convert_to_reference		(tree, tree, int, int, tree,
   6770 						 tsubst_flags_t);
   6771 extern tree convert_from_reference		(tree);
   6772 extern tree force_rvalue			(tree, tsubst_flags_t);
   6773 extern tree ocp_convert				(tree, tree, int, int,
   6774 						 tsubst_flags_t);
   6775 extern tree cp_convert				(tree, tree, tsubst_flags_t);
   6776 extern tree cp_convert_and_check                (tree, tree, tsubst_flags_t);
   6777 extern tree cp_fold_convert			(tree, tree);
   6778 extern tree cp_get_callee			(tree);
   6779 extern tree cp_get_callee_fndecl		(tree);
   6780 extern tree cp_get_callee_fndecl_nofold		(tree);
   6781 extern tree cp_get_fndecl_from_callee		(tree, bool fold = true);
   6782 extern tree convert_to_void			(tree, impl_conv_void,
   6783                                  		 tsubst_flags_t);
   6784 extern tree convert_force			(tree, tree, int,
   6785 						 tsubst_flags_t);
   6786 extern tree build_expr_type_conversion		(int, tree, bool);
   6787 extern tree type_promotes_to			(tree);
   6788 extern bool can_convert_qual			(tree, tree);
   6789 extern tree perform_qualification_conversions	(tree, tree);
   6790 extern bool tx_safe_fn_type_p			(tree);
   6791 extern tree tx_unsafe_fn_variant		(tree);
   6792 extern bool fnptr_conv_p			(tree, tree);
   6793 extern tree strip_fnptr_conv			(tree);
   6794 
   6795 /* in name-lookup.cc */
   6796 extern void maybe_push_cleanup_level		(tree);
   6797 extern tree maybe_push_decl			(tree);
   6798 extern tree current_decl_namespace		(void);
   6799 
   6800 /* decl.cc */
   6801 extern tree poplevel				(int, int, int);
   6802 extern void cxx_init_decl_processing		(void);
   6803 enum cp_tree_node_structure_enum cp_tree_node_structure
   6804 						(union lang_tree_node *);
   6805 extern void finish_scope			(void);
   6806 extern void push_switch				(tree);
   6807 extern void pop_switch				(void);
   6808 extern void note_break_stmt			(void);
   6809 extern bool note_iteration_stmt_body_start	(void);
   6810 extern void note_iteration_stmt_body_end	(bool);
   6811 extern void determine_local_discriminator	(tree);
   6812 extern int decls_match				(tree, tree, bool = true);
   6813 extern bool maybe_version_functions		(tree, tree, bool);
   6814 extern bool merge_default_template_args		(tree, tree, bool);
   6815 extern tree duplicate_decls			(tree, tree,
   6816 						 bool hiding = false,
   6817 						 bool was_hidden = false);
   6818 extern tree declare_local_label			(tree);
   6819 extern tree define_label			(location_t, tree);
   6820 extern void check_goto				(tree);
   6821 extern bool check_omp_return			(void);
   6822 extern tree make_typename_type			(tree, tree, enum tag_types, tsubst_flags_t);
   6823 extern tree build_typename_type			(tree, tree, tree, tag_types);
   6824 extern tree make_unbound_class_template		(tree, tree, tree, tsubst_flags_t);
   6825 extern tree make_unbound_class_template_raw	(tree, tree, tree);
   6826 extern unsigned push_abi_namespace		(tree node = abi_node);
   6827 extern void pop_abi_namespace			(unsigned flags,
   6828 						 tree node = abi_node);
   6829 extern tree build_library_fn_ptr		(const char *, tree, int);
   6830 extern tree build_cp_library_fn_ptr		(const char *, tree, int);
   6831 extern tree push_library_fn			(tree, tree, tree, int);
   6832 extern tree push_throw_library_fn		(tree, tree);
   6833 extern void warn_misplaced_attr_for_class_type  (location_t location,
   6834 						 tree class_type);
   6835 extern tree check_tag_decl			(cp_decl_specifier_seq *, bool);
   6836 extern tree shadow_tag				(cp_decl_specifier_seq *);
   6837 extern tree groktypename			(cp_decl_specifier_seq *, const cp_declarator *, bool);
   6838 extern tree start_decl				(const cp_declarator *, cp_decl_specifier_seq *, int, tree, tree, tree *);
   6839 extern void start_decl_1			(tree, bool);
   6840 extern bool check_array_initializer		(tree, tree, tree);
   6841 extern void omp_declare_variant_finalize	(tree, tree);
   6842 extern void cp_finish_decl			(tree, tree, bool, tree, int);
   6843 extern tree lookup_decomp_type			(tree);
   6844 extern void cp_maybe_mangle_decomp		(tree, tree, unsigned int);
   6845 extern void cp_finish_decomp			(tree, tree, unsigned int);
   6846 extern int cp_complete_array_type		(tree *, tree, bool);
   6847 extern int cp_complete_array_type_or_error	(tree *, tree, bool, tsubst_flags_t);
   6848 extern tree build_ptrmemfunc_type		(tree);
   6849 extern tree build_ptrmem_type			(tree, tree);
   6850 /* the grokdeclarator prototype is in decl.h */
   6851 extern tree build_this_parm			(tree, tree, cp_cv_quals);
   6852 extern tree grokparms				(tree, tree *);
   6853 extern int copy_fn_p				(const_tree);
   6854 extern bool move_fn_p                           (const_tree);
   6855 extern bool move_signature_fn_p                 (const_tree);
   6856 extern tree get_scope_of_declarator		(const cp_declarator *);
   6857 extern void grok_special_member_properties	(tree);
   6858 extern bool grok_ctor_properties		(const_tree, const_tree);
   6859 extern bool grok_op_properties			(tree, bool);
   6860 extern tree xref_tag				(tag_types, tree,
   6861 						 TAG_how = TAG_how::CURRENT_ONLY,
   6862 						 bool tpl_header_p = false);
   6863 extern void xref_basetypes			(tree, tree);
   6864 extern tree start_enum				(tree, tree, tree, tree, bool, bool *);
   6865 extern void finish_enum_value_list		(tree);
   6866 extern void finish_enum				(tree);
   6867 extern tree build_enumerator			(tree, tree, tree, tree, location_t);
   6868 extern tree lookup_enumerator			(tree, tree);
   6869 extern bool start_preparsed_function		(tree, tree, int);
   6870 extern bool start_function			(cp_decl_specifier_seq *,
   6871 						 const cp_declarator *, tree);
   6872 extern tree begin_function_body			(void);
   6873 extern void finish_function_body		(tree);
   6874 extern tree outer_curly_brace_block		(tree);
   6875 extern tree finish_function			(bool);
   6876 extern tree grokmethod				(cp_decl_specifier_seq *, const cp_declarator *, tree);
   6877 extern void maybe_register_incomplete_var	(tree);
   6878 extern void maybe_commonize_var			(tree);
   6879 extern void complete_vars			(tree);
   6880 extern tree static_fn_type			(tree);
   6881 extern void revert_static_member_fn		(tree);
   6882 extern void fixup_anonymous_aggr		(tree);
   6883 extern tree compute_array_index_type		(tree, tree, tsubst_flags_t);
   6884 extern tree check_default_argument		(tree, tree, tsubst_flags_t);
   6885 extern int wrapup_namespace_globals		();
   6886 extern tree create_implicit_typedef		(tree, tree);
   6887 extern int local_variable_p			(const_tree);
   6888 extern tree register_dtor_fn			(tree);
   6889 extern tmpl_spec_kind current_tmpl_spec_kind	(int);
   6890 extern tree cxx_builtin_function		(tree decl);
   6891 extern tree cxx_builtin_function_ext_scope	(tree decl);
   6892 extern tree cxx_simulate_builtin_function_decl	(tree);
   6893 extern tree check_elaborated_type_specifier	(enum tag_types, tree, bool);
   6894 extern void warn_extern_redeclared_static	(tree, tree);
   6895 extern tree cxx_comdat_group			(tree);
   6896 extern bool cp_missing_noreturn_ok_p		(tree);
   6897 extern bool is_direct_enum_init			(tree, tree);
   6898 extern void initialize_artificial_var		(tree, vec<constructor_elt, va_gc> *);
   6899 extern tree check_var_type			(tree, tree, location_t);
   6900 extern tree reshape_init                        (tree, tree, tsubst_flags_t);
   6901 extern tree next_initializable_field (tree);
   6902 extern tree next_subobject_field		(tree);
   6903 extern tree first_field				(const_tree);
   6904 extern tree fndecl_declared_return_type		(tree);
   6905 extern bool undeduced_auto_decl			(tree);
   6906 extern bool require_deduced_type		(tree, tsubst_flags_t = tf_warning_or_error);
   6907 
   6908 extern tree finish_case_label			(location_t, tree, tree);
   6909 extern tree cxx_maybe_build_cleanup		(tree, tsubst_flags_t);
   6910 extern bool check_array_designated_initializer  (constructor_elt *,
   6911 						 unsigned HOST_WIDE_INT);
   6912 extern bool check_for_uninitialized_const_var   (tree, bool, tsubst_flags_t);
   6913 extern tree build_explicit_specifier		(tree, tsubst_flags_t);
   6914 extern void do_push_parm_decls			(tree, tree, tree *);
   6915 extern tree do_aggregate_paren_init		(tree, tree);
   6916 
   6917 /* in decl2.cc */
   6918 extern void record_mangling			(tree, bool);
   6919 extern void overwrite_mangling			(tree, tree);
   6920 extern void note_mangling_alias			(tree, tree);
   6921 extern void generate_mangling_aliases		(void);
   6922 extern tree build_memfn_type			(tree, tree, cp_cv_quals, cp_ref_qualifier);
   6923 extern tree build_pointer_ptrmemfn_type	(tree);
   6924 extern tree change_return_type			(tree, tree);
   6925 extern void maybe_retrofit_in_chrg		(tree);
   6926 extern void maybe_make_one_only			(tree);
   6927 extern bool vague_linkage_p			(tree);
   6928 extern void grokclassfn				(tree, tree,
   6929 						 enum overload_flags);
   6930 extern tree grok_array_decl			(location_t, tree, tree,
   6931 						 vec<tree, va_gc> **, tsubst_flags_t);
   6932 extern tree delete_sanity			(location_t, tree, tree, bool,
   6933 						 int, tsubst_flags_t);
   6934 extern tree check_classfn			(tree, tree, tree);
   6935 extern void check_member_template		(tree);
   6936 extern tree grokfield (const cp_declarator *, cp_decl_specifier_seq *,
   6937 		       tree, bool, tree, tree);
   6938 extern tree grokbitfield (const cp_declarator *, cp_decl_specifier_seq *,
   6939 			  tree, tree, tree);
   6940 extern tree splice_template_attributes		(tree *, tree);
   6941 extern bool any_dependent_type_attributes_p	(tree);
   6942 extern tree cp_reconstruct_complex_type		(tree, tree);
   6943 extern bool attributes_naming_typedef_ok	(tree);
   6944 extern void cplus_decl_attributes		(tree *, tree, int);
   6945 extern void finish_anon_union			(tree);
   6946 extern void cxx_post_compilation_parsing_cleanups (void);
   6947 extern tree coerce_new_type			(tree, location_t);
   6948 extern void coerce_delete_type			(tree, location_t);
   6949 extern void comdat_linkage			(tree);
   6950 extern void determine_visibility		(tree);
   6951 extern void constrain_class_visibility		(tree);
   6952 extern void reset_type_linkage			(tree);
   6953 extern void tentative_decl_linkage		(tree);
   6954 extern void import_export_decl			(tree);
   6955 extern tree build_cleanup			(tree);
   6956 extern tree build_offset_ref_call_from_tree	(tree, vec<tree, va_gc> **,
   6957 						 tsubst_flags_t);
   6958 extern bool decl_defined_p			(tree);
   6959 extern bool decl_constant_var_p			(tree);
   6960 extern bool decl_maybe_constant_var_p		(tree);
   6961 extern void no_linkage_error			(tree);
   6962 extern void check_default_args			(tree);
   6963 extern bool mark_used				(tree);
   6964 extern bool mark_used			        (tree, tsubst_flags_t);
   6965 extern bool mark_single_function	        (tree, tsubst_flags_t);
   6966 extern void finish_static_data_member_decl	(tree, tree, bool, tree, int);
   6967 extern tree cp_build_parm_decl			(tree, tree, tree);
   6968 extern void copy_linkage			(tree, tree);
   6969 extern tree get_guard				(tree);
   6970 extern tree get_guard_cond			(tree, bool);
   6971 extern tree set_guard				(tree);
   6972 extern bool var_needs_tls_wrapper		(tree);
   6973 extern tree maybe_get_tls_wrapper_call		(tree);
   6974 extern void mark_needed				(tree);
   6975 extern bool decl_needed_p			(tree);
   6976 extern void note_vague_linkage_fn		(tree);
   6977 extern void note_variable_template_instantiation (tree);
   6978 extern tree build_artificial_parm		(tree, tree, tree);
   6979 extern bool possibly_inlined_p			(tree);
   6980 extern int parm_index                           (tree);
   6981 extern tree vtv_start_verification_constructor_init_function (void);
   6982 extern tree vtv_finish_verification_constructor_init_function (tree);
   6983 extern bool cp_omp_mappable_type		(tree);
   6984 extern bool cp_omp_emit_unmappable_type_notes	(tree);
   6985 extern void cp_check_const_attributes (tree);
   6986 
   6987 /* in error.cc */
   6988 extern const char *type_as_string		(tree, int);
   6989 extern const char *type_as_string_translate	(tree, int);
   6990 extern const char *decl_as_string		(tree, int);
   6991 extern const char *decl_as_string_translate	(tree, int);
   6992 extern const char *decl_as_dwarf_string		(tree, int);
   6993 extern const char *expr_as_string		(tree, int);
   6994 extern const char *expr_to_string		(tree);
   6995 extern const char *lang_decl_name		(tree, int, bool);
   6996 extern const char *lang_decl_dwarf_name		(tree, int, bool);
   6997 extern const char *language_to_string		(enum languages);
   6998 extern const char *class_key_or_enum_as_string	(tree);
   6999 extern void maybe_warn_variadic_templates       (void);
   7000 extern void maybe_warn_cpp0x			(cpp0x_warn_str str,
   7001 						 location_t = input_location);
   7002 extern bool pedwarn_cxx98                       (location_t, int, const char *, ...) ATTRIBUTE_GCC_DIAG(3,4);
   7003 extern location_t location_of                   (tree);
   7004 extern void qualified_name_lookup_error		(tree, tree, tree,
   7005 						 location_t);
   7006 
   7007 /* in except.cc */
   7008 extern void init_exception_processing		(void);
   7009 extern tree expand_start_catch_block		(tree);
   7010 extern void expand_end_catch_block		(void);
   7011 extern tree build_exc_ptr			(void);
   7012 extern tree build_throw				(location_t, tree);
   7013 extern int nothrow_libfn_p			(const_tree);
   7014 extern void check_handlers			(tree);
   7015 extern tree finish_noexcept_expr		(tree, tsubst_flags_t);
   7016 extern bool expr_noexcept_p			(tree, tsubst_flags_t);
   7017 extern void perform_deferred_noexcept_checks	(void);
   7018 extern bool nothrow_spec_p			(const_tree);
   7019 extern bool type_noexcept_p			(const_tree);
   7020 extern bool type_throw_all_p			(const_tree);
   7021 extern tree build_noexcept_spec			(tree, tsubst_flags_t);
   7022 extern void choose_personality_routine		(enum languages);
   7023 extern tree build_must_not_throw_expr		(tree,tree);
   7024 extern tree eh_type_info			(tree);
   7025 extern tree begin_eh_spec_block			(void);
   7026 extern void finish_eh_spec_block		(tree, tree);
   7027 extern tree build_eh_type_type			(tree);
   7028 extern tree cp_protect_cleanup_actions		(void);
   7029 extern void maybe_splice_retval_cleanup		(tree, bool);
   7030 extern tree maybe_set_retval_sentinel		(void);
   7031 
   7032 extern tree template_parms_to_args		(tree);
   7033 extern tree template_parms_level_to_args	(tree);
   7034 extern tree generic_targs_for			(tree);
   7035 extern tree outer_template_args			(tree);
   7036 
   7037 /* in expr.cc */
   7038 extern tree cplus_expand_constant		(tree);
   7039 extern tree mark_use (tree expr, bool rvalue_p, bool read_p,
   7040 		      location_t = UNKNOWN_LOCATION,
   7041 		      bool reject_builtin = true);
   7042 extern tree mark_rvalue_use			(tree,
   7043                                                  location_t = UNKNOWN_LOCATION,
   7044                                                  bool reject_builtin = true);
   7045 extern tree mark_lvalue_use			(tree);
   7046 extern tree mark_lvalue_use_nonread		(tree);
   7047 extern tree mark_type_use			(tree);
   7048 extern tree mark_discarded_use			(tree);
   7049 extern void mark_exp_read			(tree);
   7050 
   7051 /* friend.cc */
   7052 extern int is_friend				(tree, tree);
   7053 extern void make_friend_class			(tree, tree, bool);
   7054 extern void add_friend				(tree, tree, bool);
   7055 extern tree do_friend				(tree, tree, tree,
   7056 						 enum overload_flags, bool);
   7057 
   7058 extern void set_global_friend			(tree);
   7059 extern bool is_global_friend			(tree);
   7060 
   7061 /* in init.cc */
   7062 extern tree expand_member_init			(tree);
   7063 extern void emit_mem_initializers		(tree);
   7064 extern tree build_aggr_init			(tree, tree, int,
   7065                                                  tsubst_flags_t);
   7066 extern int is_class_type			(tree, int);
   7067 extern bool is_copy_initialization		(tree);
   7068 extern tree build_zero_init			(tree, tree, bool);
   7069 extern tree build_value_init			(tree, tsubst_flags_t);
   7070 extern tree build_value_init_noctor		(tree, tsubst_flags_t);
   7071 extern tree maybe_instantiate_nsdmi_init	(tree, tsubst_flags_t);
   7072 extern tree get_nsdmi				(tree, bool, tsubst_flags_t);
   7073 extern tree build_offset_ref			(tree, tree, bool,
   7074 						 tsubst_flags_t);
   7075 extern tree throw_bad_array_new_length		(void);
   7076 extern bool type_has_new_extended_alignment	(tree);
   7077 extern unsigned malloc_alignment		(void);
   7078 extern tree build_new_constexpr_heap_type	(tree, tree, tree);
   7079 extern tree build_new				(location_t,
   7080 						 vec<tree, va_gc> **, tree,
   7081 						 tree, vec<tree, va_gc> **,
   7082 						 int, tsubst_flags_t);
   7083 extern tree get_temp_regvar			(tree, tree);
   7084 extern tree build_vec_init			(tree, tree, tree, bool, int,
   7085 						 tsubst_flags_t,
   7086 						 vec<tree, va_gc> ** = nullptr);
   7087 extern tree build_delete			(location_t, tree, tree,
   7088 						 special_function_kind,
   7089 						 int, int, tsubst_flags_t);
   7090 extern void push_base_cleanups			(void);
   7091 extern tree build_vec_delete			(location_t, tree, tree,
   7092 						 special_function_kind, int,
   7093 						 tsubst_flags_t);
   7094 extern tree create_temporary_var		(tree);
   7095 extern void initialize_vtbl_ptrs		(tree);
   7096 extern tree scalar_constant_value		(tree);
   7097 extern tree decl_constant_value			(tree, bool);
   7098 extern tree decl_really_constant_value		(tree, bool = true);
   7099 extern int diagnose_uninitialized_cst_or_ref_member (tree, bool, bool);
   7100 extern tree build_vtbl_address                  (tree);
   7101 extern bool maybe_reject_flexarray_init		(tree, tree);
   7102 
   7103 /* in lex.cc */
   7104 extern void cxx_dup_lang_specific_decl		(tree);
   7105 extern tree unqualified_name_lookup_error	(tree,
   7106 						 location_t = UNKNOWN_LOCATION);
   7107 extern tree unqualified_fn_lookup_error		(cp_expr);
   7108 extern tree make_conv_op_name			(tree);
   7109 extern tree build_lang_decl			(enum tree_code, tree, tree);
   7110 extern tree build_lang_decl_loc			(location_t, enum tree_code, tree, tree);
   7111 extern bool maybe_add_lang_decl_raw		(tree, bool decomp_p);
   7112 extern bool maybe_add_lang_type_raw		(tree);
   7113 extern void retrofit_lang_decl			(tree);
   7114 extern void fit_decomposition_lang_decl		(tree, tree);
   7115 extern tree copy_decl				(tree CXX_MEM_STAT_INFO);
   7116 extern tree copy_type				(tree CXX_MEM_STAT_INFO);
   7117 extern tree cxx_make_type			(enum tree_code CXX_MEM_STAT_INFO);
   7118 extern tree make_class_type			(enum tree_code CXX_MEM_STAT_INFO);
   7119 extern const char *get_identifier_kind_name	(tree);
   7120 extern void set_identifier_kind			(tree, cp_identifier_kind);
   7121 extern bool cxx_init				(void);
   7122 extern void cxx_finish				(void);
   7123 extern bool in_main_input_context		(void);
   7124 extern uintptr_t module_token_pre (cpp_reader *, const cpp_token *, uintptr_t);
   7125 extern uintptr_t module_token_cdtor (cpp_reader *, uintptr_t);
   7126 extern uintptr_t module_token_lang (int type, int keyword, tree value,
   7127 				    location_t, uintptr_t);
   7128 
   7129 /* in method.cc */
   7130 extern void init_method				(void);
   7131 extern tree make_thunk				(tree, bool, tree, tree);
   7132 extern void finish_thunk			(tree);
   7133 extern void use_thunk				(tree, bool);
   7134 extern bool trivial_fn_p			(tree);
   7135 extern tree forward_parm			(tree);
   7136 extern bool is_trivially_xible			(enum tree_code, tree, tree);
   7137 extern bool is_nothrow_xible			(enum tree_code, tree, tree);
   7138 extern bool is_xible				(enum tree_code, tree, tree);
   7139 extern tree get_defaulted_eh_spec		(tree, tsubst_flags_t = tf_warning_or_error);
   7140 extern bool maybe_explain_implicit_delete	(tree);
   7141 extern void explain_implicit_non_constexpr	(tree);
   7142 extern bool deduce_inheriting_ctor		(tree);
   7143 extern bool decl_remember_implicit_trigger_p	(tree);
   7144 extern void synthesize_method			(tree);
   7145 extern void maybe_synthesize_method		(tree);
   7146 extern tree lazily_declare_fn			(special_function_kind,
   7147 						 tree);
   7148 extern tree skip_artificial_parms_for		(const_tree, tree);
   7149 extern int num_artificial_parms_for		(const_tree);
   7150 extern tree make_alias_for			(tree, tree);
   7151 extern tree get_copy_ctor			(tree, tsubst_flags_t);
   7152 extern tree get_copy_assign			(tree);
   7153 extern tree get_default_ctor			(tree);
   7154 extern tree get_dtor				(tree, tsubst_flags_t);
   7155 extern tree build_stub_object			(tree);
   7156 extern tree strip_inheriting_ctors		(tree);
   7157 extern tree inherited_ctor_binfo		(tree);
   7158 extern bool base_ctor_omit_inherited_parms	(tree);
   7159 extern bool ctor_omit_inherited_parms		(tree);
   7160 extern tree locate_ctor				(tree);
   7161 extern tree implicitly_declare_fn               (special_function_kind, tree,
   7162 						 bool, tree, tree);
   7163 /* In module.cc  */
   7164 class module_state; /* Forward declare.  */
   7165 inline bool modules_p () { return flag_modules != 0; }
   7166 
   7167 /* The kind of module or part thereof that we're in.  */
   7168 enum module_kind_bits
   7169 {
   7170   MK_MODULE = 1 << 0,     /* This TU is a module.  */
   7171   MK_GLOBAL = 1 << 1,     /* Entities are in the global module.  */
   7172   MK_INTERFACE = 1 << 2,  /* This TU is an interface.  */
   7173   MK_PARTITION = 1 << 3,  /* This TU is a partition.  */
   7174   MK_EXPORTING = 1 << 4,  /* We are in an export region.  */
   7175 };
   7176 
   7177 /* We do lots of bit-manipulation, so an unsigned is easier.  */
   7178 extern unsigned module_kind;
   7179 
   7180 /*  MK_MODULE & MK_GLOBAL have the following combined meanings:
   7181  MODULE GLOBAL
   7182    0	  0	not a module
   7183    0	  1	GMF of named module (we've not yet seen module-decl)
   7184    1	  0	purview of named module
   7185    1	  1	header unit.   */
   7186 
   7187 inline bool module_purview_p ()
   7188 { return module_kind & MK_MODULE; }
   7189 inline bool global_purview_p ()
   7190 { return module_kind & MK_GLOBAL; }
   7191 
   7192 inline bool not_module_p ()
   7193 { return (module_kind & (MK_MODULE | MK_GLOBAL)) == 0; }
   7194 inline bool named_module_p ()
   7195 { /* This is a named module if exactly one of MODULE and GLOBAL is
   7196      set.  */
   7197   /* The divides are constant shifts!  */
   7198   return ((module_kind / MK_MODULE) ^ (module_kind / MK_GLOBAL)) & 1;
   7199 }
   7200 inline bool header_module_p ()
   7201 { return (module_kind & (MK_MODULE | MK_GLOBAL)) == (MK_MODULE | MK_GLOBAL); }
   7202 inline bool named_module_purview_p ()
   7203 { return (module_kind & (MK_MODULE | MK_GLOBAL)) == MK_MODULE; }
   7204 inline bool module_interface_p ()
   7205 { return module_kind & MK_INTERFACE; }
   7206 inline bool module_partition_p ()
   7207 { return module_kind & MK_PARTITION; }
   7208 inline bool module_has_cmi_p ()
   7209 { return module_kind & (MK_INTERFACE | MK_PARTITION); }
   7210 
   7211 /* We're currently exporting declarations.  */
   7212 inline bool module_exporting_p ()
   7213 { return module_kind & MK_EXPORTING; }
   7214 
   7215 extern module_state *get_module (tree name, module_state *parent = NULL,
   7216 				 bool partition = false);
   7217 extern bool module_may_redeclare (tree decl);
   7218 
   7219 extern int module_initializer_kind ();
   7220 extern void module_add_import_initializers ();
   7221 
   7222 /* Where the namespace-scope decl was originally declared.  */
   7223 extern void set_originating_module (tree, bool friend_p = false);
   7224 extern tree get_originating_module_decl (tree) ATTRIBUTE_PURE;
   7225 extern int get_originating_module (tree, bool for_mangle = false) ATTRIBUTE_PURE;
   7226 extern unsigned get_importing_module (tree, bool = false) ATTRIBUTE_PURE;
   7227 
   7228 /* Where current instance of the decl got declared/defined/instantiated.  */
   7229 extern void set_instantiating_module (tree);
   7230 extern void set_defining_module (tree);
   7231 extern void maybe_attach_decl (tree ctx, tree decl);
   7232 
   7233 extern void mangle_module (int m, bool include_partition);
   7234 extern void mangle_module_fini ();
   7235 extern void lazy_load_binding (unsigned mod, tree ns, tree id,
   7236 			       binding_slot *bslot);
   7237 extern void lazy_load_pendings (tree decl);
   7238 extern module_state *preprocess_module (module_state *, location_t,
   7239 					bool in_purview,
   7240 					bool is_import, bool export_p,
   7241 					cpp_reader *reader);
   7242 extern void preprocessed_module (cpp_reader *reader);
   7243 extern void import_module (module_state *, location_t, bool export_p,
   7244 			   tree attr, cpp_reader *);
   7245 extern void declare_module (module_state *, location_t, bool export_p,
   7246 			    tree attr, cpp_reader *);
   7247 extern void init_modules (cpp_reader *);
   7248 extern void fini_modules ();
   7249 extern void maybe_check_all_macros (cpp_reader *);
   7250 extern void finish_module_processing (cpp_reader *);
   7251 extern char const *module_name (unsigned, bool header_ok);
   7252 extern bitmap get_import_bitmap ();
   7253 extern bitmap visible_instantiation_path (bitmap *);
   7254 extern void module_begin_main_file (cpp_reader *, line_maps *,
   7255 				    const line_map_ordinary *);
   7256 extern void module_preprocess_options (cpp_reader *);
   7257 extern bool handle_module_option (unsigned opt, const char *arg, int value);
   7258 
   7259 /* In optimize.cc */
   7260 extern bool maybe_clone_body			(tree);
   7261 
   7262 /* In parser.cc */
   7263 extern tree cp_convert_range_for (tree, tree, tree, tree, unsigned int, bool,
   7264 				  unsigned short);
   7265 extern void cp_convert_omp_range_for (tree &, vec<tree, va_gc> *, tree &,
   7266 				      tree &, tree &, tree &, tree &, tree &);
   7267 extern void cp_finish_omp_range_for (tree, tree);
   7268 extern bool parsing_nsdmi (void);
   7269 extern bool parsing_function_declarator ();
   7270 extern bool parsing_default_capturing_generic_lambda_in_template (void);
   7271 extern void inject_this_parameter (tree, cp_cv_quals);
   7272 extern location_t defparse_location (tree);
   7273 extern void maybe_show_extern_c_location (void);
   7274 extern bool literal_integer_zerop (const_tree);
   7275 
   7276 /* in pt.cc */
   7277 extern tree canonical_type_parameter		(tree);
   7278 extern void push_access_scope			(tree);
   7279 extern void pop_access_scope			(tree);
   7280 extern bool check_template_shadow		(tree);
   7281 extern bool check_auto_in_tmpl_args             (tree, tree);
   7282 extern tree get_innermost_template_args		(tree, int);
   7283 extern void maybe_begin_member_template_processing (tree);
   7284 extern void maybe_end_member_template_processing (void);
   7285 extern tree finish_member_template_decl		(tree);
   7286 extern void begin_template_parm_list		(void);
   7287 extern bool begin_specialization		(void);
   7288 extern void reset_specialization		(void);
   7289 extern void end_specialization			(void);
   7290 extern void begin_explicit_instantiation	(void);
   7291 extern void end_explicit_instantiation		(void);
   7292 extern void check_unqualified_spec_or_inst	(tree, location_t);
   7293 extern tree check_explicit_specialization	(tree, tree, int, int,
   7294 						 tree = NULL_TREE);
   7295 extern int num_template_headers_for_class	(tree);
   7296 extern void check_template_variable		(tree);
   7297 extern tree make_auto				(void);
   7298 extern tree make_decltype_auto			(void);
   7299 extern tree make_constrained_auto		(tree, tree);
   7300 extern tree make_constrained_decltype_auto	(tree, tree);
   7301 extern tree make_template_placeholder		(tree);
   7302 extern bool template_placeholder_p		(tree);
   7303 extern bool ctad_template_p			(tree);
   7304 extern tree do_auto_deduction                   (tree, tree, tree,
   7305                                                  tsubst_flags_t
   7306 						 = tf_warning_or_error,
   7307                                                  auto_deduction_context
   7308 						 = adc_unspecified,
   7309 						 tree = NULL_TREE,
   7310 						 int = LOOKUP_NORMAL,
   7311 						 tree = NULL_TREE);
   7312 extern tree type_uses_auto			(tree);
   7313 extern tree type_uses_auto_or_concept		(tree);
   7314 extern void append_type_to_template_for_access_check (tree, tree, tree,
   7315 						      location_t);
   7316 extern tree convert_generic_types_to_packs	(tree, int, int);
   7317 extern tree splice_late_return_type		(tree, tree);
   7318 extern bool is_auto				(const_tree);
   7319 extern tree process_template_parm		(tree, location_t, tree,
   7320 						 bool, bool);
   7321 extern tree end_template_parm_list		(tree);
   7322 extern void end_template_parm_list		(void);
   7323 extern void end_template_decl			(void);
   7324 extern tree maybe_update_decl_type		(tree, tree);
   7325 extern bool check_default_tmpl_args             (tree, tree, bool, bool, int);
   7326 extern tree push_template_decl			(tree, bool is_friend = false);
   7327 extern tree add_inherited_template_parms	(tree, tree);
   7328 extern void template_parm_level_and_index	(tree, int*, int*);
   7329 extern bool redeclare_class_template		(tree, tree, tree);
   7330 extern tree lookup_template_class		(tree, tree, tree, tree,
   7331 						 int, tsubst_flags_t);
   7332 extern tree lookup_template_function		(tree, tree);
   7333 extern tree lookup_template_variable		(tree, tree);
   7334 extern int uses_template_parms			(tree);
   7335 extern bool uses_template_parms_level		(tree, int);
   7336 extern bool uses_outer_template_parms_in_constraints (tree);
   7337 extern bool in_template_function		(void);
   7338 extern bool need_generic_capture		(void);
   7339 extern tree instantiate_class_template		(tree);
   7340 extern tree instantiate_template		(tree, tree, tsubst_flags_t);
   7341 extern tree fn_type_unification			(tree, tree, tree,
   7342 						 const tree *, unsigned int,
   7343 						 tree, unification_kind_t, int,
   7344 						 struct conversion **,
   7345 						 bool, bool);
   7346 extern void mark_decl_instantiated		(tree, int);
   7347 extern int more_specialized_fn			(tree, tree, int);
   7348 extern void do_decl_instantiation		(tree, tree);
   7349 extern void do_type_instantiation		(tree, tree, tsubst_flags_t);
   7350 extern bool always_instantiate_p		(tree);
   7351 extern bool maybe_instantiate_noexcept		(tree, tsubst_flags_t = tf_warning_or_error);
   7352 extern tree instantiate_decl			(tree, bool, bool);
   7353 extern void maybe_instantiate_decl		(tree);
   7354 extern int comp_template_parms			(const_tree, const_tree);
   7355 extern bool template_heads_equivalent_p		(const_tree, const_tree);
   7356 extern bool builtin_pack_fn_p			(tree);
   7357 extern tree uses_parameter_packs                (tree);
   7358 extern bool template_parameter_pack_p           (const_tree);
   7359 extern bool function_parameter_pack_p		(const_tree);
   7360 extern bool function_parameter_expanded_from_pack_p (tree, tree);
   7361 extern tree make_pack_expansion                 (tree, tsubst_flags_t = tf_warning_or_error);
   7362 extern bool check_for_bare_parameter_packs      (tree, location_t = UNKNOWN_LOCATION);
   7363 extern tree build_template_info			(tree, tree);
   7364 extern tree get_template_info			(const_tree);
   7365 extern int template_class_depth			(tree);
   7366 extern int is_specialization_of			(tree, tree);
   7367 extern bool is_specialization_of_friend		(tree, tree);
   7368 extern int comp_template_args			(tree, tree, tree * = NULL,
   7369 						 tree * = NULL, bool = false);
   7370 extern int template_args_equal                  (tree, tree, bool = false);
   7371 extern tree maybe_process_partial_specialization (tree);
   7372 extern tree most_specialized_instantiation	(tree);
   7373 extern tree most_specialized_partial_spec       (tree, tsubst_flags_t);
   7374 extern void print_candidates			(tree);
   7375 extern void instantiate_pending_templates	(int);
   7376 extern tree tsubst_default_argument		(tree, int, tree, tree,
   7377 						 tsubst_flags_t);
   7378 extern tree tsubst (tree, tree, tsubst_flags_t, tree);
   7379 extern tree tsubst_copy_and_build		(tree, tree, tsubst_flags_t,
   7380 						 tree, bool = false, bool = false);
   7381 extern tree tsubst_expr                         (tree, tree, tsubst_flags_t,
   7382                                                  tree, bool);
   7383 extern tree tsubst_pack_expansion		(tree, tree, tsubst_flags_t, tree);
   7384 extern tree tsubst_argument_pack		(tree, tree, tsubst_flags_t, tree);
   7385 extern tree tsubst_template_args		(tree, tree, tsubst_flags_t, tree);
   7386 extern tree tsubst_template_arg			(tree, tree, tsubst_flags_t, tree);
   7387 extern tree tsubst_function_parms		(tree, tree, tsubst_flags_t, tree);
   7388 extern tree most_general_template		(tree);
   7389 extern tree get_mostly_instantiated_function_type (tree);
   7390 extern bool problematic_instantiation_changed	(void);
   7391 extern void record_last_problematic_instantiation (void);
   7392 extern struct tinst_level *current_instantiation(void);
   7393 extern bool instantiating_current_function_p    (void);
   7394 extern tree maybe_get_template_decl_from_type_decl (tree);
   7395 extern int processing_template_parmlist;
   7396 extern bool dependent_type_p			(tree);
   7397 extern bool dependent_scope_p			(tree);
   7398 extern bool dependentish_scope_p		(tree);
   7399 extern bool any_dependent_template_arguments_p  (const_tree);
   7400 extern bool any_erroneous_template_args_p       (const_tree);
   7401 extern bool dependent_template_p		(tree);
   7402 extern bool dependent_template_id_p		(tree, tree);
   7403 extern bool type_dependent_expression_p		(tree);
   7404 extern bool type_dependent_object_expression_p	(tree);
   7405 extern bool any_type_dependent_arguments_p      (const vec<tree, va_gc> *);
   7406 extern bool any_type_dependent_elements_p       (const_tree);
   7407 extern bool type_dependent_expression_p_push	(tree);
   7408 extern bool value_dependent_expression_p	(tree);
   7409 extern bool instantiation_dependent_uneval_expression_p (tree);
   7410 extern bool any_value_dependent_elements_p      (const_tree);
   7411 extern bool dependent_omp_for_p			(tree, tree, tree, tree);
   7412 extern tree resolve_typename_type		(tree, bool);
   7413 extern tree template_for_substitution		(tree);
   7414 extern tree build_non_dependent_expr		(tree);
   7415 extern void make_args_non_dependent		(vec<tree, va_gc> *);
   7416 extern bool reregister_specialization		(tree, tree, tree);
   7417 extern tree instantiate_non_dependent_expr	(tree);
   7418 extern tree instantiate_non_dependent_expr_sfinae (tree, tsubst_flags_t);
   7419 extern tree instantiate_non_dependent_expr_internal (tree, tsubst_flags_t);
   7420 extern tree instantiate_non_dependent_or_null   (tree);
   7421 extern bool variable_template_specialization_p  (tree);
   7422 extern bool alias_type_or_template_p            (tree);
   7423 enum { nt_opaque = false, nt_transparent = true };
   7424 extern tree alias_template_specialization_p     (const_tree, bool);
   7425 extern tree dependent_alias_template_spec_p     (const_tree, bool);
   7426 extern bool template_parm_object_p		(const_tree);
   7427 extern tree tparm_object_argument		(tree);
   7428 extern bool explicit_class_specialization_p     (tree);
   7429 extern bool push_tinst_level                    (tree);
   7430 extern bool push_tinst_level                    (tree, tree);
   7431 extern bool push_tinst_level_loc                (tree, location_t);
   7432 extern bool push_tinst_level_loc                (tree, tree, location_t);
   7433 extern void pop_tinst_level                     (void);
   7434 extern struct tinst_level *outermost_tinst_level(void);
   7435 extern bool non_templated_friend_p		(tree);
   7436 extern void init_template_processing		(void);
   7437 extern void print_template_statistics		(void);
   7438 bool template_template_parameter_p		(const_tree);
   7439 bool template_type_parameter_p                  (const_tree);
   7440 extern bool primary_template_specialization_p   (const_tree);
   7441 extern tree get_primary_template_innermost_parameters	(const_tree);
   7442 extern tree get_template_innermost_arguments	(const_tree);
   7443 extern tree get_template_argument_pack_elems	(const_tree);
   7444 extern tree get_function_template_decl		(const_tree);
   7445 extern tree resolve_nondeduced_context		(tree, tsubst_flags_t);
   7446 extern tree resolve_nondeduced_context_or_error	(tree, tsubst_flags_t);
   7447 extern hashval_t iterative_hash_template_arg (tree arg, hashval_t val);
   7448 extern tree coerce_template_parms               (tree, tree, tree);
   7449 extern tree coerce_template_parms               (tree, tree, tree, tsubst_flags_t);
   7450 extern tree canonicalize_type_argument		(tree, tsubst_flags_t);
   7451 extern void register_local_specialization       (tree, tree);
   7452 extern tree retrieve_local_specialization       (tree);
   7453 extern tree extract_fnparm_pack                 (tree, tree *);
   7454 extern tree template_parm_to_arg                (tree);
   7455 extern tree dguide_name				(tree);
   7456 extern bool dguide_name_p			(tree);
   7457 extern bool deduction_guide_p			(const_tree);
   7458 extern bool copy_guide_p			(const_tree);
   7459 extern bool template_guide_p			(const_tree);
   7460 extern bool builtin_guide_p			(const_tree);
   7461 extern void store_explicit_specifier		(tree, tree);
   7462 extern tree lookup_explicit_specifier		(tree);
   7463 extern void walk_specializations		(bool,
   7464 						 void (*)(bool, spec_entry *,
   7465 							  void *),
   7466 						 void *);
   7467 extern tree match_mergeable_specialization	(bool is_decl, spec_entry *);
   7468 extern unsigned get_mergeable_specialization_flags (tree tmpl, tree spec);
   7469 extern void add_mergeable_specialization        (bool is_decl, bool is_alias,
   7470 						 spec_entry *,
   7471 						 tree outer, unsigned);
   7472 extern tree add_to_template_args		(tree, tree);
   7473 extern tree add_outermost_template_args		(tree, tree);
   7474 extern tree add_extra_args			(tree, tree, tsubst_flags_t, tree);
   7475 extern tree build_extra_args			(tree, tree, tsubst_flags_t);
   7476 
   7477 /* in rtti.cc */
   7478 /* A vector of all tinfo decls that haven't been emitted yet.  */
   7479 extern GTY(()) vec<tree, va_gc> *unemitted_tinfo_decls;
   7480 
   7481 extern void init_rtti_processing		(void);
   7482 extern tree build_typeid			(tree, tsubst_flags_t);
   7483 extern tree get_tinfo_decl_direct	        (tree, tree, int);
   7484 extern tree get_tinfo_decl			(tree);
   7485 extern tree get_typeid				(tree, tsubst_flags_t);
   7486 extern tree build_headof			(tree);
   7487 extern tree build_dynamic_cast			(location_t, tree, tree,
   7488 						 tsubst_flags_t);
   7489 extern void emit_support_tinfos			(void);
   7490 extern bool emit_tinfo_decl			(tree);
   7491 extern unsigned get_pseudo_tinfo_index		(tree);
   7492 extern tree get_pseudo_tinfo_type		(unsigned);
   7493 extern tree build_if_nonnull			(tree, tree, tsubst_flags_t);
   7494 
   7495 /* in search.cc */
   7496 extern tree get_parent_with_private_access 	(tree decl, tree binfo);
   7497 extern bool accessible_base_p			(tree, tree, bool);
   7498 extern tree lookup_base                         (tree, tree, base_access,
   7499 						 base_kind *, tsubst_flags_t);
   7500 extern tree dcast_base_hint			(tree, tree);
   7501 extern int accessible_p				(tree, tree, bool);
   7502 extern int accessible_in_template_p		(tree, tree);
   7503 extern tree lookup_field			(tree, tree, int, bool);
   7504 extern tree lookup_fnfields			(tree, tree, int, tsubst_flags_t);
   7505 extern tree lookup_member			(tree, tree, int, bool,
   7506 						 tsubst_flags_t,
   7507 						 access_failure_info *afi = NULL);
   7508 extern tree lookup_member_fuzzy		(tree, tree, bool);
   7509 extern tree locate_field_accessor		(tree, tree, bool);
   7510 extern int look_for_overrides			(tree, tree);
   7511 extern void get_pure_virtuals			(tree);
   7512 extern void maybe_suppress_debug_info		(tree);
   7513 extern void note_debug_info_needed		(tree);
   7514 extern tree current_scope			(void);
   7515 extern int at_function_scope_p			(void);
   7516 extern bool at_class_scope_p			(void);
   7517 extern bool at_namespace_scope_p		(void);
   7518 extern tree context_for_name_lookup		(tree);
   7519 extern tree lookup_conversions			(tree);
   7520 extern tree binfo_from_vbase			(tree);
   7521 extern tree binfo_for_vbase			(tree, tree);
   7522 extern tree look_for_overrides_here		(tree, tree);
   7523 #define dfs_skip_bases ((tree)1)
   7524 extern tree dfs_walk_all (tree, tree (*) (tree, void *),
   7525 			  tree (*) (tree, void *), void *);
   7526 extern tree dfs_walk_once (tree, tree (*) (tree, void *),
   7527 			   tree (*) (tree, void *), void *);
   7528 extern tree binfo_via_virtual			(tree, tree);
   7529 extern bool binfo_direct_p			(tree);
   7530 extern tree build_baselink			(tree, tree, tree, tree);
   7531 extern tree adjust_result_of_qualified_name_lookup
   7532 						(tree, tree, tree);
   7533 extern tree copied_binfo			(tree, tree);
   7534 extern tree original_binfo			(tree, tree);
   7535 extern bool shared_member_p			(tree);
   7536 extern bool any_dependent_bases_p (tree = current_nonlambda_class_type ());
   7537 extern bool maybe_check_overriding_exception_spec (tree, tree);
   7538 
   7539 /* in semantics.cc */
   7540 extern void push_deferring_access_checks	(deferring_kind);
   7541 extern void resume_deferring_access_checks	(void);
   7542 extern void stop_deferring_access_checks	(void);
   7543 extern void pop_deferring_access_checks		(void);
   7544 extern vec<deferred_access_check, va_gc> *get_deferred_access_checks (void);
   7545 extern void reopen_deferring_access_checks (vec<deferred_access_check, va_gc> *);
   7546 extern void pop_to_parent_deferring_access_checks (void);
   7547 extern bool perform_access_checks (vec<deferred_access_check, va_gc> *,
   7548 				   tsubst_flags_t);
   7549 extern bool perform_deferred_access_checks	(tsubst_flags_t);
   7550 extern bool perform_or_defer_access_check	(tree, tree, tree,
   7551 						 tsubst_flags_t,
   7552 						 access_failure_info *afi = NULL);
   7553 
   7554 /* RAII sentinel to ensures that deferred access checks are popped before
   7555   a function returns.  */
   7556 
   7557 class deferring_access_check_sentinel
   7558 {
   7559 public:
   7560   deferring_access_check_sentinel (enum deferring_kind kind = dk_deferred)
   7561   {
   7562     push_deferring_access_checks (kind);
   7563   }
   7564   ~deferring_access_check_sentinel ()
   7565   {
   7566     pop_deferring_access_checks ();
   7567   }
   7568 };
   7569 
   7570 extern int stmts_are_full_exprs_p		(void);
   7571 extern void init_cp_semantics			(void);
   7572 extern tree do_poplevel				(tree);
   7573 extern void break_maybe_infinite_loop		(void);
   7574 extern void add_decl_expr			(tree);
   7575 extern tree maybe_cleanup_point_expr_void	(tree);
   7576 extern tree finish_expr_stmt			(tree);
   7577 extern tree begin_if_stmt			(void);
   7578 extern tree finish_if_stmt_cond			(tree, tree);
   7579 extern tree finish_then_clause			(tree);
   7580 extern void begin_else_clause			(tree);
   7581 extern void finish_else_clause			(tree);
   7582 extern void finish_if_stmt			(tree);
   7583 extern tree begin_while_stmt			(void);
   7584 extern void finish_while_stmt_cond	(tree, tree, bool, unsigned short);
   7585 extern void finish_while_stmt			(tree);
   7586 extern tree begin_do_stmt			(void);
   7587 extern void finish_do_body			(tree);
   7588 extern void finish_do_stmt		(tree, tree, bool, unsigned short);
   7589 extern tree finish_return_stmt			(tree);
   7590 extern tree begin_for_scope			(tree *);
   7591 extern tree begin_for_stmt			(tree, tree);
   7592 extern void finish_init_stmt			(tree);
   7593 extern void finish_for_cond		(tree, tree, bool, unsigned short);
   7594 extern void finish_for_expr			(tree, tree);
   7595 extern void finish_for_stmt			(tree);
   7596 extern tree begin_range_for_stmt		(tree, tree);
   7597 extern void finish_range_for_decl		(tree, tree, tree);
   7598 extern void finish_range_for_stmt		(tree);
   7599 extern tree finish_break_stmt			(void);
   7600 extern tree finish_continue_stmt		(void);
   7601 extern tree begin_switch_stmt			(void);
   7602 extern void finish_switch_cond			(tree, tree);
   7603 extern void finish_switch_stmt			(tree);
   7604 extern tree finish_goto_stmt			(tree);
   7605 extern tree begin_try_block			(void);
   7606 extern void finish_try_block			(tree);
   7607 extern void finish_handler_sequence		(tree);
   7608 extern tree begin_function_try_block		(tree *);
   7609 extern void finish_function_try_block		(tree);
   7610 extern void finish_function_handler_sequence    (tree, tree);
   7611 extern void finish_cleanup_try_block		(tree);
   7612 extern tree begin_handler			(void);
   7613 extern void finish_handler_parms		(tree, tree);
   7614 extern void finish_handler			(tree);
   7615 extern void finish_cleanup			(tree, tree);
   7616 extern bool is_this_parameter                   (tree);
   7617 
   7618 enum {
   7619   BCS_NORMAL = 0,
   7620   BCS_NO_SCOPE = 1,
   7621   BCS_TRY_BLOCK = 2,
   7622   BCS_FN_BODY = 4,
   7623   BCS_TRANSACTION = 8
   7624 };
   7625 extern tree begin_compound_stmt			(unsigned int);
   7626 
   7627 extern void finish_compound_stmt		(tree);
   7628 extern tree finish_asm_stmt			(location_t, int, tree, tree,
   7629 						 tree, tree, tree, bool);
   7630 extern tree finish_label_stmt			(tree);
   7631 extern void finish_label_decl			(tree);
   7632 extern cp_expr finish_parenthesized_expr	(cp_expr);
   7633 extern tree force_paren_expr			(tree, bool = false);
   7634 inline tree force_paren_expr_uneval 		(tree t)
   7635 { return force_paren_expr (t, true); }
   7636 extern tree maybe_undo_parenthesized_ref	(tree);
   7637 extern tree maybe_strip_ref_conversion		(tree);
   7638 extern tree finish_non_static_data_member       (tree, tree, tree);
   7639 extern tree begin_stmt_expr			(void);
   7640 extern tree finish_stmt_expr_expr		(tree, tree);
   7641 extern tree finish_stmt_expr			(tree, bool);
   7642 extern tree stmt_expr_value_expr		(tree);
   7643 bool empty_expr_stmt_p				(tree);
   7644 extern cp_expr perform_koenig_lookup		(cp_expr, vec<tree, va_gc> *,
   7645 						 tsubst_flags_t);
   7646 extern tree finish_call_expr			(tree, vec<tree, va_gc> **, bool,
   7647 						 bool, tsubst_flags_t);
   7648 extern tree lookup_and_finish_template_variable (tree, tree, tsubst_flags_t = tf_warning_or_error);
   7649 extern tree finish_template_variable		(tree, tsubst_flags_t = tf_warning_or_error);
   7650 extern cp_expr finish_increment_expr		(cp_expr, enum tree_code);
   7651 extern tree finish_this_expr			(void);
   7652 extern tree finish_pseudo_destructor_expr       (tree, tree, tree, location_t);
   7653 extern cp_expr finish_unary_op_expr		(location_t, enum tree_code, cp_expr,
   7654 						 tsubst_flags_t);
   7655 /* Whether this call to finish_compound_literal represents a C++11 functional
   7656    cast or a C99 compound literal.  */
   7657 enum fcl_t { fcl_functional, fcl_c99 };
   7658 extern tree finish_compound_literal		(tree, tree, tsubst_flags_t, fcl_t = fcl_functional);
   7659 extern tree finish_fname			(tree);
   7660 extern void finish_translation_unit		(void);
   7661 extern tree finish_template_type_parm		(tree, tree);
   7662 extern tree finish_template_template_parm       (tree, tree);
   7663 extern tree begin_class_definition		(tree);
   7664 extern void finish_template_decl		(tree);
   7665 extern tree finish_template_type		(tree, tree, int);
   7666 extern tree finish_base_specifier		(tree, tree, bool);
   7667 extern void finish_member_declaration		(tree);
   7668 extern bool outer_automatic_var_p		(tree);
   7669 extern tree process_outer_var_ref		(tree, tsubst_flags_t, bool force_use = false);
   7670 extern cp_expr finish_id_expression		(tree, tree, tree,
   7671 						 cp_id_kind *,
   7672 						 bool, bool, bool *,
   7673 						 bool, bool, bool, bool,
   7674 						 const char **,
   7675                                                  location_t);
   7676 extern tree finish_typeof			(tree);
   7677 extern tree finish_underlying_type	        (tree);
   7678 extern tree calculate_bases                     (tree, tsubst_flags_t);
   7679 extern tree finish_bases                        (tree, bool);
   7680 extern tree calculate_direct_bases              (tree, tsubst_flags_t);
   7681 extern tree finish_offsetof			(tree, tree, location_t);
   7682 extern void finish_decl_cleanup			(tree, tree);
   7683 extern void finish_eh_cleanup			(tree);
   7684 extern void emit_associated_thunks		(tree);
   7685 extern void finish_mem_initializers		(tree);
   7686 extern tree check_template_template_default_arg (tree);
   7687 extern bool expand_or_defer_fn_1		(tree);
   7688 extern void expand_or_defer_fn			(tree);
   7689 extern bool check_accessibility_of_qualified_id (tree, tree, tree, tsubst_flags_t);
   7690 extern tree finish_qualified_id_expr		(tree, tree, bool, bool,
   7691 						 bool, bool, tsubst_flags_t);
   7692 extern void simplify_aggr_init_expr		(tree *);
   7693 extern void finalize_nrv			(tree *, tree, tree);
   7694 extern tree omp_reduction_id			(enum tree_code, tree, tree);
   7695 extern tree cp_remove_omp_priv_cleanup_stmt	(tree *, int *, void *);
   7696 extern bool cp_check_omp_declare_reduction	(tree);
   7697 extern void finish_omp_declare_simd_methods	(tree);
   7698 extern tree finish_omp_clauses			(tree, enum c_omp_region_type);
   7699 extern tree push_omp_privatization_clauses	(bool);
   7700 extern void pop_omp_privatization_clauses	(tree);
   7701 extern void save_omp_privatization_clauses	(vec<tree> &);
   7702 extern void restore_omp_privatization_clauses	(vec<tree> &);
   7703 extern void finish_omp_threadprivate		(tree);
   7704 extern tree begin_omp_structured_block		(void);
   7705 extern tree finish_omp_structured_block		(tree);
   7706 extern tree finish_oacc_data			(tree, tree);
   7707 extern tree finish_oacc_host_data		(tree, tree);
   7708 extern tree finish_omp_construct		(enum tree_code, tree, tree);
   7709 extern tree begin_omp_parallel			(void);
   7710 extern tree finish_omp_parallel			(tree, tree);
   7711 extern tree begin_omp_task			(void);
   7712 extern tree finish_omp_task			(tree, tree);
   7713 extern tree finish_omp_for			(location_t, enum tree_code,
   7714 						 tree, tree, tree, tree, tree,
   7715 						 tree, tree, vec<tree> *, tree);
   7716 extern tree finish_omp_for_block		(tree, tree);
   7717 extern void finish_omp_atomic			(location_t, enum tree_code,
   7718 						 enum tree_code, tree, tree,
   7719 						 tree, tree, tree, tree, tree,
   7720 						 enum omp_memory_order, bool);
   7721 extern void finish_omp_barrier			(void);
   7722 extern void finish_omp_depobj			(location_t, tree,
   7723 						 enum omp_clause_depend_kind,
   7724 						 tree);
   7725 extern void finish_omp_flush			(int);
   7726 extern void finish_omp_taskwait			(void);
   7727 extern void finish_omp_taskyield		(void);
   7728 extern void finish_omp_cancel			(tree);
   7729 extern void finish_omp_cancellation_point	(tree);
   7730 extern tree omp_privatize_field			(tree, bool);
   7731 extern tree begin_transaction_stmt		(location_t, tree *, int);
   7732 extern void finish_transaction_stmt		(tree, tree, int, tree);
   7733 extern tree build_transaction_expr		(location_t, tree, int, tree);
   7734 extern bool cxx_omp_create_clause_info		(tree, tree, bool, bool,
   7735 						 bool, bool);
   7736 extern tree baselink_for_fns                    (tree);
   7737 extern void finish_static_assert                (tree, tree, location_t,
   7738 						 bool, bool);
   7739 extern tree finish_decltype_type                (tree, bool, tsubst_flags_t);
   7740 extern tree fold_builtin_is_corresponding_member (location_t, int, tree *);
   7741 extern tree fold_builtin_is_pointer_inverconvertible_with_class (location_t, int, tree *);
   7742 extern tree finish_trait_expr			(location_t, enum cp_trait_kind, tree, tree);
   7743 extern tree build_lambda_expr                   (void);
   7744 extern tree build_lambda_object			(tree);
   7745 extern tree begin_lambda_type                   (tree);
   7746 extern tree lambda_capture_field_type		(tree, bool, bool);
   7747 extern tree lambda_proxy_type			(tree);
   7748 extern tree lambda_function			(tree);
   7749 extern void apply_deduced_return_type           (tree, tree);
   7750 extern tree add_capture                         (tree, tree, tree, bool, bool);
   7751 extern tree add_default_capture                 (tree, tree, tree);
   7752 extern void insert_capture_proxy		(tree);
   7753 extern void insert_pending_capture_proxies	(void);
   7754 extern bool is_capture_proxy			(tree);
   7755 extern bool is_normal_capture_proxy             (tree);
   7756 extern bool is_constant_capture_proxy           (tree);
   7757 extern void register_capture_members		(tree);
   7758 extern tree lambda_expr_this_capture            (tree, int);
   7759 extern void maybe_generic_this_capture		(tree, tree);
   7760 extern tree maybe_resolve_dummy			(tree, bool);
   7761 extern tree current_nonlambda_function		(void);
   7762 extern tree nonlambda_method_basetype		(void);
   7763 extern tree current_nonlambda_scope		(void);
   7764 extern tree current_lambda_expr			(void);
   7765 extern bool generic_lambda_fn_p			(tree);
   7766 extern tree do_dependent_capture		(tree, bool = false);
   7767 extern bool lambda_fn_in_template_p		(tree);
   7768 extern void maybe_add_lambda_conv_op            (tree);
   7769 extern bool is_lambda_ignored_entity            (tree);
   7770 extern bool lambda_static_thunk_p		(tree);
   7771 extern bool call_from_lambda_thunk_p		(tree);
   7772 extern tree finish_builtin_launder		(location_t, tree,
   7773 						 tsubst_flags_t);
   7774 extern tree cp_build_vec_convert		(tree, location_t, tree,
   7775 						 tsubst_flags_t);
   7776 extern tree cp_build_bit_cast			(location_t, tree, tree,
   7777 						 tsubst_flags_t);
   7778 extern void start_lambda_scope			(tree);
   7779 extern void record_lambda_scope			(tree);
   7780 extern void record_null_lambda_scope		(tree);
   7781 extern void finish_lambda_scope			(void);
   7782 extern tree start_lambda_function		(tree fn, tree lambda_expr);
   7783 extern void finish_lambda_function		(tree body);
   7784 extern bool regenerated_lambda_fn_p		(tree);
   7785 extern tree lambda_regenerating_args		(tree);
   7786 extern tree most_general_lambda			(tree);
   7787 extern tree finish_omp_target			(location_t, tree, tree, bool);
   7788 extern void finish_omp_target_clauses		(location_t, tree, tree *);
   7789 
   7790 /* in tree.cc */
   7791 extern int cp_tree_operand_length		(const_tree);
   7792 extern int cp_tree_code_length			(enum tree_code);
   7793 extern void cp_free_lang_data 			(tree t);
   7794 extern tree force_target_expr			(tree, tree, tsubst_flags_t);
   7795 extern tree build_target_expr_with_type		(tree, tree, tsubst_flags_t);
   7796 extern void lang_check_failed			(const char *, int,
   7797 						 const char *) ATTRIBUTE_NORETURN
   7798 						 ATTRIBUTE_COLD;
   7799 extern tree stabilize_expr			(tree, tree *);
   7800 extern void stabilize_call			(tree, tree *);
   7801 extern bool stabilize_init			(tree, tree *);
   7802 extern tree add_stmt_to_compound		(tree, tree);
   7803 extern void init_tree				(void);
   7804 extern bool pod_type_p				(const_tree);
   7805 extern bool layout_pod_type_p			(const_tree);
   7806 extern bool std_layout_type_p			(const_tree);
   7807 extern bool trivial_type_p			(const_tree);
   7808 extern bool trivially_copyable_p		(const_tree);
   7809 extern bool type_has_unique_obj_representations (const_tree);
   7810 extern bool scalarish_type_p			(const_tree);
   7811 extern bool structural_type_p			(tree, bool = false);
   7812 extern bool type_has_nontrivial_default_init	(const_tree);
   7813 extern bool type_has_nontrivial_copy_init	(const_tree);
   7814 extern void maybe_warn_parm_abi			(tree, location_t);
   7815 extern bool class_tmpl_impl_spec_p		(const_tree);
   7816 extern int zero_init_p				(const_tree);
   7817 extern bool zero_init_expr_p			(tree);
   7818 extern bool check_abi_tag_redeclaration		(const_tree, const_tree,
   7819 						 const_tree);
   7820 extern bool check_abi_tag_args			(tree, tree);
   7821 extern tree strip_typedefs			(tree, bool * = NULL,
   7822 						 unsigned int = 0);
   7823 extern tree strip_typedefs_expr			(tree, bool * = NULL,
   7824 						 unsigned int = 0);
   7825 extern tree copy_binfo				(tree, tree, tree,
   7826 						 tree *, int);
   7827 extern int member_p				(const_tree);
   7828 extern cp_lvalue_kind real_lvalue_p		(const_tree);
   7829 extern cp_lvalue_kind lvalue_kind		(const_tree);
   7830 extern bool glvalue_p				(const_tree);
   7831 extern bool obvalue_p				(const_tree);
   7832 extern bool xvalue_p	                        (const_tree);
   7833 extern bool bitfield_p				(const_tree);
   7834 extern tree cp_stabilize_reference		(tree);
   7835 extern bool builtin_valid_in_constant_expr_p    (const_tree);
   7836 extern tree build_min				(enum tree_code, tree, ...);
   7837 extern tree build_min_nt_loc			(location_t, enum tree_code,
   7838 						 ...);
   7839 extern tree build_min_non_dep			(enum tree_code, tree, ...);
   7840 extern tree build_min_non_dep_op_overload	(enum tree_code, tree, tree, ...);
   7841 extern tree build_min_non_dep_op_overload	(tree, tree, tree,
   7842 						 vec<tree, va_gc> *);
   7843 extern tree build_min_nt_call_vec (tree, vec<tree, va_gc> *);
   7844 extern tree build_min_non_dep_call_vec		(tree, tree, vec<tree, va_gc> *);
   7845 extern vec<tree, va_gc>* vec_copy_and_insert    (vec<tree, va_gc>*, tree, unsigned);
   7846 extern tree build_cplus_new			(tree, tree, tsubst_flags_t);
   7847 extern tree build_local_temp			(tree);
   7848 extern bool is_local_temp			(tree);
   7849 extern tree build_aggr_init_expr		(tree, tree);
   7850 extern tree get_target_expr			(tree);
   7851 extern tree get_target_expr_sfinae		(tree, tsubst_flags_t);
   7852 extern tree build_cplus_array_type		(tree, tree, int is_dep = -1);
   7853 extern tree build_array_of_n_type		(tree, int);
   7854 extern bool array_of_runtime_bound_p		(tree);
   7855 extern bool vla_type_p				(tree);
   7856 extern tree build_array_copy			(tree);
   7857 extern tree build_vec_init_expr			(tree, tree, tsubst_flags_t);
   7858 extern tree expand_vec_init_expr		(tree, tree, tsubst_flags_t,
   7859 						 vec<tree,va_gc>** = nullptr);
   7860 extern void diagnose_non_constexpr_vec_init	(tree);
   7861 extern tree hash_tree_cons			(tree, tree, tree);
   7862 extern tree hash_tree_chain			(tree, tree);
   7863 extern tree build_qualified_name		(tree, tree, tree, bool);
   7864 extern tree build_ref_qualified_type		(tree, cp_ref_qualifier);
   7865 extern tree make_binding_vec			(tree, unsigned clusters CXX_MEM_STAT_INFO);
   7866 inline tree ovl_first				(tree) ATTRIBUTE_PURE;
   7867 extern tree ovl_make				(tree fn,
   7868 						 tree next = NULL_TREE);
   7869 extern tree ovl_insert				(tree fn, tree maybe_ovl,
   7870 						 int using_or_hidden = 0);
   7871 extern tree ovl_skip_hidden			(tree) ATTRIBUTE_PURE;
   7872 extern void lookup_mark				(tree lookup, bool val);
   7873 extern tree lookup_add				(tree fns, tree lookup);
   7874 extern tree lookup_maybe_add			(tree fns, tree lookup,
   7875 						 bool deduping);
   7876 extern int is_overloaded_fn			(tree) ATTRIBUTE_PURE;
   7877 extern bool really_overloaded_fn		(tree) ATTRIBUTE_PURE;
   7878 extern tree dependent_name			(tree);
   7879 extern tree call_expr_dependent_name		(tree);
   7880 extern tree maybe_get_fns			(tree) ATTRIBUTE_PURE;
   7881 extern tree get_fns				(tree) ATTRIBUTE_PURE;
   7882 extern tree get_first_fn			(tree) ATTRIBUTE_PURE;
   7883 extern tree ovl_scope				(tree);
   7884 extern const char *cxx_printable_name		(tree, int);
   7885 extern const char *cxx_printable_name_translate	(tree, int);
   7886 extern tree canonical_eh_spec			(tree);
   7887 extern tree build_cp_fntype_variant		(tree, cp_ref_qualifier, tree, bool);
   7888 extern tree build_exception_variant		(tree, tree);
   7889 extern void fixup_deferred_exception_variants   (tree, tree);
   7890 extern tree bind_template_template_parm		(tree, tree);
   7891 extern tree array_type_nelts_total		(tree);
   7892 extern tree array_type_nelts_top		(tree);
   7893 extern bool array_of_unknown_bound_p		(const_tree);
   7894 extern bool source_location_current_p		(tree);
   7895 extern tree break_out_target_exprs		(tree, bool = false);
   7896 extern tree build_ctor_subob_ref		(tree, tree, tree);
   7897 extern tree replace_placeholders		(tree, tree, bool * = NULL);
   7898 extern bool find_placeholders			(tree);
   7899 extern tree get_type_decl			(tree);
   7900 extern tree decl_namespace_context		(tree);
   7901 extern bool decl_anon_ns_mem_p			(const_tree);
   7902 extern tree lvalue_type				(tree);
   7903 extern tree error_type				(tree);
   7904 extern int varargs_function_p			(const_tree);
   7905 extern bool cp_tree_equal			(tree, tree);
   7906 extern tree no_linkage_check			(tree, bool);
   7907 extern void debug_binfo				(tree);
   7908 extern tree build_dummy_object			(tree);
   7909 extern tree maybe_dummy_object			(tree, tree *);
   7910 extern bool is_dummy_object			(const_tree);
   7911 extern bool is_byte_access_type			(tree);
   7912 extern bool is_byte_access_type_not_plain_char	(tree);
   7913 extern const struct attribute_spec cxx_attribute_table[];
   7914 extern tree make_ptrmem_cst			(tree, tree);
   7915 extern tree cp_build_type_attribute_variant     (tree, tree);
   7916 extern tree cp_build_reference_type		(tree, bool);
   7917 extern tree move				(tree);
   7918 extern tree cp_build_qualified_type_real	(tree, int, tsubst_flags_t);
   7919 #define cp_build_qualified_type(TYPE, QUALS) \
   7920   cp_build_qualified_type_real ((TYPE), (QUALS), tf_warning_or_error)
   7921 extern bool cv_qualified_p			(const_tree);
   7922 extern tree cv_unqualified			(tree);
   7923 extern special_function_kind special_function_p (const_tree);
   7924 extern special_function_kind special_memfn_p	(const_tree);
   7925 extern int count_trees				(tree);
   7926 extern int char_type_p				(tree);
   7927 extern void verify_stmt_tree			(tree);
   7928 extern linkage_kind decl_linkage		(tree);
   7929 extern duration_kind decl_storage_duration	(tree);
   7930 extern tree cp_walk_subtrees (tree*, int*, walk_tree_fn,
   7931 			      void*, hash_set<tree> *);
   7932 #define cp_walk_tree(tp,func,data,pset) \
   7933 	walk_tree_1 (tp, func, data, pset, cp_walk_subtrees)
   7934 #define cp_walk_tree_without_duplicates(tp,func,data) \
   7935 	walk_tree_without_duplicates_1 (tp, func, data, cp_walk_subtrees)
   7936 extern tree rvalue				(tree);
   7937 extern tree convert_bitfield_to_declared_type   (tree);
   7938 extern tree cp_save_expr			(tree);
   7939 extern bool cast_valid_in_integral_constant_expression_p (tree);
   7940 extern bool cxx_type_hash_eq			(const_tree, const_tree);
   7941 extern tree cxx_copy_lang_qualifiers		(const_tree, const_tree);
   7942 
   7943 extern void cxx_print_statistics		(void);
   7944 extern bool maybe_warn_zero_as_null_pointer_constant (tree, location_t);
   7945 
   7946 /* in ptree.cc */
   7947 extern void cxx_print_xnode			(FILE *, tree, int);
   7948 extern void cxx_print_decl			(FILE *, tree, int);
   7949 extern void cxx_print_type			(FILE *, tree, int);
   7950 extern void cxx_print_identifier		(FILE *, tree, int);
   7951 extern void cxx_print_error_function		(diagnostic_context *,
   7952 						 const char *,
   7953 						 struct diagnostic_info *);
   7954 
   7955 /* in typeck.cc */
   7956 /* Says how we should behave when comparing two arrays one of which
   7957    has unknown bounds.  */
   7958 enum compare_bounds_t { bounds_none, bounds_either, bounds_first };
   7959 
   7960 extern bool cxx_mark_addressable		(tree, bool = false);
   7961 extern int string_conv_p			(const_tree, const_tree, int);
   7962 extern tree cp_truthvalue_conversion		(tree, tsubst_flags_t);
   7963 extern tree contextual_conv_bool		(tree, tsubst_flags_t);
   7964 extern tree condition_conversion		(tree);
   7965 extern tree require_complete_type		(tree);
   7966 extern tree require_complete_type_sfinae	(tree, tsubst_flags_t);
   7967 extern tree complete_type			(tree);
   7968 extern tree complete_type_or_else		(tree, tree);
   7969 extern tree complete_type_or_maybe_complain	(tree, tree, tsubst_flags_t);
   7970 inline bool type_unknown_p			(const_tree);
   7971 enum { ce_derived, ce_type, ce_normal, ce_exact };
   7972 extern bool comp_except_specs			(const_tree, const_tree, int);
   7973 extern bool comptypes				(tree, tree, int);
   7974 extern bool same_type_ignoring_top_level_qualifiers_p (tree, tree);
   7975 extern bool similar_type_p			(tree, tree);
   7976 extern bool next_common_initial_sequence	(tree &, tree &);
   7977 extern bool layout_compatible_type_p		(tree, tree);
   7978 extern bool compparms				(const_tree, const_tree);
   7979 extern int comp_cv_qualification		(const_tree, const_tree);
   7980 extern int comp_cv_qualification		(int, int);
   7981 extern int comp_cv_qual_signature		(tree, tree);
   7982 extern tree cxx_sizeof_or_alignof_expr		(location_t, tree,
   7983 						 enum tree_code, bool, bool);
   7984 extern tree cxx_sizeof_or_alignof_type		(location_t, tree,
   7985 						 enum tree_code, bool, bool);
   7986 extern tree cxx_alignas_expr                    (tree);
   7987 extern tree cxx_sizeof_nowarn                   (tree);
   7988 extern tree is_bitfield_expr_with_lowered_type  (const_tree);
   7989 extern tree unlowered_expr_type                 (const_tree);
   7990 extern tree decay_conversion			(tree,
   7991                                                  tsubst_flags_t,
   7992                                                  bool = true);
   7993 extern tree build_class_member_access_expr      (cp_expr, tree, tree, bool,
   7994 						 tsubst_flags_t);
   7995 extern tree finish_class_member_access_expr     (cp_expr, tree, bool,
   7996 						 tsubst_flags_t);
   7997 extern tree lookup_destructor			(tree, tree, tree, tsubst_flags_t);
   7998 extern tree build_dependent_operator_type	(tree, enum tree_code, bool);
   7999 extern tree build_x_indirect_ref		(location_t, tree,
   8000 						 ref_operator, tree,
   8001 						 tsubst_flags_t);
   8002 extern tree cp_build_indirect_ref		(location_t, tree,
   8003 						 ref_operator,
   8004 						 tsubst_flags_t);
   8005 extern tree cp_build_fold_indirect_ref		(tree);
   8006 extern tree build_array_ref			(location_t, tree, tree);
   8007 extern tree cp_build_array_ref			(location_t, tree, tree,
   8008 						 tsubst_flags_t);
   8009 extern tree get_member_function_from_ptrfunc	(tree *, tree, tsubst_flags_t);
   8010 extern tree cp_build_function_call_nary         (tree, tsubst_flags_t, ...)
   8011 						ATTRIBUTE_SENTINEL;
   8012 extern tree cp_build_function_call_vec		(tree, vec<tree, va_gc> **,
   8013 						 tsubst_flags_t,
   8014 						 tree = NULL_TREE);
   8015 extern tree build_x_binary_op			(const op_location_t &,
   8016 						 enum tree_code, tree,
   8017 						 enum tree_code, tree,
   8018 						 enum tree_code, tree,
   8019 						 tree *, tsubst_flags_t);
   8020 inline tree build_x_binary_op (const op_location_t &loc,
   8021 			       enum tree_code code, tree arg1, tree arg2,
   8022 			       tsubst_flags_t complain)
   8023 {
   8024   return build_x_binary_op (loc, code, arg1, TREE_CODE (arg1), arg2,
   8025 			    TREE_CODE (arg2), NULL_TREE, NULL, complain);
   8026 }
   8027 extern tree build_x_array_ref			(location_t, tree, tree,
   8028 						 tsubst_flags_t);
   8029 extern tree build_x_unary_op			(location_t,
   8030 						 enum tree_code, cp_expr,
   8031 						 tree, tsubst_flags_t);
   8032 extern tree cp_build_addressof			(location_t, tree,
   8033 						 tsubst_flags_t);
   8034 extern tree cp_build_addr_expr			(tree, tsubst_flags_t);
   8035 extern tree cp_build_unary_op                   (enum tree_code, tree, bool,
   8036                                                  tsubst_flags_t);
   8037 extern tree genericize_compound_lvalue		(tree);
   8038 extern tree unary_complex_lvalue		(enum tree_code, tree);
   8039 extern tree build_x_conditional_expr		(location_t, tree, tree, tree,
   8040                                                  tsubst_flags_t);
   8041 extern tree build_x_compound_expr_from_list	(tree, expr_list_kind,
   8042 						 tsubst_flags_t);
   8043 extern tree build_x_compound_expr_from_vec	(vec<tree, va_gc> *,
   8044 						 const char *, tsubst_flags_t);
   8045 extern tree build_x_compound_expr		(location_t, tree, tree,
   8046 						 tree, tsubst_flags_t);
   8047 extern tree build_compound_expr                 (location_t, tree, tree);
   8048 extern tree cp_build_compound_expr		(tree, tree, tsubst_flags_t);
   8049 extern tree build_static_cast			(location_t, tree, tree,
   8050 						 tsubst_flags_t);
   8051 extern tree build_reinterpret_cast		(location_t, tree, tree,
   8052 						 tsubst_flags_t);
   8053 extern tree build_const_cast			(location_t, tree, tree,
   8054 						 tsubst_flags_t);
   8055 extern tree build_c_cast			(location_t, tree, tree);
   8056 extern cp_expr build_c_cast			(location_t loc, tree type,
   8057 						 cp_expr expr);
   8058 extern tree cp_build_c_cast			(location_t, tree, tree,
   8059 						 tsubst_flags_t);
   8060 extern cp_expr build_x_modify_expr		(location_t, tree,
   8061 						 enum tree_code, tree,
   8062 						 tree, tsubst_flags_t);
   8063 extern tree cp_build_modify_expr		(location_t, tree,
   8064 						 enum tree_code, tree,
   8065 						 tsubst_flags_t);
   8066 extern tree convert_for_initialization		(tree, tree, tree, int,
   8067 						 impl_conv_rhs, tree, int,
   8068                                                  tsubst_flags_t);
   8069 extern int comp_ptr_ttypes			(tree, tree);
   8070 extern bool comp_ptr_ttypes_const		(tree, tree, compare_bounds_t);
   8071 extern bool error_type_p			(const_tree);
   8072 extern bool ptr_reasonably_similar		(const_tree, const_tree);
   8073 extern tree build_ptrmemfunc			(tree, tree, int, bool,
   8074 						 tsubst_flags_t);
   8075 extern int cp_type_quals			(const_tree);
   8076 extern int type_memfn_quals			(const_tree);
   8077 extern cp_ref_qualifier type_memfn_rqual	(const_tree);
   8078 extern tree apply_memfn_quals			(tree, cp_cv_quals,
   8079 						 cp_ref_qualifier = REF_QUAL_NONE);
   8080 extern bool cp_has_mutable_p			(const_tree);
   8081 extern bool at_least_as_qualified_p		(const_tree, const_tree);
   8082 extern void cp_apply_type_quals_to_decl		(int, tree);
   8083 extern tree build_ptrmemfunc1			(tree, tree, tree);
   8084 extern void expand_ptrmemfunc_cst		(tree, tree *, tree *);
   8085 extern tree type_after_usual_arithmetic_conversions (tree, tree);
   8086 extern tree common_pointer_type                 (tree, tree);
   8087 extern tree composite_pointer_type		(const op_location_t &,
   8088 						 tree, tree, tree, tree,
   8089 						 composite_pointer_operation,
   8090 						 tsubst_flags_t);
   8091 extern tree merge_types				(tree, tree);
   8092 extern tree strip_array_domain			(tree);
   8093 extern tree check_return_expr			(tree, bool *);
   8094 extern tree spaceship_type			(tree, tsubst_flags_t = tf_warning_or_error);
   8095 extern tree genericize_spaceship		(location_t, tree, tree, tree);
   8096 extern tree cp_build_binary_op                  (const op_location_t &,
   8097 						 enum tree_code, tree, tree,
   8098 						 tsubst_flags_t);
   8099 extern tree build_x_vec_perm_expr               (location_t,
   8100 						 tree, tree, tree,
   8101 						 tsubst_flags_t);
   8102 extern tree build_x_shufflevector               (location_t,
   8103 						 vec<tree, va_gc> *,
   8104 						 tsubst_flags_t);
   8105 #define cxx_sizeof(T)  cxx_sizeof_or_alignof_type (input_location, T, SIZEOF_EXPR, false, true)
   8106 extern tree build_simple_component_ref		(tree, tree);
   8107 extern tree build_ptrmemfunc_access_expr	(tree, tree);
   8108 extern tree build_address			(tree);
   8109 extern tree build_nop				(tree, tree);
   8110 extern tree non_reference			(tree);
   8111 extern tree lookup_anon_field			(tree, tree);
   8112 extern bool invalid_nonstatic_memfn_p		(location_t, tree,
   8113 						 tsubst_flags_t);
   8114 extern tree convert_member_func_to_ptr		(tree, tree, tsubst_flags_t);
   8115 extern tree convert_ptrmem			(tree, tree, bool, bool,
   8116 						 tsubst_flags_t);
   8117 extern int lvalue_or_else			(tree, enum lvalue_use,
   8118                                                  tsubst_flags_t);
   8119 extern void check_template_keyword		(tree);
   8120 extern bool check_raw_literal_operator		(const_tree decl);
   8121 extern bool check_literal_operator_args		(const_tree, bool *, bool *);
   8122 extern void maybe_warn_about_useless_cast       (location_t, tree, tree,
   8123 						 tsubst_flags_t);
   8124 extern tree cp_perform_integral_promotions      (tree, tsubst_flags_t);
   8125 
   8126 extern tree finish_left_unary_fold_expr      (tree, int);
   8127 extern tree finish_right_unary_fold_expr     (tree, int);
   8128 extern tree finish_binary_fold_expr          (tree, tree, int);
   8129 extern tree treat_lvalue_as_rvalue_p	     (tree, bool);
   8130 extern bool decl_in_std_namespace_p	     (tree);
   8131 
   8132 /* in typeck2.cc */
   8133 extern void require_complete_eh_spec_types	(tree, tree);
   8134 extern void cxx_incomplete_type_diagnostic	(location_t, const_tree,
   8135 						 const_tree, diagnostic_t);
   8136 inline location_t
   8137 loc_or_input_loc (location_t loc)
   8138 {
   8139   return loc == UNKNOWN_LOCATION ? input_location : loc;
   8140 }
   8141 
   8142 inline location_t
   8143 cp_expr_loc_or_loc (const_tree t, location_t or_loc)
   8144 {
   8145   location_t loc = cp_expr_location (t);
   8146   if (loc == UNKNOWN_LOCATION)
   8147     loc = or_loc;
   8148   return loc;
   8149 }
   8150 
   8151 inline location_t
   8152 cp_expr_loc_or_input_loc (const_tree t)
   8153 {
   8154   return cp_expr_loc_or_loc (t, input_location);
   8155 }
   8156 
   8157 inline void
   8158 cxx_incomplete_type_diagnostic (const_tree value, const_tree type,
   8159 				diagnostic_t diag_kind)
   8160 {
   8161   cxx_incomplete_type_diagnostic (cp_expr_loc_or_input_loc (value),
   8162 				  value, type, diag_kind);
   8163 }
   8164 
   8165 extern void cxx_incomplete_type_error		(location_t, const_tree,
   8166 						 const_tree);
   8167 inline void
   8168 cxx_incomplete_type_error (const_tree value, const_tree type)
   8169 {
   8170   cxx_incomplete_type_diagnostic (value, type, DK_ERROR);
   8171 }
   8172 
   8173 extern void cxx_incomplete_type_inform 	        (const_tree);
   8174 extern tree error_not_base_type			(tree, tree);
   8175 extern tree binfo_or_else			(tree, tree);
   8176 extern void cxx_readonly_error			(location_t, tree,
   8177 						 enum lvalue_use);
   8178 extern void complete_type_check_abstract	(tree);
   8179 extern int abstract_virtuals_error		(tree, tree);
   8180 extern int abstract_virtuals_error		(abstract_class_use, tree);
   8181 extern int abstract_virtuals_error_sfinae	(tree, tree, tsubst_flags_t);
   8182 extern int abstract_virtuals_error_sfinae	(abstract_class_use, tree, tsubst_flags_t);
   8183 
   8184 extern tree store_init_value			(tree, tree, vec<tree, va_gc>**, int);
   8185 extern tree split_nonconstant_init		(tree, tree);
   8186 extern bool check_narrowing			(tree, tree, tsubst_flags_t,
   8187 						 bool = false);
   8188 extern bool ordinary_char_type_p		(tree);
   8189 extern bool array_string_literal_compatible_p	(tree, tree);
   8190 extern tree digest_init				(tree, tree, tsubst_flags_t);
   8191 extern tree digest_init_flags			(tree, tree, int, tsubst_flags_t);
   8192 extern tree digest_nsdmi_init		        (tree, tree, tsubst_flags_t);
   8193 extern tree build_scoped_ref			(tree, tree, tree *);
   8194 extern tree build_x_arrow			(location_t, tree,
   8195 						 tsubst_flags_t);
   8196 extern tree build_m_component_ref		(tree, tree, tsubst_flags_t);
   8197 extern tree build_functional_cast		(location_t, tree, tree,
   8198 						 tsubst_flags_t);
   8199 extern tree add_exception_specifier		(tree, tree, tsubst_flags_t);
   8200 extern tree merge_exception_specifiers		(tree, tree);
   8201 
   8202 /* in mangle.cc */
   8203 extern void init_mangle				(void);
   8204 extern void mangle_decl				(tree);
   8205 extern const char *mangle_type_string		(tree);
   8206 extern tree mangle_typeinfo_for_type		(tree);
   8207 extern tree mangle_typeinfo_string_for_type	(tree);
   8208 extern tree mangle_vtbl_for_type		(tree);
   8209 extern tree mangle_vtt_for_type			(tree);
   8210 extern tree mangle_ctor_vtbl_for_type		(tree, tree);
   8211 extern tree mangle_thunk			(tree, int, tree, tree, tree);
   8212 extern tree mangle_guard_variable		(tree);
   8213 extern tree mangle_tls_init_fn			(tree);
   8214 extern tree mangle_tls_wrapper_fn		(tree);
   8215 extern bool decl_tls_wrapper_p			(tree);
   8216 extern tree mangle_ref_init_variable		(tree);
   8217 extern tree mangle_template_parm_object		(tree);
   8218 extern char *get_mangled_vtable_map_var_name    (tree);
   8219 extern bool mangle_return_type_p		(tree);
   8220 extern tree mangle_decomp			(tree, vec<tree> &);
   8221 extern void mangle_module_substitution		(int);
   8222 extern int mangle_module_component		(tree id, bool partition);
   8223 extern tree mangle_module_global_init		(int);
   8224 
   8225 /* in dump.cc */
   8226 extern bool cp_dump_tree			(void *, tree);
   8227 
   8228 /* In cp/cp-objcp-common.cc.  */
   8229 
   8230 extern alias_set_type cxx_get_alias_set		(tree);
   8231 extern bool cxx_warn_unused_global_decl		(const_tree);
   8232 extern size_t cp_tree_size			(enum tree_code);
   8233 extern bool cp_var_mod_type_p			(tree, tree);
   8234 extern void cxx_initialize_diagnostics		(diagnostic_context *);
   8235 extern int cxx_types_compatible_p		(tree, tree);
   8236 extern bool cxx_block_may_fallthru		(const_tree);
   8237 
   8238 /* in cp-gimplify.cc */
   8239 extern int cp_gimplify_expr			(tree *, gimple_seq *,
   8240 						 gimple_seq *);
   8241 extern void cp_genericize			(tree);
   8242 extern bool cxx_omp_const_qual_no_mutable	(tree);
   8243 extern enum omp_clause_default_kind cxx_omp_predetermined_sharing_1 (tree);
   8244 extern enum omp_clause_default_kind cxx_omp_predetermined_sharing (tree);
   8245 extern enum omp_clause_defaultmap_kind cxx_omp_predetermined_mapping (tree);
   8246 extern tree cxx_omp_clause_default_ctor		(tree, tree, tree);
   8247 extern tree cxx_omp_clause_copy_ctor		(tree, tree, tree);
   8248 extern tree cxx_omp_clause_assign_op		(tree, tree, tree);
   8249 extern tree cxx_omp_clause_dtor			(tree, tree);
   8250 extern void cxx_omp_finish_clause		(tree, gimple_seq *, bool);
   8251 extern bool cxx_omp_privatize_by_reference	(const_tree);
   8252 extern bool cxx_omp_disregard_value_expr	(tree, bool);
   8253 extern void cp_fold_function			(tree);
   8254 extern tree cp_fold_maybe_rvalue		(tree, bool);
   8255 extern tree cp_fold_rvalue			(tree);
   8256 extern tree cp_fully_fold			(tree);
   8257 extern tree cp_fully_fold_init			(tree);
   8258 extern tree predeclare_vla			(tree);
   8259 extern void clear_fold_cache			(void);
   8260 extern tree lookup_hotness_attribute		(tree);
   8261 extern tree process_stmt_hotness_attribute	(tree, location_t);
   8262 extern bool simple_empty_class_p		(tree, tree, tree_code);
   8263 extern tree fold_builtin_source_location	(location_t);
   8264 
   8265 /* in name-lookup.cc */
   8266 extern tree strip_using_decl                    (tree);
   8267 extern void diagnose_name_conflict		(tree, tree);
   8268 extern bool dependent_local_decl_p		(tree);
   8269 
   8270 /* Tell the binding oracle what kind of binding we are looking for.  */
   8271 
   8272 enum cp_oracle_request
   8273 {
   8274   CP_ORACLE_IDENTIFIER
   8275 };
   8276 
   8277 /* If this is non-NULL, then it is a "binding oracle" which can lazily
   8278    create bindings when needed by the C compiler.  The oracle is told
   8279    the name and type of the binding to create.  It can call pushdecl
   8280    or the like to ensure the binding is visible; or do nothing,
   8281    leaving the binding untouched.  c-decl.cc takes note of when the
   8282    oracle has been called and will not call it again if it fails to
   8283    create a given binding.  */
   8284 
   8285 typedef void cp_binding_oracle_function (enum cp_oracle_request, tree identifier);
   8286 
   8287 extern cp_binding_oracle_function *cp_binding_oracle;
   8288 
   8289 /* Set during diagnostics to record the failed constraint. This is a
   8290    TREE_LIST whose VALUE is the constraint and whose PURPOSE are the
   8291    instantiation arguments Defined in pt.cc.  */
   8292 
   8293 extern tree current_failed_constraint;
   8294 
   8295 /* An RAII class to manage the failed constraint.  */
   8296 
   8297 struct diagnosing_failed_constraint
   8298 {
   8299   diagnosing_failed_constraint (tree, tree, bool);
   8300   ~diagnosing_failed_constraint ();
   8301   static bool replay_errors_p ();
   8302 
   8303   bool diagnosing_error;
   8304 };
   8305 
   8306 /* in constraint.cc */
   8307 
   8308 extern cp_expr finish_constraint_or_expr	(location_t, cp_expr, cp_expr);
   8309 extern cp_expr finish_constraint_and_expr	(location_t, cp_expr, cp_expr);
   8310 extern cp_expr finish_constraint_primary_expr	(cp_expr);
   8311 extern tree finish_concept_definition		(cp_expr, tree);
   8312 extern tree combine_constraint_expressions      (tree, tree);
   8313 extern tree append_constraint			(tree, tree);
   8314 extern tree get_constraints                     (const_tree);
   8315 extern void set_constraints                     (tree, tree);
   8316 extern void remove_constraints                  (tree);
   8317 extern tree current_template_constraints	(void);
   8318 extern tree associate_classtype_constraints     (tree);
   8319 extern tree build_constraints                   (tree, tree);
   8320 extern tree maybe_substitute_reqs_for		(tree, const_tree);
   8321 extern tree get_trailing_function_requirements	(tree);
   8322 extern tree get_shorthand_constraints           (tree);
   8323 
   8324 extern tree build_concept_id			(tree);
   8325 extern tree build_type_constraint		(tree, tree, tsubst_flags_t);
   8326 extern tree build_concept_check                 (tree, tree, tsubst_flags_t);
   8327 extern tree build_concept_check                 (tree, tree, tree, tsubst_flags_t);
   8328 
   8329 extern tree_pair finish_type_constraints	(tree, tree, tsubst_flags_t);
   8330 extern tree build_constrained_parameter         (tree, tree, tree = NULL_TREE);
   8331 extern void placeholder_extract_concept_and_args (tree, tree&, tree&);
   8332 extern bool equivalent_placeholder_constraints  (tree, tree);
   8333 extern hashval_t hash_placeholder_constraint	(tree);
   8334 extern bool deduce_constrained_parameter        (tree, tree&, tree&);
   8335 extern tree resolve_constraint_check            (tree);
   8336 extern tree check_function_concept              (tree);
   8337 extern tree finish_template_introduction        (tree, tree, location_t loc);
   8338 extern bool valid_requirements_p                (tree);
   8339 extern tree finish_concept_name                 (tree);
   8340 extern tree finish_shorthand_constraint         (tree, tree);
   8341 extern tree finish_requires_expr                (location_t, tree, tree);
   8342 extern tree finish_simple_requirement           (location_t, tree);
   8343 extern tree finish_type_requirement             (location_t, tree);
   8344 extern tree finish_compound_requirement         (location_t, tree, tree, bool);
   8345 extern tree finish_nested_requirement           (location_t, tree);
   8346 extern tree tsubst_requires_expr                (tree, tree, tsubst_flags_t, tree);
   8347 extern tree evaluate_requires_expr		(tree);
   8348 extern tree tsubst_constraint                   (tree, tree, tsubst_flags_t, tree);
   8349 extern tree tsubst_constraint_info              (tree, tree, tsubst_flags_t, tree);
   8350 extern tree tsubst_parameter_mapping		(tree, tree, tsubst_flags_t, tree);
   8351 
   8352 struct processing_constraint_expression_sentinel
   8353 {
   8354   processing_constraint_expression_sentinel ();
   8355   ~processing_constraint_expression_sentinel ();
   8356 };
   8357 
   8358 extern bool processing_constraint_expression_p	();
   8359 
   8360 extern tree unpack_concept_check		(tree);
   8361 extern tree evaluate_concept_check              (tree);
   8362 extern bool constraints_satisfied_p		(tree, tree = NULL_TREE);
   8363 extern bool* lookup_subsumption_result          (tree, tree);
   8364 extern bool save_subsumption_result             (tree, tree, bool);
   8365 extern tree find_template_parameters		(tree, tree);
   8366 extern bool equivalent_constraints              (tree, tree);
   8367 extern bool equivalently_constrained            (tree, tree);
   8368 extern bool strictly_subsumes			(tree, tree);
   8369 extern bool weakly_subsumes			(tree, tree);
   8370 extern int more_constrained                     (tree, tree);
   8371 extern bool at_least_as_constrained             (tree, tree);
   8372 extern bool constraints_equivalent_p            (tree, tree);
   8373 extern bool atomic_constraints_identical_p	(tree, tree);
   8374 extern hashval_t iterative_hash_constraint      (tree, hashval_t);
   8375 extern hashval_t hash_atomic_constraint         (tree);
   8376 extern void diagnose_constraints                (location_t, tree, tree);
   8377 
   8378 extern void note_failed_type_completion_for_satisfaction (tree);
   8379 
   8380 /* A structural hasher for ATOMIC_CONSTRs.  */
   8381 
   8382 struct atom_hasher : default_hash_traits<tree>
   8383 {
   8384   static hashval_t hash (tree t)
   8385   {
   8386     return hash_atomic_constraint (t);
   8387   }
   8388 
   8389   static bool equal (tree t1, tree t2)
   8390   {
   8391     return atomic_constraints_identical_p (t1, t2);
   8392   }
   8393 };
   8394 
   8395 /* in logic.cc */
   8396 extern bool subsumes                            (tree, tree);
   8397 
   8398 /* In class.cc */
   8399 extern void set_current_access_from_decl (tree);
   8400 extern void cp_finish_injected_record_type (tree);
   8401 
   8402 /* in vtable-class-hierarchy.cc */
   8403 extern void vtv_compute_class_hierarchy_transitive_closure (void);
   8404 extern void vtv_generate_init_routine           (void);
   8405 extern void vtv_save_class_info                 (tree);
   8406 extern void vtv_recover_class_info              (void);
   8407 extern void vtv_build_vtable_verify_fndecl      (void);
   8408 
   8409 /* In constexpr.cc */
   8410 /* Representation of entries in the constexpr function definition table.  */
   8411 
   8412 struct GTY((for_user)) constexpr_fundef {
   8413   tree decl;
   8414   tree body;
   8415   tree parms;
   8416   tree result;
   8417 };
   8418 
   8419 extern void fini_constexpr			(void);
   8420 extern bool literal_type_p                      (tree);
   8421 extern void maybe_save_constexpr_fundef		(tree);
   8422 extern void register_constexpr_fundef		(const constexpr_fundef &);
   8423 extern constexpr_fundef *retrieve_constexpr_fundef	(tree);
   8424 extern bool is_valid_constexpr_fn		(tree, bool);
   8425 extern bool check_constexpr_ctor_body           (tree, tree, bool);
   8426 extern tree constexpr_fn_retval		(tree);
   8427 extern tree ensure_literal_type_for_constexpr_object (tree);
   8428 extern bool potential_constant_expression       (tree);
   8429 extern bool is_constant_expression (tree);
   8430 extern bool is_rvalue_constant_expression (tree);
   8431 extern bool is_nondependent_constant_expression (tree);
   8432 extern bool is_nondependent_static_init_expression (tree);
   8433 extern bool is_static_init_expression    (tree);
   8434 extern bool potential_rvalue_constant_expression (tree);
   8435 extern bool require_potential_constant_expression (tree);
   8436 extern bool require_constant_expression (tree);
   8437 extern bool require_rvalue_constant_expression (tree);
   8438 extern bool require_potential_rvalue_constant_expression (tree);
   8439 extern tree cxx_constant_value			(tree, tree = NULL_TREE);
   8440 extern tree cxx_constant_value_sfinae		(tree, tree, tsubst_flags_t);
   8441 extern void cxx_constant_dtor			(tree, tree);
   8442 extern tree cxx_constant_init			(tree, tree = NULL_TREE);
   8443 extern tree maybe_constant_value		(tree, tree = NULL_TREE, bool = false);
   8444 extern tree maybe_constant_init			(tree, tree = NULL_TREE, bool = false);
   8445 extern tree fold_non_dependent_expr		(tree,
   8446 						 tsubst_flags_t = tf_warning_or_error,
   8447 						 bool = false, tree = NULL_TREE);
   8448 extern tree maybe_fold_non_dependent_expr	(tree,
   8449 						 tsubst_flags_t = tf_warning_or_error);
   8450 extern tree fold_non_dependent_init		(tree,
   8451 						 tsubst_flags_t = tf_warning_or_error,
   8452 						 bool = false, tree = NULL_TREE);
   8453 extern tree fold_simple				(tree);
   8454 extern tree fold_to_constant			(tree);
   8455 extern bool reduced_constant_expression_p       (tree);
   8456 extern bool is_instantiation_of_constexpr       (tree);
   8457 extern bool var_in_constexpr_fn                 (tree);
   8458 extern bool var_in_maybe_constexpr_fn           (tree);
   8459 extern bool maybe_constexpr_fn			(tree);
   8460 extern void explain_invalid_constexpr_fn        (tree);
   8461 extern vec<tree> cx_error_context               (void);
   8462 extern tree fold_sizeof_expr			(tree);
   8463 extern void clear_cv_and_fold_caches		(void);
   8464 extern tree unshare_constructor			(tree CXX_MEM_STAT_INFO);
   8465 extern bool decl_implicit_constexpr_p		(tree);
   8466 extern bool replace_decl			(tree *, tree, tree);
   8467 
   8468 /* An RAII sentinel used to restrict constexpr evaluation so that it
   8469    doesn't do anything that causes extra DECL_UID generation.  */
   8470 
   8471 struct uid_sensitive_constexpr_evaluation_sentinel
   8472 {
   8473   temp_override<bool> ovr;
   8474   uid_sensitive_constexpr_evaluation_sentinel ();
   8475 };
   8476 
   8477 /* Used to determine whether uid_sensitive_constexpr_evaluation_p was
   8478    called and returned true, indicating that we've restricted constexpr
   8479    evaluation in order to avoid UID generation.  We use this to control
   8480    updates to the fold_cache and cv_cache.  */
   8481 
   8482 struct uid_sensitive_constexpr_evaluation_checker
   8483 {
   8484   const unsigned saved_counter;
   8485   uid_sensitive_constexpr_evaluation_checker ();
   8486   bool evaluation_restricted_p () const;
   8487 };
   8488 
   8489 void cp_tree_c_finish_parsing ();
   8490 
   8491 /* In cp-ubsan.cc */
   8492 extern void cp_ubsan_maybe_instrument_member_call (tree);
   8493 extern void cp_ubsan_instrument_member_accesses (tree *);
   8494 extern tree cp_ubsan_maybe_instrument_downcast	(location_t, tree, tree, tree);
   8495 extern tree cp_ubsan_maybe_instrument_cast_to_vbase (location_t, tree, tree);
   8496 extern void cp_ubsan_maybe_initialize_vtbl_ptrs (tree);
   8497 
   8498 /* In coroutines.cc */
   8499 extern tree finish_co_return_stmt		(location_t, tree);
   8500 extern tree finish_co_await_expr		(location_t, tree);
   8501 extern tree finish_co_yield_expr		(location_t, tree);
   8502 extern tree coro_validate_builtin_call		(tree,
   8503 						 tsubst_flags_t = tf_warning_or_error);
   8504 extern bool morph_fn_to_coro			(tree, tree *, tree *);
   8505 extern tree coro_get_actor_function		(tree);
   8506 extern tree coro_get_destroy_function		(tree);
   8507 extern tree coro_get_ramp_function		(tree);
   8508 
   8509 /* Inline bodies.  */
   8510 
   8511 inline tree
   8512 ovl_first (tree node)
   8513 {
   8514   while (TREE_CODE (node) == OVERLOAD)
   8515     node = OVL_FUNCTION (node);
   8516   return node;
   8517 }
   8518 
   8519 inline bool
   8520 type_unknown_p (const_tree expr)
   8521 {
   8522   return TREE_TYPE (expr) == unknown_type_node;
   8523 }
   8524 
   8525 inline hashval_t
   8526 named_decl_hash::hash (const value_type decl)
   8527 {
   8528   tree name = (TREE_CODE (decl) == BINDING_VECTOR
   8529 	       ? BINDING_VECTOR_NAME (decl) : OVL_NAME (decl));
   8530   return name ? IDENTIFIER_HASH_VALUE (name) : 0;
   8531 }
   8532 
   8533 inline bool
   8534 named_decl_hash::equal (const value_type existing, compare_type candidate)
   8535 {
   8536   tree name = (TREE_CODE (existing) == BINDING_VECTOR
   8537 	       ? BINDING_VECTOR_NAME (existing) : OVL_NAME (existing));
   8538   return candidate == name;
   8539 }
   8540 
   8541 inline bool
   8542 null_node_p (const_tree expr)
   8543 {
   8544   STRIP_ANY_LOCATION_WRAPPER (expr);
   8545   return expr == null_node;
   8546 }
   8547 
   8548 /* True iff T is a variable template declaration. */
   8549 inline bool
   8550 variable_template_p (tree t)
   8551 {
   8552   if (TREE_CODE (t) != TEMPLATE_DECL)
   8553     return false;
   8554   if (!PRIMARY_TEMPLATE_P (t))
   8555     return false;
   8556   if (tree r = DECL_TEMPLATE_RESULT (t))
   8557     return VAR_P (r);
   8558   return false;
   8559 }
   8560 
   8561 /* True iff T is a standard concept definition. This will return
   8562    true for both the template and underlying declaration.  */
   8563 
   8564 inline bool
   8565 standard_concept_p (tree t)
   8566 {
   8567   if (TREE_CODE (t) == TEMPLATE_DECL)
   8568     t = DECL_TEMPLATE_RESULT (t);
   8569   return TREE_CODE (t) == CONCEPT_DECL;
   8570 }
   8571 
   8572 /* True iff T is a variable concept definition. This will return
   8573    true for both the template and the underlying declaration.  */
   8574 
   8575 inline bool
   8576 variable_concept_p (tree t)
   8577 {
   8578   if (TREE_CODE (t) == TEMPLATE_DECL)
   8579     t = DECL_TEMPLATE_RESULT (t);
   8580   return VAR_P (t) && DECL_DECLARED_CONCEPT_P (t);
   8581 }
   8582 
   8583 /* True iff T is a function concept definition or an overload set
   8584    containing multiple function concepts. This will return true for
   8585    both the template and the underlying declaration.  */
   8586 
   8587 inline bool
   8588 function_concept_p (tree t)
   8589 {
   8590   if (TREE_CODE (t) == OVERLOAD)
   8591     t = OVL_FIRST (t);
   8592   if (TREE_CODE (t) == TEMPLATE_DECL)
   8593     t = DECL_TEMPLATE_RESULT (t);
   8594   return TREE_CODE (t) == FUNCTION_DECL && DECL_DECLARED_CONCEPT_P (t);
   8595 }
   8596 
   8597 /* True iff T is a standard, variable, or function concept.  */
   8598 
   8599 inline bool
   8600 concept_definition_p (tree t)
   8601 {
   8602   if (t == error_mark_node)
   8603     return false;
   8604 
   8605   /* Adjust for function concept overloads.  */
   8606   if (TREE_CODE (t) == OVERLOAD)
   8607     t = OVL_FIRST (t);
   8608 
   8609   /* See through templates. */
   8610   if (TREE_CODE (t) == TEMPLATE_DECL)
   8611     t = DECL_TEMPLATE_RESULT (t);
   8612 
   8613   /* The obvious and easy case.  */
   8614   if (TREE_CODE (t) == CONCEPT_DECL)
   8615     return true;
   8616 
   8617   /* Definitely not a concept.  */
   8618   if (!VAR_OR_FUNCTION_DECL_P (t))
   8619     return false;
   8620   if (!DECL_LANG_SPECIFIC (t))
   8621     return false;
   8622 
   8623   return DECL_DECLARED_CONCEPT_P (t);
   8624 }
   8625 
   8626 /* Same as above, but for const trees.  */
   8627 
   8628 inline bool
   8629 concept_definition_p (const_tree t)
   8630 {
   8631   return concept_definition_p (const_cast<tree> (t));
   8632 }
   8633 
   8634 /* True if t is an expression that checks a concept.  */
   8635 
   8636 inline bool
   8637 concept_check_p (const_tree t)
   8638 {
   8639   if (TREE_CODE (t) == CALL_EXPR)
   8640     t = CALL_EXPR_FN (t);
   8641   if (t && TREE_CODE (t) == TEMPLATE_ID_EXPR)
   8642     return concept_definition_p (TREE_OPERAND (t, 0));
   8643   return false;
   8644 }
   8645 
   8646 /* Helpers for IMPLICIT_RVALUE_P to look through automatic dereference.  */
   8647 
   8648 inline bool
   8649 implicit_rvalue_p (const_tree t)
   8650 {
   8651   if (REFERENCE_REF_P (t))
   8652     t = TREE_OPERAND (t, 0);
   8653   return ((TREE_CODE (t) == NON_LVALUE_EXPR
   8654 	   || TREE_CODE (t) == STATIC_CAST_EXPR)
   8655 	  && IMPLICIT_RVALUE_P (t));
   8656 }
   8657 inline tree
   8658 set_implicit_rvalue_p (tree ot)
   8659 {
   8660   tree t = ot;
   8661   if (REFERENCE_REF_P (t))
   8662     t = TREE_OPERAND (t, 0);
   8663   IMPLICIT_RVALUE_P (t) = 1;
   8664   return ot;
   8665 }
   8666 
   8667 /* True if t is a "constrained auto" type-specifier.  */
   8668 
   8669 inline bool
   8670 is_constrained_auto (const_tree t)
   8671 {
   8672   return is_auto (t) && PLACEHOLDER_TYPE_CONSTRAINTS_INFO (t);
   8673 }
   8674 
   8675 /* True if CODE, a tree code, denotes a tree whose operand is not evaluated
   8676    as per [expr.context], i.e., an operand to sizeof, typeof, decltype, or
   8677    alignof.  */
   8678 
   8679 inline bool
   8680 unevaluated_p (tree_code code)
   8681 {
   8682   return (code == DECLTYPE_TYPE
   8683 	  || code == ALIGNOF_EXPR
   8684 	  || code == SIZEOF_EXPR
   8685 	  || code == NOEXCEPT_EXPR
   8686 	  || code == REQUIRES_EXPR);
   8687 }
   8688 
   8689 /* RAII class to push/pop the access scope for T.  */
   8690 
   8691 struct push_access_scope_guard
   8692 {
   8693   tree decl;
   8694   push_access_scope_guard (tree t)
   8695     : decl (t)
   8696   {
   8697     if (VAR_OR_FUNCTION_DECL_P (decl)
   8698 	|| TREE_CODE (decl) == TYPE_DECL)
   8699       push_access_scope (decl);
   8700     else
   8701       decl = NULL_TREE;
   8702   }
   8703   ~push_access_scope_guard ()
   8704   {
   8705     if (decl)
   8706       pop_access_scope (decl);
   8707   }
   8708 };
   8709 
   8710 #if CHECKING_P
   8711 namespace selftest {
   8712   extern void run_cp_tests (void);
   8713 
   8714   /* Declarations for specific families of tests within cp,
   8715      by source file, in alphabetical order.  */
   8716   extern void cp_pt_cc_tests ();
   8717   extern void cp_tree_cc_tests (void);
   8718 } // namespace selftest
   8719 #endif /* #if CHECKING_P */
   8720 
   8721 /* -- end of C++ */
   8722 
   8723 #endif /* ! GCC_CP_TREE_H */
   8724