gcc/cp/cp-tree.h

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