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