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