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