1 /* Definitions for C++ parsing and type checking.
2    Copyright (C) 1987-2013 Free Software Foundation, Inc.
3    Contributed by Michael Tiemann ([email protected])
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 "ggc.h"
25 #include "function.h"
26 #include "hashtab.h"
27 #include "vec.h"
28 
29 /* In order for the format checking to accept the C++ front end
30    diagnostic framework extensions, you must include this file before
31    diagnostic-core.h, not after.  We override the definition of GCC_DIAG_STYLE
32    in c-common.h.  */
33 #undef GCC_DIAG_STYLE
34 #define GCC_DIAG_STYLE __gcc_cxxdiag__
35 #if defined(GCC_DIAGNOSTIC_CORE_H) || defined (GCC_C_COMMON_H)
36 #error \
37 In order for the format checking to accept the C++ front end diagnostic \
38 framework extensions, you must include this file before diagnostic-core.h and \
39 c-common.h, not after.
40 #endif
41 #include "c-family/c-common.h"
42 #include "diagnostic.h"
43 
44 #include "name-lookup.h"
45 
46 /* Usage of TREE_LANG_FLAG_?:
47    0: IDENTIFIER_MARKED (IDENTIFIER_NODEs)
48       NEW_EXPR_USE_GLOBAL (in NEW_EXPR).
49       DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR).
50       COMPOUND_EXPR_OVERLOADED (in COMPOUND_EXPR).
51       TREE_INDIRECT_USING (in NAMESPACE_DECL).
52       CLEANUP_P (in TRY_BLOCK)
53       AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR)
54       PTRMEM_OK_P (in ADDR_EXPR, OFFSET_REF, SCOPE_REF)
55       PAREN_STRING_LITERAL (in STRING_CST)
56       DECL_GNU_TLS_P (in VAR_DECL)
57       KOENIG_LOOKUP_P (in CALL_EXPR)
58       STATEMENT_LIST_NO_SCOPE (in STATEMENT_LIST).
59       EXPR_STMT_STMT_EXPR_RESULT (in EXPR_STMT)
60       STMT_EXPR_NO_SCOPE (in STMT_EXPR)
61       BIND_EXPR_TRY_BLOCK (in BIND_EXPR)
62       TYPENAME_IS_ENUM_P (in TYPENAME_TYPE)
63       OMP_FOR_GIMPLIFYING_P (in OMP_FOR)
64       BASELINK_QUALIFIED_P (in BASELINK)
65       TARGET_EXPR_IMPLICIT_P (in TARGET_EXPR)
66       TEMPLATE_PARM_PARAMETER_PACK (in TEMPLATE_PARM_INDEX)
67       ATTR_IS_DEPENDENT (in the TREE_LIST for an attribute)
68       CONSTRUCTOR_IS_DIRECT_INIT (in CONSTRUCTOR)
69       LAMBDA_EXPR_CAPTURES_THIS_P (in LAMBDA_EXPR)
70       DECLTYPE_FOR_LAMBDA_CAPTURE (in DECLTYPE_TYPE)
71       VEC_INIT_EXPR_IS_CONSTEXPR (in VEC_INIT_EXPR)
72       DECL_OVERRIDE_P (in FUNCTION_DECL)
73       IMPLICIT_CONV_EXPR_DIRECT_INIT (in IMPLICIT_CONV_EXPR)
74       TRANSACTION_EXPR_IS_STMT (in TRANSACTION_EXPR)
75       CONVERT_EXPR_VBASE_PATH (in CONVERT_EXPR)
76       OVL_ARG_DEPENDENT (in OVERLOAD)
77       PACK_EXPANSION_LOCAL_P (in *_PACK_EXPANSION)
78       TINFO_RECHECK_ACCESS_P (in TEMPLATE_INFO)
79       SIZEOF_EXPR_TYPE_P (in SIZEOF_EXPR)
80    1: IDENTIFIER_VIRTUAL_P (in IDENTIFIER_NODE)
81       TI_PENDING_TEMPLATE_FLAG.
82       TEMPLATE_PARMS_FOR_INLINE.
83       DELETE_EXPR_USE_VEC (in DELETE_EXPR).
84       (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out).
85       ICS_ELLIPSIS_FLAG (in _CONV)
86       DECL_INITIALIZED_P (in VAR_DECL)
87       TYPENAME_IS_CLASS_P (in TYPENAME_TYPE)
88       STMT_IS_FULL_EXPR_P (in _STMT)
89       TARGET_EXPR_LIST_INIT_P (in TARGET_EXPR)
90       LAMBDA_EXPR_MUTABLE_P (in LAMBDA_EXPR)
91       DECL_FINAL_P (in FUNCTION_DECL)
92       QUALIFIED_NAME_IS_TEMPLATE (in SCOPE_REF)
93    2: IDENTIFIER_OPNAME_P (in IDENTIFIER_NODE)
94       ICS_THIS_FLAG (in _CONV)
95       DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (in VAR_DECL)
96       STATEMENT_LIST_TRY_BLOCK (in STATEMENT_LIST)
97       TYPENAME_IS_RESOLVING_P (in TYPE_NAME_TYPE)
98       TARGET_EXPR_DIRECT_INIT_P (in TARGET_EXPR)
99       FNDECL_USED_AUTO (in FUNCTION_DECL)
100    3: (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out).
101       ICS_BAD_FLAG (in _CONV)
102       FN_TRY_BLOCK_P (in TRY_BLOCK)
103       IDENTIFIER_CTOR_OR_DTOR_P (in IDENTIFIER_NODE)
104       BIND_EXPR_BODY_BLOCK (in BIND_EXPR)
105       DECL_NON_TRIVIALLY_INITIALIZED_P (in VAR_DECL)
106    4: TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR,
107 	  or FIELD_DECL).
108       IDENTIFIER_TYPENAME_P (in IDENTIFIER_NODE)
109       DECL_TINFO_P (in VAR_DECL)
110       FUNCTION_REF_QUALIFIED (in FUNCTION_TYPE, METHOD_TYPE)
111    5: C_IS_RESERVED_WORD (in IDENTIFIER_NODE)
112       DECL_VTABLE_OR_VTT_P (in VAR_DECL)
113       FUNCTION_RVALUE_QUALIFIED (in FUNCTION_TYPE, METHOD_TYPE)
114    6: IDENTIFIER_REPO_CHOSEN (in IDENTIFIER_NODE)
115       DECL_CONSTRUCTION_VTABLE_P (in VAR_DECL)
116       TYPE_MARKED_P (in _TYPE)
117 
118    Usage of TYPE_LANG_FLAG_?:
119    0: TYPE_DEPENDENT_P
120    1: TYPE_HAS_USER_CONSTRUCTOR.
121    2: unused
122    3: TYPE_FOR_JAVA.
123    4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR
124    5: CLASS_TYPE_P (in RECORD_TYPE and UNION_TYPE)
125       ENUM_FIXED_UNDERLYING_TYPE_P (in ENUMERAL_TYPE)
126    6: TYPE_DEPENDENT_P_VALID
127 
128    Usage of DECL_LANG_FLAG_?:
129    0: DECL_ERROR_REPORTED (in VAR_DECL).
130       DECL_TEMPLATE_PARM_P (in PARM_DECL, CONST_DECL, TYPE_DECL, or TEMPLATE_DECL)
131       DECL_LOCAL_FUNCTION_P (in FUNCTION_DECL)
132       DECL_MUTABLE_P (in FIELD_DECL)
133       DECL_DEPENDENT_P (in USING_DECL)
134    1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL).
135       DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL)
136       DECL_MEMBER_TEMPLATE_P (in TEMPLATE_DECL)
137       FUNCTION_PARAMETER_PACK_P (in PARM_DECL)
138       USING_DECL_TYPENAME_P (in USING_DECL)
139    2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL).
140       DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL)
141    3: DECL_IN_AGGR_P.
142    4: DECL_C_BIT_FIELD (in a FIELD_DECL)
143       DECL_ANON_UNION_VAR_P (in a VAR_DECL)
144       DECL_SELF_REFERENCE_P (in a TYPE_DECL)
145       DECL_INVALID_OVERRIDER_P (in a FUNCTION_DECL)
146    5: DECL_INTERFACE_KNOWN.
147    6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL).
148       DECL_FIELD_IS_BASE (in FIELD_DECL)
149       TYPE_DECL_ALIAS_P (in TYPE_DECL)
150    7: DECL_DEAD_FOR_LOCAL (in VAR_DECL).
151       DECL_THUNK_P (in a member FUNCTION_DECL)
152       DECL_NORMAL_CAPTURE_P (in FIELD_DECL)
153    8: DECL_DECLARED_CONSTEXPR_P (in VAR_DECL, FUNCTION_DECL)
154 
155    Usage of language-independent fields in a language-dependent manner:
156 
157    TYPE_ALIAS_SET
158      This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so
159      forth as a substitute for the mark bits provided in `lang_type'.
160      At present, only the six low-order bits are used.
161 
162    TYPE_LANG_SLOT_1
163      For an ENUMERAL_TYPE, this is ENUM_TEMPLATE_INFO.
164      For a FUNCTION_TYPE or METHOD_TYPE, this is TYPE_RAISES_EXCEPTIONS
165 
166   BINFO_VIRTUALS
167      For a binfo, this is a TREE_LIST.  There is an entry for each
168      virtual function declared either in BINFO or its direct and
169      indirect primary bases.
170 
171      The BV_DELTA of each node gives the amount by which to adjust the
172      `this' pointer when calling the function.  If the method is an
173      overridden version of a base class method, then it is assumed
174      that, prior to adjustment, the this pointer points to an object
175      of the base class.
176 
177      The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable
178      index of the vcall offset for this entry.
179 
180      The BV_FN is the declaration for the virtual function itself.
181 
182      If BV_LOST_PRIMARY is set, it means that this entry is for a lost
183      primary virtual base and can be left null in the vtable.
184 
185    BINFO_VTABLE
186      This is an expression with POINTER_TYPE that gives the value
187      to which the vptr should be initialized.  Use get_vtbl_decl_for_binfo
188      to extract the VAR_DECL for the complete vtable.
189 
190    DECL_VINDEX
191      This field is NULL for a non-virtual function.  For a virtual
192      function, it is eventually set to an INTEGER_CST indicating the
193      index in the vtable at which this function can be found.  When
194      a virtual function is declared, but before it is known what
195      function is overridden, this field is the error_mark_node.
196 
197      Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is
198      the virtual function this one overrides, and whose TREE_CHAIN is
199      the old DECL_VINDEX.  */
200 
201 /* Language-specific tree checkers.  */
202 
203 #define VAR_OR_FUNCTION_DECL_CHECK(NODE) \
204   TREE_CHECK2(NODE,VAR_DECL,FUNCTION_DECL)
205 
206 #define TYPE_FUNCTION_OR_TEMPLATE_DECL_CHECK(NODE) \
207   TREE_CHECK3(NODE,TYPE_DECL,TEMPLATE_DECL,FUNCTION_DECL)
208 
209 #define TYPE_FUNCTION_OR_TEMPLATE_DECL_P(NODE) \
210   (TREE_CODE (NODE) == TYPE_DECL || TREE_CODE (NODE) == TEMPLATE_DECL \
211    || TREE_CODE (NODE) == FUNCTION_DECL)
212 
213 #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) \
214   TREE_CHECK3(NODE,VAR_DECL,FUNCTION_DECL,PARM_DECL)
215 
216 #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) \
217   TREE_CHECK4(NODE,VAR_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL)
218 
219 #define VAR_TEMPL_TYPE_FIELD_OR_FUNCTION_DECL_CHECK(NODE) \
220   TREE_CHECK5(NODE,VAR_DECL,FIELD_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL)
221 
222 #define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE) \
223   TREE_CHECK(NODE,BOUND_TEMPLATE_TEMPLATE_PARM)
224 
225 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
226 #define THUNK_FUNCTION_CHECK(NODE) __extension__			\
227 ({  __typeof (NODE) const __t = (NODE);					\
228     if (TREE_CODE (__t) != FUNCTION_DECL || !__t->decl_common.lang_specific \
229 	|| !__t->decl_common.lang_specific->u.fn.thunk_p)		\
230       tree_check_failed (__t, __FILE__, __LINE__, __FUNCTION__, 0);	\
231      __t; })
232 #else
233 #define THUNK_FUNCTION_CHECK(NODE) (NODE)
234 #endif
235 
236 /* Language-dependent contents of an identifier.  */
237 
238 struct GTY(()) lang_identifier {
239   struct c_common_identifier c_common;
240   cxx_binding *namespace_bindings;
241   cxx_binding *bindings;
242   tree class_template_info;
243   tree label_value;
244 };
245 
246 /* In an IDENTIFIER_NODE, nonzero if this identifier is actually a
247    keyword.  C_RID_CODE (node) is then the RID_* value of the keyword,
248    and C_RID_YYCODE is the token number wanted by Yacc.  */
249 
250 #define C_IS_RESERVED_WORD(ID) TREE_LANG_FLAG_5 (ID)
251 
252 #define LANG_IDENTIFIER_CAST(NODE) \
253 	((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE))
254 
255 struct GTY(()) template_parm_index_s {
256   struct tree_common common;
257   int index;
258   int level;
259   int orig_level;
260   tree decl;
261 };
262 typedef struct template_parm_index_s template_parm_index;
263 
264 struct GTY(()) ptrmem_cst {
265   struct tree_common common;
266   tree member;
267 };
268 typedef struct ptrmem_cst * ptrmem_cst_t;
269 
270 #define IDENTIFIER_GLOBAL_VALUE(NODE) \
271   namespace_binding ((NODE), global_namespace)
272 #define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \
273   set_namespace_binding ((NODE), global_namespace, (VAL))
274 #define IDENTIFIER_NAMESPACE_VALUE(NODE) \
275   namespace_binding ((NODE), current_namespace)
276 #define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \
277   set_namespace_binding ((NODE), current_namespace, (VAL))
278 
279 #define CLEANUP_P(NODE)		TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE))
280 
281 #define BIND_EXPR_TRY_BLOCK(NODE) \
282   TREE_LANG_FLAG_0 (BIND_EXPR_CHECK (NODE))
283 
284 /* Used to mark the block around the member initializers and cleanups.  */
285 #define BIND_EXPR_BODY_BLOCK(NODE) \
286   TREE_LANG_FLAG_3 (BIND_EXPR_CHECK (NODE))
287 #define FUNCTION_NEEDS_BODY_BLOCK(NODE) \
288   (DECL_CONSTRUCTOR_P (NODE) || DECL_DESTRUCTOR_P (NODE) \
289    || LAMBDA_FUNCTION_P (NODE))
290 
291 #define STATEMENT_LIST_NO_SCOPE(NODE) \
292   TREE_LANG_FLAG_0 (STATEMENT_LIST_CHECK (NODE))
293 #define STATEMENT_LIST_TRY_BLOCK(NODE) \
294   TREE_LANG_FLAG_2 (STATEMENT_LIST_CHECK (NODE))
295 
296 /* Nonzero if this statement should be considered a full-expression,
297    i.e., if temporaries created during this statement should have
298    their destructors run at the end of this statement.  */
299 #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
300 
301 /* Marks the result of a statement expression.  */
302 #define EXPR_STMT_STMT_EXPR_RESULT(NODE) \
303   TREE_LANG_FLAG_0 (EXPR_STMT_CHECK (NODE))
304 
305 /* Nonzero if this statement-expression does not have an associated scope.  */
306 #define STMT_EXPR_NO_SCOPE(NODE) \
307    TREE_LANG_FLAG_0 (STMT_EXPR_CHECK (NODE))
308 
309 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual
310    sense of `same'.  */
311 #define same_type_p(TYPE1, TYPE2) \
312   comptypes ((TYPE1), (TYPE2), COMPARE_STRICT)
313 
314 /* Returns nonzero iff NODE is a declaration for the global function
315    `main'.  */
316 #define DECL_MAIN_P(NODE)				\
317    (DECL_EXTERN_C_FUNCTION_P (NODE)			\
318     && DECL_NAME (NODE) != NULL_TREE			\
319     && MAIN_NAME_P (DECL_NAME (NODE))			\
320     && flag_hosted)
321 
322 /* The overloaded FUNCTION_DECL.  */
323 #define OVL_FUNCTION(NODE) \
324   (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function)
325 #define OVL_CHAIN(NODE)      TREE_CHAIN (NODE)
326 /* Polymorphic access to FUNCTION and CHAIN.  */
327 #define OVL_CURRENT(NODE)	\
328   ((TREE_CODE (NODE) == OVERLOAD) ? OVL_FUNCTION (NODE) : (NODE))
329 #define OVL_NEXT(NODE)		\
330   ((TREE_CODE (NODE) == OVERLOAD) ? TREE_CHAIN (NODE) : NULL_TREE)
331 /* If set, this was imported in a using declaration.
332    This is not to confuse with being used somewhere, which
333    is not important for this node.  */
334 #define OVL_USED(NODE)		TREE_USED (NODE)
335 /* If set, this OVERLOAD was created for argument-dependent lookup
336    and can be freed afterward.  */
337 #define OVL_ARG_DEPENDENT(NODE) TREE_LANG_FLAG_0 (OVERLOAD_CHECK (NODE))
338 
339 struct GTY(()) tree_overload {
340   struct tree_common common;
341   tree function;
342 };
343 
344 /* Returns true iff NODE is a BASELINK.  */
345 #define BASELINK_P(NODE) \
346   (TREE_CODE (NODE) == BASELINK)
347 /* The BINFO indicating the base in which lookup found the
348    BASELINK_FUNCTIONS.  */
349 #define BASELINK_BINFO(NODE) \
350   (((struct tree_baselink*) BASELINK_CHECK (NODE))->binfo)
351 /* The functions referred to by the BASELINK; either a FUNCTION_DECL,
352    a TEMPLATE_DECL, an OVERLOAD, or a TEMPLATE_ID_EXPR.  */
353 #define BASELINK_FUNCTIONS(NODE) \
354   (((struct tree_baselink*) BASELINK_CHECK (NODE))->functions)
355 /* The BINFO in which the search for the functions indicated by this baselink
356    began.  This base is used to determine the accessibility of functions
357    selected by overload resolution.  */
358 #define BASELINK_ACCESS_BINFO(NODE) \
359   (((struct tree_baselink*) BASELINK_CHECK (NODE))->access_binfo)
360 /* For a type-conversion operator, the BASELINK_OPTYPE indicates the type
361    to which the conversion should occur.  This value is important if
362    the BASELINK_FUNCTIONS include a template conversion operator --
363    the BASELINK_OPTYPE can be used to determine what type the user
364    requested.  */
365 #define BASELINK_OPTYPE(NODE) \
366   (TREE_CHAIN (BASELINK_CHECK (NODE)))
367 /* Nonzero if this baselink was from a qualified lookup.  */
368 #define BASELINK_QUALIFIED_P(NODE) \
369   TREE_LANG_FLAG_0 (BASELINK_CHECK (NODE))
370 
371 struct GTY(()) tree_baselink {
372   struct tree_common common;
373   tree binfo;
374   tree functions;
375   tree access_binfo;
376 };
377 
378 /* The different kinds of ids that we encounter.  */
379 
380 typedef enum cp_id_kind
381 {
382   /* Not an id at all.  */
383   CP_ID_KIND_NONE,
384   /* An unqualified-id that is not a template-id.  */
385   CP_ID_KIND_UNQUALIFIED,
386   /* An unqualified-id that is a dependent name.  */
387   CP_ID_KIND_UNQUALIFIED_DEPENDENT,
388   /* An unqualified template-id.  */
389   CP_ID_KIND_TEMPLATE_ID,
390   /* A qualified-id.  */
391   CP_ID_KIND_QUALIFIED
392 } cp_id_kind;
393 
394 
395 /* The various kinds of C++0x warnings we encounter. */
396 
397 typedef enum cpp0x_warn_str
398 {
399   /* extended initializer lists */
400   CPP0X_INITIALIZER_LISTS,
401   /* explicit conversion operators */
402   CPP0X_EXPLICIT_CONVERSION,
403   /* variadic templates */
404   CPP0X_VARIADIC_TEMPLATES,
405   /* lambda expressions */
406   CPP0X_LAMBDA_EXPR,
407   /* C++0x auto */
408   CPP0X_AUTO,
409   /* scoped enums */
410   CPP0X_SCOPED_ENUMS,
411   /* defaulted and deleted functions */
412   CPP0X_DEFAULTED_DELETED,
413   /* inline namespaces */
414   CPP0X_INLINE_NAMESPACES,
415   /* override controls, override/final */
416   CPP0X_OVERRIDE_CONTROLS,
417   /* non-static data member initializers */
418   CPP0X_NSDMI,
419   /* user defined literals */
420   CPP0X_USER_DEFINED_LITERALS,
421   /* delegating constructors */
422   CPP0X_DELEGATING_CTORS,
423   /* inheriting constructors */
424   CPP0X_INHERITING_CTORS,
425   /* C++11 attributes */
426   CPP0X_ATTRIBUTES,
427   /* ref-qualified member functions */
428   CPP0X_REF_QUALIFIER
429 } cpp0x_warn_str;
430 
431 /* The various kinds of operation used by composite_pointer_type. */
432 
433 typedef enum composite_pointer_operation
434 {
435   /* comparison */
436   CPO_COMPARISON,
437   /* conversion */
438   CPO_CONVERSION,
439   /* conditional expression */
440   CPO_CONDITIONAL_EXPR
441 } composite_pointer_operation;
442 
443 /* Possible cases of expression list used by build_x_compound_expr_from_list. */
444 typedef enum expr_list_kind {
445   ELK_INIT,		/* initializer */
446   ELK_MEM_INIT,		/* member initializer */
447   ELK_FUNC_CAST		/* functional cast */
448 } expr_list_kind;
449 
450 /* Possible cases of implicit bad rhs conversions. */
451 typedef enum impl_conv_rhs {
452   ICR_DEFAULT_ARGUMENT, /* default argument */
453   ICR_CONVERTING,       /* converting */
454   ICR_INIT,             /* initialization */
455   ICR_ARGPASS,          /* argument passing */
456   ICR_RETURN,           /* return */
457   ICR_ASSIGN            /* assignment */
458 } impl_conv_rhs;
459 
460 /* Possible cases of implicit or explicit bad conversions to void. */
461 typedef enum impl_conv_void {
462   ICV_CAST,            /* (explicit) conversion to void */
463   ICV_SECOND_OF_COND,  /* second operand of conditional expression */
464   ICV_THIRD_OF_COND,   /* third operand of conditional expression */
465   ICV_RIGHT_OF_COMMA,  /* right operand of comma operator */
466   ICV_LEFT_OF_COMMA,   /* left operand of comma operator */
467   ICV_STATEMENT,       /* statement */
468   ICV_THIRD_IN_FOR     /* for increment expression */
469 } impl_conv_void;
470 
471 /* Macros for access to language-specific slots in an identifier.  */
472 
473 #define IDENTIFIER_NAMESPACE_BINDINGS(NODE)	\
474   (LANG_IDENTIFIER_CAST (NODE)->namespace_bindings)
475 #define IDENTIFIER_TEMPLATE(NODE)	\
476   (LANG_IDENTIFIER_CAST (NODE)->class_template_info)
477 
478 /* The IDENTIFIER_BINDING is the innermost cxx_binding for the
479     identifier.  It's PREVIOUS is the next outermost binding.  Each
480     VALUE field is a DECL for the associated declaration.  Thus,
481     name lookup consists simply of pulling off the node at the front
482     of the list (modulo oddities for looking up the names of types,
483     and such.)  You can use SCOPE field to determine the scope
484     that bound the name.  */
485 #define IDENTIFIER_BINDING(NODE) \
486   (LANG_IDENTIFIER_CAST (NODE)->bindings)
487 
488 /* TREE_TYPE only indicates on local and class scope the current
489    type. For namespace scope, the presence of a type in any namespace
490    is indicated with global_type_node, and the real type behind must
491    be found through lookup.  */
492 #define IDENTIFIER_TYPE_VALUE(NODE) identifier_type_value (NODE)
493 #define REAL_IDENTIFIER_TYPE_VALUE(NODE) TREE_TYPE (NODE)
494 #define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = (TYPE))
495 #define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0)
496 
497 #define IDENTIFIER_LABEL_VALUE(NODE) \
498   (LANG_IDENTIFIER_CAST (NODE)->label_value)
499 #define SET_IDENTIFIER_LABEL_VALUE(NODE, VALUE)   \
500   IDENTIFIER_LABEL_VALUE (NODE) = (VALUE)
501 
502 /* Nonzero if this identifier is used as a virtual function name somewhere
503    (optimizes searches).  */
504 #define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1 (NODE)
505 
506 /* Nonzero if this identifier is the prefix for a mangled C++ operator
507    name.  */
508 #define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2 (NODE)
509 
510 /* Nonzero if this identifier is the name of a type-conversion
511    operator.  */
512 #define IDENTIFIER_TYPENAME_P(NODE) \
513   TREE_LANG_FLAG_4 (NODE)
514 
515 /* Nonzero if this identifier is the name of a constructor or
516    destructor.  */
517 #define IDENTIFIER_CTOR_OR_DTOR_P(NODE) \
518   TREE_LANG_FLAG_3 (NODE)
519 
520 /* True iff NAME is the DECL_ASSEMBLER_NAME for an entity with vague
521    linkage which the prelinker has assigned to this translation
522    unit.  */
523 #define IDENTIFIER_REPO_CHOSEN(NAME) \
524   (TREE_LANG_FLAG_6 (NAME))
525 
526 /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only.  */
527 #define C_TYPE_FIELDS_READONLY(TYPE) \
528   (LANG_TYPE_CLASS_CHECK (TYPE)->fields_readonly)
529 
530 /* The tokens stored in the default argument.  */
531 
532 #define DEFARG_TOKENS(NODE) \
533   (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->tokens)
534 #define DEFARG_INSTANTIATIONS(NODE) \
535   (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->instantiations)
536 
537 struct GTY (()) tree_default_arg {
538   struct tree_common common;
539   struct cp_token_cache *tokens;
540   vec<tree, va_gc> *instantiations;
541 };
542 
543 
544 #define DEFERRED_NOEXCEPT_PATTERN(NODE) \
545   (((struct tree_deferred_noexcept *)DEFERRED_NOEXCEPT_CHECK (NODE))->pattern)
546 #define DEFERRED_NOEXCEPT_ARGS(NODE) \
547   (((struct tree_deferred_noexcept *)DEFERRED_NOEXCEPT_CHECK (NODE))->args)
548 #define DEFERRED_NOEXCEPT_SPEC_P(NODE)				\
549   ((NODE) && (TREE_PURPOSE (NODE))				\
550   && (TREE_CODE (TREE_PURPOSE (NODE)) == DEFERRED_NOEXCEPT	\
551       || is_overloaded_fn (TREE_PURPOSE (NODE))))
552 
553 struct GTY (()) tree_deferred_noexcept {
554   struct tree_base base;
555   tree pattern;
556   tree args;
557 };
558 
559 
560 /* The condition associated with the static assertion.  This must be
561    an integral constant expression.  */
562 #define STATIC_ASSERT_CONDITION(NODE) \
563   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->condition)
564 
565 /* The message associated with the static assertion.  This must be a
566    string constant, which will be emitted as an error message when the
567    static assert condition is false.  */
568 #define STATIC_ASSERT_MESSAGE(NODE) \
569   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->message)
570 
571 /* Source location information for a static assertion.  */
572 #define STATIC_ASSERT_SOURCE_LOCATION(NODE) \
573   (((struct tree_static_assert *)STATIC_ASSERT_CHECK (NODE))->location)
574 
575 struct GTY (()) tree_static_assert {
576   struct tree_common common;
577   tree condition;
578   tree message;
579   location_t location;
580 };
581 
582 struct GTY (()) tree_argument_pack_select {
583   struct tree_common common;
584   tree argument_pack;
585   int index;
586 };
587 
588 /* The different kinds of traits that we encounter.  */
589 
590 typedef enum cp_trait_kind
591 {
592   CPTK_BASES,
593   CPTK_DIRECT_BASES,
594   CPTK_HAS_NOTHROW_ASSIGN,
595   CPTK_HAS_NOTHROW_CONSTRUCTOR,
596   CPTK_HAS_NOTHROW_COPY,
597   CPTK_HAS_TRIVIAL_ASSIGN,
598   CPTK_HAS_TRIVIAL_CONSTRUCTOR,
599   CPTK_HAS_TRIVIAL_COPY,
600   CPTK_HAS_TRIVIAL_DESTRUCTOR,
601   CPTK_HAS_VIRTUAL_DESTRUCTOR,
602   CPTK_IS_ABSTRACT,
603   CPTK_IS_BASE_OF,
604   CPTK_IS_CLASS,
605   CPTK_IS_CONVERTIBLE_TO,
606   CPTK_IS_EMPTY,
607   CPTK_IS_ENUM,
608   CPTK_IS_FINAL,
609   CPTK_IS_LITERAL_TYPE,
610   CPTK_IS_POD,
611   CPTK_IS_POLYMORPHIC,
612   CPTK_IS_STD_LAYOUT,
613   CPTK_IS_TRIVIAL,
614   CPTK_IS_UNION,
615   CPTK_UNDERLYING_TYPE
616 } cp_trait_kind;
617 
618 /* The types that we are processing.  */
619 #define TRAIT_EXPR_TYPE1(NODE) \
620   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->type1)
621 
622 #define TRAIT_EXPR_TYPE2(NODE) \
623   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->type2)
624 
625 /* The specific trait that we are processing.  */
626 #define TRAIT_EXPR_KIND(NODE) \
627   (((struct tree_trait_expr *)TRAIT_EXPR_CHECK (NODE))->kind)
628 
629 struct GTY (()) tree_trait_expr {
630   struct tree_common common;
631   tree type1;
632   tree type2;
633   enum cp_trait_kind kind;
634 };
635 
636 /* Based off of TYPE_ANONYMOUS_P.  */
637 #define LAMBDA_TYPE_P(NODE) \
638   (CLASS_TYPE_P (NODE) && CLASSTYPE_LAMBDA_EXPR (NODE))
639 
640 /* Test if FUNCTION_DECL is a lambda function.  */
641 #define LAMBDA_FUNCTION_P(FNDECL) \
642   (DECL_OVERLOADED_OPERATOR_P (FNDECL) == CALL_EXPR \
643    && LAMBDA_TYPE_P (CP_DECL_CONTEXT (FNDECL)))
644 
645 enum cp_lambda_default_capture_mode_type {
646   CPLD_NONE,
647   CPLD_COPY,
648   CPLD_REFERENCE
649 };
650 
651 /* The method of default capture, if any.  */
652 #define LAMBDA_EXPR_DEFAULT_CAPTURE_MODE(NODE) \
653   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->default_capture_mode)
654 
655 /* The capture-list, including `this'.  Each capture is stored as a FIELD_DECL
656  * so that the name, type, and field are all together, whether or not it has
657  * been added to the lambda's class type.
658    TREE_LIST:
659      TREE_PURPOSE: The FIELD_DECL for this capture.
660      TREE_VALUE: The initializer. This is part of a GNU extension.  */
661 #define LAMBDA_EXPR_CAPTURE_LIST(NODE) \
662   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->capture_list)
663 
664 /* During parsing of the lambda-introducer, the node in the capture-list
665    that holds the 'this' capture.  During parsing of the body, the
666    capture proxy for that node.  */
667 #define LAMBDA_EXPR_THIS_CAPTURE(NODE) \
668   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->this_capture)
669 
670 /* Predicate tracking whether `this' is in the effective capture set.  */
671 #define LAMBDA_EXPR_CAPTURES_THIS_P(NODE) \
672   LAMBDA_EXPR_THIS_CAPTURE(NODE)
673 
674 /* Predicate tracking whether the lambda was declared 'mutable'.  */
675 #define LAMBDA_EXPR_MUTABLE_P(NODE) \
676   TREE_LANG_FLAG_1 (LAMBDA_EXPR_CHECK (NODE))
677 
678 /* The return type in the expression.
679  * NULL_TREE indicates that none was specified.  */
680 #define LAMBDA_EXPR_RETURN_TYPE(NODE) \
681   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->return_type)
682 
683 /* The source location of the lambda.  */
684 #define LAMBDA_EXPR_LOCATION(NODE) \
685   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->locus)
686 
687 /* The mangling scope for the lambda: FUNCTION_DECL, PARM_DECL, VAR_DECL,
688    FIELD_DECL or NULL_TREE.  If this is NULL_TREE, we have no linkage.  */
689 #define LAMBDA_EXPR_EXTRA_SCOPE(NODE) \
690   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->extra_scope)
691 
692 /* If EXTRA_SCOPE, this is the number of the lambda within that scope.  */
693 #define LAMBDA_EXPR_DISCRIMINATOR(NODE) \
694   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->discriminator)
695 
696 /* During parsing of the lambda, a vector of capture proxies which need
697    to be pushed once we're done processing a nested lambda.  */
698 #define LAMBDA_EXPR_PENDING_PROXIES(NODE) \
699   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->pending_proxies)
700 
701 /* The closure type of the lambda.  Note that the TREE_TYPE of a
702    LAMBDA_EXPR is always NULL_TREE, because we need to instantiate the
703    LAMBDA_EXPR in order to instantiate the type.  */
704 #define LAMBDA_EXPR_CLOSURE(NODE) \
705   (((struct tree_lambda_expr *)LAMBDA_EXPR_CHECK (NODE))->closure)
706 
707 struct GTY (()) tree_lambda_expr
708 {
709   struct tree_typed typed;
710   tree capture_list;
711   tree this_capture;
712   tree return_type;
713   tree extra_scope;
714   tree closure;
715   vec<tree, va_gc> *pending_proxies;
716   location_t locus;
717   enum cp_lambda_default_capture_mode_type default_capture_mode;
718   int discriminator;
719 };
720 
721 /* A (typedef,context,usage location) triplet.
722    It represents a typedef used through a
723    context at a given source location.
724    e.g.
725    struct foo {
726      typedef int myint;
727    };
728 
729    struct bar {
730     foo::myint v; // #1<-- this location.
731    };
732 
733    In bar, the triplet will be (myint, foo, #1).
734    */
735 struct GTY(()) qualified_typedef_usage_s {
736   tree typedef_decl;
737   tree context;
738   location_t locus;
739 };
740 typedef struct qualified_typedef_usage_s qualified_typedef_usage_t;
741 
742 /* Non-zero if this template specialization has access violations that
743    should be rechecked when the function is instantiated outside argument
744    deduction.  */
745 #define TINFO_HAS_ACCESS_ERRORS(NODE) \
746   (TREE_LANG_FLAG_0 (TEMPLATE_INFO_CHECK (NODE)))
747 #define FNDECL_HAS_ACCESS_ERRORS(NODE) \
748   (TINFO_HAS_ACCESS_ERRORS (DECL_TEMPLATE_INFO (NODE)))
749 
750 struct GTY(()) tree_template_info {
751   struct tree_common common;
752   vec<qualified_typedef_usage_t, va_gc> *typedefs_needing_access_checking;
753 };
754 
755 enum cp_tree_node_structure_enum {
756   TS_CP_GENERIC,
757   TS_CP_IDENTIFIER,
758   TS_CP_TPI,
759   TS_CP_PTRMEM,
760   TS_CP_BINDING,
761   TS_CP_OVERLOAD,
762   TS_CP_BASELINK,
763   TS_CP_WRAPPER,
764   TS_CP_DEFAULT_ARG,
765   TS_CP_DEFERRED_NOEXCEPT,
766   TS_CP_STATIC_ASSERT,
767   TS_CP_ARGUMENT_PACK_SELECT,
768   TS_CP_TRAIT_EXPR,
769   TS_CP_LAMBDA_EXPR,
770   TS_CP_TEMPLATE_INFO,
771   TS_CP_USERDEF_LITERAL,
772   LAST_TS_CP_ENUM
773 };
774 
775 /* The resulting tree type.  */
776 union GTY((desc ("cp_tree_node_structure (&%h)"),
777        chain_next ("(union lang_tree_node *) c_tree_chain_next (&%h.generic)"))) lang_tree_node {
778   union tree_node GTY ((tag ("TS_CP_GENERIC"),
779 			desc ("tree_node_structure (&%h)"))) generic;
780   struct template_parm_index_s GTY ((tag ("TS_CP_TPI"))) tpi;
781   struct ptrmem_cst GTY ((tag ("TS_CP_PTRMEM"))) ptrmem;
782   struct tree_overload GTY ((tag ("TS_CP_OVERLOAD"))) overload;
783   struct tree_baselink GTY ((tag ("TS_CP_BASELINK"))) baselink;
784   struct tree_default_arg GTY ((tag ("TS_CP_DEFAULT_ARG"))) default_arg;
785   struct tree_deferred_noexcept GTY ((tag ("TS_CP_DEFERRED_NOEXCEPT"))) deferred_noexcept;
786   struct lang_identifier GTY ((tag ("TS_CP_IDENTIFIER"))) identifier;
787   struct tree_static_assert GTY ((tag ("TS_CP_STATIC_ASSERT")))
788     static_assertion;
789   struct tree_argument_pack_select GTY ((tag ("TS_CP_ARGUMENT_PACK_SELECT")))
790     argument_pack_select;
791   struct tree_trait_expr GTY ((tag ("TS_CP_TRAIT_EXPR")))
792     trait_expression;
793   struct tree_lambda_expr GTY ((tag ("TS_CP_LAMBDA_EXPR")))
794     lambda_expression;
795   struct tree_template_info GTY ((tag ("TS_CP_TEMPLATE_INFO")))
796     template_info;
797   struct tree_userdef_literal GTY ((tag ("TS_CP_USERDEF_LITERAL")))
798     userdef_literal;
799 };
800 
801 
802 enum cp_tree_index
803 {
804     CPTI_JAVA_BYTE_TYPE,
805     CPTI_JAVA_SHORT_TYPE,
806     CPTI_JAVA_INT_TYPE,
807     CPTI_JAVA_LONG_TYPE,
808     CPTI_JAVA_FLOAT_TYPE,
809     CPTI_JAVA_DOUBLE_TYPE,
810     CPTI_JAVA_CHAR_TYPE,
811     CPTI_JAVA_BOOLEAN_TYPE,
812 
813     CPTI_WCHAR_DECL,
814     CPTI_VTABLE_ENTRY_TYPE,
815     CPTI_DELTA_TYPE,
816     CPTI_VTABLE_INDEX_TYPE,
817     CPTI_CLEANUP_TYPE,
818     CPTI_VTT_PARM_TYPE,
819 
820     CPTI_CLASS_TYPE,
821     CPTI_UNKNOWN_TYPE,
822     CPTI_INIT_LIST_TYPE,
823     CPTI_VTBL_TYPE,
824     CPTI_VTBL_PTR_TYPE,
825     CPTI_STD,
826     CPTI_ABI,
827     CPTI_CONST_TYPE_INFO_TYPE,
828     CPTI_TYPE_INFO_PTR_TYPE,
829     CPTI_ABORT_FNDECL,
830     CPTI_GLOBAL_DELETE_FNDECL,
831     CPTI_AGGR_TAG,
832 
833     CPTI_CTOR_IDENTIFIER,
834     CPTI_COMPLETE_CTOR_IDENTIFIER,
835     CPTI_BASE_CTOR_IDENTIFIER,
836     CPTI_DTOR_IDENTIFIER,
837     CPTI_COMPLETE_DTOR_IDENTIFIER,
838     CPTI_BASE_DTOR_IDENTIFIER,
839     CPTI_DELETING_DTOR_IDENTIFIER,
840     CPTI_DELTA_IDENTIFIER,
841     CPTI_IN_CHARGE_IDENTIFIER,
842     CPTI_VTT_PARM_IDENTIFIER,
843     CPTI_NELTS_IDENTIFIER,
844     CPTI_THIS_IDENTIFIER,
845     CPTI_PFN_IDENTIFIER,
846     CPTI_VPTR_IDENTIFIER,
847     CPTI_STD_IDENTIFIER,
848 
849     CPTI_LANG_NAME_C,
850     CPTI_LANG_NAME_CPLUSPLUS,
851     CPTI_LANG_NAME_JAVA,
852 
853     CPTI_EMPTY_EXCEPT_SPEC,
854     CPTI_NOEXCEPT_TRUE_SPEC,
855     CPTI_NOEXCEPT_FALSE_SPEC,
856     CPTI_JCLASS,
857     CPTI_TERMINATE,
858     CPTI_CALL_UNEXPECTED,
859     CPTI_ATEXIT_FN_PTR_TYPE,
860     CPTI_ATEXIT,
861     CPTI_DSO_HANDLE,
862     CPTI_DCAST,
863 
864     CPTI_KEYED_CLASSES,
865 
866     CPTI_NULLPTR,
867     CPTI_NULLPTR_TYPE,
868 
869     CPTI_MAX
870 };
871 
872 extern GTY(()) tree cp_global_trees[CPTI_MAX];
873 
874 #define java_byte_type_node		cp_global_trees[CPTI_JAVA_BYTE_TYPE]
875 #define java_short_type_node		cp_global_trees[CPTI_JAVA_SHORT_TYPE]
876 #define java_int_type_node		cp_global_trees[CPTI_JAVA_INT_TYPE]
877 #define java_long_type_node		cp_global_trees[CPTI_JAVA_LONG_TYPE]
878 #define java_float_type_node		cp_global_trees[CPTI_JAVA_FLOAT_TYPE]
879 #define java_double_type_node		cp_global_trees[CPTI_JAVA_DOUBLE_TYPE]
880 #define java_char_type_node		cp_global_trees[CPTI_JAVA_CHAR_TYPE]
881 #define java_boolean_type_node		cp_global_trees[CPTI_JAVA_BOOLEAN_TYPE]
882 
883 #define wchar_decl_node			cp_global_trees[CPTI_WCHAR_DECL]
884 #define vtable_entry_type		cp_global_trees[CPTI_VTABLE_ENTRY_TYPE]
885 /* The type used to represent an offset by which to adjust the `this'
886    pointer in pointer-to-member types.  */
887 #define delta_type_node			cp_global_trees[CPTI_DELTA_TYPE]
888 /* The type used to represent an index into the vtable.  */
889 #define vtable_index_type		cp_global_trees[CPTI_VTABLE_INDEX_TYPE]
890 
891 #define class_type_node			cp_global_trees[CPTI_CLASS_TYPE]
892 #define unknown_type_node		cp_global_trees[CPTI_UNKNOWN_TYPE]
893 #define init_list_type_node		cp_global_trees[CPTI_INIT_LIST_TYPE]
894 #define vtbl_type_node			cp_global_trees[CPTI_VTBL_TYPE]
895 #define vtbl_ptr_type_node		cp_global_trees[CPTI_VTBL_PTR_TYPE]
896 #define std_node			cp_global_trees[CPTI_STD]
897 #define abi_node			cp_global_trees[CPTI_ABI]
898 #define const_type_info_type_node	cp_global_trees[CPTI_CONST_TYPE_INFO_TYPE]
899 #define type_info_ptr_type		cp_global_trees[CPTI_TYPE_INFO_PTR_TYPE]
900 #define abort_fndecl			cp_global_trees[CPTI_ABORT_FNDECL]
901 #define global_delete_fndecl		cp_global_trees[CPTI_GLOBAL_DELETE_FNDECL]
902 #define current_aggr			cp_global_trees[CPTI_AGGR_TAG]
903 #define nullptr_node			cp_global_trees[CPTI_NULLPTR]
904 #define nullptr_type_node		cp_global_trees[CPTI_NULLPTR_TYPE]
905 
906 /* We cache these tree nodes so as to call get_identifier less
907    frequently.  */
908 
909 /* The name of a constructor that takes an in-charge parameter to
910    decide whether or not to construct virtual base classes.  */
911 #define ctor_identifier			cp_global_trees[CPTI_CTOR_IDENTIFIER]
912 /* The name of a constructor that constructs virtual base classes.  */
913 #define complete_ctor_identifier	cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER]
914 /* The name of a constructor that does not construct virtual base classes.  */
915 #define base_ctor_identifier		cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER]
916 /* The name of a destructor that takes an in-charge parameter to
917    decide whether or not to destroy virtual base classes and whether
918    or not to delete the object.  */
919 #define dtor_identifier			cp_global_trees[CPTI_DTOR_IDENTIFIER]
920 /* The name of a destructor that destroys virtual base classes.  */
921 #define complete_dtor_identifier	cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER]
922 /* The name of a destructor that does not destroy virtual base
923    classes.  */
924 #define base_dtor_identifier		cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER]
925 /* The name of a destructor that destroys virtual base classes, and
926    then deletes the entire object.  */
927 #define deleting_dtor_identifier	cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER]
928 #define delta_identifier		cp_global_trees[CPTI_DELTA_IDENTIFIER]
929 #define in_charge_identifier		cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER]
930 /* The name of the parameter that contains a pointer to the VTT to use
931    for this subobject constructor or destructor.  */
932 #define vtt_parm_identifier		cp_global_trees[CPTI_VTT_PARM_IDENTIFIER]
933 #define nelts_identifier		cp_global_trees[CPTI_NELTS_IDENTIFIER]
934 #define this_identifier			cp_global_trees[CPTI_THIS_IDENTIFIER]
935 #define pfn_identifier			cp_global_trees[CPTI_PFN_IDENTIFIER]
936 #define vptr_identifier			cp_global_trees[CPTI_VPTR_IDENTIFIER]
937 /* The name of the std namespace.  */
938 #define std_identifier			cp_global_trees[CPTI_STD_IDENTIFIER]
939 #define lang_name_c			cp_global_trees[CPTI_LANG_NAME_C]
940 #define lang_name_cplusplus		cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS]
941 #define lang_name_java			cp_global_trees[CPTI_LANG_NAME_JAVA]
942 
943 /* Exception specifier used for throw().  */
944 #define empty_except_spec		cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC]
945 #define noexcept_true_spec		cp_global_trees[CPTI_NOEXCEPT_TRUE_SPEC]
946 #define noexcept_false_spec		cp_global_trees[CPTI_NOEXCEPT_FALSE_SPEC]
947 
948 /* If non-NULL, a POINTER_TYPE equivalent to (java::lang::Class*).  */
949 #define jclass_node			cp_global_trees[CPTI_JCLASS]
950 
951 /* The declaration for `std::terminate'.  */
952 #define terminate_node			cp_global_trees[CPTI_TERMINATE]
953 
954 /* The declaration for "__cxa_call_unexpected".  */
955 #define call_unexpected_node		cp_global_trees[CPTI_CALL_UNEXPECTED]
956 
957 /* The type of the function-pointer argument to "__cxa_atexit" (or
958    "std::atexit", if "__cxa_atexit" is not being used).  */
959 #define atexit_fn_ptr_type_node         cp_global_trees[CPTI_ATEXIT_FN_PTR_TYPE]
960 
961 /* A pointer to `std::atexit'.  */
962 #define atexit_node			cp_global_trees[CPTI_ATEXIT]
963 
964 /* A pointer to `__dso_handle'.  */
965 #define dso_handle_node			cp_global_trees[CPTI_DSO_HANDLE]
966 
967 /* The declaration of the dynamic_cast runtime.  */
968 #define dynamic_cast_node		cp_global_trees[CPTI_DCAST]
969 
970 /* The type of a destructor.  */
971 #define cleanup_type			cp_global_trees[CPTI_CLEANUP_TYPE]
972 
973 /* The type of the vtt parameter passed to subobject constructors and
974    destructors.  */
975 #define vtt_parm_type			cp_global_trees[CPTI_VTT_PARM_TYPE]
976 
977 /* A TREE_LIST of the dynamic classes whose vtables may have to be
978    emitted in this translation unit.  */
979 
980 #define keyed_classes			cp_global_trees[CPTI_KEYED_CLASSES]
981 
982 /* Node to indicate default access. This must be distinct from the
983    access nodes in tree.h.  */
984 
985 #define access_default_node		null_node
986 
987 /* Global state.  */
988 
989 struct GTY(()) saved_scope {
990   vec<cxx_saved_binding, va_gc> *old_bindings;
991   tree old_namespace;
992   vec<tree, va_gc> *decl_ns_list;
993   tree class_name;
994   tree class_type;
995   tree access_specifier;
996   tree function_decl;
997   vec<tree, va_gc> *lang_base;
998   tree lang_name;
999   tree template_parms;
1000   cp_binding_level *x_previous_class_level;
1001   tree x_saved_tree;
1002 
1003   /* Only used for uses of this in trailing return type.  */
1004   tree x_current_class_ptr;
1005   tree x_current_class_ref;
1006 
1007   int x_processing_template_decl;
1008   int x_processing_specialization;
1009   BOOL_BITFIELD x_processing_explicit_instantiation : 1;
1010   BOOL_BITFIELD need_pop_function_context : 1;
1011 
1012   int unevaluated_operand;
1013   int inhibit_evaluation_warnings;
1014 
1015   struct stmt_tree_s x_stmt_tree;
1016 
1017   cp_binding_level *class_bindings;
1018   cp_binding_level *bindings;
1019 
1020   struct saved_scope *prev;
1021 };
1022 
1023 /* The current open namespace.  */
1024 
1025 #define current_namespace scope_chain->old_namespace
1026 
1027 /* The stack for namespaces of current declarations.  */
1028 
1029 #define decl_namespace_list scope_chain->decl_ns_list
1030 
1031 /* IDENTIFIER_NODE: name of current class */
1032 
1033 #define current_class_name scope_chain->class_name
1034 
1035 /* _TYPE: the type of the current class */
1036 
1037 #define current_class_type scope_chain->class_type
1038 
1039 /* When parsing a class definition, the access specifier most recently
1040    given by the user, or, if no access specifier was given, the
1041    default value appropriate for the kind of class (i.e., struct,
1042    class, or union).  */
1043 
1044 #define current_access_specifier scope_chain->access_specifier
1045 
1046 /* Pointer to the top of the language name stack.  */
1047 
1048 #define current_lang_base scope_chain->lang_base
1049 #define current_lang_name scope_chain->lang_name
1050 
1051 /* When parsing a template declaration, a TREE_LIST represents the
1052    active template parameters.  Each node in the list represents one
1053    level of template parameters.  The innermost level is first in the
1054    list.  The depth of each level is stored as an INTEGER_CST in the
1055    TREE_PURPOSE of each node.  The parameters for that level are
1056    stored in the TREE_VALUE.  */
1057 
1058 #define current_template_parms scope_chain->template_parms
1059 
1060 #define processing_template_decl scope_chain->x_processing_template_decl
1061 #define processing_specialization scope_chain->x_processing_specialization
1062 #define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation
1063 
1064 /* The cached class binding level, from the most recently exited
1065    class, or NULL if none.  */
1066 
1067 #define previous_class_level scope_chain->x_previous_class_level
1068 
1069 /* A list of private types mentioned, for deferred access checking.  */
1070 
1071 extern GTY(()) struct saved_scope *scope_chain;
1072 
1073 struct GTY(()) cxx_int_tree_map {
1074   unsigned int uid;
1075   tree to;
1076 };
1077 
1078 extern unsigned int cxx_int_tree_map_hash (const void *);
1079 extern int cxx_int_tree_map_eq (const void *, const void *);
1080 
1081 /* Global state pertinent to the current function.  */
1082 
1083 struct GTY(()) language_function {
1084   struct c_language_function base;
1085 
1086   tree x_cdtor_label;
1087   tree x_current_class_ptr;
1088   tree x_current_class_ref;
1089   tree x_eh_spec_block;
1090   tree x_in_charge_parm;
1091   tree x_vtt_parm;
1092   tree x_return_value;
1093   tree x_auto_return_pattern;
1094 
1095   BOOL_BITFIELD returns_value : 1;
1096   BOOL_BITFIELD returns_null : 1;
1097   BOOL_BITFIELD returns_abnormally : 1;
1098   BOOL_BITFIELD x_in_function_try_handler : 1;
1099   BOOL_BITFIELD x_in_base_initializer : 1;
1100 
1101   /* True if this function can throw an exception.  */
1102   BOOL_BITFIELD can_throw : 1;
1103 
1104   htab_t GTY((param_is(struct named_label_entry))) x_named_labels;
1105   cp_binding_level *bindings;
1106   vec<tree, va_gc> *x_local_names;
1107   htab_t GTY((param_is (struct cxx_int_tree_map))) extern_decl_map;
1108 };
1109 
1110 /* The current C++-specific per-function global variables.  */
1111 
1112 #define cp_function_chain (cfun->language)
1113 
1114 /* In a constructor destructor, the point at which all derived class
1115    destroying/construction has been done.  I.e., just before a
1116    constructor returns, or before any base class destroying will be done
1117    in a destructor.  */
1118 
1119 #define cdtor_label cp_function_chain->x_cdtor_label
1120 
1121 /* When we're processing a member function, current_class_ptr is the
1122    PARM_DECL for the `this' pointer.  The current_class_ref is an
1123    expression for `*this'.  */
1124 
1125 #define current_class_ptr			\
1126   (*(cfun && cp_function_chain			\
1127      ? &cp_function_chain->x_current_class_ptr	\
1128      : &scope_chain->x_current_class_ptr))
1129 #define current_class_ref			\
1130   (*(cfun && cp_function_chain			\
1131      ? &cp_function_chain->x_current_class_ref	\
1132      : &scope_chain->x_current_class_ref))
1133 
1134 /* The EH_SPEC_BLOCK for the exception-specifiers for the current
1135    function, if any.  */
1136 
1137 #define current_eh_spec_block cp_function_chain->x_eh_spec_block
1138 
1139 /* The `__in_chrg' parameter for the current function.  Only used for
1140    constructors and destructors.  */
1141 
1142 #define current_in_charge_parm cp_function_chain->x_in_charge_parm
1143 
1144 /* The `__vtt_parm' parameter for the current function.  Only used for
1145    constructors and destructors.  */
1146 
1147 #define current_vtt_parm cp_function_chain->x_vtt_parm
1148 
1149 /* Set to 0 at beginning of a function definition, set to 1 if
1150    a return statement that specifies a return value is seen.  */
1151 
1152 #define current_function_returns_value cp_function_chain->returns_value
1153 
1154 /* Set to 0 at beginning of a function definition, set to 1 if
1155    a return statement with no argument is seen.  */
1156 
1157 #define current_function_returns_null cp_function_chain->returns_null
1158 
1159 /* Set to 0 at beginning of a function definition, set to 1 if
1160    a call to a noreturn function is seen.  */
1161 
1162 #define current_function_returns_abnormally \
1163   cp_function_chain->returns_abnormally
1164 
1165 /* Nonzero if we are processing a base initializer.  Zero elsewhere.  */
1166 #define in_base_initializer cp_function_chain->x_in_base_initializer
1167 
1168 #define in_function_try_handler cp_function_chain->x_in_function_try_handler
1169 
1170 /* Expression always returned from function, or error_mark_node
1171    otherwise, for use by the automatic named return value optimization.  */
1172 
1173 #define current_function_return_value \
1174   (cp_function_chain->x_return_value)
1175 
1176 /* A type involving 'auto' to be used for return type deduction.  */
1177 
1178 #define current_function_auto_return_pattern \
1179   (cp_function_chain->x_auto_return_pattern)
1180 
1181 /* True if NAME is the IDENTIFIER_NODE for an overloaded "operator
1182    new" or "operator delete".  */
1183 #define NEW_DELETE_OPNAME_P(NAME)		\
1184   ((NAME) == ansi_opname (NEW_EXPR)		\
1185    || (NAME) == ansi_opname (VEC_NEW_EXPR)	\
1186    || (NAME) == ansi_opname (DELETE_EXPR)	\
1187    || (NAME) == ansi_opname (VEC_DELETE_EXPR))
1188 
1189 #define ansi_opname(CODE) \
1190   (operator_name_info[(int) (CODE)].identifier)
1191 #define ansi_assopname(CODE) \
1192   (assignment_operator_name_info[(int) (CODE)].identifier)
1193 
1194 /* TRUE if a tree code represents a statement.  */
1195 extern bool statement_code_p[MAX_TREE_CODES];
1196 
1197 #define STATEMENT_CODE_P(CODE) statement_code_p[(int) (CODE)]
1198 
1199 enum languages { lang_c, lang_cplusplus, lang_java };
1200 
1201 /* Macros to make error reporting functions' lives easier.  */
1202 #define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE)))
1203 #define TYPE_LINKAGE_IDENTIFIER(NODE) \
1204   (TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (NODE)))
1205 #define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
1206 #define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
1207 
1208 /* Nonzero if NODE has no name for linkage purposes.  */
1209 #define TYPE_ANONYMOUS_P(NODE) \
1210   (TAGGED_TYPE_P (NODE) && ANON_AGGRNAME_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
1211 
1212 /* The _DECL for this _TYPE.  */
1213 #define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
1214 
1215 /* Nonzero if T is a type that could resolve to any kind of concrete type
1216    at instantiation time.  */
1217 #define WILDCARD_TYPE_P(T)				\
1218   (TREE_CODE (T) == TEMPLATE_TYPE_PARM			\
1219    || TREE_CODE (T) == TYPENAME_TYPE			\
1220    || TREE_CODE (T) == TYPEOF_TYPE			\
1221    || TREE_CODE (T) == BOUND_TEMPLATE_TEMPLATE_PARM	\
1222    || TREE_CODE (T) == DECLTYPE_TYPE)
1223 
1224 /* Nonzero if T is a class (or struct or union) type.  Also nonzero
1225    for template type parameters, typename types, and instantiated
1226    template template parameters.  Keep these checks in ascending code
1227    order.  */
1228 #define MAYBE_CLASS_TYPE_P(T) (WILDCARD_TYPE_P (T) || CLASS_TYPE_P (T))
1229 
1230 /* Set CLASS_TYPE_P for T to VAL.  T must be a class, struct, or
1231    union type.  */
1232 #define SET_CLASS_TYPE_P(T, VAL) \
1233   (TYPE_LANG_FLAG_5 (T) = (VAL))
1234 
1235 /* Nonzero if T is a class type.  Zero for template type parameters,
1236    typename types, and so forth.  */
1237 #define CLASS_TYPE_P(T) \
1238   (RECORD_OR_UNION_CODE_P (TREE_CODE (T)) && TYPE_LANG_FLAG_5 (T))
1239 
1240 /* Nonzero if T is a class type but not an union.  */
1241 #define NON_UNION_CLASS_TYPE_P(T) \
1242   (CLASS_TYPE_P (T) && TREE_CODE (T) != UNION_TYPE)
1243 
1244 /* Keep these checks in ascending code order.  */
1245 #define RECORD_OR_UNION_CODE_P(T)	\
1246   ((T) == RECORD_TYPE || (T) == UNION_TYPE)
1247 #define TAGGED_TYPE_P(T) \
1248   (CLASS_TYPE_P (T) || TREE_CODE (T) == ENUMERAL_TYPE)
1249 #define IS_OVERLOAD_TYPE(T) TAGGED_TYPE_P (T)
1250 
1251 /* True if this a "Java" type, defined in 'extern "Java"'.  */
1252 #define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3 (NODE)
1253 
1254 /* True if this type is dependent.  This predicate is only valid if
1255    TYPE_DEPENDENT_P_VALID is true.  */
1256 #define TYPE_DEPENDENT_P(NODE) TYPE_LANG_FLAG_0 (NODE)
1257 
1258 /* True if dependent_type_p has been called for this type, with the
1259    result that TYPE_DEPENDENT_P is valid.  */
1260 #define TYPE_DEPENDENT_P_VALID(NODE) TYPE_LANG_FLAG_6(NODE)
1261 
1262 /* Nonzero if this type is const-qualified.  */
1263 #define CP_TYPE_CONST_P(NODE)				\
1264   ((cp_type_quals (NODE) & TYPE_QUAL_CONST) != 0)
1265 
1266 /* Nonzero if this type is volatile-qualified.  */
1267 #define CP_TYPE_VOLATILE_P(NODE)			\
1268   ((cp_type_quals (NODE) & TYPE_QUAL_VOLATILE) != 0)
1269 
1270 /* Nonzero if this type is restrict-qualified.  */
1271 #define CP_TYPE_RESTRICT_P(NODE)			\
1272   ((cp_type_quals (NODE) & TYPE_QUAL_RESTRICT) != 0)
1273 
1274 /* Nonzero if this type is const-qualified, but not
1275    volatile-qualified.  Other qualifiers are ignored.  This macro is
1276    used to test whether or not it is OK to bind an rvalue to a
1277    reference.  */
1278 #define CP_TYPE_CONST_NON_VOLATILE_P(NODE)				\
1279   ((cp_type_quals (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE))	\
1280    == TYPE_QUAL_CONST)
1281 
1282 #define FUNCTION_ARG_CHAIN(NODE) \
1283   TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE)))
1284 
1285 /* Given a FUNCTION_DECL, returns the first TREE_LIST out of TYPE_ARG_TYPES
1286    which refers to a user-written parameter.  */
1287 #define FUNCTION_FIRST_USER_PARMTYPE(NODE) \
1288   skip_artificial_parms_for ((NODE), TYPE_ARG_TYPES (TREE_TYPE (NODE)))
1289 
1290 /* Similarly, but for DECL_ARGUMENTS.  */
1291 #define FUNCTION_FIRST_USER_PARM(NODE) \
1292   skip_artificial_parms_for ((NODE), DECL_ARGUMENTS (NODE))
1293 
1294 /* Nonzero iff TYPE is derived from PARENT. Ignores accessibility and
1295    ambiguity issues.  */
1296 #define DERIVED_FROM_P(PARENT, TYPE) \
1297   (lookup_base ((TYPE), (PARENT), ba_any, NULL, tf_warning_or_error)\
1298    != NULL_TREE)
1299 
1300 /* Gives the visibility specification for a class type.  */
1301 #define CLASSTYPE_VISIBILITY(TYPE)		\
1302 	DECL_VISIBILITY (TYPE_MAIN_DECL (TYPE))
1303 #define CLASSTYPE_VISIBILITY_SPECIFIED(TYPE)	\
1304 	DECL_VISIBILITY_SPECIFIED (TYPE_MAIN_DECL (TYPE))
1305 
1306 typedef struct GTY (()) tree_pair_s {
1307   tree purpose;
1308   tree value;
1309 } tree_pair_s;
1310 typedef tree_pair_s *tree_pair_p;
1311 
1312 /* This is a few header flags for 'struct lang_type'.  Actually,
1313    all but the first are used only for lang_type_class; they
1314    are put in this structure to save space.  */
1315 struct GTY(()) lang_type_header {
1316   BOOL_BITFIELD is_lang_type_class : 1;
1317 
1318   BOOL_BITFIELD has_type_conversion : 1;
1319   BOOL_BITFIELD has_copy_ctor : 1;
1320   BOOL_BITFIELD has_default_ctor : 1;
1321   BOOL_BITFIELD const_needs_init : 1;
1322   BOOL_BITFIELD ref_needs_init : 1;
1323   BOOL_BITFIELD has_const_copy_assign : 1;
1324 
1325   BOOL_BITFIELD spare : 1;
1326 };
1327 
1328 /* This structure provides additional information above and beyond
1329    what is provide in the ordinary tree_type.  In the past, we used it
1330    for the types of class types, template parameters types, typename
1331    types, and so forth.  However, there can be many (tens to hundreds
1332    of thousands) of template parameter types in a compilation, and
1333    there's no need for this additional information in that case.
1334    Therefore, we now use this data structure only for class types.
1335 
1336    In the past, it was thought that there would be relatively few
1337    class types.  However, in the presence of heavy use of templates,
1338    many (i.e., thousands) of classes can easily be generated.
1339    Therefore, we should endeavor to keep the size of this structure to
1340    a minimum.  */
1341 struct GTY(()) lang_type_class {
1342   struct lang_type_header h;
1343 
1344   unsigned char align;
1345 
1346   unsigned has_mutable : 1;
1347   unsigned com_interface : 1;
1348   unsigned non_pod_class : 1;
1349   unsigned nearly_empty_p : 1;
1350   unsigned user_align : 1;
1351   unsigned has_copy_assign : 1;
1352   unsigned has_new : 1;
1353   unsigned has_array_new : 1;
1354 
1355   unsigned gets_delete : 2;
1356   unsigned interface_only : 1;
1357   unsigned interface_unknown : 1;
1358   unsigned contains_empty_class_p : 1;
1359   unsigned anon_aggr : 1;
1360   unsigned non_zero_init : 1;
1361   unsigned empty_p : 1;
1362 
1363   unsigned vec_new_uses_cookie : 1;
1364   unsigned declared_class : 1;
1365   unsigned diamond_shaped : 1;
1366   unsigned repeated_base : 1;
1367   unsigned being_defined : 1;
1368   unsigned java_interface : 1;
1369   unsigned debug_requested : 1;
1370   unsigned fields_readonly : 1;
1371 
1372   unsigned use_template : 2;
1373   unsigned ptrmemfunc_flag : 1;
1374   unsigned was_anonymous : 1;
1375   unsigned lazy_default_ctor : 1;
1376   unsigned lazy_copy_ctor : 1;
1377   unsigned lazy_copy_assign : 1;
1378   unsigned lazy_destructor : 1;
1379 
1380   unsigned has_const_copy_ctor : 1;
1381   unsigned has_complex_copy_ctor : 1;
1382   unsigned has_complex_copy_assign : 1;
1383   unsigned non_aggregate : 1;
1384   unsigned has_complex_dflt : 1;
1385   unsigned has_list_ctor : 1;
1386   unsigned non_std_layout : 1;
1387   unsigned is_literal : 1;
1388 
1389   unsigned lazy_move_ctor : 1;
1390   unsigned lazy_move_assign : 1;
1391   unsigned has_complex_move_ctor : 1;
1392   unsigned has_complex_move_assign : 1;
1393   unsigned has_constexpr_ctor : 1;
1394   unsigned is_final : 1;
1395 
1396   /* When adding a flag here, consider whether or not it ought to
1397      apply to a template instance if it applies to the template.  If
1398      so, make sure to copy it in instantiate_class_template!  */
1399 
1400   /* There are some bits left to fill out a 32-bit word.  Keep track
1401      of this by updating the size of this bitfield whenever you add or
1402      remove a flag.  */
1403   unsigned dummy : 2;
1404 
1405   tree primary_base;
1406   vec<tree_pair_s, va_gc> *vcall_indices;
1407   tree vtables;
1408   tree typeinfo_var;
1409   vec<tree, va_gc> *vbases;
1410   binding_table nested_udts;
1411   tree as_base;
1412   vec<tree, va_gc> *pure_virtuals;
1413   tree friend_classes;
1414   vec<tree, va_gc> * GTY((reorder ("resort_type_method_vec"))) methods;
1415   tree key_method;
1416   tree decl_list;
1417   tree template_info;
1418   tree befriending_classes;
1419   /* In a RECORD_TYPE, information specific to Objective-C++, such
1420      as a list of adopted protocols or a pointer to a corresponding
1421      @interface.  See objc/objc-act.h for details.  */
1422   tree objc_info;
1423   /* sorted_fields is sorted based on a pointer, so we need to be able
1424      to resort it if pointers get rearranged.  */
1425   struct sorted_fields_type * GTY ((reorder ("resort_sorted_fields")))
1426     sorted_fields;
1427   /* FIXME reuse another field?  */
1428   tree lambda_expr;
1429 };
1430 
1431 struct GTY(()) lang_type_ptrmem {
1432   struct lang_type_header h;
1433   tree record;
1434 };
1435 
1436 struct GTY((variable_size)) lang_type {
1437   union lang_type_u
1438   {
1439     struct lang_type_header GTY((skip (""))) h;
1440     struct lang_type_class  GTY((tag ("1"))) c;
1441     struct lang_type_ptrmem GTY((tag ("0"))) ptrmem;
1442   } GTY((desc ("%h.h.is_lang_type_class"))) u;
1443 };
1444 
1445 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
1446 
1447 #define LANG_TYPE_CLASS_CHECK(NODE) __extension__		\
1448 ({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);		\
1449     if (! lt->u.h.is_lang_type_class)				\
1450       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
1451     &lt->u.c; })
1452 
1453 #define LANG_TYPE_PTRMEM_CHECK(NODE) __extension__		\
1454 ({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);		\
1455     if (lt->u.h.is_lang_type_class)				\
1456       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
1457     &lt->u.ptrmem; })
1458 
1459 #else
1460 
1461 #define LANG_TYPE_CLASS_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.c)
1462 #define LANG_TYPE_PTRMEM_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.ptrmem)
1463 
1464 #endif /* ENABLE_TREE_CHECKING */
1465 
1466 /* Nonzero for _CLASSTYPE means that operator delete is defined.  */
1467 #define TYPE_GETS_DELETE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->gets_delete)
1468 #define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
1469 
1470 /* Nonzero if `new NODE[x]' should cause the allocation of extra
1471    storage to indicate how many array elements are in use.  */
1472 #define TYPE_VEC_NEW_USES_COOKIE(NODE)			\
1473   (CLASS_TYPE_P (NODE)					\
1474    && LANG_TYPE_CLASS_CHECK (NODE)->vec_new_uses_cookie)
1475 
1476 /* Nonzero means that this _CLASSTYPE node defines ways of converting
1477    itself to other types.  */
1478 #define TYPE_HAS_CONVERSION(NODE) \
1479   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_type_conversion)
1480 
1481 /* Nonzero means that NODE (a class type) has a default constructor --
1482    but that it has not yet been declared.  */
1483 #define CLASSTYPE_LAZY_DEFAULT_CTOR(NODE) \
1484   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_default_ctor)
1485 
1486 /* Nonzero means that NODE (a class type) has a copy constructor --
1487    but that it has not yet been declared.  */
1488 #define CLASSTYPE_LAZY_COPY_CTOR(NODE) \
1489   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_ctor)
1490 
1491 /* Nonzero means that NODE (a class type) has a move constructor --
1492    but that it has not yet been declared.  */
1493 #define CLASSTYPE_LAZY_MOVE_CTOR(NODE) \
1494   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_move_ctor)
1495 
1496 /* Nonzero means that NODE (a class type) has an assignment operator
1497    -- but that it has not yet been declared.  */
1498 #define CLASSTYPE_LAZY_COPY_ASSIGN(NODE) \
1499   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_assign)
1500 
1501 /* Nonzero means that NODE (a class type) has an assignment operator
1502    -- but that it has not yet been declared.  */
1503 #define CLASSTYPE_LAZY_MOVE_ASSIGN(NODE) \
1504   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_move_assign)
1505 
1506 /* Nonzero means that NODE (a class type) has a destructor -- but that
1507    it has not yet been declared.  */
1508 #define CLASSTYPE_LAZY_DESTRUCTOR(NODE) \
1509   (LANG_TYPE_CLASS_CHECK (NODE)->lazy_destructor)
1510 
1511 /* Nonzero means that NODE (a class type) is final */
1512 #define CLASSTYPE_FINAL(NODE) \
1513   (LANG_TYPE_CLASS_CHECK (NODE)->is_final)
1514 
1515 
1516 /* Nonzero means that this _CLASSTYPE node overloads operator=(X&).  */
1517 #define TYPE_HAS_COPY_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_copy_assign)
1518 
1519 /* True iff the class type NODE has an "operator =" whose parameter
1520    has a parameter of type "const X&".  */
1521 #define TYPE_HAS_CONST_COPY_ASSIGN(NODE) \
1522   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_const_copy_assign)
1523 
1524 /* Nonzero means that this _CLASSTYPE node has an X(X&) constructor.  */
1525 #define TYPE_HAS_COPY_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->h.has_copy_ctor)
1526 #define TYPE_HAS_CONST_COPY_CTOR(NODE) \
1527   (LANG_TYPE_CLASS_CHECK (NODE)->has_const_copy_ctor)
1528 
1529 /* Nonzero if this class has an X(initializer_list<T>) constructor.  */
1530 #define TYPE_HAS_LIST_CTOR(NODE) \
1531   (LANG_TYPE_CLASS_CHECK (NODE)->has_list_ctor)
1532 
1533 /* Nonzero if this class has a constexpr constructor other than a copy/move
1534    constructor.  Note that a class can have constexpr constructors for
1535    static initialization even if it isn't a literal class.  */
1536 #define TYPE_HAS_CONSTEXPR_CTOR(NODE) \
1537   (LANG_TYPE_CLASS_CHECK (NODE)->has_constexpr_ctor)
1538 
1539 /* Nonzero if this class defines an overloaded operator new.  (An
1540    operator new [] doesn't count.)  */
1541 #define TYPE_HAS_NEW_OPERATOR(NODE) \
1542   (LANG_TYPE_CLASS_CHECK (NODE)->has_new)
1543 
1544 /* Nonzero if this class defines an overloaded operator new[].  */
1545 #define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \
1546   (LANG_TYPE_CLASS_CHECK (NODE)->has_array_new)
1547 
1548 /* Nonzero means that this type is being defined.  I.e., the left brace
1549    starting the definition of this type has been seen.  */
1550 #define TYPE_BEING_DEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->being_defined)
1551 
1552 /* Nonzero means that this type is either complete or being defined, so we
1553    can do lookup in it.  */
1554 #define COMPLETE_OR_OPEN_TYPE_P(NODE) \
1555   (COMPLETE_TYPE_P (NODE) || (CLASS_TYPE_P (NODE) && TYPE_BEING_DEFINED (NODE)))
1556 
1557 /* Mark bits for repeated base checks.  */
1558 #define TYPE_MARKED_P(NODE) TREE_LANG_FLAG_6 (TYPE_CHECK (NODE))
1559 
1560 /* Nonzero if the class NODE has multiple paths to the same (virtual)
1561    base object.  */
1562 #define CLASSTYPE_DIAMOND_SHAPED_P(NODE) \
1563   (LANG_TYPE_CLASS_CHECK(NODE)->diamond_shaped)
1564 
1565 /* Nonzero if the class NODE has multiple instances of the same base
1566    type.  */
1567 #define CLASSTYPE_REPEATED_BASE_P(NODE) \
1568   (LANG_TYPE_CLASS_CHECK(NODE)->repeated_base)
1569 
1570 /* The member function with which the vtable will be emitted:
1571    the first noninline non-pure-virtual member function.  NULL_TREE
1572    if there is no key function or if this is a class template */
1573 #define CLASSTYPE_KEY_METHOD(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->key_method)
1574 
1575 /* Vector member functions defined in this class.  Each element is
1576    either a FUNCTION_DECL, a TEMPLATE_DECL, or an OVERLOAD.  All
1577    functions with the same name end up in the same slot.  The first
1578    two elements are for constructors, and destructors, respectively.
1579    All template conversion operators to innermost template dependent
1580    types are overloaded on the next slot, if they exist.  Note, the
1581    names for these functions will not all be the same.  The
1582    non-template conversion operators & templated conversions to
1583    non-innermost template types are next, followed by ordinary member
1584    functions.  There may be empty entries at the end of the vector.
1585    The conversion operators are unsorted. The ordinary member
1586    functions are sorted, once the class is complete.  */
1587 #define CLASSTYPE_METHOD_VEC(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->methods)
1588 
1589 /* For class templates, this is a TREE_LIST of all member data,
1590    functions, types, and friends in the order of declaration.
1591    The TREE_PURPOSE of each TREE_LIST is NULL_TREE for a friend,
1592    and the RECORD_TYPE for the class template otherwise.  */
1593 #define CLASSTYPE_DECL_LIST(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->decl_list)
1594 
1595 /* The slot in the CLASSTYPE_METHOD_VEC where constructors go.  */
1596 #define CLASSTYPE_CONSTRUCTOR_SLOT 0
1597 
1598 /* The slot in the CLASSTYPE_METHOD_VEC where destructors go.  */
1599 #define CLASSTYPE_DESTRUCTOR_SLOT 1
1600 
1601 /* The first slot in the CLASSTYPE_METHOD_VEC where conversion
1602    operators can appear.  */
1603 #define CLASSTYPE_FIRST_CONVERSION_SLOT 2
1604 
1605 /* A FUNCTION_DECL or OVERLOAD for the constructors for NODE.  These
1606    are the constructors that take an in-charge parameter.  */
1607 #define CLASSTYPE_CONSTRUCTORS(NODE) \
1608   ((*CLASSTYPE_METHOD_VEC (NODE))[CLASSTYPE_CONSTRUCTOR_SLOT])
1609 
1610 /* A FUNCTION_DECL for the destructor for NODE.  These are the
1611    destructors that take an in-charge parameter.  If
1612    CLASSTYPE_LAZY_DESTRUCTOR is true, then this entry will be NULL
1613    until the destructor is created with lazily_declare_fn.  */
1614 #define CLASSTYPE_DESTRUCTORS(NODE) \
1615   (CLASSTYPE_METHOD_VEC (NODE)						      \
1616    ? (*CLASSTYPE_METHOD_VEC (NODE))[CLASSTYPE_DESTRUCTOR_SLOT]		      \
1617    : NULL_TREE)
1618 
1619 /* A dictionary of the nested user-defined-types (class-types, or enums)
1620    found within this class.  This table includes nested member class
1621    templates.  */
1622 #define CLASSTYPE_NESTED_UTDS(NODE) \
1623    (LANG_TYPE_CLASS_CHECK (NODE)->nested_udts)
1624 
1625 /* Nonzero if NODE has a primary base class, i.e., a base class with
1626    which it shares the virtual function table pointer.  */
1627 #define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \
1628   (CLASSTYPE_PRIMARY_BINFO (NODE) != NULL_TREE)
1629 
1630 /* If non-NULL, this is the binfo for the primary base class, i.e.,
1631    the base class which contains the virtual function table pointer
1632    for this class.  */
1633 #define CLASSTYPE_PRIMARY_BINFO(NODE) \
1634   (LANG_TYPE_CLASS_CHECK (NODE)->primary_base)
1635 
1636 /* A vector of BINFOs for the direct and indirect virtual base classes
1637    that this type uses in a post-order depth-first left-to-right
1638    order.  (In other words, these bases appear in the order that they
1639    should be initialized.)  */
1640 #define CLASSTYPE_VBASECLASSES(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vbases)
1641 
1642 /* The type corresponding to NODE when NODE is used as a base class,
1643    i.e., NODE without virtual base classes.  */
1644 
1645 #define CLASSTYPE_AS_BASE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->as_base)
1646 
1647 /* True iff NODE is the CLASSTYPE_AS_BASE version of some type.  */
1648 
1649 #define IS_FAKE_BASE_TYPE(NODE)					\
1650   (TREE_CODE (NODE) == RECORD_TYPE				\
1651    && TYPE_CONTEXT (NODE) && CLASS_TYPE_P (TYPE_CONTEXT (NODE))	\
1652    && CLASSTYPE_AS_BASE (TYPE_CONTEXT (NODE)) == (NODE))
1653 
1654 /* These are the size and alignment of the type without its virtual
1655    base classes, for when we use this type as a base itself.  */
1656 #define CLASSTYPE_SIZE(NODE) TYPE_SIZE (CLASSTYPE_AS_BASE (NODE))
1657 #define CLASSTYPE_SIZE_UNIT(NODE) TYPE_SIZE_UNIT (CLASSTYPE_AS_BASE (NODE))
1658 #define CLASSTYPE_ALIGN(NODE) TYPE_ALIGN (CLASSTYPE_AS_BASE (NODE))
1659 #define CLASSTYPE_USER_ALIGN(NODE) TYPE_USER_ALIGN (CLASSTYPE_AS_BASE (NODE))
1660 
1661 /* The alignment of NODE, without its virtual bases, in bytes.  */
1662 #define CLASSTYPE_ALIGN_UNIT(NODE) \
1663   (CLASSTYPE_ALIGN (NODE) / BITS_PER_UNIT)
1664 
1665 /* True if this a Java interface type, declared with
1666    '__attribute__ ((java_interface))'.  */
1667 #define TYPE_JAVA_INTERFACE(NODE) \
1668   (LANG_TYPE_CLASS_CHECK (NODE)->java_interface)
1669 
1670 /* A vec<tree> of virtual functions which cannot be inherited by
1671    derived classes.  When deriving from this type, the derived
1672    class must provide its own definition for each of these functions.  */
1673 #define CLASSTYPE_PURE_VIRTUALS(NODE) \
1674   (LANG_TYPE_CLASS_CHECK (NODE)->pure_virtuals)
1675 
1676 /* Nonzero means that this type is an abstract class type.  */
1677 #define ABSTRACT_CLASS_TYPE_P(NODE) \
1678   (CLASS_TYPE_P (NODE) && CLASSTYPE_PURE_VIRTUALS(NODE))
1679 
1680 /* Nonzero means that this type has an X() constructor.  */
1681 #define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) \
1682   (LANG_TYPE_CLASS_CHECK (NODE)->h.has_default_ctor)
1683 
1684 /* Nonzero means that this type contains a mutable member.  */
1685 #define CLASSTYPE_HAS_MUTABLE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_mutable)
1686 #define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE))
1687 
1688 /* Nonzero means that this class type is not POD for the purpose of layout
1689    (as defined in the ABI).  This is different from the language's POD.  */
1690 #define CLASSTYPE_NON_LAYOUT_POD_P(NODE) \
1691   (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_class)
1692 
1693 /* Nonzero means that this class type is a non-standard-layout class.  */
1694 #define CLASSTYPE_NON_STD_LAYOUT(NODE) \
1695   (LANG_TYPE_CLASS_CHECK (NODE)->non_std_layout)
1696 
1697 /* Nonzero means that this class contains pod types whose default
1698    initialization is not a zero initialization (namely, pointers to
1699    data members).  */
1700 #define CLASSTYPE_NON_ZERO_INIT_P(NODE) \
1701   (LANG_TYPE_CLASS_CHECK (NODE)->non_zero_init)
1702 
1703 /* Nonzero if this class is "empty" in the sense of the C++ ABI.  */
1704 #define CLASSTYPE_EMPTY_P(NODE) \
1705   (LANG_TYPE_CLASS_CHECK (NODE)->empty_p)
1706 
1707 /* Nonzero if this class is "nearly empty", i.e., contains only a
1708    virtual function table pointer.  */
1709 #define CLASSTYPE_NEARLY_EMPTY_P(NODE) \
1710   (LANG_TYPE_CLASS_CHECK (NODE)->nearly_empty_p)
1711 
1712 /* Nonzero if this class contains an empty subobject.  */
1713 #define CLASSTYPE_CONTAINS_EMPTY_CLASS_P(NODE) \
1714   (LANG_TYPE_CLASS_CHECK (NODE)->contains_empty_class_p)
1715 
1716 /* A list of class types of which this type is a friend.  The
1717    TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the
1718    case of a template friend.  */
1719 #define CLASSTYPE_FRIEND_CLASSES(NODE) \
1720   (LANG_TYPE_CLASS_CHECK (NODE)->friend_classes)
1721 
1722 /* A list of the classes which grant friendship to this class.  */
1723 #define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \
1724   (LANG_TYPE_CLASS_CHECK (NODE)->befriending_classes)
1725 
1726 /* The associated LAMBDA_EXPR that made this class.  */
1727 #define CLASSTYPE_LAMBDA_EXPR(NODE) \
1728   (LANG_TYPE_CLASS_CHECK (NODE)->lambda_expr)
1729 /* The extra mangling scope for this closure type.  */
1730 #define LAMBDA_TYPE_EXTRA_SCOPE(NODE) \
1731   (LAMBDA_EXPR_EXTRA_SCOPE (CLASSTYPE_LAMBDA_EXPR (NODE)))
1732 
1733 /* Say whether this node was declared as a "class" or a "struct".  */
1734 #define CLASSTYPE_DECLARED_CLASS(NODE) \
1735   (LANG_TYPE_CLASS_CHECK (NODE)->declared_class)
1736 
1737 /* Nonzero if this class has const members
1738    which have no specified initialization.  */
1739 #define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE)	\
1740   (TYPE_LANG_SPECIFIC (NODE)				\
1741    ? LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init : 0)
1742 #define SET_CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE, VALUE) \
1743   (LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init = (VALUE))
1744 
1745 /* Nonzero if this class has ref members
1746    which have no specified initialization.  */
1747 #define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE)		\
1748   (TYPE_LANG_SPECIFIC (NODE)				\
1749    ? LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init : 0)
1750 #define SET_CLASSTYPE_REF_FIELDS_NEED_INIT(NODE, VALUE) \
1751   (LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init = (VALUE))
1752 
1753 /* Nonzero if this class is included from a header file which employs
1754    `#pragma interface', and it is not included in its implementation file.  */
1755 #define CLASSTYPE_INTERFACE_ONLY(NODE) \
1756   (LANG_TYPE_CLASS_CHECK (NODE)->interface_only)
1757 
1758 /* True if we have already determined whether or not vtables, VTTs,
1759    typeinfo, and other similar per-class data should be emitted in
1760    this translation unit.  This flag does not indicate whether or not
1761    these items should be emitted; it only indicates that we know one
1762    way or the other.  */
1763 #define CLASSTYPE_INTERFACE_KNOWN(NODE) \
1764   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown == 0)
1765 /* The opposite of CLASSTYPE_INTERFACE_KNOWN.  */
1766 #define CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
1767   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown)
1768 
1769 #define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) \
1770   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = !!(X))
1771 #define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
1772   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 1)
1773 #define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) \
1774   (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 0)
1775 
1776 /* Nonzero if a _DECL node requires us to output debug info for this class.  */
1777 #define CLASSTYPE_DEBUG_REQUESTED(NODE) \
1778   (LANG_TYPE_CLASS_CHECK (NODE)->debug_requested)
1779 
1780 /* Additional macros for inheritance information.  */
1781 
1782 /* Nonzero means that this class is on a path leading to a new vtable.  */
1783 #define BINFO_VTABLE_PATH_MARKED(NODE) BINFO_FLAG_1 (NODE)
1784 
1785 /* Nonzero means B (a BINFO) has its own vtable.  Any copies will not
1786    have this flag set.  */
1787 #define BINFO_NEW_VTABLE_MARKED(B) (BINFO_FLAG_2 (B))
1788 
1789 /* Compare a BINFO_TYPE with another type for equality.  For a binfo,
1790    this is functionally equivalent to using same_type_p, but
1791    measurably faster.  At least one of the arguments must be a
1792    BINFO_TYPE.  The other can be a BINFO_TYPE or a regular type.  If
1793    BINFO_TYPE(T) ever stops being the main variant of the class the
1794    binfo is for, this macro must change.  */
1795 #define SAME_BINFO_TYPE_P(A, B) ((A) == (B))
1796 
1797 /* Any subobject that needs a new vtable must have a vptr and must not
1798    be a non-virtual primary base (since it would then use the vtable from a
1799    derived class and never become non-primary.)  */
1800 #define SET_BINFO_NEW_VTABLE_MARKED(B)					 \
1801   (BINFO_NEW_VTABLE_MARKED (B) = 1,					 \
1802    gcc_assert (!BINFO_PRIMARY_P (B) || BINFO_VIRTUAL_P (B)),		 \
1803    gcc_assert (TYPE_VFIELD (BINFO_TYPE (B))))
1804 
1805 /* Nonzero if this binfo is for a dependent base - one that should not
1806    be searched.  */
1807 #define BINFO_DEPENDENT_BASE_P(NODE) BINFO_FLAG_3 (NODE)
1808 
1809 /* Nonzero if this binfo has lost its primary base binfo (because that
1810    is a nearly-empty virtual base that has been taken by some other
1811    base in the complete hierarchy.  */
1812 #define BINFO_LOST_PRIMARY_P(NODE) BINFO_FLAG_4 (NODE)
1813 
1814 /* Nonzero if this BINFO is a primary base class.  */
1815 #define BINFO_PRIMARY_P(NODE) BINFO_FLAG_5(NODE)
1816 
1817 /* Used by various search routines.  */
1818 #define IDENTIFIER_MARKED(NODE) TREE_LANG_FLAG_0 (NODE)
1819 
1820 /* A vec<tree_pair_s> of the vcall indices associated with the class
1821    NODE.  The PURPOSE of each element is a FUNCTION_DECL for a virtual
1822    function.  The VALUE is the index into the virtual table where the
1823    vcall offset for that function is stored, when NODE is a virtual
1824    base.  */
1825 #define CLASSTYPE_VCALL_INDICES(NODE) \
1826   (LANG_TYPE_CLASS_CHECK (NODE)->vcall_indices)
1827 
1828 /* The various vtables for the class NODE.  The primary vtable will be
1829    first, followed by the construction vtables and VTT, if any.  */
1830 #define CLASSTYPE_VTABLES(NODE) \
1831   (LANG_TYPE_CLASS_CHECK (NODE)->vtables)
1832 
1833 /* The std::type_info variable representing this class, or NULL if no
1834    such variable has been created.  This field is only set for the
1835    TYPE_MAIN_VARIANT of the class.  */
1836 #define CLASSTYPE_TYPEINFO_VAR(NODE) \
1837   (LANG_TYPE_CLASS_CHECK (NODE)->typeinfo_var)
1838 
1839 /* Accessor macros for the BINFO_VIRTUALS list.  */
1840 
1841 /* The number of bytes by which to adjust the `this' pointer when
1842    calling this virtual function.  Subtract this value from the this
1843    pointer. Always non-NULL, might be constant zero though.  */
1844 #define BV_DELTA(NODE) (TREE_PURPOSE (NODE))
1845 
1846 /* If non-NULL, the vtable index at which to find the vcall offset
1847    when calling this virtual function.  Add the value at that vtable
1848    index to the this pointer.  */
1849 #define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE))
1850 
1851 /* The function to call.  */
1852 #define BV_FN(NODE) (TREE_VALUE (NODE))
1853 
1854 /* Whether or not this entry is for a lost primary virtual base.  */
1855 #define BV_LOST_PRIMARY(NODE) (TREE_LANG_FLAG_0 (NODE))
1856 
1857 /* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
1858    this type can raise.  Each TREE_VALUE is a _TYPE.  The TREE_VALUE
1859    will be NULL_TREE to indicate a throw specification of `()', or
1860    no exceptions allowed.  For a noexcept specification, TREE_VALUE
1861    is NULL_TREE and TREE_PURPOSE is the constant-expression.  For
1862    a deferred noexcept-specification, TREE_PURPOSE is a DEFERRED_NOEXCEPT
1863    (for templates) or an OVERLOAD list of functions (for implicitly
1864    declared functions).  */
1865 #define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_LANG_SLOT_1 (NODE)
1866 
1867 /* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'
1868    or noexcept(true).  */
1869 #define TYPE_NOTHROW_P(NODE) nothrow_spec_p (TYPE_RAISES_EXCEPTIONS (NODE))
1870 
1871 /* For FUNCTION_TYPE or METHOD_TYPE, true if NODE is noexcept.  This is the
1872    case for things declared noexcept(true) and, with -fnothrow-opt, for
1873    throw() functions.  */
1874 #define TYPE_NOEXCEPT_P(NODE) type_noexcept_p (NODE)
1875 
1876 /* The binding level associated with the namespace.  */
1877 #define NAMESPACE_LEVEL(NODE) \
1878   (LANG_DECL_NS_CHECK (NODE)->level)
1879 
1880 /* Flags shared by all forms of DECL_LANG_SPECIFIC.
1881 
1882    Some of the flags live here only to make lang_decl_min/fn smaller.  Do
1883    not make this struct larger than 32 bits; instead, make sel smaller.  */
1884 
1885 struct GTY(()) lang_decl_base {
1886   unsigned selector : 16;   /* Larger than necessary for faster access.  */
1887   ENUM_BITFIELD(languages) language : 4;
1888   unsigned use_template : 2;
1889   unsigned not_really_extern : 1;	   /* var or fn */
1890   unsigned initialized_in_class : 1;	   /* var or fn */
1891   unsigned repo_available_p : 1;	   /* var or fn */
1892   unsigned threadprivate_or_deleted_p : 1; /* var or fn */
1893   unsigned anticipated_p : 1;		   /* fn, type or template */
1894   unsigned friend_attr : 1;		   /* fn, type or template */
1895   unsigned template_conv_p : 1;		   /* var or template */
1896   unsigned odr_used : 1;		   /* var or fn */
1897   unsigned u2sel : 1;
1898   /* 1 spare bit */
1899 };
1900 
1901 /* True for DECL codes which have template info and access.  */
1902 #define LANG_DECL_HAS_MIN(NODE)			\
1903   (TREE_CODE (NODE) == FUNCTION_DECL		\
1904    || TREE_CODE (NODE) == FIELD_DECL		\
1905    || TREE_CODE (NODE) == VAR_DECL		\
1906    || TREE_CODE (NODE) == CONST_DECL		\
1907    || TREE_CODE (NODE) == TYPE_DECL		\
1908    || TREE_CODE (NODE) == TEMPLATE_DECL		\
1909    || TREE_CODE (NODE) == USING_DECL)
1910 
1911 /* DECL_LANG_SPECIFIC for the above codes.  */
1912 
1913 struct GTY(()) lang_decl_min {
1914   struct lang_decl_base base;
1915 
1916   /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
1917      THUNK_ALIAS.
1918      In a FUNCTION_DECL for which DECL_THUNK_P does not hold,
1919      VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this is
1920      DECL_TEMPLATE_INFO.  */
1921   tree template_info;
1922 
1923   union lang_decl_u2 {
1924     /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
1925        THUNK_VIRTUAL_OFFSET.
1926        Otherwise this is DECL_ACCESS.  */
1927     tree GTY ((tag ("0"))) access;
1928 
1929     /* For VAR_DECL in function, this is DECL_DISCRIMINATOR.  */
1930     int GTY ((tag ("1"))) discriminator;
1931   } GTY ((desc ("%0.u.base.u2sel"))) u2;
1932 };
1933 
1934 /* Additional DECL_LANG_SPECIFIC information for functions.  */
1935 
1936 struct GTY(()) lang_decl_fn {
1937   struct lang_decl_min min;
1938 
1939   /* In an overloaded operator, this is the value of
1940      DECL_OVERLOADED_OPERATOR_P.  */
1941   ENUM_BITFIELD (tree_code) operator_code : 16;
1942 
1943   unsigned global_ctor_p : 1;
1944   unsigned global_dtor_p : 1;
1945   unsigned constructor_attr : 1;
1946   unsigned destructor_attr : 1;
1947   unsigned assignment_operator_p : 1;
1948   unsigned static_function : 1;
1949   unsigned pure_virtual : 1;
1950   unsigned defaulted_p : 1;
1951 
1952   unsigned has_in_charge_parm_p : 1;
1953   unsigned has_vtt_parm_p : 1;
1954   unsigned pending_inline_p : 1;
1955   unsigned nonconverting : 1;
1956   unsigned thunk_p : 1;
1957   unsigned this_thunk_p : 1;
1958   unsigned hidden_friend_p : 1;
1959   /* 1 spare bit.  */
1960 
1961   /* For a non-thunk function decl, this is a tree list of
1962      friendly classes. For a thunk function decl, it is the
1963      thunked to function decl.  */
1964   tree befriending_classes;
1965 
1966   /* For a non-virtual FUNCTION_DECL, this is
1967      DECL_FRIEND_CONTEXT.  For a virtual FUNCTION_DECL for which
1968      DECL_THIS_THUNK_P does not hold, this is DECL_THUNKS. Both
1969      this pointer and result pointer adjusting thunks are
1970      chained here.  This pointer thunks to return pointer thunks
1971      will be chained on the return pointer thunk.  */
1972   tree context;
1973 
1974   union lang_decl_u5
1975   {
1976     /* In a non-thunk FUNCTION_DECL or TEMPLATE_DECL, this is
1977        DECL_CLONED_FUNCTION.  */
1978     tree GTY ((tag ("0"))) cloned_function;
1979 
1980     /* In a FUNCTION_DECL for which THUNK_P holds this is the
1981        THUNK_FIXED_OFFSET.  */
1982     HOST_WIDE_INT GTY ((tag ("1"))) fixed_offset;
1983   } GTY ((desc ("%1.thunk_p"))) u5;
1984 
1985   union lang_decl_u3
1986   {
1987     struct cp_token_cache * GTY ((tag ("1"))) pending_inline_info;
1988     struct language_function * GTY ((tag ("0")))
1989       saved_language_function;
1990   } GTY ((desc ("%1.pending_inline_p"))) u;
1991 
1992 };
1993 
1994 /* DECL_LANG_SPECIFIC for namespaces.  */
1995 
1996 struct GTY(()) lang_decl_ns {
1997   struct lang_decl_base base;
1998   cp_binding_level *level;
1999 };
2000 
2001 /* DECL_LANG_SPECIFIC for parameters.  */
2002 
2003 struct GTY(()) lang_decl_parm {
2004   struct lang_decl_base base;
2005   int level;
2006   int index;
2007 };
2008 
2009 /* DECL_LANG_SPECIFIC for all types.  It would be nice to just make this a
2010    union rather than a struct containing a union as its only field, but
2011    tree.h declares it as a struct.  */
2012 
2013 struct GTY((variable_size)) lang_decl {
2014   union GTY((desc ("%h.base.selector"))) lang_decl_u {
2015     struct lang_decl_base GTY ((default)) base;
2016     struct lang_decl_min GTY((tag ("0"))) min;
2017     struct lang_decl_fn GTY ((tag ("1"))) fn;
2018     struct lang_decl_ns GTY((tag ("2"))) ns;
2019     struct lang_decl_parm GTY((tag ("3"))) parm;
2020   } u;
2021 };
2022 
2023 /* Looks through a template (if present) to find what it declares.  */
2024 #define STRIP_TEMPLATE(NODE) \
2025   (TREE_CODE (NODE) == TEMPLATE_DECL ? DECL_TEMPLATE_RESULT (NODE) : NODE)
2026 
2027 #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
2028 
2029 #define LANG_DECL_MIN_CHECK(NODE) __extension__			\
2030 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
2031    if (!LANG_DECL_HAS_MIN (NODE))				\
2032      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
2033    &lt->u.min; })
2034 
2035 /* We want to be able to check DECL_CONSTRUCTOR_P and such on a function
2036    template, not just on a FUNCTION_DECL.  So when looking for things in
2037    lang_decl_fn, look down through a TEMPLATE_DECL into its result.  */
2038 #define LANG_DECL_FN_CHECK(NODE) __extension__				\
2039 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (STRIP_TEMPLATE (NODE));	\
2040    if (!DECL_DECLARES_FUNCTION_P (NODE) || lt->u.base.selector != 1)	\
2041      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);		\
2042    &lt->u.fn; })
2043 
2044 #define LANG_DECL_NS_CHECK(NODE) __extension__				\
2045 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);			\
2046    if (TREE_CODE (NODE) != NAMESPACE_DECL || lt->u.base.selector != 2)	\
2047      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);		\
2048    &lt->u.ns; })
2049 
2050 #define LANG_DECL_PARM_CHECK(NODE) __extension__		\
2051 ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
2052   if (TREE_CODE (NODE) != PARM_DECL)				\
2053     lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
2054   &lt->u.parm; })
2055 
2056 #define LANG_DECL_U2_CHECK(NODE, TF) __extension__		\
2057 ({  struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
2058     if (!LANG_DECL_HAS_MIN (NODE) || lt->u.base.u2sel != TF)	\
2059       lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
2060     &lt->u.min.u2; })
2061 
2062 #else
2063 
2064 #define LANG_DECL_MIN_CHECK(NODE) \
2065   (&DECL_LANG_SPECIFIC (NODE)->u.min)
2066 
2067 #define LANG_DECL_FN_CHECK(NODE) \
2068   (&DECL_LANG_SPECIFIC (STRIP_TEMPLATE (NODE))->u.fn)
2069 
2070 #define LANG_DECL_NS_CHECK(NODE) \
2071   (&DECL_LANG_SPECIFIC (NODE)->u.ns)
2072 
2073 #define LANG_DECL_PARM_CHECK(NODE) \
2074   (&DECL_LANG_SPECIFIC (NODE)->u.parm)
2075 
2076 #define LANG_DECL_U2_CHECK(NODE, TF) \
2077   (&DECL_LANG_SPECIFIC (NODE)->u.min.u2)
2078 
2079 #endif /* ENABLE_TREE_CHECKING */
2080 
2081 /* For a FUNCTION_DECL or a VAR_DECL, the language linkage for the
2082    declaration.  Some entities (like a member function in a local
2083    class, or a local variable) do not have linkage at all, and this
2084    macro should not be used in those cases.
2085 
2086    Implementation note: A FUNCTION_DECL without DECL_LANG_SPECIFIC was
2087    created by language-independent code, and has C linkage.  Most
2088    VAR_DECLs have C++ linkage, and do not have DECL_LANG_SPECIFIC, but
2089    we do create DECL_LANG_SPECIFIC for variables with non-C++ linkage.  */
2090 #define DECL_LANGUAGE(NODE)				\
2091   (DECL_LANG_SPECIFIC (NODE)				\
2092    ? DECL_LANG_SPECIFIC (NODE)->u.base.language		\
2093    : (TREE_CODE (NODE) == FUNCTION_DECL			\
2094       ? lang_c : lang_cplusplus))
2095 
2096 /* Set the language linkage for NODE to LANGUAGE.  */
2097 #define SET_DECL_LANGUAGE(NODE, LANGUAGE) \
2098   (DECL_LANG_SPECIFIC (NODE)->u.base.language = (LANGUAGE))
2099 
2100 /* For FUNCTION_DECLs: nonzero means that this function is a constructor.  */
2101 #define DECL_CONSTRUCTOR_P(NODE) \
2102   (LANG_DECL_FN_CHECK (NODE)->constructor_attr)
2103 
2104 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete
2105    object.  */
2106 #define DECL_COMPLETE_CONSTRUCTOR_P(NODE)		\
2107   (DECL_CONSTRUCTOR_P (NODE)				\
2108    && DECL_NAME (NODE) == complete_ctor_identifier)
2109 
2110 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base
2111    object.  */
2112 #define DECL_BASE_CONSTRUCTOR_P(NODE)		\
2113   (DECL_CONSTRUCTOR_P (NODE)			\
2114    && DECL_NAME (NODE) == base_ctor_identifier)
2115 
2116 /* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the
2117    specialized in-charge constructor or the specialized not-in-charge
2118    constructor.  */
2119 #define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE)		\
2120   (DECL_DECLARES_FUNCTION_P (NODE) && DECL_CONSTRUCTOR_P (NODE) \
2121    && !DECL_CLONED_FUNCTION_P (NODE))
2122 
2123 /* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor.  */
2124 #define DECL_COPY_CONSTRUCTOR_P(NODE) \
2125   (DECL_CONSTRUCTOR_P (NODE) && copy_fn_p (NODE) > 0)
2126 
2127 /* Nonzero if NODE (a FUNCTION_DECL) is a move constructor.  */
2128 #define DECL_MOVE_CONSTRUCTOR_P(NODE) \
2129   (DECL_CONSTRUCTOR_P (NODE) && move_fn_p (NODE))
2130 
2131 /* Nonzero if NODE is a destructor.  */
2132 #define DECL_DESTRUCTOR_P(NODE)				\
2133   (LANG_DECL_FN_CHECK (NODE)->destructor_attr)
2134 
2135 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the
2136    specialized in-charge constructor, in-charge deleting constructor,
2137    or the base destructor.  */
2138 #define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE)			\
2139   (DECL_DECLARES_FUNCTION_P (NODE) && DECL_DESTRUCTOR_P (NODE)	\
2140    && !DECL_CLONED_FUNCTION_P (NODE))
2141 
2142 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
2143    object.  */
2144 #define DECL_COMPLETE_DESTRUCTOR_P(NODE)		\
2145   (DECL_DESTRUCTOR_P (NODE)				\
2146    && DECL_NAME (NODE) == complete_dtor_identifier)
2147 
2148 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base
2149    object.  */
2150 #define DECL_BASE_DESTRUCTOR_P(NODE)		\
2151   (DECL_DESTRUCTOR_P (NODE)			\
2152    && DECL_NAME (NODE) == base_dtor_identifier)
2153 
2154 /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
2155    object that deletes the object after it has been destroyed.  */
2156 #define DECL_DELETING_DESTRUCTOR_P(NODE)		\
2157   (DECL_DESTRUCTOR_P (NODE)				\
2158    && DECL_NAME (NODE) == deleting_dtor_identifier)
2159 
2160 /* Nonzero if NODE (a FUNCTION_DECL) is a cloned constructor or
2161    destructor.  */
2162 #define DECL_CLONED_FUNCTION_P(NODE) (!!decl_cloned_function_p (NODE, true))
2163 
2164 /* If DECL_CLONED_FUNCTION_P holds, this is the function that was
2165    cloned.  */
2166 #define DECL_CLONED_FUNCTION(NODE) (*decl_cloned_function_p (NODE, false))
2167 
2168 /* Perform an action for each clone of FN, if FN is a function with
2169    clones.  This macro should be used like:
2170 
2171       FOR_EACH_CLONE (clone, fn)
2172 	{ ... }
2173 
2174   */
2175 #define FOR_EACH_CLONE(CLONE, FN)			\
2176   if (TREE_CODE (FN) == FUNCTION_DECL			\
2177       && (DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P (FN)	\
2178 	  || DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P (FN)))	\
2179      for (CLONE = DECL_CHAIN (FN);			\
2180 	  CLONE && DECL_CLONED_FUNCTION_P (CLONE);	\
2181 	  CLONE = DECL_CHAIN (CLONE))
2182 
2183 /* Nonzero if NODE has DECL_DISCRIMINATOR and not DECL_ACCESS.  */
2184 #define DECL_DISCRIMINATOR_P(NODE)	\
2185   (TREE_CODE (NODE) == VAR_DECL		\
2186    && DECL_FUNCTION_SCOPE_P (NODE))
2187 
2188 /* Discriminator for name mangling.  */
2189 #define DECL_DISCRIMINATOR(NODE) (LANG_DECL_U2_CHECK (NODE, 1)->discriminator)
2190 
2191 /* True iff DECL_DISCRIMINATOR is set for a DECL_DISCRIMINATOR_P decl.  */
2192 #define DECL_DISCRIMINATOR_SET_P(NODE) \
2193   (DECL_LANG_SPECIFIC (NODE) && DECL_LANG_SPECIFIC (NODE)->u.base.u2sel == 1)
2194 
2195 /* The index of a user-declared parameter in its function, starting at 1.
2196    All artificial parameters will have index 0.  */
2197 #define DECL_PARM_INDEX(NODE) \
2198   (LANG_DECL_PARM_CHECK (NODE)->index)
2199 
2200 /* The level of a user-declared parameter in its function, starting at 1.
2201    A parameter of the function will have level 1; a parameter of the first
2202    nested function declarator (i.e. t in void f (void (*p)(T t))) will have
2203    level 2.  */
2204 #define DECL_PARM_LEVEL(NODE) \
2205   (LANG_DECL_PARM_CHECK (NODE)->level)
2206 
2207 /* Nonzero if the VTT parm has been added to NODE.  */
2208 #define DECL_HAS_VTT_PARM_P(NODE) \
2209   (LANG_DECL_FN_CHECK (NODE)->has_vtt_parm_p)
2210 
2211 /* Nonzero if NODE is a FUNCTION_DECL for which a VTT parameter is
2212    required.  */
2213 #define DECL_NEEDS_VTT_PARM_P(NODE)			\
2214   (CLASSTYPE_VBASECLASSES (DECL_CONTEXT (NODE))		\
2215    && (DECL_BASE_CONSTRUCTOR_P (NODE)			\
2216        || DECL_BASE_DESTRUCTOR_P (NODE)))
2217 
2218 /* Nonzero if NODE is a user-defined conversion operator.  */
2219 #define DECL_CONV_FN_P(NODE) \
2220   (DECL_NAME (NODE) && IDENTIFIER_TYPENAME_P (DECL_NAME (NODE)))
2221 
2222 /* If FN is a conversion operator, the type to which it converts.
2223    Otherwise, NULL_TREE.  */
2224 #define DECL_CONV_FN_TYPE(FN) \
2225   (DECL_CONV_FN_P (FN) ? TREE_TYPE (DECL_NAME (FN)) : NULL_TREE)
2226 
2227 /* Nonzero if NODE, which is a TEMPLATE_DECL, is a template
2228    conversion operator to a type dependent on the innermost template
2229    args.  */
2230 #define DECL_TEMPLATE_CONV_FN_P(NODE) \
2231   (DECL_LANG_SPECIFIC (TEMPLATE_DECL_CHECK (NODE))->u.base.template_conv_p)
2232 
2233 /* Nonzero if NODE, a static data member, was declared in its class as an
2234    array of unknown bound.  */
2235 #define VAR_HAD_UNKNOWN_BOUND(NODE)			\
2236   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))		\
2237    ? DECL_LANG_SPECIFIC (NODE)->u.base.template_conv_p	\
2238    : false)
2239 #define SET_VAR_HAD_UNKNOWN_BOUND(NODE) \
2240   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (NODE))->u.base.template_conv_p = true)
2241 
2242 /* Set the overloaded operator code for NODE to CODE.  */
2243 #define SET_OVERLOADED_OPERATOR_CODE(NODE, CODE) \
2244   (LANG_DECL_FN_CHECK (NODE)->operator_code = (CODE))
2245 
2246 /* If NODE is an overloaded operator, then this returns the TREE_CODE
2247    associated with the overloaded operator.
2248    DECL_ASSIGNMENT_OPERATOR_P must also be checked to determine
2249    whether or not NODE is an assignment operator.  If NODE is not an
2250    overloaded operator, ERROR_MARK is returned.  Since the numerical
2251    value of ERROR_MARK is zero, this macro can be used as a predicate
2252    to test whether or not NODE is an overloaded operator.  */
2253 #define DECL_OVERLOADED_OPERATOR_P(NODE)		\
2254   (IDENTIFIER_OPNAME_P (DECL_NAME (NODE))		\
2255    ? LANG_DECL_FN_CHECK (NODE)->operator_code : ERROR_MARK)
2256 
2257 /* Nonzero if NODE is an assignment operator (including += and such).  */
2258 #define DECL_ASSIGNMENT_OPERATOR_P(NODE) \
2259   (LANG_DECL_FN_CHECK (NODE)->assignment_operator_p)
2260 
2261 /* For FUNCTION_DECLs: nonzero means that this function is a
2262    constructor or a destructor with an extra in-charge parameter to
2263    control whether or not virtual bases are constructed.  */
2264 #define DECL_HAS_IN_CHARGE_PARM_P(NODE) \
2265   (LANG_DECL_FN_CHECK (NODE)->has_in_charge_parm_p)
2266 
2267 /* Nonzero if DECL is a declaration of __builtin_constant_p.  */
2268 #define DECL_IS_BUILTIN_CONSTANT_P(NODE)		\
2269  (TREE_CODE (NODE) == FUNCTION_DECL			\
2270   && DECL_BUILT_IN_CLASS (NODE) == BUILT_IN_NORMAL	\
2271   && DECL_FUNCTION_CODE (NODE) == BUILT_IN_CONSTANT_P)
2272 
2273 /* Nonzero for _DECL means that this decl appears in (or will appear
2274    in) as a member in a RECORD_TYPE or UNION_TYPE node.  It is also for
2275    detecting circularity in case members are multiply defined.  In the
2276    case of a VAR_DECL, it is also used to determine how program storage
2277    should be allocated.  */
2278 #define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3 (NODE))
2279 
2280 /* Nonzero for a VAR_DECL means that the variable's initialization (if
2281    any) has been processed.  (In general, DECL_INITIALIZED_P is
2282    !DECL_EXTERNAL, but static data members may be initialized even if
2283    not defined.)  */
2284 #define DECL_INITIALIZED_P(NODE) \
2285    (TREE_LANG_FLAG_1 (VAR_DECL_CHECK (NODE)))
2286 
2287 /* Nonzero for a VAR_DECL iff an explicit initializer was provided
2288    or a non-trivial constructor is called.  */
2289 #define DECL_NONTRIVIALLY_INITIALIZED_P(NODE)	\
2290    (TREE_LANG_FLAG_3 (VAR_DECL_CHECK (NODE)))
2291 
2292 /* Nonzero for a VAR_DECL that was initialized with a
2293    constant-expression.  */
2294 #define DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P(NODE) \
2295   (TREE_LANG_FLAG_2 (VAR_DECL_CHECK (NODE)))
2296 
2297 /* Nonzero if the DECL was initialized in the class definition itself,
2298    rather than outside the class.  This is used for both static member
2299    VAR_DECLS, and FUNCTION_DECLS that are defined in the class.  */
2300 #define DECL_INITIALIZED_IN_CLASS_P(DECL) \
2301   (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL)) \
2302    ->u.base.initialized_in_class)
2303 
2304 /* Nonzero if the DECL is used in the sense of 3.2 [basic.def.odr].
2305    Only available for decls with DECL_LANG_SPECIFIC.  */
2306 #define DECL_ODR_USED(DECL) \
2307   (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL)) \
2308    ->u.base.odr_used)
2309 
2310 /* Nonzero for DECL means that this decl is just a friend declaration,
2311    and should not be added to the list of members for this class.  */
2312 #define DECL_FRIEND_P(NODE) \
2313   (DECL_LANG_SPECIFIC (TYPE_FUNCTION_OR_TEMPLATE_DECL_CHECK (NODE)) \
2314    ->u.base.friend_attr)
2315 
2316 /* A TREE_LIST of the types which have befriended this FUNCTION_DECL.  */
2317 #define DECL_BEFRIENDING_CLASSES(NODE) \
2318   (LANG_DECL_FN_CHECK (NODE)->befriending_classes)
2319 
2320 /* Nonzero for FUNCTION_DECL means that this decl is a static
2321    member function.  */
2322 #define DECL_STATIC_FUNCTION_P(NODE) \
2323   (LANG_DECL_FN_CHECK (NODE)->static_function)
2324 
2325 /* Nonzero for FUNCTION_DECL means that this decl is a non-static
2326    member function.  */
2327 #define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \
2328   (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE)
2329 
2330 /* Nonzero for FUNCTION_DECL means that this decl is a member function
2331    (static or non-static).  */
2332 #define DECL_FUNCTION_MEMBER_P(NODE) \
2333   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE))
2334 
2335 /* Nonzero for FUNCTION_DECL means that this member function
2336    has `this' as const X *const.  */
2337 #define DECL_CONST_MEMFUNC_P(NODE)					 \
2338   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
2339    && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE				 \
2340 				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
2341 
2342 /* Nonzero for FUNCTION_DECL means that this member function
2343    has `this' as volatile X *const.  */
2344 #define DECL_VOLATILE_MEMFUNC_P(NODE)					 \
2345   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
2346    && CP_TYPE_VOLATILE_P (TREE_TYPE (TREE_VALUE				 \
2347 				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
2348 
2349 /* Nonzero for a DECL means that this member is a non-static member.  */
2350 #define DECL_NONSTATIC_MEMBER_P(NODE)		\
2351   (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)	\
2352    || TREE_CODE (NODE) == FIELD_DECL)
2353 
2354 /* Nonzero for _DECL means that this member object type
2355    is mutable.  */
2356 #define DECL_MUTABLE_P(NODE) (DECL_LANG_FLAG_0 (NODE))
2357 
2358 /* Nonzero for _DECL means that this constructor or conversion function is
2359    non-converting.  */
2360 #define DECL_NONCONVERTING_P(NODE) \
2361   (LANG_DECL_FN_CHECK (NODE)->nonconverting)
2362 
2363 /* Nonzero for FUNCTION_DECL means that this member function is a pure
2364    virtual function.  */
2365 #define DECL_PURE_VIRTUAL_P(NODE) \
2366   (LANG_DECL_FN_CHECK (NODE)->pure_virtual)
2367 
2368 /* True (in a FUNCTION_DECL) if NODE is a virtual function that is an
2369    invalid overrider for a function from a base class.  Once we have
2370    complained about an invalid overrider we avoid complaining about it
2371    again.  */
2372 #define DECL_INVALID_OVERRIDER_P(NODE) \
2373   (DECL_LANG_FLAG_4 (NODE))
2374 
2375 /* True (in a FUNCTION_DECL) if NODE is a function declared with
2376    an override virt-specifier */
2377 #define DECL_OVERRIDE_P(NODE) (TREE_LANG_FLAG_0 (NODE))
2378 
2379 /* True (in a FUNCTION_DECL) if NODE is a function declared with
2380    a final virt-specifier */
2381 #define DECL_FINAL_P(NODE) (TREE_LANG_FLAG_1 (NODE))
2382 
2383 /* The thunks associated with NODE, a FUNCTION_DECL.  */
2384 #define DECL_THUNKS(NODE) \
2385   (DECL_VIRTUAL_P (NODE) ? LANG_DECL_FN_CHECK (NODE)->context : NULL_TREE)
2386 
2387 /* Set DECL_THUNKS.  */
2388 #define SET_DECL_THUNKS(NODE,THUNKS) \
2389   (LANG_DECL_FN_CHECK (NODE)->context = (THUNKS))
2390 
2391 /* If NODE, a FUNCTION_DECL, is a C++11 inheriting constructor, then this
2392    is the base it inherits from.  */
2393 #define DECL_INHERITED_CTOR_BASE(NODE) \
2394   (DECL_CONSTRUCTOR_P (NODE) ? LANG_DECL_FN_CHECK (NODE)->context : NULL_TREE)
2395 
2396 /* Set the inherited base.  */
2397 #define SET_DECL_INHERITED_CTOR_BASE(NODE,INH) \
2398   (LANG_DECL_FN_CHECK (NODE)->context = (INH))
2399 
2400 /* Nonzero if NODE is a thunk, rather than an ordinary function.  */
2401 #define DECL_THUNK_P(NODE)			\
2402   (TREE_CODE (NODE) == FUNCTION_DECL		\
2403    && DECL_LANG_SPECIFIC (NODE)			\
2404    && LANG_DECL_FN_CHECK (NODE)->thunk_p)
2405 
2406 /* Set DECL_THUNK_P for node.  */
2407 #define SET_DECL_THUNK_P(NODE, THIS_ADJUSTING)			\
2408   (LANG_DECL_FN_CHECK (NODE)->thunk_p = 1,			\
2409    LANG_DECL_FN_CHECK (NODE)->this_thunk_p = (THIS_ADJUSTING))
2410 
2411 /* Nonzero if NODE is a this pointer adjusting thunk.  */
2412 #define DECL_THIS_THUNK_P(NODE)			\
2413   (DECL_THUNK_P (NODE) && LANG_DECL_FN_CHECK (NODE)->this_thunk_p)
2414 
2415 /* Nonzero if NODE is a result pointer adjusting thunk.  */
2416 #define DECL_RESULT_THUNK_P(NODE)			\
2417   (DECL_THUNK_P (NODE) && !LANG_DECL_FN_CHECK (NODE)->this_thunk_p)
2418 
2419 /* Nonzero if NODE is a FUNCTION_DECL, but not a thunk.  */
2420 #define DECL_NON_THUNK_FUNCTION_P(NODE)				\
2421   (TREE_CODE (NODE) == FUNCTION_DECL && !DECL_THUNK_P (NODE))
2422 
2423 /* Nonzero if NODE is `extern "C"'.  */
2424 #define DECL_EXTERN_C_P(NODE) \
2425   (DECL_LANGUAGE (NODE) == lang_c)
2426 
2427 /* Nonzero if NODE is an `extern "C"' function.  */
2428 #define DECL_EXTERN_C_FUNCTION_P(NODE) \
2429   (DECL_NON_THUNK_FUNCTION_P (NODE) && DECL_EXTERN_C_P (NODE))
2430 
2431 /* True iff DECL is an entity with vague linkage whose definition is
2432    available in this translation unit.  */
2433 #define DECL_REPO_AVAILABLE_P(NODE) \
2434   (DECL_LANG_SPECIFIC (NODE)->u.base.repo_available_p)
2435 
2436 /* True if DECL is declared 'constexpr'.  */
2437 #define DECL_DECLARED_CONSTEXPR_P(DECL) \
2438   DECL_LANG_FLAG_8 (VAR_OR_FUNCTION_DECL_CHECK (STRIP_TEMPLATE (DECL)))
2439 
2440 /* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a
2441    template function.  */
2442 #define DECL_PRETTY_FUNCTION_P(NODE) \
2443   (DECL_NAME (NODE) \
2444    && !strcmp (IDENTIFIER_POINTER (DECL_NAME (NODE)), "__PRETTY_FUNCTION__"))
2445 
2446 /* Nonzero if the thread-local variable was declared with __thread
2447    as opposed to thread_local.  */
2448 #define DECL_GNU_TLS_P(NODE) \
2449   (TREE_LANG_FLAG_0 (VAR_DECL_CHECK (NODE)))
2450 
2451 /* The _TYPE context in which this _DECL appears.  This field holds the
2452    class where a virtual function instance is actually defined.  */
2453 #define DECL_CLASS_CONTEXT(NODE) \
2454   (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE)
2455 
2456 /* For a non-member friend function, the class (if any) in which this
2457    friend was defined.  For example, given:
2458 
2459      struct S { friend void f (); };
2460 
2461    the DECL_FRIEND_CONTEXT for `f' will be `S'.  */
2462 #define DECL_FRIEND_CONTEXT(NODE)				\
2463   ((DECL_DECLARES_FUNCTION_P (NODE)				\
2464     && DECL_FRIEND_P (NODE) && !DECL_FUNCTION_MEMBER_P (NODE))	\
2465    ? LANG_DECL_FN_CHECK (NODE)->context				\
2466    : NULL_TREE)
2467 
2468 /* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT.  */
2469 #define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \
2470   (LANG_DECL_FN_CHECK (NODE)->context = (CONTEXT))
2471 
2472 #define CP_DECL_CONTEXT(NODE) \
2473   (!DECL_FILE_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : global_namespace)
2474 #define CP_TYPE_CONTEXT(NODE) \
2475   (!TYPE_FILE_SCOPE_P (NODE) ? TYPE_CONTEXT (NODE) : global_namespace)
2476 #define FROB_CONTEXT(NODE) \
2477   ((NODE) == global_namespace ? DECL_CONTEXT (NODE) : (NODE))
2478 
2479 /* 1 iff NODE has namespace scope, including the global namespace.  */
2480 #define DECL_NAMESPACE_SCOPE_P(NODE)				\
2481   (!DECL_TEMPLATE_PARM_P (NODE)					\
2482    && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL)
2483 
2484 #define TYPE_NAMESPACE_SCOPE_P(NODE) \
2485   (TREE_CODE (CP_TYPE_CONTEXT (NODE)) == NAMESPACE_DECL)
2486 
2487 #define NAMESPACE_SCOPE_P(NODE) \
2488   ((DECL_P (NODE) && DECL_NAMESPACE_SCOPE_P (NODE)) \
2489    || (TYPE_P (NODE) && TYPE_NAMESPACE_SCOPE_P (NODE)))
2490 
2491 /* 1 iff NODE is a class member.  */
2492 #define DECL_CLASS_SCOPE_P(NODE) \
2493   (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE)))
2494 
2495 #define TYPE_CLASS_SCOPE_P(NODE) \
2496   (TYPE_CONTEXT (NODE) && TYPE_P (TYPE_CONTEXT (NODE)))
2497 
2498 /* 1 iff NODE is function-local.  */
2499 #define DECL_FUNCTION_SCOPE_P(NODE) \
2500   (DECL_CONTEXT (NODE) \
2501    && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL)
2502 
2503 #define TYPE_FUNCTION_SCOPE_P(NODE) \
2504   (TYPE_CONTEXT (NODE) && TREE_CODE (TYPE_CONTEXT (NODE)) == FUNCTION_DECL)
2505 
2506 /* 1 iff VAR_DECL node NODE is a type-info decl.  This flag is set for
2507    both the primary typeinfo object and the associated NTBS name.  */
2508 #define DECL_TINFO_P(NODE) TREE_LANG_FLAG_4 (VAR_DECL_CHECK (NODE))
2509 
2510 /* 1 iff VAR_DECL node NODE is virtual table or VTT.  */
2511 #define DECL_VTABLE_OR_VTT_P(NODE) TREE_LANG_FLAG_5 (VAR_DECL_CHECK (NODE))
2512 
2513 /* 1 iff FUNCTION_TYPE or METHOD_TYPE has a ref-qualifier (either & or &&). */
2514 #define FUNCTION_REF_QUALIFIED(NODE) \
2515   TREE_LANG_FLAG_4 (FUNC_OR_METHOD_CHECK (NODE))
2516 
2517 /* 1 iff FUNCTION_TYPE or METHOD_TYPE has &&-ref-qualifier.  */
2518 #define FUNCTION_RVALUE_QUALIFIED(NODE) \
2519   TREE_LANG_FLAG_5 (FUNC_OR_METHOD_CHECK (NODE))
2520 
2521 /* Returns 1 iff VAR_DECL is a construction virtual table.
2522    DECL_VTABLE_OR_VTT_P will be true in this case and must be checked
2523    before using this macro.  */
2524 #define DECL_CONSTRUCTION_VTABLE_P(NODE) \
2525   TREE_LANG_FLAG_6 (VAR_DECL_CHECK (NODE))
2526 
2527 /* 1 iff NODE is function-local, but for types.  */
2528 #define LOCAL_CLASS_P(NODE)				\
2529   (decl_function_context (TYPE_MAIN_DECL (NODE)) != NULL_TREE)
2530 
2531 /* For a NAMESPACE_DECL: the list of using namespace directives
2532    The PURPOSE is the used namespace, the value is the namespace
2533    that is the common ancestor.  */
2534 #define DECL_NAMESPACE_USING(NODE) DECL_VINDEX (NAMESPACE_DECL_CHECK (NODE))
2535 
2536 /* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users
2537    of a namespace, to record the transitive closure of using namespace.  */
2538 #define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NAMESPACE_DECL_CHECK (NODE))
2539 
2540 /* In a NAMESPACE_DECL, the list of namespaces which have associated
2541    themselves with this one.  */
2542 #define DECL_NAMESPACE_ASSOCIATIONS(NODE) \
2543   (NAMESPACE_DECL_CHECK (NODE)->decl_non_common.saved_tree)
2544 
2545 /* In a NAMESPACE_DECL, points to the original namespace if this is
2546    a namespace alias.  */
2547 #define DECL_NAMESPACE_ALIAS(NODE) \
2548 	DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE))
2549 #define ORIGINAL_NAMESPACE(NODE)  \
2550   (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE))
2551 
2552 /* Nonzero if NODE is the std namespace.  */
2553 #define DECL_NAMESPACE_STD_P(NODE)			\
2554   (TREE_CODE (NODE) == NAMESPACE_DECL			\
2555    && CP_DECL_CONTEXT (NODE) == global_namespace	\
2556    && DECL_NAME (NODE) == std_identifier)
2557 
2558 /* In a TREE_LIST concatenating using directives, indicate indirect
2559    directives  */
2560 #define TREE_INDIRECT_USING(NODE) TREE_LANG_FLAG_0 (TREE_LIST_CHECK (NODE))
2561 
2562 /* In a TREE_LIST in an attribute list, indicates that the attribute
2563    must be applied at instantiation time.  */
2564 #define ATTR_IS_DEPENDENT(NODE) TREE_LANG_FLAG_0 (TREE_LIST_CHECK (NODE))
2565 
2566 extern tree decl_shadowed_for_var_lookup (tree);
2567 extern void decl_shadowed_for_var_insert (tree, tree);
2568 
2569 /* Non zero if this is a using decl for a dependent scope. */
2570 #define DECL_DEPENDENT_P(NODE) DECL_LANG_FLAG_0 (USING_DECL_CHECK (NODE))
2571 
2572 /* The scope named in a using decl.  */
2573 #define USING_DECL_SCOPE(NODE) TREE_TYPE (USING_DECL_CHECK (NODE))
2574 
2575 /* The decls named by a using decl.  */
2576 #define USING_DECL_DECLS(NODE) DECL_INITIAL (USING_DECL_CHECK (NODE))
2577 
2578 /* Non zero if the using decl refers to a dependent type.  */
2579 #define USING_DECL_TYPENAME_P(NODE) DECL_LANG_FLAG_1 (USING_DECL_CHECK (NODE))
2580 
2581 /* In a VAR_DECL, true if we have a shadowed local variable
2582    in the shadowed var table for this VAR_DECL.  */
2583 #define DECL_HAS_SHADOWED_FOR_VAR_P(NODE) \
2584   (VAR_DECL_CHECK (NODE)->decl_with_vis.shadowed_for_var_p)
2585 
2586 /* In a VAR_DECL for a variable declared in a for statement,
2587    this is the shadowed (local) variable.  */
2588 #define DECL_SHADOWED_FOR_VAR(NODE) \
2589   (DECL_HAS_SHADOWED_FOR_VAR_P(NODE) ? decl_shadowed_for_var_lookup (NODE) : NULL)
2590 
2591 #define SET_DECL_SHADOWED_FOR_VAR(NODE, VAL) \
2592   (decl_shadowed_for_var_insert (NODE, VAL))
2593 
2594 /* In a FUNCTION_DECL, this is nonzero if this function was defined in
2595    the class definition.  We have saved away the text of the function,
2596    but have not yet processed it.  */
2597 #define DECL_PENDING_INLINE_P(NODE) \
2598   (LANG_DECL_FN_CHECK (NODE)->pending_inline_p)
2599 
2600 /* If DECL_PENDING_INLINE_P holds, this is the saved text of the
2601    function.  */
2602 #define DECL_PENDING_INLINE_INFO(NODE) \
2603   (LANG_DECL_FN_CHECK (NODE)->u.pending_inline_info)
2604 
2605 /* Nonzero for TYPE_DECL means that it was written 'using name = type'.  */
2606 #define TYPE_DECL_ALIAS_P(NODE) \
2607   DECL_LANG_FLAG_6 (TYPE_DECL_CHECK (NODE))
2608 
2609 /* Nonzero for a type which is an alias for another type; i.e, a type
2610    which declaration was written 'using name-of-type =
2611    another-type'.  */
2612 #define TYPE_ALIAS_P(NODE)			\
2613   (TYPE_P (NODE)				\
2614    && TYPE_NAME (NODE)				\
2615    && TREE_CODE (TYPE_NAME (NODE)) == TYPE_DECL	\
2616    && TYPE_DECL_ALIAS_P (TYPE_NAME (NODE)))
2617 
2618 /* For a class type: if this structure has many fields, we'll sort them
2619    and put them into a TREE_VEC.  */
2620 #define CLASSTYPE_SORTED_FIELDS(NODE) \
2621   (LANG_TYPE_CLASS_CHECK (NODE)->sorted_fields)
2622 
2623 /* If non-NULL for a VAR_DECL, FUNCTION_DECL, TYPE_DECL or
2624    TEMPLATE_DECL, the entity is either a template specialization (if
2625    DECL_USE_TEMPLATE is nonzero) or the abstract instance of the
2626    template itself.
2627 
2628    In either case, DECL_TEMPLATE_INFO is a TREE_LIST, whose
2629    TREE_PURPOSE is the TEMPLATE_DECL of which this entity is a
2630    specialization or abstract instance.  The TREE_VALUE is the
2631    template arguments used to specialize the template.
2632 
2633    Consider:
2634 
2635       template <typename T> struct S { friend void f(T) {} };
2636 
2637    In this case, S<int>::f is, from the point of view of the compiler,
2638    an instantiation of a template -- but, from the point of view of
2639    the language, each instantiation of S results in a wholly unrelated
2640    global function f.  In this case, DECL_TEMPLATE_INFO for S<int>::f
2641    will be non-NULL, but DECL_USE_TEMPLATE will be zero.  */
2642 #define DECL_TEMPLATE_INFO(NODE) \
2643   (DECL_LANG_SPECIFIC (VAR_TEMPL_TYPE_FIELD_OR_FUNCTION_DECL_CHECK (NODE)) \
2644    ->u.min.template_info)
2645 
2646 /* For a VAR_DECL, indicates that the variable is actually a
2647    non-static data member of anonymous union that has been promoted to
2648    variable status.  */
2649 #define DECL_ANON_UNION_VAR_P(NODE) \
2650   (DECL_LANG_FLAG_4 (VAR_DECL_CHECK (NODE)))
2651 
2652 /* Template information for a RECORD_TYPE or UNION_TYPE.  */
2653 #define CLASSTYPE_TEMPLATE_INFO(NODE) \
2654   (LANG_TYPE_CLASS_CHECK (RECORD_OR_UNION_CHECK (NODE))->template_info)
2655 
2656 /* Template information for an ENUMERAL_TYPE.  Although an enumeration may
2657    not be a primary template, it may be declared within the scope of a
2658    primary template and the enumeration constants may depend on
2659    non-type template parameters.  */
2660 #define ENUM_TEMPLATE_INFO(NODE) \
2661   (TYPE_LANG_SLOT_1 (ENUMERAL_TYPE_CHECK (NODE)))
2662 
2663 /* Template information for a template template parameter.  */
2664 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) \
2665   (LANG_TYPE_CLASS_CHECK (BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK (NODE)) \
2666    ->template_info)
2667 
2668 /* Template information for an ENUMERAL_, RECORD_, UNION_TYPE, or
2669    BOUND_TEMPLATE_TEMPLATE_PARM type.  Note that if NODE is a
2670    specialization of an alias template, this accessor returns the
2671    template info for the alias template, not the one (if any) for the
2672    template of the underlying type.  */
2673 #define TYPE_TEMPLATE_INFO(NODE)					\
2674   ((TYPE_ALIAS_P (NODE) && DECL_LANG_SPECIFIC (TYPE_NAME (NODE)))	\
2675    ? (DECL_LANG_SPECIFIC (TYPE_NAME (NODE))				\
2676       ? DECL_TEMPLATE_INFO (TYPE_NAME (NODE))				\
2677       : NULL_TREE)							\
2678    : ((TREE_CODE (NODE) == ENUMERAL_TYPE)				\
2679       ? ENUM_TEMPLATE_INFO (NODE)					\
2680       : ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM)		\
2681 	 ? TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (NODE)			\
2682 	 : (CLASS_TYPE_P (NODE)						\
2683 	    ? CLASSTYPE_TEMPLATE_INFO (NODE)				\
2684 	    : NULL_TREE))))
2685 
2686 
2687 /* Set the template information for an ENUMERAL_, RECORD_, or
2688    UNION_TYPE to VAL.  */
2689 #define SET_TYPE_TEMPLATE_INFO(NODE, VAL)				\
2690   (TREE_CODE (NODE) == ENUMERAL_TYPE					\
2691    ? (ENUM_TEMPLATE_INFO (NODE) = (VAL))				\
2692    : ((CLASS_TYPE_P (NODE) && !TYPE_ALIAS_P (NODE))			\
2693       ? (CLASSTYPE_TEMPLATE_INFO (NODE) = (VAL))			\
2694       : (DECL_TEMPLATE_INFO (TYPE_NAME (NODE)) = (VAL))))
2695 
2696 #define TI_TEMPLATE(NODE) TREE_TYPE (TEMPLATE_INFO_CHECK (NODE))
2697 #define TI_ARGS(NODE) TREE_CHAIN (TEMPLATE_INFO_CHECK (NODE))
2698 #define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE)
2699 /* For a given TREE_VEC containing a template argument list,
2700    this property contains the number of arguments that are not
2701    defaulted.  */
2702 #define NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) TREE_CHAIN (TREE_VEC_CHECK (NODE))
2703 /* Below are the setter and getter of the NON_DEFAULT_TEMPLATE_ARGS_COUNT
2704    property.  */
2705 #define SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE, INT_VALUE) \
2706   NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) = build_int_cst (NULL_TREE, INT_VALUE)
2707 #ifdef ENABLE_CHECKING
2708 #define GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
2709     int_cst_value (NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE))
2710 #else
2711 #define GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT(NODE) \
2712   NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE) \
2713   ? int_cst_value (NON_DEFAULT_TEMPLATE_ARGS_COUNT (NODE)) \
2714   : TREE_VEC_LENGTH (INNERMOST_TEMPLATE_ARGS (NODE))
2715 #endif
2716 /* The list of typedefs - used in the template - that need
2717    access checking at template instantiation time.  */
2718 #define TI_TYPEDEFS_NEEDING_ACCESS_CHECKING(NODE) \
2719   ((struct tree_template_info*)TEMPLATE_INFO_CHECK \
2720      (NODE))->typedefs_needing_access_checking
2721 
2722 /* We use TREE_VECs to hold template arguments.  If there is only one
2723    level of template arguments, then the TREE_VEC contains the
2724    arguments directly.  If there is more than one level of template
2725    arguments, then each entry in the TREE_VEC is itself a TREE_VEC,
2726    containing the template arguments for a single level.  The first
2727    entry in the outer TREE_VEC is the outermost level of template
2728    parameters; the last is the innermost.
2729 
2730    It is incorrect to ever form a template argument vector containing
2731    only one level of arguments, but which is a TREE_VEC containing as
2732    its only entry the TREE_VEC for that level.
2733 
2734    For each TREE_VEC containing the template arguments for a single
2735    level, it's possible to get or set the number of non defaulted
2736    template arguments by using the accessor macros
2737    GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT or
2738    SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT.  */
2739 
2740 /* Nonzero if the template arguments is actually a vector of vectors,
2741    rather than just a vector.  */
2742 #define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE)		     \
2743   (NODE && TREE_VEC_LENGTH (NODE) && TREE_VEC_ELT (NODE, 0)  \
2744    && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC)
2745 
2746 /* The depth of a template argument vector.  When called directly by
2747    the parser, we use a TREE_LIST rather than a TREE_VEC to represent
2748    template arguments.  In fact, we may even see NULL_TREE if there
2749    are no template arguments.  In both of those cases, there is only
2750    one level of template arguments.  */
2751 #define TMPL_ARGS_DEPTH(NODE)					\
2752   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE) : 1)
2753 
2754 /* The LEVELth level of the template ARGS.  The outermost level of
2755    args is level 1, not level 0.  */
2756 #define TMPL_ARGS_LEVEL(ARGS, LEVEL)		\
2757   (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS)	\
2758    ? TREE_VEC_ELT (ARGS, (LEVEL) - 1) : (ARGS))
2759 
2760 /* Set the LEVELth level of the template ARGS to VAL.  This macro does
2761    not work with single-level argument vectors.  */
2762 #define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL)	\
2763   (TREE_VEC_ELT (ARGS, (LEVEL) - 1) = (VAL))
2764 
2765 /* Accesses the IDXth parameter in the LEVELth level of the ARGS.  */
2766 #define TMPL_ARG(ARGS, LEVEL, IDX)				\
2767   (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX))
2768 
2769 /* Given a single level of template arguments in NODE, return the
2770    number of arguments.  */
2771 #define NUM_TMPL_ARGS(NODE)				\
2772   (TREE_VEC_LENGTH (NODE))
2773 
2774 /* Returns the innermost level of template arguments in ARGS.  */
2775 #define INNERMOST_TEMPLATE_ARGS(NODE) \
2776   (get_innermost_template_args ((NODE), 1))
2777 
2778 /* The number of levels of template parameters given by NODE.  */
2779 #define TMPL_PARMS_DEPTH(NODE) \
2780   ((HOST_WIDE_INT) TREE_INT_CST_LOW (TREE_PURPOSE (NODE)))
2781 
2782 /* The TEMPLATE_DECL instantiated or specialized by NODE.  This
2783    TEMPLATE_DECL will be the immediate parent, not the most general
2784    template.  For example, in:
2785 
2786       template <class T> struct S { template <class U> void f(U); }
2787 
2788    the FUNCTION_DECL for S<int>::f<double> will have, as its
2789    DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'.
2790 
2791    As a special case, for a member friend template of a template
2792    class, this value will not be a TEMPLATE_DECL, but rather an
2793    IDENTIFIER_NODE or OVERLOAD indicating the name of the template and
2794    any explicit template arguments provided.  For example, in:
2795 
2796      template <class T> struct S { friend void f<int>(int, double); }
2797 
2798    the DECL_TI_TEMPLATE will be an IDENTIFIER_NODE for `f' and the
2799    DECL_TI_ARGS will be {int}.
2800 
2801    For a FIELD_DECL with a non-static data member initializer, this value
2802    is the FIELD_DECL it was instantiated from.  */
2803 #define DECL_TI_TEMPLATE(NODE)      TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
2804 
2805 /* The template arguments used to obtain this decl from the most
2806    general form of DECL_TI_TEMPLATE.  For the example given for
2807    DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}.  These
2808    are always the full set of arguments required to instantiate this
2809    declaration from the most general template specialized here.  */
2810 #define DECL_TI_ARGS(NODE)	    TI_ARGS (DECL_TEMPLATE_INFO (NODE))
2811 
2812 /* The TEMPLATE_DECL associated with NODE, a class type.  Even if NODE
2813    will be generated from a partial specialization, the TEMPLATE_DECL
2814    referred to here will be the original template.  For example,
2815    given:
2816 
2817       template <typename T> struct S {};
2818       template <typename T> struct S<T*> {};
2819 
2820    the CLASSTPYE_TI_TEMPLATE for S<int*> will be S, not the S<T*>.  */
2821 #define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
2822 #define CLASSTYPE_TI_ARGS(NODE)     TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
2823 
2824 /* For a template instantiation TYPE, returns the TYPE corresponding
2825    to the primary template.  Otherwise returns TYPE itself.  */
2826 #define CLASSTYPE_PRIMARY_TEMPLATE_TYPE(TYPE)				\
2827   ((CLASSTYPE_USE_TEMPLATE ((TYPE))					\
2828     && !CLASSTYPE_TEMPLATE_SPECIALIZATION ((TYPE)))			\
2829    ? TREE_TYPE (DECL_TEMPLATE_RESULT (DECL_PRIMARY_TEMPLATE		\
2830 				      (CLASSTYPE_TI_TEMPLATE ((TYPE))))) \
2831    : (TYPE))
2832 
2833 /* Like CLASS_TI_TEMPLATE, but also works for ENUMERAL_TYPEs.  */
2834 #define TYPE_TI_TEMPLATE(NODE)			\
2835   (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE)))
2836 
2837 /* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
2838 #define TYPE_TI_ARGS(NODE)			\
2839   (TI_ARGS (TYPE_TEMPLATE_INFO (NODE)))
2840 
2841 #define INNERMOST_TEMPLATE_PARMS(NODE)  TREE_VALUE (NODE)
2842 
2843 /* Nonzero if NODE (a TEMPLATE_DECL) is a member template, in the
2844    sense of [temp.mem].  */
2845 #define DECL_MEMBER_TEMPLATE_P(NODE) \
2846   (DECL_LANG_FLAG_1 (TEMPLATE_DECL_CHECK (NODE)))
2847 
2848 /* Nonzero if the NODE corresponds to the template parameters for a
2849    member template, whose inline definition is being processed after
2850    the class definition is complete.  */
2851 #define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE)
2852 
2853 /* Determine if a parameter (i.e., a PARM_DECL) is a function
2854    parameter pack.  */
2855 #define FUNCTION_PARAMETER_PACK_P(NODE) \
2856   (DECL_LANG_FLAG_1 (PARM_DECL_CHECK (NODE)))
2857 
2858 /* Determines if NODE is an expansion of one or more parameter packs,
2859    e.g., a TYPE_PACK_EXPANSION or EXPR_PACK_EXPANSION.  */
2860 #define PACK_EXPANSION_P(NODE)                 \
2861   (TREE_CODE (NODE) == TYPE_PACK_EXPANSION     \
2862    || TREE_CODE (NODE) == EXPR_PACK_EXPANSION)
2863 
2864 /* Extracts the type or expression pattern from a TYPE_PACK_EXPANSION or
2865    EXPR_PACK_EXPANSION.  */
2866 #define PACK_EXPANSION_PATTERN(NODE)                            \
2867   (TREE_CODE (NODE) == TYPE_PACK_EXPANSION? TREE_TYPE (NODE)    \
2868    : TREE_OPERAND (NODE, 0))
2869 
2870 /* Sets the type or expression pattern for a TYPE_PACK_EXPANSION or
2871    EXPR_PACK_EXPANSION.  */
2872 #define SET_PACK_EXPANSION_PATTERN(NODE,VALUE)  \
2873   if (TREE_CODE (NODE) == TYPE_PACK_EXPANSION)  \
2874     TREE_TYPE (NODE) = VALUE;                   \
2875   else                                          \
2876     TREE_OPERAND (NODE, 0) = VALUE
2877 
2878 /* The list of parameter packs used in the PACK_EXPANSION_* node. The
2879    TREE_VALUE of each TREE_LIST contains the parameter packs.  */
2880 #define PACK_EXPANSION_PARAMETER_PACKS(NODE)		\
2881   *(TREE_CODE (NODE) == EXPR_PACK_EXPANSION		\
2882     ? &TREE_OPERAND (NODE, 1)				\
2883     : &TYPE_MINVAL (TYPE_PACK_EXPANSION_CHECK (NODE)))
2884 
2885 /* Any additional template args to be applied when substituting into
2886    the pattern, set by tsubst_pack_expansion for partial instantiations.  */
2887 #define PACK_EXPANSION_EXTRA_ARGS(NODE)		\
2888   *(TREE_CODE (NODE) == TYPE_PACK_EXPANSION	\
2889     ? &TYPE_MAXVAL (NODE)			\
2890     : &TREE_OPERAND ((NODE), 2))
2891 
2892 /* True iff this pack expansion is within a function context.  */
2893 #define PACK_EXPANSION_LOCAL_P(NODE) TREE_LANG_FLAG_0 (NODE)
2894 
2895 /* Determine if this is an argument pack.  */
2896 #define ARGUMENT_PACK_P(NODE)                          \
2897   (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK              \
2898    || TREE_CODE (NODE) == NONTYPE_ARGUMENT_PACK)
2899 
2900 /* The arguments stored in an argument pack. Arguments are stored in a
2901    TREE_VEC, which may have length zero.  */
2902 #define ARGUMENT_PACK_ARGS(NODE)                               \
2903   (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK? TREE_TYPE (NODE)    \
2904    : TREE_OPERAND (NODE, 0))
2905 
2906 /* Set the arguments stored in an argument pack. VALUE must be a
2907    TREE_VEC.  */
2908 #define SET_ARGUMENT_PACK_ARGS(NODE,VALUE)     \
2909   if (TREE_CODE (NODE) == TYPE_ARGUMENT_PACK)  \
2910     TREE_TYPE (NODE) = VALUE;                           \
2911   else                                                  \
2912     TREE_OPERAND (NODE, 0) = VALUE
2913 
2914 /* Whether the argument pack is "incomplete", meaning that more
2915    arguments can still be deduced. Incomplete argument packs are only
2916    used when the user has provided an explicit template argument list
2917    for a variadic function template. Some of the explicit template
2918    arguments will be placed into the beginning of the argument pack,
2919    but additional arguments might still be deduced.  */
2920 #define ARGUMENT_PACK_INCOMPLETE_P(NODE)        \
2921   TREE_ADDRESSABLE (ARGUMENT_PACK_ARGS (NODE))
2922 
2923 /* When ARGUMENT_PACK_INCOMPLETE_P, stores the explicit template
2924    arguments used to fill this pack.  */
2925 #define ARGUMENT_PACK_EXPLICIT_ARGS(NODE)       \
2926   TREE_TYPE (ARGUMENT_PACK_ARGS (NODE))
2927 
2928 /* In an ARGUMENT_PACK_SELECT, the argument pack from which an
2929    argument will be selected.  */
2930 #define ARGUMENT_PACK_SELECT_FROM_PACK(NODE)				\
2931   (((struct tree_argument_pack_select *)ARGUMENT_PACK_SELECT_CHECK (NODE))->argument_pack)
2932 
2933 /* In an ARGUMENT_PACK_SELECT, the index of the argument we want to
2934    select.  */
2935 #define ARGUMENT_PACK_SELECT_INDEX(NODE)				\
2936   (((struct tree_argument_pack_select *)ARGUMENT_PACK_SELECT_CHECK (NODE))->index)
2937 
2938 /* In an ARGUMENT_PACK_SELECT, the actual underlying argument that the
2939    ARGUMENT_PACK_SELECT represents. */
2940 #define ARGUMENT_PACK_SELECT_ARG(NODE)					\
2941   TREE_VEC_ELT (ARGUMENT_PACK_ARGS (ARGUMENT_PACK_SELECT_FROM_PACK (NODE)), \
2942 	        ARGUMENT_PACK_SELECT_INDEX (NODE));
2943 
2944 /* In a FUNCTION_DECL, the saved language-specific per-function data.  */
2945 #define DECL_SAVED_FUNCTION_DATA(NODE)			\
2946   (LANG_DECL_FN_CHECK (FUNCTION_DECL_CHECK (NODE))	\
2947    ->u.saved_language_function)
2948 
2949 /* True if NODE is an implicit INDIRECT_EXPR from convert_from_reference.  */
2950 #define REFERENCE_REF_P(NODE)				\
2951   (TREE_CODE (NODE) == INDIRECT_REF			\
2952    && TREE_TYPE (TREE_OPERAND (NODE, 0))		\
2953    && (TREE_CODE (TREE_TYPE (TREE_OPERAND ((NODE), 0)))	\
2954        == REFERENCE_TYPE))
2955 
2956 #define NEW_EXPR_USE_GLOBAL(NODE) \
2957   TREE_LANG_FLAG_0 (NEW_EXPR_CHECK (NODE))
2958 #define DELETE_EXPR_USE_GLOBAL(NODE) \
2959   TREE_LANG_FLAG_0 (DELETE_EXPR_CHECK (NODE))
2960 #define DELETE_EXPR_USE_VEC(NODE) \
2961   TREE_LANG_FLAG_1 (DELETE_EXPR_CHECK (NODE))
2962 
2963 /* Indicates that this is a non-dependent COMPOUND_EXPR which will
2964    resolve to a function call.  */
2965 #define COMPOUND_EXPR_OVERLOADED(NODE) \
2966   TREE_LANG_FLAG_0 (COMPOUND_EXPR_CHECK (NODE))
2967 
2968 /* In a CALL_EXPR appearing in a template, true if Koenig lookup
2969    should be performed at instantiation time.  */
2970 #define KOENIG_LOOKUP_P(NODE) TREE_LANG_FLAG_0 (CALL_EXPR_CHECK (NODE))
2971 
2972 /* Indicates whether a string literal has been parenthesized. Such
2973    usages are disallowed in certain circumstances.  */
2974 
2975 #define PAREN_STRING_LITERAL_P(NODE) \
2976   TREE_LANG_FLAG_0 (STRING_CST_CHECK (NODE))
2977 
2978 /* Nonzero if this AGGR_INIT_EXPR provides for initialization via a
2979    constructor call, rather than an ordinary function call.  */
2980 #define AGGR_INIT_VIA_CTOR_P(NODE) \
2981   TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE))
2982 
2983 /* Nonzero if expanding this AGGR_INIT_EXPR should first zero-initialize
2984    the object.  */
2985 #define AGGR_INIT_ZERO_FIRST(NODE) \
2986   TREE_LANG_FLAG_2 (AGGR_INIT_EXPR_CHECK (NODE))
2987 
2988 /* AGGR_INIT_EXPR accessors.  These are equivalent to the CALL_EXPR
2989    accessors, except for AGGR_INIT_EXPR_SLOT (which takes the place of
2990    CALL_EXPR_STATIC_CHAIN).  */
2991 
2992 #define AGGR_INIT_EXPR_FN(NODE) TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 1)
2993 #define AGGR_INIT_EXPR_SLOT(NODE) \
2994   TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 2)
2995 #define AGGR_INIT_EXPR_ARG(NODE, I) \
2996   TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), (I) + 3)
2997 #define aggr_init_expr_nargs(NODE) (VL_EXP_OPERAND_LENGTH(NODE) - 3)
2998 
2999 /* AGGR_INIT_EXPR_ARGP returns a pointer to the argument vector for NODE.
3000    We can't use &AGGR_INIT_EXPR_ARG (NODE, 0) because that will complain if
3001    the argument count is zero when checking is enabled.  Instead, do
3002    the pointer arithmetic to advance past the 3 fixed operands in a
3003    AGGR_INIT_EXPR.  That produces a valid pointer to just past the end of
3004    the operand array, even if it's not valid to dereference it.  */
3005 #define AGGR_INIT_EXPR_ARGP(NODE) \
3006   (&(TREE_OPERAND (AGGR_INIT_EXPR_CHECK (NODE), 0)) + 3)
3007 
3008 /* Abstract iterators for AGGR_INIT_EXPRs.  */
3009 
3010 /* Structure containing iterator state.  */
3011 typedef struct aggr_init_expr_arg_iterator_d {
3012   tree t;	/* the aggr_init_expr */
3013   int n;	/* argument count */
3014   int i;	/* next argument index */
3015 } aggr_init_expr_arg_iterator;
3016 
3017 /* Initialize the abstract argument list iterator object ITER with the
3018    arguments from AGGR_INIT_EXPR node EXP.  */
3019 static inline void
init_aggr_init_expr_arg_iterator(tree exp,aggr_init_expr_arg_iterator * iter)3020 init_aggr_init_expr_arg_iterator (tree exp,
3021 				       aggr_init_expr_arg_iterator *iter)
3022 {
3023   iter->t = exp;
3024   iter->n = aggr_init_expr_nargs (exp);
3025   iter->i = 0;
3026 }
3027 
3028 /* Return the next argument from abstract argument list iterator object ITER,
3029    and advance its state.  Return NULL_TREE if there are no more arguments.  */
3030 static inline tree
next_aggr_init_expr_arg(aggr_init_expr_arg_iterator * iter)3031 next_aggr_init_expr_arg (aggr_init_expr_arg_iterator *iter)
3032 {
3033   tree result;
3034   if (iter->i >= iter->n)
3035     return NULL_TREE;
3036   result = AGGR_INIT_EXPR_ARG (iter->t, iter->i);
3037   iter->i++;
3038   return result;
3039 }
3040 
3041 /* Initialize the abstract argument list iterator object ITER, then advance
3042    past and return the first argument.  Useful in for expressions, e.g.
3043      for (arg = first_aggr_init_expr_arg (exp, &iter); arg;
3044           arg = next_aggr_init_expr_arg (&iter))   */
3045 static inline tree
first_aggr_init_expr_arg(tree exp,aggr_init_expr_arg_iterator * iter)3046 first_aggr_init_expr_arg (tree exp, aggr_init_expr_arg_iterator *iter)
3047 {
3048   init_aggr_init_expr_arg_iterator (exp, iter);
3049   return next_aggr_init_expr_arg (iter);
3050 }
3051 
3052 /* Test whether there are more arguments in abstract argument list iterator
3053    ITER, without changing its state.  */
3054 static inline bool
more_aggr_init_expr_args_p(const aggr_init_expr_arg_iterator * iter)3055 more_aggr_init_expr_args_p (const aggr_init_expr_arg_iterator *iter)
3056 {
3057   return (iter->i < iter->n);
3058 }
3059 
3060 /* Iterate through each argument ARG of AGGR_INIT_EXPR CALL, using variable
3061    ITER (of type aggr_init_expr_arg_iterator) to hold the iteration state.  */
3062 #define FOR_EACH_AGGR_INIT_EXPR_ARG(arg, iter, call)			\
3063   for ((arg) = first_aggr_init_expr_arg ((call), &(iter)); (arg);	\
3064        (arg) = next_aggr_init_expr_arg (&(iter)))
3065 
3066 /* VEC_INIT_EXPR accessors.  */
3067 #define VEC_INIT_EXPR_SLOT(NODE) TREE_OPERAND (VEC_INIT_EXPR_CHECK (NODE), 0)
3068 #define VEC_INIT_EXPR_INIT(NODE) TREE_OPERAND (VEC_INIT_EXPR_CHECK (NODE), 1)
3069 
3070 /* Indicates that a VEC_INIT_EXPR is a potential constant expression.
3071    Only set when the current function is constexpr.  */
3072 #define VEC_INIT_EXPR_IS_CONSTEXPR(NODE) \
3073   TREE_LANG_FLAG_0 (VEC_INIT_EXPR_CHECK (NODE))
3074 
3075 /* Indicates that a VEC_INIT_EXPR is expressing value-initialization.  */
3076 #define VEC_INIT_EXPR_VALUE_INIT(NODE) \
3077   TREE_LANG_FLAG_1 (VEC_INIT_EXPR_CHECK (NODE))
3078 
3079 /* The condition under which this MUST_NOT_THROW_EXPR actually blocks
3080    exceptions.  NULL_TREE means 'true'.  */
3081 #define MUST_NOT_THROW_COND(NODE) \
3082   TREE_OPERAND (MUST_NOT_THROW_EXPR_CHECK (NODE), 1)
3083 
3084 /* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a
3085    TEMPLATE_DECL.  This macro determines whether or not a given class
3086    type is really a template type, as opposed to an instantiation or
3087    specialization of one.  */
3088 #define CLASSTYPE_IS_TEMPLATE(NODE)  \
3089   (CLASSTYPE_TEMPLATE_INFO (NODE)    \
3090    && !CLASSTYPE_USE_TEMPLATE (NODE) \
3091    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
3092 
3093 /* The name used by the user to name the typename type.  Typically,
3094    this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the
3095    corresponding TYPE_DECL.  However, this may also be a
3096    TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'.  */
3097 #define TYPENAME_TYPE_FULLNAME(NODE) \
3098   (TYPE_VALUES_RAW (TYPENAME_TYPE_CHECK (NODE)))
3099 
3100 /* True if a TYPENAME_TYPE was declared as an "enum".  */
3101 #define TYPENAME_IS_ENUM_P(NODE) \
3102   (TREE_LANG_FLAG_0 (TYPENAME_TYPE_CHECK (NODE)))
3103 
3104 /* True if a TYPENAME_TYPE was declared as a "class", "struct", or
3105    "union".  */
3106 #define TYPENAME_IS_CLASS_P(NODE) \
3107   (TREE_LANG_FLAG_1 (TYPENAME_TYPE_CHECK (NODE)))
3108 
3109 /* True if a TYPENAME_TYPE is in the process of being resolved.  */
3110 #define TYPENAME_IS_RESOLVING_P(NODE) \
3111   (TREE_LANG_FLAG_2 (TYPENAME_TYPE_CHECK (NODE)))
3112 
3113 /* [class.virtual]
3114 
3115    A class that declares or inherits a virtual function is called a
3116    polymorphic class.  */
3117 #define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE))
3118 
3119 /* Nonzero if this class has a virtual function table pointer.  */
3120 #define TYPE_CONTAINS_VPTR_P(NODE)		\
3121   (TYPE_POLYMORPHIC_P (NODE) || CLASSTYPE_VBASECLASSES (NODE))
3122 
3123 /* This flag is true of a local VAR_DECL if it was declared in a for
3124    statement, but we are no longer in the scope of the for.  */
3125 #define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE))
3126 
3127 /* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL
3128    if we already emitted a warning about using it.  */
3129 #define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (VAR_DECL_CHECK (NODE))
3130 
3131 /* Nonzero if NODE is a FUNCTION_DECL (for a function with global
3132    scope) declared in a local scope.  */
3133 #define DECL_LOCAL_FUNCTION_P(NODE) \
3134   DECL_LANG_FLAG_0 (FUNCTION_DECL_CHECK (NODE))
3135 
3136 /* True if NODE was declared with auto in its return type, but it has
3137    started compilation and so the return type might have been changed by
3138    return type deduction; its declared return type should be found in
3139    DECL_STRUCT_FUNCTION(NODE)->language->x_auto_return_pattern.  */
3140 #define FNDECL_USED_AUTO(NODE) \
3141   TREE_LANG_FLAG_2 (FUNCTION_DECL_CHECK (NODE))
3142 
3143 /* Nonzero if NODE is a DECL which we know about but which has not
3144    been explicitly declared, such as a built-in function or a friend
3145    declared inside a class.  In the latter case DECL_HIDDEN_FRIEND_P
3146    will be set.  */
3147 #define DECL_ANTICIPATED(NODE) \
3148   (DECL_LANG_SPECIFIC (TYPE_FUNCTION_OR_TEMPLATE_DECL_CHECK (NODE)) \
3149    ->u.base.anticipated_p)
3150 
3151 /* Nonzero if NODE is a FUNCTION_DECL which was declared as a friend
3152    within a class but has not been declared in the surrounding scope.
3153    The function is invisible except via argument dependent lookup.  */
3154 #define DECL_HIDDEN_FRIEND_P(NODE) \
3155   (LANG_DECL_FN_CHECK (DECL_COMMON_CHECK (NODE))->hidden_friend_p)
3156 
3157 /* Nonzero if DECL has been declared threadprivate by
3158    #pragma omp threadprivate.  */
3159 #define CP_DECL_THREADPRIVATE_P(DECL) \
3160   (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (DECL))->u.base.threadprivate_or_deleted_p)
3161 
3162 /* Nonzero if DECL was declared with '= delete'.  */
3163 #define DECL_DELETED_FN(DECL) \
3164   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.base.threadprivate_or_deleted_p)
3165 
3166 /* Nonzero if DECL was declared with '= default' (maybe implicitly).  */
3167 #define DECL_DEFAULTED_FN(DECL) \
3168   (LANG_DECL_FN_CHECK (DECL)->defaulted_p)
3169 
3170 /* Nonzero if DECL is explicitly defaulted in the class body.  */
3171 #define DECL_DEFAULTED_IN_CLASS_P(DECL)					\
3172   (DECL_DEFAULTED_FN (DECL) && DECL_INITIALIZED_IN_CLASS_P (DECL))
3173 /* Nonzero if DECL was defaulted outside the class body.  */
3174 #define DECL_DEFAULTED_OUTSIDE_CLASS_P(DECL)				\
3175   (DECL_DEFAULTED_FN (DECL)						\
3176    && !(DECL_ARTIFICIAL (DECL) || DECL_INITIALIZED_IN_CLASS_P (DECL)))
3177 
3178 /* Record whether a typedef for type `int' was actually `signed int'.  */
3179 #define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP)
3180 
3181 /* Returns nonzero if DECL has external linkage, as specified by the
3182    language standard.  (This predicate may hold even when the
3183    corresponding entity is not actually given external linkage in the
3184    object file; see decl_linkage for details.)  */
3185 #define DECL_EXTERNAL_LINKAGE_P(DECL) \
3186   (decl_linkage (DECL) == lk_external)
3187 
3188 /* Keep these codes in ascending code order.  */
3189 
3190 #define INTEGRAL_CODE_P(CODE)	\
3191   ((CODE) == ENUMERAL_TYPE	\
3192    || (CODE) == BOOLEAN_TYPE	\
3193    || (CODE) == INTEGER_TYPE)
3194 
3195 /* [basic.fundamental]
3196 
3197    Types  bool, char, wchar_t, and the signed and unsigned integer types
3198    are collectively called integral types.
3199 
3200    Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration
3201    types as well, which is incorrect in C++.  Keep these checks in
3202    ascending code order.  */
3203 #define CP_INTEGRAL_TYPE_P(TYPE)		\
3204   (TREE_CODE (TYPE) == BOOLEAN_TYPE		\
3205    || TREE_CODE (TYPE) == INTEGER_TYPE)
3206 
3207 /* Returns true if TYPE is an integral or enumeration name.  Keep
3208    these checks in ascending code order.  */
3209 #define INTEGRAL_OR_ENUMERATION_TYPE_P(TYPE) \
3210    (TREE_CODE (TYPE) == ENUMERAL_TYPE || CP_INTEGRAL_TYPE_P (TYPE))
3211 
3212 /* Returns true if TYPE is an integral or unscoped enumeration type.  */
3213 #define INTEGRAL_OR_UNSCOPED_ENUMERATION_TYPE_P(TYPE) \
3214    (UNSCOPED_ENUM_P (TYPE) || CP_INTEGRAL_TYPE_P (TYPE))
3215 
3216 /* True if the class type TYPE is a literal type.  */
3217 #define CLASSTYPE_LITERAL_P(TYPE)              \
3218    (LANG_TYPE_CLASS_CHECK (TYPE)->is_literal)
3219 
3220 /* [basic.fundamental]
3221 
3222    Integral and floating types are collectively called arithmetic
3223    types.
3224 
3225    As a GNU extension, we also accept complex types.
3226 
3227    Keep these checks in ascending code order.  */
3228 #define ARITHMETIC_TYPE_P(TYPE) \
3229   (CP_INTEGRAL_TYPE_P (TYPE) \
3230    || TREE_CODE (TYPE) == REAL_TYPE \
3231    || TREE_CODE (TYPE) == COMPLEX_TYPE)
3232 
3233 /* True iff TYPE is cv decltype(nullptr).  */
3234 #define NULLPTR_TYPE_P(TYPE) (TREE_CODE (TYPE) == NULLPTR_TYPE)
3235 
3236 /* [basic.types]
3237 
3238    Arithmetic types, enumeration types, pointer types,
3239    pointer-to-member types, and std::nullptr_t are collectively called
3240    scalar types.
3241 
3242    Keep these checks in ascending code order.  */
3243 #define SCALAR_TYPE_P(TYPE)			\
3244   (TYPE_PTRDATAMEM_P (TYPE)			\
3245    || TREE_CODE (TYPE) == ENUMERAL_TYPE		\
3246    || ARITHMETIC_TYPE_P (TYPE)			\
3247    || TYPE_PTR_P (TYPE)				\
3248    || TYPE_PTRMEMFUNC_P (TYPE)                  \
3249    || NULLPTR_TYPE_P (TYPE))
3250 
3251 /* Determines whether this type is a C++0x scoped enumeration
3252    type. Scoped enumerations types are introduced via "enum class" or
3253    "enum struct", e.g.,
3254 
3255      enum class Color {
3256        Red, Green, Blue
3257      };
3258 
3259    Scoped enumeration types are different from normal (unscoped)
3260    enumeration types in several ways:
3261 
3262      - The enumerators of a scoped enumeration type are only available
3263        within the scope of the enumeration type and not in the
3264        enclosing scope. For example, the Red color can be referred to
3265        with "Color::Red" but not "Red".
3266 
3267      - Scoped enumerators and enumerations do not implicitly convert
3268        to integers or 'bool'.
3269 
3270      - The underlying type of the enum is well-defined.  */
3271 #define SCOPED_ENUM_P(TYPE)                                             \
3272   (TREE_CODE (TYPE) == ENUMERAL_TYPE && ENUM_IS_SCOPED (TYPE))
3273 
3274 /* Determine whether this is an unscoped enumeration type.  */
3275 #define UNSCOPED_ENUM_P(TYPE)                                           \
3276   (TREE_CODE (TYPE) == ENUMERAL_TYPE && !ENUM_IS_SCOPED (TYPE))
3277 
3278 /* Set the flag indicating whether an ENUMERAL_TYPE is a C++0x scoped
3279    enumeration type (1) or a normal (unscoped) enumeration type
3280    (0).  */
3281 #define SET_SCOPED_ENUM_P(TYPE, VAL)                    \
3282   (ENUM_IS_SCOPED (TYPE) = (VAL))
3283 
3284 #define SET_OPAQUE_ENUM_P(TYPE, VAL)                    \
3285   (ENUM_IS_OPAQUE (TYPE) = (VAL))
3286 
3287 #define OPAQUE_ENUM_P(TYPE)				\
3288   (TREE_CODE (TYPE) == ENUMERAL_TYPE && ENUM_IS_OPAQUE (TYPE))
3289 
3290 /* Determines whether an ENUMERAL_TYPE has an explicit
3291    underlying type.  */
3292 #define ENUM_FIXED_UNDERLYING_TYPE_P(NODE) (TYPE_LANG_FLAG_5 (NODE))
3293 
3294 /* Returns the underlying type of the given enumeration type. The
3295    underlying type is determined in different ways, depending on the
3296    properties of the enum:
3297 
3298      - In C++0x, the underlying type can be explicitly specified, e.g.,
3299 
3300          enum E1 : char { ... } // underlying type is char
3301 
3302      - In a C++0x scoped enumeration, the underlying type is int
3303        unless otherwises specified:
3304 
3305          enum class E2 { ... } // underlying type is int
3306 
3307      - Otherwise, the underlying type is determined based on the
3308        values of the enumerators. In this case, the
3309        ENUM_UNDERLYING_TYPE will not be set until after the definition
3310        of the enumeration is completed by finish_enum.  */
3311 #define ENUM_UNDERLYING_TYPE(TYPE) \
3312   TREE_TYPE (ENUMERAL_TYPE_CHECK (TYPE))
3313 
3314 /* [dcl.init.aggr]
3315 
3316    An aggregate is an array or a class with no user-provided
3317    constructors, no brace-or-equal-initializers for non-static data
3318    members, no private or protected non-static data members, no
3319    base classes, and no virtual functions.
3320 
3321    As an extension, we also treat vectors as aggregates.  Keep these
3322    checks in ascending code order.  */
3323 #define CP_AGGREGATE_TYPE_P(TYPE)				\
3324   (TREE_CODE (TYPE) == VECTOR_TYPE				\
3325    ||TREE_CODE (TYPE) == ARRAY_TYPE				\
3326    || (CLASS_TYPE_P (TYPE) && !CLASSTYPE_NON_AGGREGATE (TYPE)))
3327 
3328 /* Nonzero for a class type means that the class type has a
3329    user-declared constructor.  */
3330 #define TYPE_HAS_USER_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1 (NODE))
3331 
3332 /* When appearing in an INDIRECT_REF, it means that the tree structure
3333    underneath is actually a call to a constructor.  This is needed
3334    when the constructor must initialize local storage (which can
3335    be automatically destroyed), rather than allowing it to allocate
3336    space from the heap.
3337 
3338    When appearing in a SAVE_EXPR, it means that underneath
3339    is a call to a constructor.
3340 
3341    When appearing in a CONSTRUCTOR, the expression is a
3342    compound literal.
3343 
3344    When appearing in a FIELD_DECL, it means that this field
3345    has been duly initialized in its constructor.  */
3346 #define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4 (NODE))
3347 
3348 /* True if NODE is a brace-enclosed initializer.  */
3349 #define BRACE_ENCLOSED_INITIALIZER_P(NODE) \
3350   (TREE_CODE (NODE) == CONSTRUCTOR && TREE_TYPE (NODE) == init_list_type_node)
3351 
3352 /* True if NODE is a compound-literal, i.e., a brace-enclosed
3353    initializer cast to a particular type.  */
3354 #define COMPOUND_LITERAL_P(NODE) \
3355   (TREE_CODE (NODE) == CONSTRUCTOR && TREE_HAS_CONSTRUCTOR (NODE))
3356 
3357 #define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \
3358 				   && vec_safe_is_empty(CONSTRUCTOR_ELTS(NODE))\
3359 				   && !TREE_HAS_CONSTRUCTOR (NODE))
3360 
3361 /* True if NODE is a init-list used as a direct-initializer, i.e.
3362    B b{1,2}, not B b({1,2}) or B b = {1,2}.  */
3363 #define CONSTRUCTOR_IS_DIRECT_INIT(NODE) (TREE_LANG_FLAG_0 (CONSTRUCTOR_CHECK (NODE)))
3364 
3365 /* True if NODE represents a conversion for direct-initialization in a
3366    template.  Set by perform_implicit_conversion_flags.  */
3367 #define IMPLICIT_CONV_EXPR_DIRECT_INIT(NODE) \
3368   (TREE_LANG_FLAG_0 (IMPLICIT_CONV_EXPR_CHECK (NODE)))
3369 
3370 /* Nonzero means that an object of this type can not be initialized using
3371    an initializer list.  */
3372 #define CLASSTYPE_NON_AGGREGATE(NODE) \
3373   (LANG_TYPE_CLASS_CHECK (NODE)->non_aggregate)
3374 #define TYPE_NON_AGGREGATE_CLASS(NODE) \
3375   (CLASS_TYPE_P (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
3376 
3377 /* Nonzero if there is a non-trivial X::op=(cv X&) for this class.  */
3378 #define TYPE_HAS_COMPLEX_COPY_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_copy_assign)
3379 
3380 /* Nonzero if there is a non-trivial X::X(cv X&) for this class.  */
3381 #define TYPE_HAS_COMPLEX_COPY_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_copy_ctor)
3382 
3383 /* Nonzero if there is a non-trivial X::op=(X&&) for this class.  */
3384 #define TYPE_HAS_COMPLEX_MOVE_ASSIGN(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_move_assign)
3385 
3386 /* Nonzero if there is a non-trivial X::X(X&&) for this class.  */
3387 #define TYPE_HAS_COMPLEX_MOVE_CTOR(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_move_ctor)
3388 
3389 /* Nonzero if there is a non-trivial default constructor for this class.  */
3390 #define TYPE_HAS_COMPLEX_DFLT(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_dflt)
3391 
3392 /* Nonzero if TYPE has a trivial destructor.  From [class.dtor]:
3393 
3394      A destructor is trivial if it is an implicitly declared
3395      destructor and if:
3396 
3397        - all of the direct base classes of its class have trivial
3398 	 destructors,
3399 
3400        - for all of the non-static data members of its class that are
3401 	 of class type (or array thereof), each such class has a
3402 	 trivial destructor.  */
3403 #define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \
3404   (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE))
3405 
3406 /* Nonzero for _TYPE node means that this type does not have a trivial
3407    destructor.  Therefore, destroying an object of this type will
3408    involve a call to a destructor.  This can apply to objects of
3409    ARRAY_TYPE is the type of the elements needs a destructor.  */
3410 #define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \
3411   (TYPE_LANG_FLAG_4 (NODE))
3412 
3413 /* Nonzero for class type means that the default constructor is trivial.  */
3414 #define TYPE_HAS_TRIVIAL_DFLT(NODE) \
3415   (TYPE_HAS_DEFAULT_CONSTRUCTOR (NODE) && ! TYPE_HAS_COMPLEX_DFLT (NODE))
3416 
3417 /* Nonzero for class type means that copy initialization of this type can use
3418    a bitwise copy.  */
3419 #define TYPE_HAS_TRIVIAL_COPY_CTOR(NODE) \
3420   (TYPE_HAS_COPY_CTOR (NODE) && ! TYPE_HAS_COMPLEX_COPY_CTOR (NODE))
3421 
3422 /* Nonzero for class type means that assignment of this type can use
3423    a bitwise copy.  */
3424 #define TYPE_HAS_TRIVIAL_COPY_ASSIGN(NODE) \
3425   (TYPE_HAS_COPY_ASSIGN (NODE) && ! TYPE_HAS_COMPLEX_COPY_ASSIGN (NODE))
3426 
3427 /* Returns true if NODE is a pointer-to-data-member.  */
3428 #define TYPE_PTRDATAMEM_P(NODE)			\
3429   (TREE_CODE (NODE) == OFFSET_TYPE)
3430 /* Returns true if NODE is a pointer.  */
3431 #define TYPE_PTR_P(NODE)			\
3432   (TREE_CODE (NODE) == POINTER_TYPE)
3433 
3434 /* Returns true if NODE is an object type:
3435 
3436      [basic.types]
3437 
3438      An object type is a (possibly cv-qualified) type that is not a
3439      function type, not a reference type, and not a void type.
3440 
3441    Keep these checks in ascending order, for speed.  */
3442 #define TYPE_OBJ_P(NODE)			\
3443   (TREE_CODE (NODE) != REFERENCE_TYPE		\
3444    && TREE_CODE (NODE) != VOID_TYPE		\
3445    && TREE_CODE (NODE) != FUNCTION_TYPE		\
3446    && TREE_CODE (NODE) != METHOD_TYPE)
3447 
3448 /* Returns true if NODE is a pointer to an object.  Keep these checks
3449    in ascending tree code order.  */
3450 #define TYPE_PTROB_P(NODE)					\
3451   (TYPE_PTR_P (NODE) && TYPE_OBJ_P (TREE_TYPE (NODE)))
3452 
3453 /* Returns true if NODE is a reference to an object.  Keep these checks
3454    in ascending tree code order.  */
3455 #define TYPE_REF_OBJ_P(NODE)					\
3456   (TREE_CODE (NODE) == REFERENCE_TYPE && TYPE_OBJ_P (TREE_TYPE (NODE)))
3457 
3458 /* Returns true if NODE is a pointer to an object, or a pointer to
3459    void.  Keep these checks in ascending tree code order.  */
3460 #define TYPE_PTROBV_P(NODE)					\
3461   (TYPE_PTR_P (NODE)						\
3462    && !(TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE		\
3463 	|| TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE))
3464 
3465 /* Returns true if NODE is a pointer to function.  */
3466 #define TYPE_PTRFN_P(NODE)				\
3467   (TREE_CODE (NODE) == POINTER_TYPE			\
3468    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
3469 
3470 /* Returns true if NODE is a reference to function.  */
3471 #define TYPE_REFFN_P(NODE)				\
3472   (TREE_CODE (NODE) == REFERENCE_TYPE			\
3473    && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
3474 
3475 /* Nonzero for _TYPE node means that this type is a pointer to member
3476    function type.  */
3477 #define TYPE_PTRMEMFUNC_P(NODE)		\
3478   (TREE_CODE (NODE) == RECORD_TYPE	\
3479    && TYPE_LANG_SPECIFIC (NODE)		\
3480    && TYPE_PTRMEMFUNC_FLAG (NODE))
3481 
3482 #define TYPE_PTRMEMFUNC_FLAG(NODE) \
3483   (LANG_TYPE_CLASS_CHECK (NODE)->ptrmemfunc_flag)
3484 
3485 /* Returns true if NODE is a pointer-to-member.  */
3486 #define TYPE_PTRMEM_P(NODE) \
3487   (TYPE_PTRDATAMEM_P (NODE) || TYPE_PTRMEMFUNC_P (NODE))
3488 
3489 /* Returns true if NODE is a pointer or a pointer-to-member.  */
3490 #define TYPE_PTR_OR_PTRMEM_P(NODE) \
3491   (TYPE_PTR_P (NODE) || TYPE_PTRMEM_P (NODE))
3492 
3493 /* Indicates when overload resolution may resolve to a pointer to
3494    member function. [expr.unary.op]/3 */
3495 #define PTRMEM_OK_P(NODE) \
3496   TREE_LANG_FLAG_0 (TREE_CHECK3 ((NODE), ADDR_EXPR, OFFSET_REF, SCOPE_REF))
3497 
3498 /* Get the POINTER_TYPE to the METHOD_TYPE associated with this
3499    pointer to member function.  TYPE_PTRMEMFUNC_P _must_ be true,
3500    before using this macro.  */
3501 #define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \
3502   (TREE_TYPE (TYPE_FIELDS (NODE)))
3503 
3504 /* Returns `A' for a type like `int (A::*)(double)' */
3505 #define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \
3506   TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
3507 
3508 /* These are use to manipulate the canonical RECORD_TYPE from the
3509    hashed POINTER_TYPE, and can only be used on the POINTER_TYPE.  */
3510 #define TYPE_GET_PTRMEMFUNC_TYPE(NODE) \
3511   (TYPE_LANG_SPECIFIC (NODE) ? LANG_TYPE_PTRMEM_CHECK (NODE)->record : NULL)
3512 #define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE)				\
3513   do {									\
3514     if (TYPE_LANG_SPECIFIC (NODE) == NULL)				\
3515       {									\
3516 	TYPE_LANG_SPECIFIC (NODE) = ggc_alloc_cleared_lang_type		\
3517 	 (sizeof (struct lang_type_ptrmem));				\
3518 	TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.h.is_lang_type_class = 0;	\
3519       }									\
3520     TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.record = (VALUE);		\
3521   } while (0)
3522 
3523 /* For a pointer-to-member type of the form `T X::*', this is `X'.
3524    For a type like `void (X::*)() const', this type is `X', not `const
3525    X'.  To get at the `const X' you have to look at the
3526    TYPE_PTRMEM_POINTED_TO_TYPE; there, the first parameter will have
3527    type `const X*'.  */
3528 #define TYPE_PTRMEM_CLASS_TYPE(NODE)			\
3529   (TYPE_PTRDATAMEM_P (NODE)					\
3530    ? TYPE_OFFSET_BASETYPE (NODE)		\
3531    : TYPE_PTRMEMFUNC_OBJECT_TYPE (NODE))
3532 
3533 /* For a pointer-to-member type of the form `T X::*', this is `T'.  */
3534 #define TYPE_PTRMEM_POINTED_TO_TYPE(NODE)		\
3535    (TYPE_PTRDATAMEM_P (NODE)				\
3536     ? TREE_TYPE (NODE)					\
3537     : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
3538 
3539 /* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for
3540    `X'.  */
3541 #define PTRMEM_CST_CLASS(NODE) \
3542   TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE)))
3543 
3544 /* For a pointer-to-member constant `X::Y' this is the _DECL for
3545    `Y'.  */
3546 #define PTRMEM_CST_MEMBER(NODE) (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member)
3547 
3548 /* The expression in question for a TYPEOF_TYPE.  */
3549 #define TYPEOF_TYPE_EXPR(NODE) (TYPE_VALUES_RAW (TYPEOF_TYPE_CHECK (NODE)))
3550 
3551 /* The type in question for an UNDERLYING_TYPE.  */
3552 #define UNDERLYING_TYPE_TYPE(NODE) \
3553   (TYPE_VALUES_RAW (UNDERLYING_TYPE_CHECK (NODE)))
3554 
3555 /* The type in question for BASES.  */
3556 #define BASES_TYPE(NODE) \
3557   (TYPE_VALUES_RAW (BASES_CHECK (NODE)))
3558 
3559 #define BASES_DIRECT(NODE) \
3560   TREE_LANG_FLAG_0 (BASES_CHECK (NODE))
3561 
3562 /* The expression in question for a DECLTYPE_TYPE.  */
3563 #define DECLTYPE_TYPE_EXPR(NODE) (TYPE_VALUES_RAW (DECLTYPE_TYPE_CHECK (NODE)))
3564 
3565 /* Whether the DECLTYPE_TYPE_EXPR of NODE was originally parsed as an
3566    id-expression or a member-access expression. When false, it was
3567    parsed as a full expression.  */
3568 #define DECLTYPE_TYPE_ID_EXPR_OR_MEMBER_ACCESS_P(NODE) \
3569   (DECLTYPE_TYPE_CHECK (NODE))->type_common.string_flag
3570 
3571 /* These flags indicate that we want different semantics from normal
3572    decltype: lambda capture just drops references, lambda proxies look
3573    through implicit dereference.  */
3574 #define DECLTYPE_FOR_LAMBDA_CAPTURE(NODE) \
3575   TREE_LANG_FLAG_0 (DECLTYPE_TYPE_CHECK (NODE))
3576 #define DECLTYPE_FOR_LAMBDA_PROXY(NODE) \
3577   TREE_LANG_FLAG_2 (DECLTYPE_TYPE_CHECK (NODE))
3578 
3579 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
3580    specified in its declaration.  This can also be set for an
3581    erroneously declared PARM_DECL.  */
3582 #define DECL_THIS_EXTERN(NODE) \
3583   DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
3584 
3585 /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
3586    specified in its declaration.  This can also be set for an
3587    erroneously declared PARM_DECL.  */
3588 #define DECL_THIS_STATIC(NODE) \
3589   DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
3590 
3591 /* Nonzero for FIELD_DECL node means that this field is a base class
3592    of the parent object, as opposed to a member field.  */
3593 #define DECL_FIELD_IS_BASE(NODE) \
3594   DECL_LANG_FLAG_6 (FIELD_DECL_CHECK (NODE))
3595 
3596 /* Nonzero for FIELD_DECL node means that this field is a simple (no
3597    explicit initializer) lambda capture field, making it invisible to
3598    name lookup in unevaluated contexts.  */
3599 #define DECL_NORMAL_CAPTURE_P(NODE) \
3600   DECL_LANG_FLAG_7 (FIELD_DECL_CHECK (NODE))
3601 
3602 /* Nonzero if TYPE is an anonymous union or struct type.  We have to use a
3603    flag for this because "A union for which objects or pointers are
3604    declared is not an anonymous union" [class.union].  */
3605 #define ANON_AGGR_TYPE_P(NODE)				\
3606   (CLASS_TYPE_P (NODE) && LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr)
3607 #define SET_ANON_AGGR_TYPE_P(NODE)			\
3608   (LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr = 1)
3609 
3610 /* Nonzero if TYPE is an anonymous union type.  */
3611 #define ANON_UNION_TYPE_P(NODE) \
3612   (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE))
3613 
3614 /* Define fields and accessors for nodes representing declared names.  */
3615 
3616 #define TYPE_WAS_ANONYMOUS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->was_anonymous)
3617 
3618 /* C++: all of these are overloaded!  These apply only to TYPE_DECLs.  */
3619 
3620 /* The format of each node in the DECL_FRIENDLIST is as follows:
3621 
3622    The TREE_PURPOSE will be the name of a function, i.e., an
3623    IDENTIFIER_NODE.  The TREE_VALUE will be itself a TREE_LIST, whose
3624    TREE_VALUEs are friends with the given name.  */
3625 #define DECL_FRIENDLIST(NODE)		(DECL_INITIAL (NODE))
3626 #define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
3627 #define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
3628 
3629 /* The DECL_ACCESS, if non-NULL, is a TREE_LIST.  The TREE_PURPOSE of
3630    each node is a type; the TREE_VALUE is the access granted for this
3631    DECL in that type.  The DECL_ACCESS is set by access declarations.
3632    For example, if a member that would normally be public in a
3633    derived class is made protected, then the derived class and the
3634    protected_access_node will appear in the DECL_ACCESS for the node.  */
3635 #define DECL_ACCESS(NODE) (LANG_DECL_U2_CHECK (NODE, 0)->access)
3636 
3637 /* Nonzero if the FUNCTION_DECL is a global constructor.  */
3638 #define DECL_GLOBAL_CTOR_P(NODE) \
3639   (LANG_DECL_FN_CHECK (NODE)->global_ctor_p)
3640 
3641 /* Nonzero if the FUNCTION_DECL is a global destructor.  */
3642 #define DECL_GLOBAL_DTOR_P(NODE) \
3643   (LANG_DECL_FN_CHECK (NODE)->global_dtor_p)
3644 
3645 /* Accessor macros for C++ template decl nodes.  */
3646 
3647 /* The DECL_TEMPLATE_PARMS are a list.  The TREE_PURPOSE of each node
3648    is a INT_CST whose TREE_INT_CST_LOW indicates the level of the
3649    template parameters, with 1 being the outermost set of template
3650    parameters.  The TREE_VALUE is a vector, whose elements are the
3651    template parameters at each level.  Each element in the vector is a
3652    TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a
3653    non-type parameter), or a TYPE_DECL (if the parameter is a type
3654    parameter).  The TREE_PURPOSE is the default value, if any.  The
3655    TEMPLATE_PARM_INDEX for the parameter is available as the
3656    DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a
3657    TYPE_DECL).  */
3658 #define DECL_TEMPLATE_PARMS(NODE)       DECL_NON_COMMON_CHECK (NODE)->decl_non_common.arguments
3659 #define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
3660    INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
3661 #define DECL_NTPARMS(NODE) \
3662    TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
3663 /* For function, method, class-data templates.  */
3664 #define DECL_TEMPLATE_RESULT(NODE)      DECL_RESULT_FLD (NODE)
3665 /* For a function template at namespace scope, DECL_TEMPLATE_INSTANTIATIONS
3666    lists all instantiations and specializations of the function so that
3667    tsubst_friend_function can reassign them to another template if we find
3668    that the namespace-scope template is really a partial instantiation of a
3669    friend template.
3670 
3671    For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds
3672    all instantiations and specializations of the class type, including
3673    partial instantiations and partial specializations, so that if we
3674    explicitly specialize a partial instantiation we can walk the list
3675    in maybe_process_partial_specialization and reassign them or complain
3676    as appropriate.
3677 
3678    In both cases, the TREE_PURPOSE of each node contains the arguments
3679    used; the TREE_VALUE contains the generated variable.  The template
3680    arguments are always complete.  For example, given:
3681 
3682       template <class T> struct S1 {
3683 	template <class U> struct S2 {};
3684 	template <class U> struct S2<U*> {};
3685       };
3686 
3687    the record for the partial specialization will contain, as its
3688    argument list, { {T}, {U*} }, and will be on the
3689    DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template
3690    <class U> struct S1<T>::S2'.
3691 
3692    This list is not used for other templates.  */
3693 #define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX (NODE)
3694 /* For a class template, this list contains the partial
3695    specializations of this template.  (Full specializations are not
3696    recorded on this list.)  The TREE_PURPOSE holds the arguments used
3697    in the partial specialization (e.g., for `template <class T> struct
3698    S<T*, int>' this will be `T*'.)  The arguments will also include
3699    any outer template arguments.  The TREE_VALUE holds the innermost
3700    template parameters for the specialization (e.g., `T' in the
3701    example above.)  The TREE_TYPE is the _TYPE node for the partial
3702    specialization.
3703 
3704    This list is not used for other templates.  */
3705 #define DECL_TEMPLATE_SPECIALIZATIONS(NODE)     DECL_SIZE (NODE)
3706 
3707 /* Nonzero for a DECL which is actually a template parameter.  Keep
3708    these checks in ascending tree code order.   */
3709 #define DECL_TEMPLATE_PARM_P(NODE)		\
3710   (DECL_LANG_FLAG_0 (NODE)			\
3711    && (TREE_CODE (NODE) == CONST_DECL		\
3712        || TREE_CODE (NODE) == PARM_DECL		\
3713        || TREE_CODE (NODE) == TYPE_DECL		\
3714        || TREE_CODE (NODE) == TEMPLATE_DECL))
3715 
3716 /* Mark NODE as a template parameter.  */
3717 #define SET_DECL_TEMPLATE_PARM_P(NODE) \
3718   (DECL_LANG_FLAG_0 (NODE) = 1)
3719 
3720 /* Nonzero if NODE is a template template parameter.  */
3721 #define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \
3722   (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE))
3723 
3724 /* Nonzero if NODE is a TEMPLATE_DECL representing an
3725    UNBOUND_CLASS_TEMPLATE tree node.  */
3726 #define DECL_UNBOUND_CLASS_TEMPLATE_P(NODE) \
3727   (TREE_CODE (NODE) == TEMPLATE_DECL && !DECL_TEMPLATE_RESULT (NODE))
3728 
3729 #define DECL_FUNCTION_TEMPLATE_P(NODE)  \
3730   (TREE_CODE (NODE) == TEMPLATE_DECL \
3731    && !DECL_UNBOUND_CLASS_TEMPLATE_P (NODE) \
3732    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
3733 
3734 /* Nonzero for a DECL that represents a class template or alias
3735    template.  */
3736 #define DECL_TYPE_TEMPLATE_P(NODE)				\
3737   (TREE_CODE (NODE) == TEMPLATE_DECL				\
3738    && DECL_TEMPLATE_RESULT (NODE) != NULL_TREE			\
3739    && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL)
3740 
3741 /* Nonzero for a DECL that represents a class template.  */
3742 #define DECL_CLASS_TEMPLATE_P(NODE)				\
3743   (DECL_TYPE_TEMPLATE_P (NODE)					\
3744    && DECL_IMPLICIT_TYPEDEF_P (DECL_TEMPLATE_RESULT (NODE)))
3745 
3746 /* Nonzero for a TEMPLATE_DECL that represents an alias template.  */
3747 #define DECL_ALIAS_TEMPLATE_P(NODE)			\
3748   (DECL_TYPE_TEMPLATE_P (NODE)				\
3749    && !DECL_ARTIFICIAL (DECL_TEMPLATE_RESULT (NODE)))
3750 
3751 /* Nonzero for a NODE which declares a type.  */
3752 #define DECL_DECLARES_TYPE_P(NODE) \
3753   (TREE_CODE (NODE) == TYPE_DECL || DECL_TYPE_TEMPLATE_P (NODE))
3754 
3755 /* Nonzero if NODE declares a function.  */
3756 #define DECL_DECLARES_FUNCTION_P(NODE) \
3757   (TREE_CODE (NODE) == FUNCTION_DECL || DECL_FUNCTION_TEMPLATE_P (NODE))
3758 
3759 /* Nonzero if NODE is the typedef implicitly generated for a type when
3760    the type is declared.  In C++, `struct S {};' is roughly
3761    equivalent to `struct S {}; typedef struct S S;' in C.
3762    DECL_IMPLICIT_TYPEDEF_P will hold for the typedef indicated in this
3763    example.  In C++, there is a second implicit typedef for each
3764    class, in the scope of `S' itself, so that you can say `S::S'.
3765    DECL_SELF_REFERENCE_P will hold for that second typedef.  */
3766 #define DECL_IMPLICIT_TYPEDEF_P(NODE) \
3767   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_2 (NODE))
3768 #define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \
3769   (DECL_LANG_FLAG_2 (NODE) = 1)
3770 #define DECL_SELF_REFERENCE_P(NODE) \
3771   (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_4 (NODE))
3772 #define SET_DECL_SELF_REFERENCE_P(NODE) \
3773   (DECL_LANG_FLAG_4 (NODE) = 1)
3774 
3775 /* A `primary' template is one that has its own template header.  A
3776    member function of a class template is a template, but not primary.
3777    A member template is primary.  Friend templates are primary, too.  */
3778 
3779 /* Returns the primary template corresponding to these parameters.  */
3780 #define DECL_PRIMARY_TEMPLATE(NODE) \
3781   (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)))
3782 
3783 /* Returns nonzero if NODE is a primary template.  */
3784 #define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == (NODE))
3785 
3786 /* Nonzero iff NODE is a specialization of a template.  The value
3787    indicates the type of specializations:
3788 
3789      1=implicit instantiation
3790 
3791      2=partial or explicit specialization, e.g.:
3792 
3793         template <> int min<int> (int, int),
3794 
3795      3=explicit instantiation, e.g.:
3796 
3797         template int min<int> (int, int);
3798 
3799    Note that NODE will be marked as a specialization even if the
3800    template it is instantiating is not a primary template.  For
3801    example, given:
3802 
3803      template <typename T> struct O {
3804        void f();
3805        struct I {};
3806      };
3807 
3808    both O<int>::f and O<int>::I will be marked as instantiations.
3809 
3810    If DECL_USE_TEMPLATE is nonzero, then DECL_TEMPLATE_INFO will also
3811    be non-NULL.  */
3812 #define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC (NODE)->u.base.use_template)
3813 
3814 /* Like DECL_USE_TEMPLATE, but for class types.  */
3815 #define CLASSTYPE_USE_TEMPLATE(NODE) \
3816   (LANG_TYPE_CLASS_CHECK (NODE)->use_template)
3817 
3818 /* True if NODE is a specialization of a primary template.  */
3819 #define CLASSTYPE_SPECIALIZATION_OF_PRIMARY_TEMPLATE_P(NODE)	\
3820   (CLASS_TYPE_P (NODE)						\
3821    && CLASSTYPE_USE_TEMPLATE (NODE)				\
3822    && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
3823 
3824 #define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
3825 #define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
3826   (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
3827 
3828 #define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
3829 #define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
3830 
3831 /* Returns true for an explicit or partial specialization of a class
3832    template.  */
3833 #define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
3834   (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
3835 #define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
3836   (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
3837 
3838 #define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
3839 #define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
3840 #define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
3841   (CLASSTYPE_USE_TEMPLATE (NODE) == 1)
3842 #define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
3843   (CLASSTYPE_USE_TEMPLATE (NODE) = 1)
3844 
3845 #define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
3846 #define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
3847 #define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
3848   (CLASSTYPE_USE_TEMPLATE (NODE) == 3)
3849 #define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
3850   (CLASSTYPE_USE_TEMPLATE (NODE) = 3)
3851 
3852 /* Nonzero if DECL is a friend function which is an instantiation
3853    from the point of view of the compiler, but not from the point of
3854    view of the language.  For example given:
3855       template <class T> struct S { friend void f(T) {}; };
3856    the declaration of `void f(int)' generated when S<int> is
3857    instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be
3858    a DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION.  */
3859 #define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \
3860   (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL))
3861 
3862 /* Nonzero if DECL is a function generated from a function 'temploid',
3863    i.e. template, member of class template, or dependent friend.  */
3864 #define DECL_TEMPLOID_INSTANTIATION(DECL)		\
3865   (DECL_TEMPLATE_INSTANTIATION (DECL)			\
3866    || DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION (DECL))
3867 
3868 /* Nonzero if DECL is either defined implicitly by the compiler or
3869    generated from a temploid.  */
3870 #define DECL_GENERATED_P(DECL) \
3871   (DECL_TEMPLOID_INSTANTIATION (DECL) || DECL_DEFAULTED_FN (DECL))
3872 
3873 /* Nonzero iff we are currently processing a declaration for an
3874    entity with its own template parameter list, and which is not a
3875    full specialization.  */
3876 #define PROCESSING_REAL_TEMPLATE_DECL_P() \
3877   (processing_template_decl > template_class_depth (current_scope ()))
3878 
3879 /* Nonzero if this VAR_DECL or FUNCTION_DECL has already been
3880    instantiated, i.e. its definition has been generated from the
3881    pattern given in the template.  */
3882 #define DECL_TEMPLATE_INSTANTIATED(NODE) \
3883   DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE))
3884 
3885 /* We know what we're doing with this decl now.  */
3886 #define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
3887 
3888 /* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
3889    so that assemble_external will work properly.  So we have this flag to
3890    tell us whether the decl is really not external.
3891 
3892    This flag does not indicate whether or not the decl is defined in the
3893    current translation unit; it indicates whether or not we should emit the
3894    decl at the end of compilation if it is defined and needed.  */
3895 #define DECL_NOT_REALLY_EXTERN(NODE) \
3896   (DECL_LANG_SPECIFIC (NODE)->u.base.not_really_extern)
3897 
3898 #define DECL_REALLY_EXTERN(NODE) \
3899   (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE))
3900 
3901 /* A thunk is a stub function.
3902 
3903    A thunk is an alternate entry point for an ordinary FUNCTION_DECL.
3904    The address of the ordinary FUNCTION_DECL is given by the
3905    DECL_INITIAL, which is always an ADDR_EXPR whose operand is a
3906    FUNCTION_DECL.  The job of the thunk is to either adjust the this
3907    pointer before transferring control to the FUNCTION_DECL, or call
3908    FUNCTION_DECL and then adjust the result value. Note, the result
3909    pointer adjusting thunk must perform a call to the thunked
3910    function, (or be implemented via passing some invisible parameter
3911    to the thunked function, which is modified to perform the
3912    adjustment just before returning).
3913 
3914    A thunk may perform either, or both, of the following operations:
3915 
3916    o Adjust the this or result pointer by a constant offset.
3917    o Adjust the this or result pointer by looking up a vcall or vbase offset
3918      in the vtable.
3919 
3920    A this pointer adjusting thunk converts from a base to a derived
3921    class, and hence adds the offsets. A result pointer adjusting thunk
3922    converts from a derived class to a base, and hence subtracts the
3923    offsets.  If both operations are performed, then the constant
3924    adjustment is performed first for this pointer adjustment and last
3925    for the result pointer adjustment.
3926 
3927    The constant adjustment is given by THUNK_FIXED_OFFSET.  If the
3928    vcall or vbase offset is required, THUNK_VIRTUAL_OFFSET is
3929    used. For this pointer adjusting thunks, it is the vcall offset
3930    into the vtable.  For result pointer adjusting thunks it is the
3931    binfo of the virtual base to convert to.  Use that binfo's vbase
3932    offset.
3933 
3934    It is possible to have equivalent covariant thunks.  These are
3935    distinct virtual covariant thunks whose vbase offsets happen to
3936    have the same value.  THUNK_ALIAS is used to pick one as the
3937    canonical thunk, which will get all the this pointer adjusting
3938    thunks attached to it.  */
3939 
3940 /* An integer indicating how many bytes should be subtracted from the
3941    this or result pointer when this function is called.  */
3942 #define THUNK_FIXED_OFFSET(DECL) \
3943   (DECL_LANG_SPECIFIC (THUNK_FUNCTION_CHECK (DECL))->u.fn.u5.fixed_offset)
3944 
3945 /* A tree indicating how to perform the virtual adjustment. For a this
3946    adjusting thunk it is the number of bytes to be added to the vtable
3947    to find the vcall offset. For a result adjusting thunk, it is the
3948    binfo of the relevant virtual base.  If NULL, then there is no
3949    virtual adjust.  (The vptr is always located at offset zero from
3950    the this or result pointer.)  (If the covariant type is within the
3951    class hierarchy being laid out, the vbase index is not yet known
3952    at the point we need to create the thunks, hence the need to use
3953    binfos.)  */
3954 
3955 #define THUNK_VIRTUAL_OFFSET(DECL) \
3956   (LANG_DECL_U2_CHECK (FUNCTION_DECL_CHECK (DECL), 0)->access)
3957 
3958 /* A thunk which is equivalent to another thunk.  */
3959 #define THUNK_ALIAS(DECL) \
3960   (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->u.min.template_info)
3961 
3962 /* For thunk NODE, this is the FUNCTION_DECL thunked to.  It is
3963    possible for the target to be a thunk too.  */
3964 #define THUNK_TARGET(NODE)				\
3965   (LANG_DECL_FN_CHECK (NODE)->befriending_classes)
3966 
3967 /* True for a SCOPE_REF iff the "template" keyword was used to
3968    indicate that the qualified name denotes a template.  */
3969 #define QUALIFIED_NAME_IS_TEMPLATE(NODE) \
3970   (TREE_LANG_FLAG_1 (SCOPE_REF_CHECK (NODE)))
3971 
3972 /* True for an OMP_ATOMIC that has dependent parameters.  These are stored
3973    as an expr in operand 1, and integer_zero_node in operand 0.  */
3974 #define OMP_ATOMIC_DEPENDENT_P(NODE) \
3975   (TREE_CODE (TREE_OPERAND (OMP_ATOMIC_CHECK (NODE), 0)) == INTEGER_CST)
3976 
3977 /* Used while gimplifying continue statements bound to OMP_FOR nodes.  */
3978 #define OMP_FOR_GIMPLIFYING_P(NODE) \
3979   (TREE_LANG_FLAG_0 (OMP_FOR_CHECK (NODE)))
3980 
3981 /* A language-specific token attached to the OpenMP data clauses to
3982    hold code (or code fragments) related to ctors, dtors, and op=.
3983    See semantics.c for details.  */
3984 #define CP_OMP_CLAUSE_INFO(NODE) \
3985   TREE_TYPE (OMP_CLAUSE_RANGE_CHECK (NODE, OMP_CLAUSE_PRIVATE, \
3986 				     OMP_CLAUSE_COPYPRIVATE))
3987 
3988 /* Nonzero if this transaction expression's body contains statements.  */
3989 #define TRANSACTION_EXPR_IS_STMT(NODE) \
3990    TREE_LANG_FLAG_0 (TRANSACTION_EXPR_CHECK (NODE))
3991 
3992 /* These macros provide convenient access to the various _STMT nodes
3993    created when parsing template declarations.  */
3994 #define TRY_STMTS(NODE)		TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0)
3995 #define TRY_HANDLERS(NODE)	TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1)
3996 
3997 #define EH_SPEC_STMTS(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 0)
3998 #define EH_SPEC_RAISES(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 1)
3999 
4000 #define USING_STMT_NAMESPACE(NODE) TREE_OPERAND (USING_STMT_CHECK (NODE), 0)
4001 
4002 /* Nonzero if this try block is a function try block.  */
4003 #define FN_TRY_BLOCK_P(NODE)	TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE))
4004 #define HANDLER_PARMS(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 0)
4005 #define HANDLER_BODY(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 1)
4006 #define HANDLER_TYPE(NODE)	TREE_TYPE (HANDLER_CHECK (NODE))
4007 
4008 /* CLEANUP_STMT accessors.  The statement(s) covered, the cleanup to run
4009    and the VAR_DECL for which this cleanup exists.  */
4010 #define CLEANUP_BODY(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0)
4011 #define CLEANUP_EXPR(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1)
4012 #define CLEANUP_DECL(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 2)
4013 
4014 /* IF_STMT accessors. These give access to the condition of the if
4015    statement, the then block of the if statement, and the else block
4016    of the if statement if it exists.  */
4017 #define IF_COND(NODE)		TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
4018 #define THEN_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
4019 #define ELSE_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
4020 #define IF_SCOPE(NODE)		TREE_OPERAND (IF_STMT_CHECK (NODE), 3)
4021 
4022 /* WHILE_STMT accessors. These give access to the condition of the
4023    while statement and the body of the while statement, respectively.  */
4024 #define WHILE_COND(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0)
4025 #define WHILE_BODY(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1)
4026 
4027 /* DO_STMT accessors. These give access to the condition of the do
4028    statement and the body of the do statement, respectively.  */
4029 #define DO_COND(NODE)		TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
4030 #define DO_BODY(NODE)		TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
4031 
4032 /* FOR_STMT accessors. These give access to the init statement,
4033    condition, update expression, and body of the for statement,
4034    respectively.  */
4035 #define FOR_INIT_STMT(NODE)	TREE_OPERAND (FOR_STMT_CHECK (NODE), 0)
4036 #define FOR_COND(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 1)
4037 #define FOR_EXPR(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 2)
4038 #define FOR_BODY(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 3)
4039 #define FOR_SCOPE(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 4)
4040 
4041 /* RANGE_FOR_STMT accessors. These give access to the declarator,
4042    expression, body, and scope of the statement, respectively.  */
4043 #define RANGE_FOR_DECL(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 0)
4044 #define RANGE_FOR_EXPR(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 1)
4045 #define RANGE_FOR_BODY(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 2)
4046 #define RANGE_FOR_SCOPE(NODE)	TREE_OPERAND (RANGE_FOR_STMT_CHECK (NODE), 3)
4047 
4048 #define SWITCH_STMT_COND(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0)
4049 #define SWITCH_STMT_BODY(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1)
4050 #define SWITCH_STMT_TYPE(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 2)
4051 #define SWITCH_STMT_SCOPE(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 3)
4052 
4053 /* STMT_EXPR accessor.  */
4054 #define STMT_EXPR_STMT(NODE)	TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
4055 
4056 /* EXPR_STMT accessor. This gives the expression associated with an
4057    expression statement.  */
4058 #define EXPR_STMT_EXPR(NODE)	TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
4059 
4060 /* True if this TARGET_EXPR was created by build_cplus_new, and so we can
4061    discard it if it isn't useful.  */
4062 #define TARGET_EXPR_IMPLICIT_P(NODE) \
4063   TREE_LANG_FLAG_0 (TARGET_EXPR_CHECK (NODE))
4064 
4065 /* True if this TARGET_EXPR is the result of list-initialization of a
4066    temporary.  */
4067 #define TARGET_EXPR_LIST_INIT_P(NODE) \
4068   TREE_LANG_FLAG_1 (TARGET_EXPR_CHECK (NODE))
4069 
4070 /* True if this TARGET_EXPR expresses direct-initialization of an object
4071    to be named later.  */
4072 #define TARGET_EXPR_DIRECT_INIT_P(NODE) \
4073   TREE_LANG_FLAG_2 (TARGET_EXPR_CHECK (NODE))
4074 
4075 /* True if EXPR expresses direct-initialization of a TYPE.  */
4076 #define DIRECT_INIT_EXPR_P(TYPE,EXPR)					\
4077   (TREE_CODE (EXPR) == TARGET_EXPR && TREE_LANG_FLAG_2 (EXPR)		\
4078    && same_type_ignoring_top_level_qualifiers_p (TYPE, TREE_TYPE (EXPR)))
4079 
4080 /* True if this CONVERT_EXPR is for a conversion to virtual base in
4081    an NSDMI, and should be re-evaluated when used in a constructor.  */
4082 #define CONVERT_EXPR_VBASE_PATH(NODE) \
4083   TREE_LANG_FLAG_0 (CONVERT_EXPR_CHECK (NODE))
4084 
4085 /* True if SIZEOF_EXPR argument is type.  */
4086 #define SIZEOF_EXPR_TYPE_P(NODE) \
4087   TREE_LANG_FLAG_0 (SIZEOF_EXPR_CHECK (NODE))
4088 
4089 /* An enumeration of the kind of tags that C++ accepts.  */
4090 enum tag_types {
4091   none_type = 0, /* Not a tag type.  */
4092   record_type,   /* "struct" types.  */
4093   class_type,    /* "class" types.  */
4094   union_type,    /* "union" types.  */
4095   enum_type,     /* "enum" types.  */
4096   typename_type  /* "typename" types.  */
4097 };
4098 
4099 /* The various kinds of lvalues we distinguish.  */
4100 enum cp_lvalue_kind_flags {
4101   clk_none = 0,     /* Things that are not an lvalue.  */
4102   clk_ordinary = 1, /* An ordinary lvalue.  */
4103   clk_rvalueref = 2,/* An xvalue (rvalue formed using an rvalue reference) */
4104   clk_class = 4,    /* A prvalue of class-type.  */
4105   clk_bitfield = 8, /* An lvalue for a bit-field.  */
4106   clk_packed = 16   /* An lvalue for a packed field.  */
4107 };
4108 
4109 /* This type is used for parameters and variables which hold
4110    combinations of the flags in enum cp_lvalue_kind_flags.  */
4111 typedef int cp_lvalue_kind;
4112 
4113 /* Various kinds of template specialization, instantiation, etc.  */
4114 typedef enum tmpl_spec_kind {
4115   tsk_none,		   /* Not a template at all.  */
4116   tsk_invalid_member_spec, /* An explicit member template
4117 			      specialization, but the enclosing
4118 			      classes have not all been explicitly
4119 			      specialized.  */
4120   tsk_invalid_expl_inst,   /* An explicit instantiation containing
4121 			      template parameter lists.  */
4122   tsk_excessive_parms,	   /* A template declaration with too many
4123 			      template parameter lists.  */
4124   tsk_insufficient_parms,  /* A template declaration with too few
4125 			      parameter lists.  */
4126   tsk_template,		   /* A template declaration.  */
4127   tsk_expl_spec,	   /* An explicit specialization.  */
4128   tsk_expl_inst		   /* An explicit instantiation.  */
4129 } tmpl_spec_kind;
4130 
4131 /* The various kinds of access.  BINFO_ACCESS depends on these being
4132    two bit quantities.  The numerical values are important; they are
4133    used to initialize RTTI data structures, so changing them changes
4134    the ABI.  */
4135 typedef enum access_kind {
4136   ak_none = 0,		   /* Inaccessible.  */
4137   ak_public = 1,	   /* Accessible, as a `public' thing.  */
4138   ak_protected = 2,	   /* Accessible, as a `protected' thing.  */
4139   ak_private = 3	   /* Accessible, as a `private' thing.  */
4140 } access_kind;
4141 
4142 /* The various kinds of special functions.  If you add to this list,
4143    you should update special_function_p as well.  */
4144 typedef enum special_function_kind {
4145   sfk_none = 0,		   /* Not a special function.  This enumeral
4146 			      must have value zero; see
4147 			      special_function_p.  */
4148   sfk_constructor,	   /* A constructor.  */
4149   sfk_copy_constructor,    /* A copy constructor.  */
4150   sfk_move_constructor,    /* A move constructor.  */
4151   sfk_copy_assignment,     /* A copy assignment operator.  */
4152   sfk_move_assignment,     /* A move assignment operator.  */
4153   sfk_destructor,	   /* A destructor.  */
4154   sfk_complete_destructor, /* A destructor for complete objects.  */
4155   sfk_base_destructor,     /* A destructor for base subobjects.  */
4156   sfk_deleting_destructor, /* A destructor for complete objects that
4157 			      deletes the object after it has been
4158 			      destroyed.  */
4159   sfk_conversion,	   /* A conversion operator.  */
4160   sfk_inheriting_constructor /* An inheriting constructor */
4161 } special_function_kind;
4162 
4163 /* The various kinds of linkage.  From [basic.link],
4164 
4165       A name is said to have linkage when it might denote the same
4166       object, reference, function, type, template, namespace or value
4167       as a name introduced in another scope:
4168 
4169       -- When a name has external linkage, the entity it denotes can
4170 	 be referred to from scopes of other translation units or from
4171 	 other scopes of the same translation unit.
4172 
4173       -- When a name has internal linkage, the entity it denotes can
4174 	 be referred to by names from other scopes in the same
4175 	 translation unit.
4176 
4177       -- When a name has no linkage, the entity it denotes cannot be
4178 	 referred to by names from other scopes.  */
4179 
4180 typedef enum linkage_kind {
4181   lk_none,			/* No linkage.  */
4182   lk_internal,			/* Internal linkage.  */
4183   lk_external			/* External linkage.  */
4184 } linkage_kind;
4185 
4186 typedef enum duration_kind {
4187   dk_static,
4188   dk_thread,
4189   dk_auto,
4190   dk_dynamic
4191 } duration_kind;
4192 
4193 /* Bitmask flags to control type substitution.  */
4194 enum tsubst_flags {
4195   tf_none = 0,			 /* nothing special */
4196   tf_error = 1 << 0,		 /* give error messages  */
4197   tf_warning = 1 << 1,	 	 /* give warnings too  */
4198   tf_ignore_bad_quals = 1 << 2,	 /* ignore bad cvr qualifiers */
4199   tf_keep_type_decl = 1 << 3,	 /* retain typedef type decls
4200 				    (make_typename_type use) */
4201   tf_ptrmem_ok = 1 << 4,	 /* pointers to member ok (internal
4202 				    instantiate_type use) */
4203   tf_user = 1 << 5,		 /* found template must be a user template
4204 				    (lookup_template_class use) */
4205   tf_conv = 1 << 6,		 /* We are determining what kind of
4206 				    conversion might be permissible,
4207 				    not actually performing the
4208 				    conversion.  */
4209   tf_decltype = 1 << 7,          /* We are the operand of decltype.
4210 				    Used to implement the special rules
4211 				    for calls in decltype (5.2.2/11).  */
4212   tf_partial = 1 << 8,		 /* Doing initial explicit argument
4213 				    substitution in fn_type_unification.  */
4214   /* Convenient substitution flags combinations.  */
4215   tf_warning_or_error = tf_warning | tf_error
4216 };
4217 
4218 /* This type is used for parameters and variables which hold
4219    combinations of the flags in enum tsubst_flags.  */
4220 typedef int tsubst_flags_t;
4221 
4222 /* The kind of checking we can do looking in a class hierarchy.  */
4223 enum base_access_flags {
4224   ba_any = 0,  /* Do not check access, allow an ambiguous base,
4225 		      prefer a non-virtual base */
4226   ba_unique = 1 << 0,  /* Must be a unique base.  */
4227   ba_check_bit = 1 << 1,   /* Check access.  */
4228   ba_check = ba_unique | ba_check_bit,
4229   ba_ignore_scope = 1 << 2 /* Ignore access allowed by local scope.  */
4230 };
4231 
4232 /* This type is used for parameters and variables which hold
4233    combinations of the flags in enum base_access_flags.  */
4234 typedef int base_access;
4235 
4236 /* The various kinds of access check during parsing.  */
4237 typedef enum deferring_kind {
4238   dk_no_deferred = 0, /* Check access immediately */
4239   dk_deferred = 1,    /* Deferred check */
4240   dk_no_check = 2     /* No access check */
4241 } deferring_kind;
4242 
4243 /* The kind of base we can find, looking in a class hierarchy.
4244    Values <0 indicate we failed.  */
4245 typedef enum base_kind {
4246   bk_inaccessible = -3,   /* The base is inaccessible */
4247   bk_ambig = -2,	  /* The base is ambiguous */
4248   bk_not_base = -1,	  /* It is not a base */
4249   bk_same_type = 0,	  /* It is the same type */
4250   bk_proper_base = 1,	  /* It is a proper base */
4251   bk_via_virtual = 2	  /* It is a proper base, but via a virtual
4252 			     path. This might not be the canonical
4253 			     binfo.  */
4254 } base_kind;
4255 
4256 /* Node for "pointer to (virtual) function".
4257    This may be distinct from ptr_type_node so gdb can distinguish them.  */
4258 #define vfunc_ptr_type_node  vtable_entry_type
4259 
4260 
4261 /* For building calls to `delete'.  */
4262 extern GTY(()) tree integer_two_node;
4263 
4264 /* The number of function bodies which we are currently processing.
4265    (Zero if we are at namespace scope, one inside the body of a
4266    function, two inside the body of a function in a local class, etc.)  */
4267 extern int function_depth;
4268 
4269 /* Nonzero if we are inside eq_specializations, which affects comparison of
4270    PARM_DECLs in cp_tree_equal.  */
4271 extern int comparing_specializations;
4272 
4273 /* In parser.c.  */
4274 
4275 /* Nonzero if we are parsing an unevaluated operand: an operand to
4276    sizeof, typeof, or alignof.  This is a count since operands to
4277    sizeof can be nested.  */
4278 
4279 extern int cp_unevaluated_operand;
4280 extern tree cp_convert_range_for (tree, tree, tree);
4281 
4282 /* in pt.c  */
4283 
4284 /* These values are used for the `STRICT' parameter to type_unification and
4285    fn_type_unification.  Their meanings are described with the
4286    documentation for fn_type_unification.  */
4287 
4288 typedef enum unification_kind_t {
4289   DEDUCE_CALL,
4290   DEDUCE_CONV,
4291   DEDUCE_EXACT
4292 } unification_kind_t;
4293 
4294 /* in class.c */
4295 
4296 extern int current_class_depth;
4297 
4298 /* An array of all local classes present in this translation unit, in
4299    declaration order.  */
4300 extern GTY(()) vec<tree, va_gc> *local_classes;
4301 
4302 /* Here's where we control how name mangling takes place.  */
4303 
4304 /* Cannot use '$' up front, because this confuses gdb
4305    (names beginning with '$' are gdb-local identifiers).
4306 
4307    Note that all forms in which the '$' is significant are long enough
4308    for direct indexing (meaning that if we know there is a '$'
4309    at a particular location, we can index into the string at
4310    any other location that provides distinguishing characters).  */
4311 
4312 /* Define NO_DOT_IN_LABEL in your favorite tm file if your assembler
4313    doesn't allow '.' in symbol names.  */
4314 #ifndef NO_DOT_IN_LABEL
4315 
4316 #define JOINER '.'
4317 
4318 #define AUTO_TEMP_NAME "_.tmp_"
4319 #define VFIELD_BASE ".vf"
4320 #define VFIELD_NAME "_vptr."
4321 #define VFIELD_NAME_FORMAT "_vptr.%s"
4322 
4323 #define ANON_AGGRNAME_FORMAT "._%d"
4324 
4325 #else /* NO_DOT_IN_LABEL */
4326 
4327 #ifndef NO_DOLLAR_IN_LABEL
4328 
4329 #define JOINER '$'
4330 
4331 #define AUTO_TEMP_NAME "_$tmp_"
4332 #define VFIELD_BASE "$vf"
4333 #define VFIELD_NAME "_vptr$"
4334 #define VFIELD_NAME_FORMAT "_vptr$%s"
4335 #define ANON_AGGRNAME_FORMAT "$_%d"
4336 
4337 #else /* NO_DOLLAR_IN_LABEL */
4338 
4339 #define AUTO_TEMP_NAME "__tmp_"
4340 #define TEMP_NAME_P(ID_NODE) \
4341   (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \
4342 	     sizeof (AUTO_TEMP_NAME) - 1))
4343 #define VTABLE_NAME "__vt_"
4344 #define VTABLE_NAME_P(ID_NODE) \
4345   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
4346 	     sizeof (VTABLE_NAME) - 1))
4347 #define VFIELD_BASE "__vfb"
4348 #define VFIELD_NAME "__vptr_"
4349 #define VFIELD_NAME_P(ID_NODE) \
4350   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
4351 	    sizeof (VFIELD_NAME) - 1))
4352 #define VFIELD_NAME_FORMAT "__vptr_%s"
4353 
4354 #define ANON_AGGRNAME_PREFIX "__anon_"
4355 #define ANON_AGGRNAME_P(ID_NODE) \
4356   (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \
4357 	     sizeof (ANON_AGGRNAME_PREFIX) - 1))
4358 #define ANON_AGGRNAME_FORMAT "__anon_%d"
4359 
4360 #endif	/* NO_DOLLAR_IN_LABEL */
4361 #endif	/* NO_DOT_IN_LABEL */
4362 
4363 #define THIS_NAME "this"
4364 
4365 #define IN_CHARGE_NAME "__in_chrg"
4366 
4367 #define VTBL_PTR_TYPE		"__vtbl_ptr_type"
4368 #define VTABLE_DELTA_NAME	"__delta"
4369 #define VTABLE_PFN_NAME		"__pfn"
4370 
4371 #define LAMBDANAME_PREFIX "__lambda"
4372 #define LAMBDANAME_FORMAT LAMBDANAME_PREFIX "%d"
4373 
4374 #define UDLIT_OP_ANSI_PREFIX "operator\"\" "
4375 #define UDLIT_OP_ANSI_FORMAT UDLIT_OP_ANSI_PREFIX "%s"
4376 #define UDLIT_OP_MANGLED_PREFIX "li"
4377 #define UDLIT_OP_MANGLED_FORMAT UDLIT_OP_MANGLED_PREFIX "%s"
4378 #define UDLIT_OPER_P(ID_NODE) \
4379   (!strncmp (IDENTIFIER_POINTER (ID_NODE), \
4380              UDLIT_OP_ANSI_PREFIX, \
4381 	     sizeof (UDLIT_OP_ANSI_PREFIX) - 1))
4382 #define UDLIT_OP_SUFFIX(ID_NODE) \
4383   (IDENTIFIER_POINTER (ID_NODE) + sizeof (UDLIT_OP_ANSI_PREFIX) - 1)
4384 
4385 #if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
4386 
4387 #define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
4388   && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
4389   && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
4390 
4391 #define TEMP_NAME_P(ID_NODE) \
4392   (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1))
4393 #define VFIELD_NAME_P(ID_NODE) \
4394   (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
4395 
4396 /* For anonymous aggregate types, we need some sort of name to
4397    hold on to.  In practice, this should not appear, but it should
4398    not be harmful if it does.  */
4399 #define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
4400 				  && IDENTIFIER_POINTER (ID_NODE)[1] == '_')
4401 #endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
4402 
4403 
4404 /* Nonzero if we're done parsing and into end-of-file activities.  */
4405 
4406 extern int at_eof;
4407 
4408 /* A list of namespace-scope objects which have constructors or
4409    destructors which reside in the global scope.  The decl is stored
4410    in the TREE_VALUE slot and the initializer is stored in the
4411    TREE_PURPOSE slot.  */
4412 extern GTY(()) tree static_aggregates;
4413 /* Likewise, for thread local storage.  */
4414 extern GTY(()) tree tls_aggregates;
4415 
4416 enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, TYPENAME_FLAG };
4417 
4418 /* These are uses as bits in flags passed to various functions to
4419    control their behavior.  Despite the LOOKUP_ prefix, many of these
4420    do not control name lookup.  ??? Functions using these flags should
4421    probably be modified to accept explicit boolean flags for the
4422    behaviors relevant to them.  */
4423 /* Check for access violations.  */
4424 #define LOOKUP_PROTECT (1 << 0)
4425 #define LOOKUP_NORMAL (LOOKUP_PROTECT)
4426 /* Even if the function found by lookup is a virtual function, it
4427    should be called directly.  */
4428 #define LOOKUP_NONVIRTUAL (1 << 1)
4429 /* Non-converting (i.e., "explicit") constructors are not tried.  This flag
4430    indicates that we are not performing direct-initialization.  */
4431 #define LOOKUP_ONLYCONVERTING (1 << 2)
4432 #define LOOKUP_IMPLICIT (LOOKUP_NORMAL | LOOKUP_ONLYCONVERTING)
4433 /* If a temporary is created, it should be created so that it lives
4434    as long as the current variable bindings; otherwise it only lives
4435    until the end of the complete-expression.  It also forces
4436    direct-initialization in cases where other parts of the compiler
4437    have already generated a temporary, such as reference
4438    initialization and the catch parameter.  */
4439 #define DIRECT_BIND (1 << 3)
4440 /* We're performing a user-defined conversion, so more user-defined
4441    conversions are not permitted (only built-in conversions).  */
4442 #define LOOKUP_NO_CONVERSION (1 << 4)
4443 /* The user has explicitly called a destructor.  (Therefore, we do
4444    not need to check that the object is non-NULL before calling the
4445    destructor.)  */
4446 #define LOOKUP_DESTRUCTOR (1 << 5)
4447 /* Do not permit references to bind to temporaries.  */
4448 #define LOOKUP_NO_TEMP_BIND (1 << 6)
4449 /* Do not accept objects, and possibly namespaces.  */
4450 #define LOOKUP_PREFER_TYPES (1 << 7)
4451 /* Do not accept objects, and possibly types.   */
4452 #define LOOKUP_PREFER_NAMESPACES (1 << 8)
4453 /* Accept types or namespaces.  */
4454 #define LOOKUP_PREFER_BOTH (LOOKUP_PREFER_TYPES | LOOKUP_PREFER_NAMESPACES)
4455 /* Return friend declarations and un-declared builtin functions.
4456    (Normally, these entities are registered in the symbol table, but
4457    not found by lookup.)  */
4458 #define LOOKUP_HIDDEN (LOOKUP_PREFER_NAMESPACES << 1)
4459 /* Prefer that the lvalue be treated as an rvalue.  */
4460 #define LOOKUP_PREFER_RVALUE (LOOKUP_HIDDEN << 1)
4461 /* We're inside an init-list, so narrowing conversions are ill-formed.  */
4462 #define LOOKUP_NO_NARROWING (LOOKUP_PREFER_RVALUE << 1)
4463 /* We're looking up a constructor for list-initialization.  */
4464 #define LOOKUP_LIST_INIT_CTOR (LOOKUP_NO_NARROWING << 1)
4465 /* This is the first parameter of a copy constructor.  */
4466 #define LOOKUP_COPY_PARM (LOOKUP_LIST_INIT_CTOR << 1)
4467 /* We only want to consider list constructors.  */
4468 #define LOOKUP_LIST_ONLY (LOOKUP_COPY_PARM << 1)
4469 /* Return after determining which function to call and checking access.
4470    Used by sythesized_method_walk to determine which functions will
4471    be called to initialize subobjects, in order to determine exception
4472    specification and possible implicit delete.
4473    This is kind of a hack, but exiting early avoids problems with trying
4474    to perform argument conversions when the class isn't complete yet.  */
4475 #define LOOKUP_SPECULATIVE (LOOKUP_LIST_ONLY << 1)
4476 /* Used by calls from defaulted functions to limit the overload set to avoid
4477    cycles trying to declare them (core issue 1092).  */
4478 #define LOOKUP_DEFAULTED (LOOKUP_SPECULATIVE << 1)
4479 /* Used in calls to store_init_value to suppress its usual call to
4480    digest_init.  */
4481 #define LOOKUP_ALREADY_DIGESTED (LOOKUP_DEFAULTED << 1)
4482 /* An instantiation with explicit template arguments.  */
4483 #define LOOKUP_EXPLICIT_TMPL_ARGS (LOOKUP_ALREADY_DIGESTED << 1)
4484 /* Like LOOKUP_NO_TEMP_BIND, but also prevent binding to xvalues.  */
4485 #define LOOKUP_NO_RVAL_BIND (LOOKUP_EXPLICIT_TMPL_ARGS << 1)
4486 
4487 #define LOOKUP_NAMESPACES_ONLY(F)  \
4488   (((F) & LOOKUP_PREFER_NAMESPACES) && !((F) & LOOKUP_PREFER_TYPES))
4489 #define LOOKUP_TYPES_ONLY(F)  \
4490   (!((F) & LOOKUP_PREFER_NAMESPACES) && ((F) & LOOKUP_PREFER_TYPES))
4491 #define LOOKUP_QUALIFIERS_ONLY(F)     ((F) & LOOKUP_PREFER_BOTH)
4492 
4493 
4494 /* These flags are used by the conversion code.
4495    CONV_IMPLICIT   :  Perform implicit conversions (standard and user-defined).
4496    CONV_STATIC     :  Perform the explicit conversions for static_cast.
4497    CONV_CONST      :  Perform the explicit conversions for const_cast.
4498    CONV_REINTERPRET:  Perform the explicit conversions for reinterpret_cast.
4499    CONV_PRIVATE    :  Perform upcasts to private bases.
4500    CONV_FORCE_TEMP :  Require a new temporary when converting to the same
4501 		      aggregate type.  */
4502 
4503 #define CONV_IMPLICIT    1
4504 #define CONV_STATIC      2
4505 #define CONV_CONST       4
4506 #define CONV_REINTERPRET 8
4507 #define CONV_PRIVATE	 16
4508 /* #define CONV_NONCONVERTING 32 */
4509 #define CONV_FORCE_TEMP  64
4510 #define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
4511 			  | CONV_REINTERPRET)
4512 #define CONV_C_CAST      (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
4513 			  | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
4514 
4515 /* Used by build_expr_type_conversion to indicate which types are
4516    acceptable as arguments to the expression under consideration.  */
4517 
4518 #define WANT_INT	1 /* integer types, including bool */
4519 #define WANT_FLOAT	2 /* floating point types */
4520 #define WANT_ENUM	4 /* enumerated types */
4521 #define WANT_POINTER	8 /* pointer types */
4522 #define WANT_NULL      16 /* null pointer constant */
4523 #define WANT_VECTOR_OR_COMPLEX 32 /* vector or complex types */
4524 #define WANT_ARITH	(WANT_INT | WANT_FLOAT | WANT_VECTOR_OR_COMPLEX)
4525 
4526 /* Used with comptypes, and related functions, to guide type
4527    comparison.  */
4528 
4529 #define COMPARE_STRICT	      0 /* Just check if the types are the
4530 				   same.  */
4531 #define COMPARE_BASE	      1 /* Check to see if the second type is
4532 				   derived from the first.  */
4533 #define COMPARE_DERIVED	      2 /* Like COMPARE_BASE, but in
4534 				   reverse.  */
4535 #define COMPARE_REDECLARATION 4 /* The comparison is being done when
4536 				   another declaration of an existing
4537 				   entity is seen.  */
4538 #define COMPARE_STRUCTURAL    8 /* The comparison is intended to be
4539 				   structural. The actual comparison
4540 				   will be identical to
4541 				   COMPARE_STRICT.  */
4542 
4543 /* Used with push_overloaded_decl.  */
4544 #define PUSH_GLOBAL	     0  /* Push the DECL into namespace scope,
4545 				   regardless of the current scope.  */
4546 #define PUSH_LOCAL	     1  /* Push the DECL into the current
4547 				   scope.  */
4548 #define PUSH_USING	     2  /* We are pushing this DECL as the
4549 				   result of a using declaration.  */
4550 
4551 /* Used with start function.  */
4552 #define SF_DEFAULT	     0  /* No flags.  */
4553 #define SF_PRE_PARSED	     1  /* The function declaration has
4554 				   already been parsed.  */
4555 #define SF_INCLASS_INLINE    2  /* The function is an inline, defined
4556 				   in the class body.  */
4557 
4558 /* Used with start_decl's initialized parameter.  */
4559 #define SD_UNINITIALIZED     0
4560 #define SD_INITIALIZED       1
4561 #define SD_DEFAULTED         2
4562 #define SD_DELETED           3
4563 
4564 /* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2
4565    is derived from TYPE1, or if TYPE2 is a pointer (reference) to a
4566    class derived from the type pointed to (referred to) by TYPE1.  */
4567 #define same_or_base_type_p(TYPE1, TYPE2) \
4568   comptypes ((TYPE1), (TYPE2), COMPARE_BASE)
4569 
4570 /* These macros are used to access a TEMPLATE_PARM_INDEX.  */
4571 #define TEMPLATE_PARM_INDEX_CAST(NODE) \
4572 	((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE))
4573 #define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index)
4574 #define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level)
4575 #define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE))
4576 #define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level)
4577 #define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl)
4578 #define TEMPLATE_PARM_PARAMETER_PACK(NODE) \
4579   (TREE_LANG_FLAG_0 (TEMPLATE_PARM_INDEX_CHECK (NODE)))
4580 
4581 /* These macros are for accessing the fields of TEMPLATE_TYPE_PARM,
4582    TEMPLATE_TEMPLATE_PARM and BOUND_TEMPLATE_TEMPLATE_PARM nodes.  */
4583 #define TEMPLATE_TYPE_PARM_INDEX(NODE)					\
4584   (TYPE_VALUES_RAW (TREE_CHECK3 ((NODE), TEMPLATE_TYPE_PARM,		\
4585 				 TEMPLATE_TEMPLATE_PARM,		\
4586 				 BOUND_TEMPLATE_TEMPLATE_PARM)))
4587 #define TEMPLATE_TYPE_IDX(NODE) \
4588   (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE)))
4589 #define TEMPLATE_TYPE_LEVEL(NODE) \
4590   (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
4591 #define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \
4592   (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
4593 #define TEMPLATE_TYPE_DECL(NODE) \
4594   (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
4595 #define TEMPLATE_TYPE_PARAMETER_PACK(NODE) \
4596   (TEMPLATE_PARM_PARAMETER_PACK (TEMPLATE_TYPE_PARM_INDEX (NODE)))
4597 
4598 /* These constants can used as bit flags in the process of tree formatting.
4599 
4600    TFF_PLAIN_IDENTIFIER: unqualified part of a name.
4601    TFF_SCOPE: include the class and namespace scope of the name.
4602    TFF_CHASE_TYPEDEF: print the original type-id instead of the typedef-name.
4603    TFF_DECL_SPECIFIERS: print decl-specifiers.
4604    TFF_CLASS_KEY_OR_ENUM: precede a class-type name (resp. enum name) with
4605        a class-key (resp. `enum').
4606    TFF_RETURN_TYPE: include function return type.
4607    TFF_FUNCTION_DEFAULT_ARGUMENTS: include function default parameter values.
4608    TFF_EXCEPTION_SPECIFICATION: show function exception specification.
4609    TFF_TEMPLATE_HEADER: show the template<...> header in a
4610        template-declaration.
4611    TFF_TEMPLATE_NAME: show only template-name.
4612    TFF_EXPR_IN_PARENS: parenthesize expressions.
4613    TFF_NO_FUNCTION_ARGUMENTS: don't show function arguments.
4614    TFF_UNQUALIFIED_NAME: do not print the qualifying scope of the
4615        top-level entity.
4616    TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS: do not omit template arguments
4617        identical to their defaults.  */
4618 
4619 #define TFF_PLAIN_IDENTIFIER			(0)
4620 #define TFF_SCOPE				(1)
4621 #define TFF_CHASE_TYPEDEF			(1 << 1)
4622 #define TFF_DECL_SPECIFIERS			(1 << 2)
4623 #define TFF_CLASS_KEY_OR_ENUM			(1 << 3)
4624 #define TFF_RETURN_TYPE				(1 << 4)
4625 #define TFF_FUNCTION_DEFAULT_ARGUMENTS		(1 << 5)
4626 #define TFF_EXCEPTION_SPECIFICATION		(1 << 6)
4627 #define TFF_TEMPLATE_HEADER			(1 << 7)
4628 #define TFF_TEMPLATE_NAME			(1 << 8)
4629 #define TFF_EXPR_IN_PARENS			(1 << 9)
4630 #define TFF_NO_FUNCTION_ARGUMENTS		(1 << 10)
4631 #define TFF_UNQUALIFIED_NAME			(1 << 11)
4632 #define TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS	(1 << 12)
4633 
4634 /* Returns the TEMPLATE_DECL associated to a TEMPLATE_TEMPLATE_PARM
4635    node.  */
4636 #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL(NODE)	\
4637   ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM)	\
4638    ? TYPE_TI_TEMPLATE (NODE)				\
4639    : TYPE_NAME (NODE))
4640 
4641 /* in lex.c  */
4642 
4643 extern void init_reswords (void);
4644 
4645 typedef struct GTY(()) operator_name_info_t {
4646   /* The IDENTIFIER_NODE for the operator.  */
4647   tree identifier;
4648   /* The name of the operator.  */
4649   const char *name;
4650   /* The mangled name of the operator.  */
4651   const char *mangled_name;
4652   /* The arity of the operator.  */
4653   int arity;
4654 } operator_name_info_t;
4655 
4656 /* A mapping from tree codes to operator name information.  */
4657 extern GTY(()) operator_name_info_t operator_name_info
4658   [(int) MAX_TREE_CODES];
4659 /* Similar, but for assignment operators.  */
4660 extern GTY(()) operator_name_info_t assignment_operator_name_info
4661   [(int) MAX_TREE_CODES];
4662 
4663 /* A type-qualifier, or bitmask therefore, using the TYPE_QUAL
4664    constants.  */
4665 
4666 typedef int cp_cv_quals;
4667 
4668 /* Non-static member functions have an optional virt-specifier-seq.
4669    There is a VIRT_SPEC value for each virt-specifier.
4670    They can be combined by bitwise-or to form the complete set of
4671    virt-specifiers for a member function.  */
4672 enum virt_specifier
4673   {
4674     VIRT_SPEC_UNSPECIFIED = 0x0,
4675     VIRT_SPEC_FINAL       = 0x1,
4676     VIRT_SPEC_OVERRIDE    = 0x2
4677   };
4678 
4679 /* A type-qualifier, or bitmask therefore, using the VIRT_SPEC
4680    constants.  */
4681 
4682 typedef int cp_virt_specifiers;
4683 
4684 /* Wherever there is a function-cv-qual, there could also be a ref-qualifier:
4685 
4686    [dcl.fct]
4687    The return type, the parameter-type-list, the ref-qualifier, and
4688    the cv-qualifier-seq, but not the default arguments or the exception
4689    specification, are part of the function type.
4690 
4691    REF_QUAL_NONE    Ordinary member function with no ref-qualifier
4692    REF_QUAL_LVALUE  Member function with the &-ref-qualifier
4693    REF_QUAL_RVALUE  Member function with the &&-ref-qualifier */
4694 
4695 enum cp_ref_qualifier {
4696   REF_QUAL_NONE = 0,
4697   REF_QUAL_LVALUE = 1,
4698   REF_QUAL_RVALUE = 2
4699 };
4700 
4701 /* A storage class.  */
4702 
4703 typedef enum cp_storage_class {
4704   /* sc_none must be zero so that zeroing a cp_decl_specifier_seq
4705      sets the storage_class field to sc_none.  */
4706   sc_none = 0,
4707   sc_auto,
4708   sc_register,
4709   sc_static,
4710   sc_extern,
4711   sc_mutable
4712 } cp_storage_class;
4713 
4714 /* An individual decl-specifier.  This is used to index the array of
4715    locations for the declspecs in struct cp_decl_specifier_seq
4716    below.  */
4717 
4718 typedef enum cp_decl_spec {
4719   ds_first,
4720   ds_signed = ds_first,
4721   ds_unsigned,
4722   ds_short,
4723   ds_long,
4724   ds_const,
4725   ds_volatile,
4726   ds_restrict,
4727   ds_inline,
4728   ds_virtual,
4729   ds_explicit,
4730   ds_friend,
4731   ds_typedef,
4732   ds_alias,
4733   ds_constexpr,
4734   ds_complex,
4735   ds_thread,
4736   ds_type_spec,
4737   ds_redefined_builtin_type_spec,
4738   ds_attribute,
4739   ds_std_attribute,
4740   ds_storage_class,
4741   ds_long_long,
4742   ds_last /* This enumerator must always be the last one.  */
4743 } cp_decl_spec;
4744 
4745 /* A decl-specifier-seq.  */
4746 
4747 typedef struct cp_decl_specifier_seq {
4748   /* An array of locations for the declaration sepecifiers, indexed by
4749      enum cp_decl_spec_word.  */
4750   source_location locations[ds_last];
4751   /* The primary type, if any, given by the decl-specifier-seq.
4752      Modifiers, like "short", "const", and "unsigned" are not
4753      reflected here.  This field will be a TYPE, unless a typedef-name
4754      was used, in which case it will be a TYPE_DECL.  */
4755   tree type;
4756   /* The attributes, if any, provided with the specifier sequence.  */
4757   tree attributes;
4758   /* The c++11 attributes that follows the type specifier.  */
4759   tree std_attributes;
4760   /* If non-NULL, a built-in type that the user attempted to redefine
4761      to some other type.  */
4762   tree redefined_builtin_type;
4763   /* The storage class specified -- or sc_none if no storage class was
4764      explicitly specified.  */
4765   cp_storage_class storage_class;
4766   /* True iff TYPE_SPEC defines a class or enum.  */
4767   BOOL_BITFIELD type_definition_p : 1;
4768   /* True iff multiple types were (erroneously) specified for this
4769      decl-specifier-seq.  */
4770   BOOL_BITFIELD multiple_types_p : 1;
4771   /* True iff multiple storage classes were (erroneously) specified
4772      for this decl-specifier-seq or a combination of a storage class
4773      with a typedef specifier.  */
4774   BOOL_BITFIELD conflicting_specifiers_p : 1;
4775   /* True iff at least one decl-specifier was found.  */
4776   BOOL_BITFIELD any_specifiers_p : 1;
4777   /* True iff at least one type-specifier was found.  */
4778   BOOL_BITFIELD any_type_specifiers_p : 1;
4779   /* True iff "int" was explicitly provided.  */
4780   BOOL_BITFIELD explicit_int_p : 1;
4781   /* True iff "__int128" was explicitly provided.  */
4782   BOOL_BITFIELD explicit_int128_p : 1;
4783   /* True iff "char" was explicitly provided.  */
4784   BOOL_BITFIELD explicit_char_p : 1;
4785   /* True iff ds_thread is set for __thread, not thread_local.  */
4786   BOOL_BITFIELD gnu_thread_keyword_p : 1;
4787 } cp_decl_specifier_seq;
4788 
4789 /* The various kinds of declarators.  */
4790 
4791 typedef enum cp_declarator_kind {
4792   cdk_id,
4793   cdk_function,
4794   cdk_array,
4795   cdk_pointer,
4796   cdk_reference,
4797   cdk_ptrmem,
4798   cdk_error
4799 } cp_declarator_kind;
4800 
4801 /* A declarator.  */
4802 
4803 typedef struct cp_declarator cp_declarator;
4804 
4805 typedef struct cp_parameter_declarator cp_parameter_declarator;
4806 
4807 /* A parameter, before it has been semantically analyzed.  */
4808 struct cp_parameter_declarator {
4809   /* The next parameter, or NULL_TREE if none.  */
4810   cp_parameter_declarator *next;
4811   /* The decl-specifiers-seq for the parameter.  */
4812   cp_decl_specifier_seq decl_specifiers;
4813   /* The declarator for the parameter.  */
4814   cp_declarator *declarator;
4815   /* The default-argument expression, or NULL_TREE, if none.  */
4816   tree default_argument;
4817   /* True iff this is the first parameter in the list and the
4818      parameter sequence ends with an ellipsis.  */
4819   bool ellipsis_p;
4820 };
4821 
4822 /* A declarator.  */
4823 struct cp_declarator {
4824   /* The kind of declarator.  */
4825   ENUM_BITFIELD (cp_declarator_kind) kind : 4;
4826   /* Whether we parsed an ellipsis (`...') just before the declarator,
4827      to indicate this is a parameter pack.  */
4828   BOOL_BITFIELD parameter_pack_p : 1;
4829   location_t id_loc; /* Currently only set for cdk_id and cdk_function. */
4830   /* GNU Attributes that apply to this declarator.  If the declarator
4831      is a pointer or a reference, these attribute apply to the type
4832      pointed to.  */
4833   tree attributes;
4834   /* Standard C++11 attributes that apply to this declarator.  If the
4835      declarator is a pointer or a reference, these attributes apply
4836      to the pointer, rather than to the type pointed to.  */
4837   tree std_attributes;
4838   /* For all but cdk_id and cdk_error, the contained declarator.  For
4839      cdk_id and cdk_error, guaranteed to be NULL.  */
4840   cp_declarator *declarator;
4841   union {
4842     /* For identifiers.  */
4843     struct {
4844       /* If non-NULL, the qualifying scope (a NAMESPACE_DECL or
4845 	 *_TYPE) for this identifier.  */
4846       tree qualifying_scope;
4847       /* The unqualified name of the entity -- an IDENTIFIER_NODE,
4848 	 BIT_NOT_EXPR, or TEMPLATE_ID_EXPR.  */
4849       tree unqualified_name;
4850       /* If this is the name of a function, what kind of special
4851 	 function (if any).  */
4852       special_function_kind sfk;
4853     } id;
4854     /* For functions.  */
4855     struct {
4856       /* The parameters to the function as a TREE_LIST of decl/default.  */
4857       tree parameters;
4858       /* The cv-qualifiers for the function.  */
4859       cp_cv_quals qualifiers;
4860       /* The virt-specifiers for the function.  */
4861       cp_virt_specifiers virt_specifiers;
4862       /* The ref-qualifier for the function.  */
4863       cp_ref_qualifier ref_qualifier;
4864       /* The exception-specification for the function.  */
4865       tree exception_specification;
4866       /* The late-specified return type, if any.  */
4867       tree late_return_type;
4868     } function;
4869     /* For arrays.  */
4870     struct {
4871       /* The bounds to the array.  */
4872       tree bounds;
4873     } array;
4874     /* For cdk_pointer and cdk_ptrmem.  */
4875     struct {
4876       /* The cv-qualifiers for the pointer.  */
4877       cp_cv_quals qualifiers;
4878       /* For cdk_ptrmem, the class type containing the member.  */
4879       tree class_type;
4880     } pointer;
4881     /* For cdk_reference */
4882     struct {
4883       /* The cv-qualifiers for the reference.  These qualifiers are
4884          only used to diagnose ill-formed code.  */
4885       cp_cv_quals qualifiers;
4886       /* Whether this is an rvalue reference */
4887       bool rvalue_ref;
4888     } reference;
4889   } u;
4890 };
4891 
4892 /* A level of template instantiation.  */
4893 struct GTY((chain_next ("%h.next"))) tinst_level {
4894   /* The immediately deeper level in the chain.  */
4895   struct tinst_level *next;
4896 
4897   /* The original node.  Can be either a DECL (for a function or static
4898      data member) or a TYPE (for a class), depending on what we were
4899      asked to instantiate.  */
4900   tree decl;
4901 
4902   /* The location where the template is instantiated.  */
4903   location_t locus;
4904 
4905   /* errorcount+sorrycount when we pushed this level.  */
4906   int errors;
4907 
4908   /* True if the location is in a system header.  */
4909   bool in_system_header_p;
4910 };
4911 
4912 bool decl_spec_seq_has_spec_p (const cp_decl_specifier_seq *, cp_decl_spec);
4913 
4914 /* Return the type of the `this' parameter of FNTYPE.  */
4915 
4916 static inline tree
type_of_this_parm(const_tree fntype)4917 type_of_this_parm (const_tree fntype)
4918 {
4919   function_args_iterator iter;
4920   gcc_assert (TREE_CODE (fntype) == METHOD_TYPE);
4921   function_args_iter_init (&iter, fntype);
4922   return function_args_iter_cond (&iter);
4923 }
4924 
4925 /* Return the class of the `this' parameter of FNTYPE.  */
4926 
4927 static inline tree
class_of_this_parm(const_tree fntype)4928 class_of_this_parm (const_tree fntype)
4929 {
4930   return TREE_TYPE (type_of_this_parm (fntype));
4931 }
4932 
4933 /* A parameter list indicating for a function with no parameters,
4934    e.g  "int f(void)".  */
4935 extern cp_parameter_declarator *no_parameters;
4936 
4937 /* True if we saw "#pragma GCC java_exceptions".  */
4938 extern bool pragma_java_exceptions;
4939 
4940 /* in call.c */
4941 extern bool check_dtor_name			(tree, tree);
4942 
4943 extern tree build_conditional_expr		(tree, tree, tree,
4944                                                  tsubst_flags_t);
4945 extern tree build_addr_func			(tree, tsubst_flags_t);
4946 extern void set_flags_from_callee		(tree);
4947 extern tree build_call_a			(tree, int, tree*);
4948 extern tree build_call_n			(tree, int, ...);
4949 extern bool null_ptr_cst_p			(tree);
4950 extern bool null_member_pointer_value_p		(tree);
4951 extern bool sufficient_parms_p			(const_tree);
4952 extern tree type_decays_to			(tree);
4953 extern tree build_user_type_conversion		(tree, tree, int,
4954 						 tsubst_flags_t);
4955 extern tree build_new_function_call		(tree, vec<tree, va_gc> **, bool,
4956 						 tsubst_flags_t);
4957 extern tree build_operator_new_call		(tree, vec<tree, va_gc> **, tree *,
4958 						 tree *, tree, tree *,
4959 						 tsubst_flags_t);
4960 extern tree build_new_method_call		(tree, tree, vec<tree, va_gc> **,
4961 						 tree, int, tree *,
4962 						 tsubst_flags_t);
4963 extern tree build_special_member_call		(tree, tree, vec<tree, va_gc> **,
4964 						 tree, int, tsubst_flags_t);
4965 extern tree build_new_op			(location_t, enum tree_code,
4966 						 int, tree, tree, tree, tree *,
4967 						 tsubst_flags_t);
4968 extern tree build_op_call			(tree, vec<tree, va_gc> **,
4969 						 tsubst_flags_t);
4970 extern tree build_op_delete_call		(enum tree_code, tree, tree,
4971 						 bool, tree, tree,
4972 						 tsubst_flags_t);
4973 extern bool can_convert				(tree, tree, tsubst_flags_t);
4974 extern bool can_convert_arg			(tree, tree, tree, int,
4975 						 tsubst_flags_t);
4976 extern bool can_convert_arg_bad			(tree, tree, tree, int,
4977 						 tsubst_flags_t);
4978 extern bool enforce_access			(tree, tree, tree,
4979 						 tsubst_flags_t);
4980 extern void push_defarg_context			(tree);
4981 extern void pop_defarg_context			(void);
4982 extern tree convert_default_arg			(tree, tree, tree, int,
4983 						 tsubst_flags_t);
4984 extern tree convert_arg_to_ellipsis		(tree, tsubst_flags_t);
4985 extern tree build_x_va_arg			(source_location, tree, tree);
4986 extern tree cxx_type_promotes_to		(tree);
4987 extern tree type_passed_as			(tree);
4988 extern tree convert_for_arg_passing		(tree, tree, tsubst_flags_t);
4989 extern bool is_properly_derived_from		(tree, tree);
4990 extern tree initialize_reference		(tree, tree, int,
4991 						 tsubst_flags_t);
4992 extern tree extend_ref_init_temps		(tree, tree, vec<tree, va_gc>**);
4993 extern tree make_temporary_var_for_ref_to_temp	(tree, tree);
4994 extern bool type_has_extended_temps		(tree);
4995 extern tree strip_top_quals			(tree);
4996 extern bool reference_related_p			(tree, tree);
4997 extern tree perform_implicit_conversion		(tree, tree, tsubst_flags_t);
4998 extern tree perform_implicit_conversion_flags	(tree, tree, tsubst_flags_t, int);
4999 extern tree build_integral_nontype_arg_conv	(tree, tree, tsubst_flags_t);
5000 extern tree perform_direct_initialization_if_possible (tree, tree, bool,
5001                                                        tsubst_flags_t);
5002 extern tree in_charge_arg_for_name		(tree);
5003 extern tree build_cxx_call			(tree, int, tree *,
5004 						 tsubst_flags_t);
5005 extern bool is_std_init_list			(tree);
5006 extern bool is_list_ctor			(tree);
5007 #ifdef ENABLE_CHECKING
5008 extern void validate_conversion_obstack		(void);
5009 #endif /* ENABLE_CHECKING */
5010 extern void mark_versions_used			(tree);
5011 extern tree get_function_version_dispatcher	(tree);
5012 
5013 /* in class.c */
5014 extern tree build_vfield_ref			(tree, tree);
5015 extern tree build_base_path			(enum tree_code, tree,
5016 						 tree, int, tsubst_flags_t);
5017 extern tree convert_to_base			(tree, tree, bool, bool,
5018 						 tsubst_flags_t);
5019 extern tree convert_to_base_statically		(tree, tree);
5020 extern tree build_vtbl_ref			(tree, tree);
5021 extern tree build_vfn_ref			(tree, tree);
5022 extern tree get_vtable_decl			(tree, int);
5023 extern void resort_type_method_vec		(void *, void *,
5024 						 gt_pointer_operator, void *);
5025 extern bool add_method				(tree, tree, tree);
5026 extern bool currently_open_class		(tree);
5027 extern tree currently_open_derived_class	(tree);
5028 extern tree current_nonlambda_class_type	(void);
5029 extern tree finish_struct			(tree, tree);
5030 extern void finish_struct_1			(tree);
5031 extern int resolves_to_fixed_type_p		(tree, int *);
5032 extern void init_class_processing		(void);
5033 extern int is_empty_class			(tree);
5034 extern bool is_really_empty_class		(tree);
5035 extern void pushclass				(tree);
5036 extern void popclass				(void);
5037 extern void push_nested_class			(tree);
5038 extern void pop_nested_class			(void);
5039 extern int current_lang_depth			(void);
5040 extern void push_lang_context			(tree);
5041 extern void pop_lang_context			(void);
5042 extern tree instantiate_type			(tree, tree, tsubst_flags_t);
5043 extern void print_class_statistics		(void);
5044 extern void build_self_reference		(void);
5045 extern int same_signature_p			(const_tree, const_tree);
5046 extern void maybe_add_class_template_decl_list	(tree, tree, int);
5047 extern void unreverse_member_declarations	(tree);
5048 extern void invalidate_class_lookup_cache	(void);
5049 extern void maybe_note_name_used_in_class	(tree, tree);
5050 extern void note_name_declared_in_class		(tree, tree);
5051 extern tree get_vtbl_decl_for_binfo		(tree);
5052 extern void debug_class				(tree);
5053 extern void debug_thunks			(tree);
5054 extern void set_linkage_according_to_type	(tree, tree);
5055 extern void determine_key_method		(tree);
5056 extern void check_for_override			(tree, tree);
5057 extern void push_class_stack			(void);
5058 extern void pop_class_stack			(void);
5059 extern bool type_has_user_nondefault_constructor (tree);
5060 extern tree in_class_defaulted_default_constructor (tree);
5061 extern bool user_provided_p			(tree);
5062 extern bool type_has_user_provided_constructor  (tree);
5063 extern bool type_has_user_provided_default_constructor (tree);
5064 extern bool vbase_has_user_provided_move_assign (tree);
5065 extern tree default_init_uninitialized_part (tree);
5066 extern bool trivial_default_constructor_is_constexpr (tree);
5067 extern bool type_has_constexpr_default_constructor (tree);
5068 extern bool type_has_virtual_destructor		(tree);
5069 extern bool type_has_move_constructor		(tree);
5070 extern bool type_has_move_assign		(tree);
5071 extern bool type_has_user_declared_move_constructor (tree);
5072 extern bool type_has_user_declared_move_assign(tree);
5073 extern bool type_build_ctor_call		(tree);
5074 extern void explain_non_literal_class		(tree);
5075 extern void defaulted_late_check		(tree);
5076 extern bool defaultable_fn_check		(tree);
5077 extern void fixup_type_variants			(tree);
5078 extern void fixup_attribute_variants		(tree);
5079 extern tree* decl_cloned_function_p		(const_tree, bool);
5080 extern void clone_function_decl			(tree, int);
5081 extern void adjust_clone_args			(tree);
5082 extern void deduce_noexcept_on_destructor       (tree);
5083 extern void insert_late_enum_def_into_classtype_sorted_fields (tree, tree);
5084 extern bool uniquely_derived_from_p             (tree, tree);
5085 extern bool publicly_uniquely_derived_p         (tree, tree);
5086 
5087 /* in cvt.c */
5088 extern tree convert_to_reference		(tree, tree, int, int, tree,
5089 						 tsubst_flags_t);
5090 extern tree convert_from_reference		(tree);
5091 extern tree force_rvalue			(tree, tsubst_flags_t);
5092 extern tree ocp_convert				(tree, tree, int, int,
5093 						 tsubst_flags_t);
5094 extern tree cp_convert				(tree, tree, tsubst_flags_t);
5095 extern tree cp_convert_and_check                (tree, tree, tsubst_flags_t);
5096 extern tree cp_fold_convert			(tree, tree);
5097 extern tree convert_to_void			(tree, impl_conv_void,
5098                                  		 tsubst_flags_t);
5099 extern tree convert_force			(tree, tree, int,
5100 						 tsubst_flags_t);
5101 extern tree build_expr_type_conversion		(int, tree, bool);
5102 extern tree type_promotes_to			(tree);
5103 extern tree perform_qualification_conversions	(tree, tree);
5104 
5105 /* in name-lookup.c */
5106 extern tree pushdecl				(tree);
5107 extern tree pushdecl_maybe_friend		(tree, bool);
5108 extern void maybe_push_cleanup_level		(tree);
5109 extern tree pushtag				(tree, tree, tag_scope);
5110 extern tree make_anon_name			(void);
5111 extern tree pushdecl_top_level_maybe_friend	(tree, bool);
5112 extern tree pushdecl_top_level_and_finish	(tree, tree);
5113 extern tree check_for_out_of_scope_variable	(tree);
5114 extern void print_other_binding_stack		(cp_binding_level *);
5115 extern tree maybe_push_decl			(tree);
5116 extern tree current_decl_namespace		(void);
5117 
5118 /* decl.c */
5119 extern tree poplevel				(int, int, int);
5120 extern void cxx_init_decl_processing		(void);
5121 enum cp_tree_node_structure_enum cp_tree_node_structure
5122 						(union lang_tree_node *);
5123 extern void finish_scope			(void);
5124 extern void push_switch				(tree);
5125 extern void pop_switch				(void);
5126 extern tree make_lambda_name			(void);
5127 extern int decls_match				(tree, tree);
5128 extern tree duplicate_decls			(tree, tree, bool);
5129 extern tree declare_local_label			(tree);
5130 extern tree define_label			(location_t, tree);
5131 extern void check_goto				(tree);
5132 extern bool check_omp_return			(void);
5133 extern tree make_typename_type			(tree, tree, enum tag_types, tsubst_flags_t);
5134 extern tree make_unbound_class_template		(tree, tree, tree, tsubst_flags_t);
5135 extern tree build_library_fn_ptr		(const char *, tree);
5136 extern tree build_cp_library_fn_ptr		(const char *, tree);
5137 extern tree push_library_fn			(tree, tree, tree);
5138 extern tree push_void_library_fn		(tree, tree);
5139 extern tree push_throw_library_fn		(tree, tree);
5140 extern void warn_misplaced_attr_for_class_type  (source_location location,
5141 						 tree class_type);
5142 extern tree check_tag_decl			(cp_decl_specifier_seq *, bool);
5143 extern tree shadow_tag				(cp_decl_specifier_seq *);
5144 extern tree groktypename			(cp_decl_specifier_seq *, const cp_declarator *, bool);
5145 extern tree start_decl				(const cp_declarator *, cp_decl_specifier_seq *, int, tree, tree, tree *);
5146 extern void start_decl_1			(tree, bool);
5147 extern bool check_array_initializer		(tree, tree, tree);
5148 extern void cp_finish_decl			(tree, tree, bool, tree, int);
5149 extern int cp_complete_array_type		(tree *, tree, bool);
5150 extern int cp_complete_array_type_or_error	(tree *, tree, bool, tsubst_flags_t);
5151 extern tree build_ptrmemfunc_type		(tree);
5152 extern tree build_ptrmem_type			(tree, tree);
5153 /* the grokdeclarator prototype is in decl.h */
5154 extern tree build_this_parm			(tree, cp_cv_quals);
5155 extern int copy_fn_p				(const_tree);
5156 extern bool move_fn_p                           (const_tree);
5157 extern bool move_signature_fn_p                 (const_tree);
5158 extern tree get_scope_of_declarator		(const cp_declarator *);
5159 extern void grok_special_member_properties	(tree);
5160 extern int grok_ctor_properties			(const_tree, const_tree);
5161 extern bool grok_op_properties			(tree, bool);
5162 extern tree xref_tag				(enum tag_types, tree, tag_scope, bool);
5163 extern tree xref_tag_from_type			(tree, tree, tag_scope);
5164 extern bool xref_basetypes			(tree, tree);
5165 extern tree start_enum				(tree, tree, tree, bool, bool *);
5166 extern void finish_enum_value_list		(tree);
5167 extern void finish_enum				(tree);
5168 extern void build_enumerator			(tree, tree, tree, location_t);
5169 extern tree lookup_enumerator			(tree, tree);
5170 extern void start_preparsed_function		(tree, tree, int);
5171 extern int start_function			(cp_decl_specifier_seq *, const cp_declarator *, tree);
5172 extern tree begin_function_body			(void);
5173 extern void finish_function_body		(tree);
5174 extern tree outer_curly_brace_block		(tree);
5175 extern tree finish_function			(int);
5176 extern tree grokmethod				(cp_decl_specifier_seq *, const cp_declarator *, tree);
5177 extern void maybe_register_incomplete_var	(tree);
5178 extern void maybe_commonize_var			(tree);
5179 extern void complete_vars			(tree);
5180 extern void finish_stmt				(void);
5181 extern tree static_fn_type			(tree);
5182 extern void revert_static_member_fn		(tree);
5183 extern void fixup_anonymous_aggr		(tree);
5184 extern tree compute_array_index_type		(tree, tree, tsubst_flags_t);
5185 extern tree check_default_argument		(tree, tree, tsubst_flags_t);
5186 typedef int (*walk_namespaces_fn)		(tree, void *);
5187 extern int walk_namespaces			(walk_namespaces_fn,
5188 						 void *);
5189 extern int wrapup_globals_for_namespace		(tree, void *);
5190 extern tree create_implicit_typedef		(tree, tree);
5191 extern int local_variable_p			(const_tree);
5192 extern tree register_dtor_fn			(tree);
5193 extern tmpl_spec_kind current_tmpl_spec_kind	(int);
5194 extern tree cp_fname_init			(const char *, tree *);
5195 extern tree cxx_builtin_function		(tree decl);
5196 extern tree cxx_builtin_function_ext_scope	(tree decl);
5197 extern tree check_elaborated_type_specifier	(enum tag_types, tree, bool);
5198 extern void warn_extern_redeclared_static	(tree, tree);
5199 extern tree cxx_comdat_group			(tree);
5200 extern bool cp_missing_noreturn_ok_p		(tree);
5201 extern void initialize_artificial_var		(tree, vec<constructor_elt, va_gc> *);
5202 extern tree check_var_type			(tree, tree);
5203 extern tree reshape_init                        (tree, tree, tsubst_flags_t);
5204 extern tree next_initializable_field (tree);
5205 
5206 extern bool defer_mark_used_calls;
5207 extern GTY(()) vec<tree, va_gc> *deferred_mark_used_calls;
5208 extern tree finish_case_label			(location_t, tree, tree);
5209 extern tree cxx_maybe_build_cleanup		(tree, tsubst_flags_t);
5210 
5211 /* in decl2.c */
5212 extern bool check_java_method			(tree);
5213 extern tree build_memfn_type			(tree, tree, cp_cv_quals, cp_ref_qualifier);
5214 extern tree build_pointer_ptrmemfn_type	(tree);
5215 extern tree change_return_type			(tree, tree);
5216 extern void maybe_retrofit_in_chrg		(tree);
5217 extern void maybe_make_one_only			(tree);
5218 extern bool vague_linkage_p			(tree);
5219 extern void grokclassfn				(tree, tree,
5220 						 enum overload_flags);
5221 extern tree grok_array_decl			(location_t, tree, tree, bool);
5222 extern tree delete_sanity			(tree, tree, bool, int, tsubst_flags_t);
5223 extern tree check_classfn			(tree, tree, tree);
5224 extern void check_member_template		(tree);
5225 extern tree grokfield (const cp_declarator *, cp_decl_specifier_seq *,
5226 		       tree, bool, tree, tree);
5227 extern tree grokbitfield (const cp_declarator *, cp_decl_specifier_seq *,
5228 			  tree, tree);
5229 extern tree cp_reconstruct_complex_type		(tree, tree);
5230 extern void cplus_decl_attributes		(tree *, tree, int);
5231 extern void finish_anon_union			(tree);
5232 extern void cp_write_global_declarations	(void);
5233 extern tree coerce_new_type			(tree);
5234 extern tree coerce_delete_type			(tree);
5235 extern void comdat_linkage			(tree);
5236 extern void determine_visibility		(tree);
5237 extern void constrain_class_visibility		(tree);
5238 extern void import_export_decl			(tree);
5239 extern tree build_cleanup			(tree);
5240 extern tree build_offset_ref_call_from_tree	(tree, vec<tree, va_gc> **,
5241 						 tsubst_flags_t);
5242 extern bool decl_constant_var_p			(tree);
5243 extern bool decl_maybe_constant_var_p		(tree);
5244 extern void check_default_args			(tree);
5245 extern bool mark_used				(tree);
5246 extern void finish_static_data_member_decl	(tree, tree, bool, tree, int);
5247 extern tree cp_build_parm_decl			(tree, tree);
5248 extern tree get_guard				(tree);
5249 extern tree get_guard_cond			(tree);
5250 extern tree set_guard				(tree);
5251 extern tree get_tls_wrapper_fn			(tree);
5252 extern void mark_needed				(tree);
5253 extern bool decl_needed_p			(tree);
5254 extern void note_vague_linkage_fn		(tree);
5255 extern tree build_artificial_parm		(tree, tree);
5256 extern bool possibly_inlined_p			(tree);
5257 extern int parm_index                           (tree);
5258 
5259 /* in error.c */
5260 extern void init_error				(void);
5261 extern const char *type_as_string		(tree, int);
5262 extern const char *type_as_string_translate	(tree, int);
5263 extern const char *decl_as_string		(tree, int);
5264 extern const char *decl_as_string_translate	(tree, int);
5265 extern const char *decl_as_dwarf_string		(tree, int);
5266 extern const char *expr_as_string		(tree, int);
5267 extern const char *lang_decl_name		(tree, int, bool);
5268 extern const char *lang_decl_dwarf_name		(tree, int, bool);
5269 extern const char *language_to_string		(enum languages);
5270 extern const char *class_key_or_enum_as_string	(tree);
5271 extern void print_instantiation_context		(void);
5272 extern void maybe_warn_variadic_templates       (void);
5273 extern void maybe_warn_cpp0x			(cpp0x_warn_str str);
5274 extern bool pedwarn_cxx98                       (location_t, int, const char *, ...) ATTRIBUTE_GCC_DIAG(3,4);
5275 extern location_t location_of                   (tree);
5276 extern void qualified_name_lookup_error		(tree, tree, tree,
5277 						 location_t);
5278 
5279 /* in except.c */
5280 extern void init_exception_processing		(void);
5281 extern tree expand_start_catch_block		(tree);
5282 extern void expand_end_catch_block		(void);
5283 extern tree build_exc_ptr			(void);
5284 extern tree build_throw				(tree);
5285 extern int nothrow_libfn_p			(const_tree);
5286 extern void check_handlers			(tree);
5287 extern tree finish_noexcept_expr		(tree, tsubst_flags_t);
5288 extern bool expr_noexcept_p			(tree, tsubst_flags_t);
5289 extern void perform_deferred_noexcept_checks	(void);
5290 extern bool nothrow_spec_p			(const_tree);
5291 extern bool type_noexcept_p			(const_tree);
5292 extern bool type_throw_all_p			(const_tree);
5293 extern tree build_noexcept_spec			(tree, int);
5294 extern void choose_personality_routine		(enum languages);
5295 extern tree build_must_not_throw_expr		(tree,tree);
5296 extern tree eh_type_info			(tree);
5297 extern tree begin_eh_spec_block			(void);
5298 extern void finish_eh_spec_block		(tree, tree);
5299 extern tree build_eh_type_type			(tree);
5300 extern tree cp_protect_cleanup_actions		(void);
5301 
5302 /* in expr.c */
5303 extern tree cplus_expand_constant		(tree);
5304 extern tree mark_rvalue_use			(tree);
5305 extern tree mark_lvalue_use			(tree);
5306 extern tree mark_type_use			(tree);
5307 extern void mark_exp_read			(tree);
5308 
5309 /* friend.c */
5310 extern int is_friend				(tree, tree);
5311 extern void make_friend_class			(tree, tree, bool);
5312 extern void add_friend				(tree, tree, bool);
5313 extern tree do_friend				(tree, tree, tree, tree, enum overload_flags, bool);
5314 
5315 /* in init.c */
5316 extern tree expand_member_init			(tree);
5317 extern void emit_mem_initializers		(tree);
5318 extern tree build_aggr_init			(tree, tree, int,
5319                                                  tsubst_flags_t);
5320 extern int is_class_type			(tree, int);
5321 extern tree get_type_value			(tree);
5322 extern tree build_zero_init			(tree, tree, bool);
5323 extern tree build_value_init			(tree, tsubst_flags_t);
5324 extern tree build_value_init_noctor		(tree, tsubst_flags_t);
5325 extern tree build_offset_ref			(tree, tree, bool,
5326 						 tsubst_flags_t);
5327 extern tree build_new				(vec<tree, va_gc> **, tree, tree,
5328 						 vec<tree, va_gc> **, int,
5329                                                  tsubst_flags_t);
5330 extern tree get_temp_regvar			(tree, tree);
5331 extern tree build_vec_init			(tree, tree, tree, bool, int,
5332                                                  tsubst_flags_t);
5333 extern tree build_delete			(tree, tree,
5334 						 special_function_kind,
5335 						 int, int, tsubst_flags_t);
5336 extern void push_base_cleanups			(void);
5337 extern tree build_vec_delete			(tree, tree,
5338 						 special_function_kind, int,
5339 						 tsubst_flags_t);
5340 extern tree create_temporary_var		(tree);
5341 extern void initialize_vtbl_ptrs		(tree);
5342 extern tree build_java_class_ref		(tree);
5343 extern tree integral_constant_value		(tree);
5344 extern tree decl_constant_value_safe	        (tree);
5345 extern int diagnose_uninitialized_cst_or_ref_member (tree, bool, bool);
5346 
5347 /* in lex.c */
5348 extern void cxx_dup_lang_specific_decl		(tree);
5349 extern void yyungetc				(int, int);
5350 
5351 extern tree unqualified_name_lookup_error	(tree);
5352 extern tree unqualified_fn_lookup_error		(tree);
5353 extern tree build_lang_decl			(enum tree_code, tree, tree);
5354 extern tree build_lang_decl_loc			(location_t, enum tree_code, tree, tree);
5355 extern void retrofit_lang_decl			(tree);
5356 extern tree copy_decl				(tree);
5357 extern tree copy_type				(tree);
5358 extern tree cxx_make_type			(enum tree_code);
5359 extern tree make_class_type			(enum tree_code);
5360 extern bool cxx_init				(void);
5361 extern void cxx_finish				(void);
5362 extern bool in_main_input_context		(void);
5363 
5364 /* in method.c */
5365 extern void init_method				(void);
5366 extern tree make_thunk				(tree, bool, tree, tree);
5367 extern void finish_thunk			(tree);
5368 extern void use_thunk				(tree, bool);
5369 extern bool trivial_fn_p			(tree);
5370 extern bool maybe_explain_implicit_delete	(tree);
5371 extern void explain_implicit_non_constexpr	(tree);
5372 extern void deduce_inheriting_ctor		(tree);
5373 extern void synthesize_method			(tree);
5374 extern tree lazily_declare_fn			(special_function_kind,
5375 						 tree);
5376 extern tree skip_artificial_parms_for		(const_tree, tree);
5377 extern int num_artificial_parms_for		(const_tree);
5378 extern tree make_alias_for			(tree, tree);
5379 extern tree get_copy_ctor			(tree, tsubst_flags_t);
5380 extern tree get_copy_assign			(tree);
5381 extern tree get_default_ctor			(tree);
5382 extern tree get_dtor				(tree, tsubst_flags_t);
5383 extern tree locate_ctor				(tree);
5384 extern tree implicitly_declare_fn               (special_function_kind, tree,
5385 						 bool, tree, tree);
5386 
5387 /* In optimize.c */
5388 extern bool maybe_clone_body			(tree);
5389 
5390 /* in pt.c */
5391 extern bool check_template_shadow		(tree);
5392 extern tree get_innermost_template_args		(tree, int);
5393 extern void maybe_begin_member_template_processing (tree);
5394 extern void maybe_end_member_template_processing (void);
5395 extern tree finish_member_template_decl		(tree);
5396 extern void begin_template_parm_list		(void);
5397 extern bool begin_specialization		(void);
5398 extern void reset_specialization		(void);
5399 extern void end_specialization			(void);
5400 extern void begin_explicit_instantiation	(void);
5401 extern void end_explicit_instantiation		(void);
5402 extern tree check_explicit_specialization	(tree, tree, int, int);
5403 extern int num_template_headers_for_class	(tree);
5404 extern void check_template_variable		(tree);
5405 extern tree make_auto				(void);
5406 extern tree do_auto_deduction			(tree, tree, tree);
5407 extern tree type_uses_auto			(tree);
5408 extern void append_type_to_template_for_access_check (tree, tree, tree,
5409 						      location_t);
5410 extern tree splice_late_return_type		(tree, tree);
5411 extern bool is_auto				(const_tree);
5412 extern tree process_template_parm		(tree, location_t, tree,
5413 						 bool, bool);
5414 extern tree end_template_parm_list		(tree);
5415 extern void end_template_decl			(void);
5416 extern tree maybe_update_decl_type		(tree, tree);
5417 extern bool check_default_tmpl_args             (tree, tree, bool, bool, int);
5418 extern tree push_template_decl			(tree);
5419 extern tree push_template_decl_real		(tree, bool);
5420 extern tree add_inherited_template_parms	(tree, tree);
5421 extern bool redeclare_class_template		(tree, tree);
5422 extern tree lookup_template_class		(tree, tree, tree, tree,
5423 						 int, tsubst_flags_t);
5424 extern tree lookup_template_function		(tree, tree);
5425 extern int uses_template_parms			(tree);
5426 extern int uses_template_parms_level		(tree, int);
5427 extern bool in_template_function		(void);
5428 extern tree instantiate_class_template		(tree);
5429 extern tree instantiate_template		(tree, tree, tsubst_flags_t);
5430 extern tree fn_type_unification			(tree, tree, tree,
5431 						 const tree *, unsigned int,
5432 						 tree, unification_kind_t, int,
5433 						 bool);
5434 extern void mark_decl_instantiated		(tree, int);
5435 extern int more_specialized_fn			(tree, tree, int);
5436 extern void do_decl_instantiation		(tree, tree);
5437 extern void do_type_instantiation		(tree, tree, tsubst_flags_t);
5438 extern bool always_instantiate_p		(tree);
5439 extern void maybe_instantiate_noexcept		(tree);
5440 extern tree instantiate_decl			(tree, int, bool);
5441 extern int comp_template_parms			(const_tree, const_tree);
5442 extern bool uses_parameter_packs                (tree);
5443 extern bool template_parameter_pack_p           (const_tree);
5444 extern bool function_parameter_pack_p		(const_tree);
5445 extern bool function_parameter_expanded_from_pack_p (tree, tree);
5446 extern tree make_pack_expansion                 (tree);
5447 extern bool check_for_bare_parameter_packs      (tree);
5448 extern tree build_template_info			(tree, tree);
5449 extern tree get_template_info			(const_tree);
5450 extern vec<qualified_typedef_usage_t, va_gc> *get_types_needing_access_check (tree);
5451 extern int template_class_depth			(tree);
5452 extern int is_specialization_of			(tree, tree);
5453 extern bool is_specialization_of_friend		(tree, tree);
5454 extern tree get_pattern_parm			(tree, tree);
5455 extern int comp_template_args			(tree, tree);
5456 extern tree maybe_process_partial_specialization (tree);
5457 extern tree most_specialized_instantiation	(tree);
5458 extern void print_candidates			(tree);
5459 extern void instantiate_pending_templates	(int);
5460 extern tree tsubst_default_argument		(tree, tree, tree,
5461 						 tsubst_flags_t);
5462 extern tree tsubst (tree, tree, tsubst_flags_t, tree);
5463 extern tree tsubst_copy_and_build		(tree, tree, tsubst_flags_t,
5464 						 tree, bool, bool);
5465 extern tree most_general_template		(tree);
5466 extern tree get_mostly_instantiated_function_type (tree);
5467 extern int problematic_instantiation_changed	(void);
5468 extern void record_last_problematic_instantiation (void);
5469 extern struct tinst_level *current_instantiation(void);
5470 extern tree maybe_get_template_decl_from_type_decl (tree);
5471 extern int processing_template_parmlist;
5472 extern bool dependent_type_p			(tree);
5473 extern bool dependent_scope_p			(tree);
5474 extern bool any_dependent_template_arguments_p  (const_tree);
5475 extern bool dependent_template_p		(tree);
5476 extern bool dependent_template_id_p		(tree, tree);
5477 extern bool type_dependent_expression_p		(tree);
5478 extern bool any_type_dependent_arguments_p      (const vec<tree, va_gc> *);
5479 extern bool any_type_dependent_elements_p       (const_tree);
5480 extern bool type_dependent_expression_p_push	(tree);
5481 extern bool value_dependent_expression_p	(tree);
5482 extern bool instantiation_dependent_expression_p (tree);
5483 extern bool any_value_dependent_elements_p      (const_tree);
5484 extern bool dependent_omp_for_p			(tree, tree, tree, tree);
5485 extern tree resolve_typename_type		(tree, bool);
5486 extern tree template_for_substitution		(tree);
5487 extern tree build_non_dependent_expr		(tree);
5488 extern void make_args_non_dependent		(vec<tree, va_gc> *);
5489 extern bool reregister_specialization		(tree, tree, tree);
5490 extern tree fold_non_dependent_expr		(tree);
5491 extern tree fold_non_dependent_expr_sfinae	(tree, tsubst_flags_t);
5492 extern bool alias_type_or_template_p            (tree);
5493 extern bool alias_template_specialization_p     (const_tree);
5494 extern bool explicit_class_specialization_p     (tree);
5495 extern int push_tinst_level                     (tree);
5496 extern void pop_tinst_level                     (void);
5497 extern struct tinst_level *outermost_tinst_level(void);
5498 extern void init_template_processing		(void);
5499 extern void print_template_statistics		(void);
5500 bool template_template_parameter_p		(const_tree);
5501 bool template_type_parameter_p                  (const_tree);
5502 extern bool primary_template_instantiation_p    (const_tree);
5503 extern tree get_primary_template_innermost_parameters	(const_tree);
5504 extern tree get_template_parms_at_level (tree, int);
5505 extern tree get_template_innermost_arguments	(const_tree);
5506 extern tree get_template_argument_pack_elems	(const_tree);
5507 extern tree get_function_template_decl		(const_tree);
5508 extern tree resolve_nondeduced_context		(tree);
5509 extern hashval_t iterative_hash_template_arg (tree arg, hashval_t val);
5510 
5511 /* in repo.c */
5512 extern void init_repo				(void);
5513 extern int repo_emit_p				(tree);
5514 extern bool repo_export_class_p			(const_tree);
5515 extern void finish_repo				(void);
5516 
5517 /* in rtti.c */
5518 /* A vector of all tinfo decls that haven't been emitted yet.  */
5519 extern GTY(()) vec<tree, va_gc> *unemitted_tinfo_decls;
5520 
5521 extern void init_rtti_processing		(void);
5522 extern tree build_typeid			(tree, tsubst_flags_t);
5523 extern tree get_tinfo_decl			(tree);
5524 extern tree get_typeid				(tree, tsubst_flags_t);
5525 extern tree build_headof			(tree);
5526 extern tree build_dynamic_cast			(tree, tree, tsubst_flags_t);
5527 extern void emit_support_tinfos			(void);
5528 extern bool emit_tinfo_decl			(tree);
5529 
5530 /* in search.c */
5531 extern bool accessible_base_p			(tree, tree, bool);
5532 extern tree lookup_base                         (tree, tree, base_access,
5533 						 base_kind *, tsubst_flags_t);
5534 extern tree dcast_base_hint			(tree, tree);
5535 extern int accessible_p				(tree, tree, bool);
5536 extern int accessible_in_template_p		(tree, tree);
5537 extern tree lookup_field_1			(tree, tree, bool);
5538 extern tree lookup_field			(tree, tree, int, bool);
5539 extern int lookup_fnfields_1			(tree, tree);
5540 extern tree lookup_fnfields_slot		(tree, tree);
5541 extern tree lookup_fnfields_slot_nolazy		(tree, tree);
5542 extern int class_method_index_for_fn		(tree, tree);
5543 extern tree lookup_fnfields			(tree, tree, int);
5544 extern tree lookup_member			(tree, tree, int, bool,
5545 						 tsubst_flags_t);
5546 extern int look_for_overrides			(tree, tree);
5547 extern void get_pure_virtuals			(tree);
5548 extern void maybe_suppress_debug_info		(tree);
5549 extern void note_debug_info_needed		(tree);
5550 extern void print_search_statistics		(void);
5551 extern void reinit_search_statistics		(void);
5552 extern tree current_scope			(void);
5553 extern int at_function_scope_p			(void);
5554 extern bool at_class_scope_p			(void);
5555 extern bool at_namespace_scope_p		(void);
5556 extern tree context_for_name_lookup		(tree);
5557 extern tree lookup_conversions			(tree);
5558 extern tree binfo_from_vbase			(tree);
5559 extern tree binfo_for_vbase			(tree, tree);
5560 extern tree look_for_overrides_here		(tree, tree);
5561 #define dfs_skip_bases ((tree)1)
5562 extern tree dfs_walk_all (tree, tree (*) (tree, void *),
5563 			  tree (*) (tree, void *), void *);
5564 extern tree dfs_walk_once (tree, tree (*) (tree, void *),
5565 			   tree (*) (tree, void *), void *);
5566 extern tree binfo_via_virtual			(tree, tree);
5567 extern tree build_baselink			(tree, tree, tree, tree);
5568 extern tree adjust_result_of_qualified_name_lookup
5569 						(tree, tree, tree);
5570 extern tree copied_binfo			(tree, tree);
5571 extern tree original_binfo			(tree, tree);
5572 extern int shared_member_p			(tree);
5573 
5574 
5575 /* The representation of a deferred access check.  */
5576 
5577 typedef struct GTY(()) deferred_access_check {
5578   /* The base class in which the declaration is referenced. */
5579   tree binfo;
5580   /* The declaration whose access must be checked.  */
5581   tree decl;
5582   /* The declaration that should be used in the error message.  */
5583   tree diag_decl;
5584   /* The location of this access.  */
5585   location_t loc;
5586 } deferred_access_check;
5587 
5588 /* in semantics.c */
5589 extern void push_deferring_access_checks	(deferring_kind);
5590 extern void resume_deferring_access_checks	(void);
5591 extern void stop_deferring_access_checks	(void);
5592 extern void pop_deferring_access_checks		(void);
5593 extern vec<deferred_access_check, va_gc> *get_deferred_access_checks (void);
5594 extern void reopen_deferring_access_checks (vec<deferred_access_check, va_gc> *);
5595 extern void pop_to_parent_deferring_access_checks (void);
5596 extern bool perform_access_checks (vec<deferred_access_check, va_gc> *,
5597 				   tsubst_flags_t);
5598 extern bool perform_deferred_access_checks	(tsubst_flags_t);
5599 extern bool perform_or_defer_access_check	(tree, tree, tree,
5600 						 tsubst_flags_t);
5601 extern int stmts_are_full_exprs_p		(void);
5602 extern void init_cp_semantics			(void);
5603 extern tree do_poplevel				(tree);
5604 extern void add_decl_expr			(tree);
5605 extern tree maybe_cleanup_point_expr_void	(tree);
5606 extern tree finish_expr_stmt			(tree);
5607 extern tree begin_if_stmt			(void);
5608 extern void finish_if_stmt_cond			(tree, tree);
5609 extern tree finish_then_clause			(tree);
5610 extern void begin_else_clause			(tree);
5611 extern void finish_else_clause			(tree);
5612 extern void finish_if_stmt			(tree);
5613 extern tree begin_while_stmt			(void);
5614 extern void finish_while_stmt_cond		(tree, tree);
5615 extern void finish_while_stmt			(tree);
5616 extern tree begin_do_stmt			(void);
5617 extern void finish_do_body			(tree);
5618 extern void finish_do_stmt			(tree, tree);
5619 extern tree finish_return_stmt			(tree);
5620 extern tree begin_for_scope			(tree *);
5621 extern tree begin_for_stmt			(tree, tree);
5622 extern void finish_for_init_stmt		(tree);
5623 extern void finish_for_cond			(tree, tree);
5624 extern void finish_for_expr			(tree, tree);
5625 extern void finish_for_stmt			(tree);
5626 extern tree begin_range_for_stmt		(tree, tree);
5627 extern void finish_range_for_decl		(tree, tree, tree);
5628 extern void finish_range_for_stmt		(tree);
5629 extern tree finish_break_stmt			(void);
5630 extern tree finish_continue_stmt		(void);
5631 extern tree begin_switch_stmt			(void);
5632 extern void finish_switch_cond			(tree, tree);
5633 extern void finish_switch_stmt			(tree);
5634 extern tree finish_goto_stmt			(tree);
5635 extern tree begin_try_block			(void);
5636 extern void finish_try_block			(tree);
5637 extern void finish_handler_sequence		(tree);
5638 extern tree begin_function_try_block		(tree *);
5639 extern void finish_function_try_block		(tree);
5640 extern void finish_function_handler_sequence    (tree, tree);
5641 extern void finish_cleanup_try_block		(tree);
5642 extern tree begin_handler			(void);
5643 extern void finish_handler_parms		(tree, tree);
5644 extern void finish_handler			(tree);
5645 extern void finish_cleanup			(tree, tree);
5646 extern bool literal_type_p (tree);
5647 extern tree register_constexpr_fundef (tree, tree);
5648 extern bool check_constexpr_ctor_body (tree, tree);
5649 extern tree ensure_literal_type_for_constexpr_object (tree);
5650 extern bool potential_constant_expression (tree);
5651 extern bool potential_rvalue_constant_expression (tree);
5652 extern bool require_potential_constant_expression (tree);
5653 extern bool require_potential_rvalue_constant_expression (tree);
5654 extern tree cxx_constant_value (tree);
5655 extern tree maybe_constant_value (tree);
5656 extern tree maybe_constant_init (tree);
5657 extern bool is_sub_constant_expr (tree);
5658 extern bool reduced_constant_expression_p (tree);
5659 extern void explain_invalid_constexpr_fn (tree);
5660 extern vec<tree> cx_error_context (void);
5661 
5662 enum {
5663   BCS_NO_SCOPE = 1,
5664   BCS_TRY_BLOCK = 2,
5665   BCS_FN_BODY = 4
5666 };
5667 extern tree begin_compound_stmt			(unsigned int);
5668 
5669 extern void finish_compound_stmt		(tree);
5670 extern tree finish_asm_stmt			(int, tree, tree, tree, tree,
5671 						 tree);
5672 extern tree finish_label_stmt			(tree);
5673 extern void finish_label_decl			(tree);
5674 extern tree finish_parenthesized_expr		(tree);
5675 extern tree finish_non_static_data_member       (tree, tree, tree);
5676 extern tree begin_stmt_expr			(void);
5677 extern tree finish_stmt_expr_expr		(tree, tree);
5678 extern tree finish_stmt_expr			(tree, bool);
5679 extern tree stmt_expr_value_expr		(tree);
5680 bool empty_expr_stmt_p				(tree);
5681 extern tree perform_koenig_lookup		(tree, vec<tree, va_gc> *, bool,
5682 						 tsubst_flags_t);
5683 extern tree finish_call_expr			(tree, vec<tree, va_gc> **, bool,
5684 						 bool, tsubst_flags_t);
5685 extern tree finish_increment_expr		(tree, enum tree_code);
5686 extern tree finish_this_expr			(void);
5687 extern tree finish_pseudo_destructor_expr       (tree, tree, tree);
5688 extern tree finish_unary_op_expr		(location_t, enum tree_code, tree,
5689 						 tsubst_flags_t);
5690 extern tree finish_compound_literal		(tree, tree, tsubst_flags_t);
5691 extern tree finish_fname			(tree);
5692 extern void finish_translation_unit		(void);
5693 extern tree finish_template_type_parm		(tree, tree);
5694 extern tree finish_template_template_parm       (tree, tree);
5695 extern tree begin_class_definition		(tree);
5696 extern void finish_template_decl		(tree);
5697 extern tree finish_template_type		(tree, tree, int);
5698 extern tree finish_base_specifier		(tree, tree, bool);
5699 extern void finish_member_declaration		(tree);
5700 extern tree finish_id_expression		(tree, tree, tree,
5701 						 cp_id_kind *,
5702 						 bool, bool, bool *,
5703 						 bool, bool, bool, bool,
5704 						 const char **,
5705                                                  location_t);
5706 extern tree finish_typeof			(tree);
5707 extern tree finish_underlying_type	        (tree);
5708 extern tree calculate_bases                     (tree);
5709 extern tree finish_bases                        (tree, bool);
5710 extern tree calculate_direct_bases              (tree);
5711 extern tree finish_offsetof			(tree);
5712 extern void finish_decl_cleanup			(tree, tree);
5713 extern void finish_eh_cleanup			(tree);
5714 extern void emit_associated_thunks		(tree);
5715 extern void finish_mem_initializers		(tree);
5716 extern tree check_template_template_default_arg (tree);
5717 extern bool expand_or_defer_fn_1		(tree);
5718 extern void expand_or_defer_fn			(tree);
5719 extern void add_typedef_to_current_template_for_access_check (tree, tree,
5720 							      location_t);
5721 extern void check_accessibility_of_qualified_id (tree, tree, tree);
5722 extern tree finish_qualified_id_expr		(tree, tree, bool, bool,
5723 						 bool, bool, tsubst_flags_t);
5724 extern void simplify_aggr_init_expr		(tree *);
5725 extern void finalize_nrv			(tree *, tree, tree);
5726 extern void note_decl_for_pch			(tree);
5727 extern tree finish_omp_clauses			(tree);
5728 extern void finish_omp_threadprivate		(tree);
5729 extern tree begin_omp_structured_block		(void);
5730 extern tree finish_omp_structured_block		(tree);
5731 extern tree begin_omp_parallel			(void);
5732 extern tree finish_omp_parallel			(tree, tree);
5733 extern tree begin_omp_task			(void);
5734 extern tree finish_omp_task			(tree, tree);
5735 extern tree finish_omp_for			(location_t, tree, tree,
5736 						 tree, tree, tree, tree, tree);
5737 extern void finish_omp_atomic			(enum tree_code, enum tree_code,
5738 						 tree, tree, tree, tree, tree);
5739 extern void finish_omp_barrier			(void);
5740 extern void finish_omp_flush			(void);
5741 extern void finish_omp_taskwait			(void);
5742 extern tree begin_transaction_stmt		(location_t, tree *, int);
5743 extern void finish_transaction_stmt		(tree, tree, int, tree);
5744 extern tree build_transaction_expr		(location_t, tree, int, tree);
5745 extern void finish_omp_taskyield		(void);
5746 extern bool cxx_omp_create_clause_info		(tree, tree, bool, bool, bool);
5747 extern tree baselink_for_fns                    (tree);
5748 extern void finish_static_assert                (tree, tree, location_t,
5749                                                  bool);
5750 extern tree finish_decltype_type                (tree, bool, tsubst_flags_t);
5751 extern tree finish_trait_expr			(enum cp_trait_kind, tree, tree);
5752 extern tree build_lambda_expr                   (void);
5753 extern tree build_lambda_object			(tree);
5754 extern tree begin_lambda_type                   (tree);
5755 extern tree lambda_capture_field_type		(tree);
5756 extern tree lambda_return_type			(tree);
5757 extern tree lambda_proxy_type			(tree);
5758 extern tree lambda_function			(tree);
5759 extern void apply_deduced_return_type           (tree, tree);
5760 extern tree add_capture                         (tree, tree, tree, bool, bool);
5761 extern tree add_default_capture                 (tree, tree, tree);
5762 extern tree build_capture_proxy			(tree);
5763 extern void insert_capture_proxy		(tree);
5764 extern void insert_pending_capture_proxies	(void);
5765 extern bool is_capture_proxy			(tree);
5766 extern bool is_normal_capture_proxy             (tree);
5767 extern void register_capture_members		(tree);
5768 extern tree lambda_expr_this_capture            (tree);
5769 extern tree maybe_resolve_dummy			(tree);
5770 extern tree nonlambda_method_basetype		(void);
5771 extern void maybe_add_lambda_conv_op            (tree);
5772 extern bool is_lambda_ignored_entity            (tree);
5773 
5774 /* in tree.c */
5775 extern int cp_tree_operand_length		(const_tree);
5776 void cp_free_lang_data 				(tree t);
5777 extern tree force_target_expr			(tree, tree, tsubst_flags_t);
5778 extern tree build_target_expr_with_type		(tree, tree, tsubst_flags_t);
5779 extern void lang_check_failed			(const char *, int,
5780 						 const char *) ATTRIBUTE_NORETURN;
5781 extern tree stabilize_expr			(tree, tree *);
5782 extern void stabilize_call			(tree, tree *);
5783 extern bool stabilize_init			(tree, tree *);
5784 extern tree add_stmt_to_compound		(tree, tree);
5785 extern void init_tree				(void);
5786 extern bool pod_type_p				(const_tree);
5787 extern bool layout_pod_type_p			(const_tree);
5788 extern bool std_layout_type_p			(const_tree);
5789 extern bool trivial_type_p			(const_tree);
5790 extern bool trivially_copyable_p		(const_tree);
5791 extern bool scalarish_type_p			(const_tree);
5792 extern bool type_has_nontrivial_default_init	(const_tree);
5793 extern bool type_has_nontrivial_copy_init	(const_tree);
5794 extern bool class_tmpl_impl_spec_p		(const_tree);
5795 extern int zero_init_p				(const_tree);
5796 extern bool check_abi_tag_redeclaration		(const_tree, const_tree, const_tree);
5797 extern tree strip_typedefs			(tree);
5798 extern tree strip_typedefs_expr			(tree);
5799 extern tree copy_binfo				(tree, tree, tree,
5800 						 tree *, int);
5801 extern int member_p				(const_tree);
5802 extern cp_lvalue_kind real_lvalue_p		(const_tree);
5803 extern cp_lvalue_kind lvalue_kind		(const_tree);
5804 extern bool lvalue_or_rvalue_with_address_p	(const_tree);
5805 extern bool xvalue_p	                        (const_tree);
5806 extern bool builtin_valid_in_constant_expr_p    (const_tree);
5807 extern tree build_min				(enum tree_code, tree, ...);
5808 extern tree build_min_nt_loc			(location_t, enum tree_code,
5809 						 ...);
5810 extern tree build_min_non_dep			(enum tree_code, tree, ...);
5811 extern tree build_min_non_dep_call_vec		(tree, tree, vec<tree, va_gc> *);
5812 extern tree build_cplus_new			(tree, tree, tsubst_flags_t);
5813 extern tree build_aggr_init_expr		(tree, tree);
5814 extern tree get_target_expr			(tree);
5815 extern tree get_target_expr_sfinae		(tree, tsubst_flags_t);
5816 extern tree build_cplus_array_type		(tree, tree);
5817 extern tree build_array_of_n_type		(tree, int);
5818 extern tree build_array_copy			(tree);
5819 extern tree build_vec_init_expr			(tree, tree, tsubst_flags_t);
5820 extern void diagnose_non_constexpr_vec_init	(tree);
5821 extern tree hash_tree_cons			(tree, tree, tree);
5822 extern tree hash_tree_chain			(tree, tree);
5823 extern tree build_qualified_name		(tree, tree, tree, bool);
5824 extern tree build_ref_qualified_type		(tree, cp_ref_qualifier);
5825 extern int is_overloaded_fn			(tree);
5826 extern tree dependent_name			(tree);
5827 extern tree get_fns				(tree);
5828 extern tree get_first_fn			(tree);
5829 extern tree ovl_cons				(tree, tree);
5830 extern tree build_overload			(tree, tree);
5831 extern tree ovl_scope				(tree);
5832 extern bool non_static_member_function_p        (tree);
5833 extern const char *cxx_printable_name		(tree, int);
5834 extern const char *cxx_printable_name_translate	(tree, int);
5835 extern tree build_exception_variant		(tree, tree);
5836 extern tree bind_template_template_parm		(tree, tree);
5837 extern tree array_type_nelts_total		(tree);
5838 extern tree array_type_nelts_top		(tree);
5839 extern tree break_out_target_exprs		(tree);
5840 extern tree get_type_decl			(tree);
5841 extern tree decl_namespace_context		(tree);
5842 extern bool decl_anon_ns_mem_p			(const_tree);
5843 extern tree lvalue_type				(tree);
5844 extern tree error_type				(tree);
5845 extern int varargs_function_p			(const_tree);
5846 extern bool really_overloaded_fn		(tree);
5847 extern bool cp_tree_equal			(tree, tree);
5848 extern tree no_linkage_check			(tree, bool);
5849 extern void debug_binfo				(tree);
5850 extern tree build_dummy_object			(tree);
5851 extern tree maybe_dummy_object			(tree, tree *);
5852 extern int is_dummy_object			(const_tree);
5853 extern const struct attribute_spec cxx_attribute_table[];
5854 extern tree make_ptrmem_cst			(tree, tree);
5855 extern tree cp_build_type_attribute_variant     (tree, tree);
5856 extern tree cp_build_reference_type		(tree, bool);
5857 extern tree move				(tree);
5858 extern tree cp_build_qualified_type_real	(tree, int, tsubst_flags_t);
5859 #define cp_build_qualified_type(TYPE, QUALS) \
5860   cp_build_qualified_type_real ((TYPE), (QUALS), tf_warning_or_error)
5861 extern bool cv_qualified_p			(const_tree);
5862 extern tree cv_unqualified			(tree);
5863 extern special_function_kind special_function_p (const_tree);
5864 extern int count_trees				(tree);
5865 extern int char_type_p				(tree);
5866 extern void verify_stmt_tree			(tree);
5867 extern linkage_kind decl_linkage		(tree);
5868 extern duration_kind decl_storage_duration	(tree);
5869 extern tree cp_walk_subtrees (tree*, int*, walk_tree_fn,
5870 			      void*, struct pointer_set_t*);
5871 #define cp_walk_tree(tp,func,data,pset) \
5872 	walk_tree_1 (tp, func, data, pset, cp_walk_subtrees)
5873 #define cp_walk_tree_without_duplicates(tp,func,data) \
5874 	walk_tree_without_duplicates_1 (tp, func, data, cp_walk_subtrees)
5875 extern tree fold_if_not_in_template		(tree);
5876 extern tree rvalue				(tree);
5877 extern tree convert_bitfield_to_declared_type   (tree);
5878 extern tree cp_save_expr			(tree);
5879 extern bool cast_valid_in_integral_constant_expression_p (tree);
5880 extern bool cxx_type_hash_eq			(const_tree, const_tree);
5881 
5882 extern void cxx_print_statistics		(void);
5883 extern bool maybe_warn_zero_as_null_pointer_constant (tree, location_t);
5884 
5885 /* in ptree.c */
5886 extern void cxx_print_xnode			(FILE *, tree, int);
5887 extern void cxx_print_decl			(FILE *, tree, int);
5888 extern void cxx_print_type			(FILE *, tree, int);
5889 extern void cxx_print_identifier		(FILE *, tree, int);
5890 extern void cxx_print_error_function		(diagnostic_context *,
5891 						 const char *,
5892 						 struct diagnostic_info *);
5893 
5894 /* in typeck.c */
5895 extern bool cxx_mark_addressable		(tree);
5896 extern int string_conv_p			(const_tree, const_tree, int);
5897 extern tree cp_truthvalue_conversion		(tree);
5898 extern tree condition_conversion		(tree);
5899 extern tree require_complete_type		(tree);
5900 extern tree require_complete_type_sfinae	(tree, tsubst_flags_t);
5901 extern tree complete_type			(tree);
5902 extern tree complete_type_or_else		(tree, tree);
5903 extern tree complete_type_or_maybe_complain	(tree, tree, tsubst_flags_t);
5904 extern int type_unknown_p			(const_tree);
5905 enum { ce_derived, ce_normal, ce_exact };
5906 extern bool comp_except_specs			(const_tree, const_tree, int);
5907 extern bool comptypes				(tree, tree, int);
5908 extern bool same_type_ignoring_top_level_qualifiers_p (tree, tree);
5909 extern bool compparms				(const_tree, const_tree);
5910 extern int comp_cv_qualification		(const_tree, const_tree);
5911 extern int comp_cv_qual_signature		(tree, tree);
5912 extern tree cxx_sizeof_or_alignof_expr		(tree, enum tree_code, bool);
5913 extern tree cxx_sizeof_or_alignof_type		(tree, enum tree_code, bool);
5914 extern tree cxx_alignas_expr                    (tree);
5915 extern tree cxx_sizeof_nowarn                   (tree);
5916 extern tree is_bitfield_expr_with_lowered_type  (const_tree);
5917 extern tree unlowered_expr_type                 (const_tree);
5918 extern tree decay_conversion			(tree, tsubst_flags_t);
5919 extern tree build_class_member_access_expr      (tree, tree, tree, bool,
5920 						 tsubst_flags_t);
5921 extern tree finish_class_member_access_expr     (tree, tree, bool,
5922 						 tsubst_flags_t);
5923 extern tree build_x_indirect_ref		(location_t, tree,
5924 						 ref_operator, tsubst_flags_t);
5925 extern tree cp_build_indirect_ref		(tree, ref_operator,
5926                                                  tsubst_flags_t);
5927 extern tree build_array_ref			(location_t, tree, tree);
5928 extern tree cp_build_array_ref			(location_t, tree, tree,
5929 						 tsubst_flags_t);
5930 extern tree get_member_function_from_ptrfunc	(tree *, tree, tsubst_flags_t);
5931 extern tree cp_build_function_call              (tree, tree, tsubst_flags_t);
5932 extern tree cp_build_function_call_nary         (tree, tsubst_flags_t, ...)
5933 						ATTRIBUTE_SENTINEL;
5934 extern tree cp_build_function_call_vec		(tree, vec<tree, va_gc> **,
5935 						 tsubst_flags_t);
5936 extern tree build_x_binary_op			(location_t,
5937 						 enum tree_code, tree,
5938 						 enum tree_code, tree,
5939 						 enum tree_code, tree *,
5940 						 tsubst_flags_t);
5941 extern tree build_x_array_ref			(location_t, tree, tree,
5942 						 tsubst_flags_t);
5943 extern tree build_x_unary_op			(location_t,
5944 						 enum tree_code, tree,
5945                                                  tsubst_flags_t);
5946 extern tree cp_build_addr_expr			(tree, tsubst_flags_t);
5947 extern tree cp_build_addr_expr_strict		(tree, tsubst_flags_t);
5948 extern tree cp_build_unary_op                   (enum tree_code, tree, int,
5949                                                  tsubst_flags_t);
5950 extern tree unary_complex_lvalue		(enum tree_code, tree);
5951 extern tree build_x_conditional_expr		(location_t, tree, tree, tree,
5952                                                  tsubst_flags_t);
5953 extern tree build_x_compound_expr_from_list	(tree, expr_list_kind,
5954 						 tsubst_flags_t);
5955 extern tree build_x_compound_expr_from_vec	(vec<tree, va_gc> *,
5956 						 const char *, tsubst_flags_t);
5957 extern tree build_x_compound_expr		(location_t, tree, tree,
5958 						 tsubst_flags_t);
5959 extern tree build_compound_expr                 (location_t, tree, tree);
5960 extern tree cp_build_compound_expr		(tree, tree, tsubst_flags_t);
5961 extern tree build_static_cast			(tree, tree, tsubst_flags_t);
5962 extern tree build_reinterpret_cast		(tree, tree, tsubst_flags_t);
5963 extern tree build_const_cast			(tree, tree, tsubst_flags_t);
5964 extern tree build_c_cast			(location_t, tree, tree);
5965 extern tree cp_build_c_cast			(tree, tree, tsubst_flags_t);
5966 extern tree build_x_modify_expr			(location_t, tree,
5967 						 enum tree_code, tree,
5968 						 tsubst_flags_t);
5969 extern tree cp_build_modify_expr		(tree, enum tree_code, tree,
5970 						 tsubst_flags_t);
5971 extern tree convert_for_initialization		(tree, tree, tree, int,
5972 						 impl_conv_rhs, tree, int,
5973                                                  tsubst_flags_t);
5974 extern int comp_ptr_ttypes			(tree, tree);
5975 extern bool comp_ptr_ttypes_const		(tree, tree);
5976 extern bool error_type_p			(const_tree);
5977 extern int ptr_reasonably_similar		(const_tree, const_tree);
5978 extern tree build_ptrmemfunc			(tree, tree, int, bool,
5979 						 tsubst_flags_t);
5980 extern int cp_type_quals			(const_tree);
5981 extern int type_memfn_quals			(const_tree);
5982 extern cp_ref_qualifier type_memfn_rqual	(const_tree);
5983 extern tree apply_memfn_quals			(tree, cp_cv_quals, cp_ref_qualifier);
5984 extern bool cp_has_mutable_p			(const_tree);
5985 extern bool at_least_as_qualified_p		(const_tree, const_tree);
5986 extern void cp_apply_type_quals_to_decl		(int, tree);
5987 extern tree build_ptrmemfunc1			(tree, tree, tree);
5988 extern void expand_ptrmemfunc_cst		(tree, tree *, tree *);
5989 extern tree type_after_usual_arithmetic_conversions (tree, tree);
5990 extern tree common_pointer_type                 (tree, tree);
5991 extern tree composite_pointer_type		(tree, tree, tree, tree,
5992 						 composite_pointer_operation,
5993 						 tsubst_flags_t);
5994 extern tree merge_types				(tree, tree);
5995 extern tree strip_array_domain			(tree);
5996 extern tree check_return_expr			(tree, bool *);
5997 extern tree cp_build_binary_op                  (location_t,
5998 						 enum tree_code, tree, tree,
5999 						 tsubst_flags_t);
6000 #define cxx_sizeof(T)  cxx_sizeof_or_alignof_type (T, SIZEOF_EXPR, true)
6001 extern tree build_ptrmemfunc_access_expr	(tree, tree);
6002 extern tree build_address			(tree);
6003 extern tree build_typed_address			(tree, tree);
6004 extern tree build_nop				(tree, tree);
6005 extern tree non_reference			(tree);
6006 extern tree lookup_anon_field			(tree, tree);
6007 extern bool invalid_nonstatic_memfn_p		(const_tree, tsubst_flags_t);
6008 extern tree convert_member_func_to_ptr		(tree, tree, tsubst_flags_t);
6009 extern tree convert_ptrmem			(tree, tree, bool, bool,
6010 						 tsubst_flags_t);
6011 extern int lvalue_or_else			(tree, enum lvalue_use,
6012                                                  tsubst_flags_t);
6013 extern void check_template_keyword		(tree);
6014 extern bool check_raw_literal_operator		(const_tree decl);
6015 extern bool check_literal_operator_args		(const_tree, bool *, bool *);
6016 extern void maybe_warn_about_useless_cast       (tree, tree, tsubst_flags_t);
6017 extern tree cp_perform_integral_promotions      (tree, tsubst_flags_t);
6018 
6019 /* in typeck2.c */
6020 extern void require_complete_eh_spec_types	(tree, tree);
6021 extern void cxx_incomplete_type_diagnostic	(const_tree, const_tree, diagnostic_t);
6022 #undef cxx_incomplete_type_error
6023 extern void cxx_incomplete_type_error		(const_tree, const_tree);
6024 #define cxx_incomplete_type_error(V,T) \
6025   (cxx_incomplete_type_diagnostic ((V), (T), DK_ERROR))
6026 extern tree error_not_base_type			(tree, tree);
6027 extern tree binfo_or_else			(tree, tree);
6028 extern void cxx_readonly_error			(tree, enum lvalue_use);
6029 extern void complete_type_check_abstract	(tree);
6030 extern int abstract_virtuals_error		(tree, tree);
6031 extern int abstract_virtuals_error_sfinae	(tree, tree, tsubst_flags_t);
6032 
6033 extern tree store_init_value			(tree, tree, vec<tree, va_gc>**, int);
6034 extern void check_narrowing			(tree, tree);
6035 extern tree digest_init				(tree, tree, tsubst_flags_t);
6036 extern tree digest_init_flags			(tree, tree, int);
6037 extern tree build_scoped_ref			(tree, tree, tree *);
6038 extern tree build_x_arrow			(location_t, tree,
6039 						 tsubst_flags_t);
6040 extern tree build_m_component_ref		(tree, tree, tsubst_flags_t);
6041 extern tree build_functional_cast		(tree, tree, tsubst_flags_t);
6042 extern tree add_exception_specifier		(tree, tree, int);
6043 extern tree merge_exception_specifiers		(tree, tree, tree);
6044 
6045 /* in mangle.c */
6046 extern void init_mangle				(void);
6047 extern void mangle_decl				(tree);
6048 extern const char *mangle_type_string		(tree);
6049 extern tree mangle_typeinfo_for_type		(tree);
6050 extern tree mangle_typeinfo_string_for_type	(tree);
6051 extern tree mangle_vtbl_for_type		(tree);
6052 extern tree mangle_vtt_for_type			(tree);
6053 extern tree mangle_ctor_vtbl_for_type		(tree, tree);
6054 extern tree mangle_thunk			(tree, int, tree, tree);
6055 extern tree mangle_conv_op_name_for_type	(tree);
6056 extern tree mangle_guard_variable		(tree);
6057 extern tree mangle_tls_init_fn			(tree);
6058 extern tree mangle_tls_wrapper_fn		(tree);
6059 extern bool decl_tls_wrapper_p			(tree);
6060 extern tree mangle_ref_init_variable		(tree);
6061 
6062 /* in dump.c */
6063 extern bool cp_dump_tree			(void *, tree);
6064 
6065 /* In cp/cp-objcp-common.c.  */
6066 
6067 extern alias_set_type cxx_get_alias_set		(tree);
6068 extern bool cxx_warn_unused_global_decl		(const_tree);
6069 extern size_t cp_tree_size			(enum tree_code);
6070 extern bool cp_var_mod_type_p			(tree, tree);
6071 extern void cxx_initialize_diagnostics		(diagnostic_context *);
6072 extern int cxx_types_compatible_p		(tree, tree);
6073 extern void init_shadowed_var_for_decl		(void);
6074 extern bool cxx_block_may_fallthru		(const_tree);
6075 
6076 /* in cp-gimplify.c */
6077 extern int cp_gimplify_expr			(tree *, gimple_seq *,
6078 						 gimple_seq *);
6079 extern void cp_genericize			(tree);
6080 extern bool cxx_omp_const_qual_no_mutable	(tree);
6081 extern enum omp_clause_default_kind cxx_omp_predetermined_sharing (tree);
6082 extern tree cxx_omp_clause_default_ctor		(tree, tree, tree);
6083 extern tree cxx_omp_clause_copy_ctor		(tree, tree, tree);
6084 extern tree cxx_omp_clause_assign_op		(tree, tree, tree);
6085 extern tree cxx_omp_clause_dtor			(tree, tree);
6086 extern void cxx_omp_finish_clause		(tree);
6087 extern bool cxx_omp_privatize_by_reference	(const_tree);
6088 
6089 /* in name-lookup.c */
6090 extern void suggest_alternatives_for            (location_t, tree);
6091 extern tree strip_using_decl                    (tree);
6092 
6093 /* -- end of C++ */
6094 
6095 #endif /* ! GCC_CP_TREE_H */
6096