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