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  Free Software Foundation, Inc.
4   Contributed by Michael Tiemann (tiemann@cygnus.com)
5
6This file is part of GCC.
7
8GCC is free software; you can redistribute it and/or modify
9it under the terms of the GNU General Public License as published by
10the Free Software Foundation; either version 2, or (at your option)
11any later version.
12
13GCC is distributed in the hope that it will be useful,
14but WITHOUT ANY WARRANTY; without even the implied warranty of
15MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16GNU General Public License for more details.
17
18You should have received a copy of the GNU General Public License
19along with GCC; see the file COPYING.  If not, write to
20the Free Software Foundation, 51 Franklin Street, Fifth Floor,
21Boston, MA 02110-1301, USA.  */
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 "splay-tree.h"
30#include "vec.h"
31#include "varray.h"
32#include "c-common.h"
33#include "name-lookup.h"
34struct diagnostic_context;
35
36/* Usage of TREE_LANG_FLAG_?:
37   0: IDENTIFIER_MARKED (IDENTIFIER_NODEs)
38      NEW_EXPR_USE_GLOBAL (in NEW_EXPR).
39      DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR).
40      COMPOUND_EXPR_OVERLOADED (in COMPOUND_EXPR).
41      TREE_INDIRECT_USING (in NAMESPACE_DECL).
42      CLEANUP_P (in TRY_BLOCK)
43      AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR)
44      PTRMEM_OK_P (in ADDR_EXPR, OFFSET_REF)
45      PAREN_STRING_LITERAL (in STRING_CST)
46      DECL_PRETTY_FUNCTION_P (in VAR_DECL)
47      KOENIG_LOOKUP_P (in CALL_EXPR)
48      STATEMENT_LIST_NO_SCOPE (in STATEMENT_LIST).
49      EXPR_STMT_STMT_EXPR_RESULT (in EXPR_STMT)
50      STMT_EXPR_NO_SCOPE (in STMT_EXPR)
51      BIND_EXPR_TRY_BLOCK (in BIND_EXPR)
52      TYPENAME_IS_ENUM_P (in TYPENAME_TYPE)
53      REFERENCE_REF_P (in INDIRECT_EXPR)
54      QUALIFIED_NAME_IS_TEMPLATE (in SCOPE_REF)
55      OMP_ATOMIC_DEPENDENT_P (in OMP_ATOMIC)
56      OMP_FOR_GIMPLIFYING_P (in OMP_FOR)
57      BASELINK_QUALIFIED_P (in BASELINK)
58      TARGET_EXPR_IMPLICIT_P (in TARGET_EXPR)
59   1: IDENTIFIER_VIRTUAL_P (in IDENTIFIER_NODE)
60      TI_PENDING_TEMPLATE_FLAG.
61      TEMPLATE_PARMS_FOR_INLINE.
62      DELETE_EXPR_USE_VEC (in DELETE_EXPR).
63      (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out).
64      ICS_ELLIPSIS_FLAG (in _CONV)
65      DECL_INITIALIZED_P (in VAR_DECL)
66      TYPENAME_IS_CLASS_P (in TYPENAME_TYPE)
67      STMT_IS_FULL_EXPR_P (in _STMT)
68   2: IDENTIFIER_OPNAME_P (in IDENTIFIER_NODE)
69      ICS_THIS_FLAG (in _CONV)
70      DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (in VAR_DECL)
71      STATEMENT_LIST_TRY_BLOCK (in STATEMENT_LIST)
72   3: (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out).
73      ICS_BAD_FLAG (in _CONV)
74      FN_TRY_BLOCK_P (in TRY_BLOCK)
75      IDENTIFIER_CTOR_OR_DTOR_P (in IDENTIFIER_NODE)
76      BIND_EXPR_BODY_BLOCK (in BIND_EXPR)
77      DECL_NON_TRIVIALLY_INITIALIZED_P (in VAR_DECL)
78   4: TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR,
79	  or FIELD_DECL).
80      IDENTIFIER_TYPENAME_P (in IDENTIFIER_NODE)
81      DECL_TINFO_P (in VAR_DECL)
82   5: C_IS_RESERVED_WORD (in IDENTIFIER_NODE)
83      DECL_VTABLE_OR_VTT_P (in VAR_DECL)
84   6: IDENTIFIER_REPO_CHOSEN (in IDENTIFIER_NODE)
85      DECL_CONSTRUCTION_VTABLE_P (in VAR_DECL)
86      TYPE_MARKED_P (in _TYPE)
87
88   Usage of TYPE_LANG_FLAG_?:
89   0: TYPE_DEPENDENT_P
90   1: TYPE_HAS_CONSTRUCTOR.
91   2: Unused
92   3: TYPE_FOR_JAVA.
93   4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR
94   5: IS_AGGR_TYPE.
95   6: TYPE_DEPENDENT_P_VALID
96
97   Usage of DECL_LANG_FLAG_?:
98   0: DECL_ERROR_REPORTED (in VAR_DECL).
99      DECL_TEMPLATE_PARM_P (in PARM_DECL, CONST_DECL, TYPE_DECL, or TEMPLATE_DECL)
100      DECL_LOCAL_FUNCTION_P (in FUNCTION_DECL)
101      DECL_MUTABLE_P (in FIELD_DECL)
102      DECL_DEPENDENT_P (in USING_DECL)
103   1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL).
104      DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL)
105      DECL_MEMBER_TEMPLATE_P (in TEMPLATE_DECL)
106   2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL).
107      DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL)
108   3: DECL_IN_AGGR_P.
109   4: DECL_C_BIT_FIELD (in a FIELD_DECL)
110      DECL_ANON_UNION_VAR_P (in a VAR_DECL)
111      DECL_SELF_REFERENCE_P (in a TYPE_DECL)
112      DECL_INVALID_OVERRIDER_P (in a FUNCTION_DECL)
113   5: DECL_INTERFACE_KNOWN.
114   6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL).
115      DECL_FIELD_IS_BASE (in FIELD_DECL)
116   7: DECL_DEAD_FOR_LOCAL (in VAR_DECL).
117      DECL_THUNK_P (in a member FUNCTION_DECL)
118
119   Usage of language-independent fields in a language-dependent manner:
120
121   TYPE_ALIAS_SET
122     This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so
123     forth as a substitute for the mark bits provided in `lang_type'.
124     At present, only the six low-order bits are used.
125
126   TYPE_LANG_SLOT_1
127     For an ENUMERAL_TYPE, this is ENUM_TEMPLATE_INFO.
128     For a FUNCTION_TYPE or METHOD_TYPE, this is TYPE_RAISES_EXCEPTIONS
129
130  BINFO_VIRTUALS
131     For a binfo, this is a TREE_LIST.  There is an entry for each
132     virtual function declared either in BINFO or its direct and
133     indirect primary bases.
134
135     The BV_DELTA of each node gives the amount by which to adjust the
136     `this' pointer when calling the function.  If the method is an
137     overridden version of a base class method, then it is assumed
138     that, prior to adjustment, the this pointer points to an object
139     of the base class.
140
141     The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable
142     index of the vcall offset for this entry.
143
144     The BV_FN is the declaration for the virtual function itself.
145
146   BINFO_VTABLE
147     This is an expression with POINTER_TYPE that gives the value
148     to which the vptr should be initialized.  Use get_vtbl_decl_for_binfo
149     to extract the VAR_DECL for the complete vtable.
150
151   DECL_ARGUMENTS
152     For a VAR_DECL this is DECL_ANON_UNION_ELEMS.
153
154   DECL_VINDEX
155     This field is NULL for a non-virtual function.  For a virtual
156     function, it is eventually set to an INTEGER_CST indicating the
157     index in the vtable at which this function can be found.  When
158     a virtual function is declared, but before it is known what
159     function is overridden, this field is the error_mark_node.
160
161     Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is
162     the virtual function this one overrides, and whose TREE_CHAIN is
163     the old DECL_VINDEX.  */
164
165/* Language-specific tree checkers.  */
166
167#define VAR_OR_FUNCTION_DECL_CHECK(NODE) \
168  TREE_CHECK2(NODE,VAR_DECL,FUNCTION_DECL)
169
170#define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) \
171  TREE_CHECK3(NODE,VAR_DECL,FUNCTION_DECL,PARM_DECL)
172
173#define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) \
174  TREE_CHECK4(NODE,VAR_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL)
175
176#define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE) \
177  TREE_CHECK(NODE,BOUND_TEMPLATE_TEMPLATE_PARM)
178
179#if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
180#define NON_THUNK_FUNCTION_CHECK(NODE) __extension__			\
181({  const tree __t = (NODE);						\
182    if (TREE_CODE (__t) != FUNCTION_DECL &&				\
183	TREE_CODE (__t) != TEMPLATE_DECL && __t->decl_common.lang_specific	\
184	&& __t->decl_common.lang_specific->decl_flags.thunk_p)			\
185      tree_check_failed (__t, __FILE__, __LINE__, __FUNCTION__, 0);	\
186    __t; })
187#define THUNK_FUNCTION_CHECK(NODE) __extension__			\
188({  const tree __t = (NODE);						\
189    if (TREE_CODE (__t) != FUNCTION_DECL || !__t->decl_common.lang_specific	\
190	|| !__t->decl_common.lang_specific->decl_flags.thunk_p)		\
191      tree_check_failed (__t, __FILE__, __LINE__, __FUNCTION__, 0);	\
192     __t; })
193#else
194#define NON_THUNK_FUNCTION_CHECK(NODE) (NODE)
195#define THUNK_FUNCTION_CHECK(NODE) (NODE)
196#endif
197
198/* Language-dependent contents of an identifier.  */
199
200struct lang_identifier GTY(())
201{
202  struct c_common_identifier c_common;
203  cxx_binding *namespace_bindings;
204  cxx_binding *bindings;
205  tree class_template_info;
206  tree label_value;
207};
208
209/* In an IDENTIFIER_NODE, nonzero if this identifier is actually a
210   keyword.  C_RID_CODE (node) is then the RID_* value of the keyword,
211   and C_RID_YYCODE is the token number wanted by Yacc.  */
212
213#define C_IS_RESERVED_WORD(ID) TREE_LANG_FLAG_5 (ID)
214
215#define LANG_IDENTIFIER_CAST(NODE) \
216	((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE))
217
218struct template_parm_index_s GTY(())
219{
220  struct tree_common common;
221  HOST_WIDE_INT index;
222  HOST_WIDE_INT level;
223  HOST_WIDE_INT orig_level;
224  tree decl;
225};
226typedef struct template_parm_index_s template_parm_index;
227
228struct tinst_level_s GTY(())
229{
230  struct tree_common common;
231  tree decl;
232  location_t locus;
233  int in_system_header_p;
234};
235typedef struct tinst_level_s * tinst_level_t;
236
237struct ptrmem_cst GTY(())
238{
239  struct tree_common common;
240  /* This isn't used, but the middle-end expects all constants to have
241     this field.  */
242  rtx rtl;
243  tree member;
244};
245typedef struct ptrmem_cst * ptrmem_cst_t;
246
247#define IDENTIFIER_GLOBAL_VALUE(NODE) \
248  namespace_binding ((NODE), global_namespace)
249#define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \
250  set_namespace_binding ((NODE), global_namespace, (VAL))
251#define IDENTIFIER_NAMESPACE_VALUE(NODE) \
252  namespace_binding ((NODE), current_namespace)
253#define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \
254  set_namespace_binding ((NODE), current_namespace, (VAL))
255
256#define CLEANUP_P(NODE)		TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE))
257
258#define BIND_EXPR_TRY_BLOCK(NODE) \
259  TREE_LANG_FLAG_0 (BIND_EXPR_CHECK (NODE))
260
261/* Used to mark the block around the member initializers and cleanups.  */
262#define BIND_EXPR_BODY_BLOCK(NODE) \
263  TREE_LANG_FLAG_3 (BIND_EXPR_CHECK (NODE))
264#define FUNCTION_NEEDS_BODY_BLOCK(NODE) \
265  (DECL_CONSTRUCTOR_P (NODE) || DECL_DESTRUCTOR_P (NODE))
266
267#define STATEMENT_LIST_NO_SCOPE(NODE) \
268  TREE_LANG_FLAG_0 (STATEMENT_LIST_CHECK (NODE))
269#define STATEMENT_LIST_TRY_BLOCK(NODE) \
270  TREE_LANG_FLAG_2 (STATEMENT_LIST_CHECK (NODE))
271
272/* Nonzero if this statement should be considered a full-expression,
273   i.e., if temporaries created during this statement should have
274   their destructors run at the end of this statement.  */
275#define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE))
276
277/* Marks the result of a statement expression.  */
278#define EXPR_STMT_STMT_EXPR_RESULT(NODE) \
279  TREE_LANG_FLAG_0 (EXPR_STMT_CHECK (NODE))
280
281/* Nonzero if this statement-expression does not have an associated scope.  */
282#define STMT_EXPR_NO_SCOPE(NODE) \
283   TREE_LANG_FLAG_0 (STMT_EXPR_CHECK (NODE))
284
285/* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual
286   sense of `same'.  */
287#define same_type_p(TYPE1, TYPE2) \
288  comptypes ((TYPE1), (TYPE2), COMPARE_STRICT)
289
290/* Returns nonzero iff TYPE1 and TYPE2 are the same type, ignoring
291   top-level qualifiers.  */
292#define same_type_ignoring_top_level_qualifiers_p(TYPE1, TYPE2) \
293  same_type_p (TYPE_MAIN_VARIANT (TYPE1), TYPE_MAIN_VARIANT (TYPE2))
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
306/* The overloaded FUNCTION_DECL.  */
307#define OVL_FUNCTION(NODE) \
308  (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function)
309#define OVL_CHAIN(NODE)      TREE_CHAIN (NODE)
310/* Polymorphic access to FUNCTION and CHAIN.  */
311#define OVL_CURRENT(NODE)	\
312  ((TREE_CODE (NODE) == OVERLOAD) ? OVL_FUNCTION (NODE) : (NODE))
313#define OVL_NEXT(NODE)		\
314  ((TREE_CODE (NODE) == OVERLOAD) ? TREE_CHAIN (NODE) : NULL_TREE)
315/* If set, this was imported in a using declaration.
316   This is not to confuse with being used somewhere, which
317   is not important for this node.  */
318#define OVL_USED(NODE)		TREE_USED (NODE)
319
320struct tree_overload GTY(())
321{
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/* Non-zero if this baselink was from a qualified lookup.  */
349#define BASELINK_QUALIFIED_P(NODE) \
350  TREE_LANG_FLAG_0 (BASELINK_CHECK (NODE))
351
352struct tree_baselink GTY(())
353{
354  struct tree_common common;
355  tree binfo;
356  tree functions;
357  tree access_binfo;
358};
359
360/* The different kinds of ids that we encounter.  */
361
362typedef enum cp_id_kind
363{
364  /* Not an id at all.  */
365  CP_ID_KIND_NONE,
366  /* An unqualified-id that is not a template-id.  */
367  CP_ID_KIND_UNQUALIFIED,
368  /* An unqualified-id that is a dependent name.  */
369  CP_ID_KIND_UNQUALIFIED_DEPENDENT,
370  /* An unqualified template-id.  */
371  CP_ID_KIND_TEMPLATE_ID,
372  /* A qualified-id.  */
373  CP_ID_KIND_QUALIFIED
374} cp_id_kind;
375
376/* Macros for access to language-specific slots in an identifier.  */
377
378#define IDENTIFIER_NAMESPACE_BINDINGS(NODE)	\
379  (LANG_IDENTIFIER_CAST (NODE)->namespace_bindings)
380#define IDENTIFIER_TEMPLATE(NODE)	\
381  (LANG_IDENTIFIER_CAST (NODE)->class_template_info)
382
383/* The IDENTIFIER_BINDING is the innermost cxx_binding for the
384    identifier.  It's PREVIOUS is the next outermost binding.  Each
385    VALUE field is a DECL for the associated declaration.  Thus,
386    name lookup consists simply of pulling off the node at the front
387    of the list (modulo oddities for looking up the names of types,
388    and such.)  You can use SCOPE field to determine the scope
389    that bound the name.  */
390#define IDENTIFIER_BINDING(NODE) \
391  (LANG_IDENTIFIER_CAST (NODE)->bindings)
392
393/* TREE_TYPE only indicates on local and class scope the current
394   type. For namespace scope, the presence of a type in any namespace
395   is indicated with global_type_node, and the real type behind must
396   be found through lookup.  */
397#define IDENTIFIER_TYPE_VALUE(NODE) identifier_type_value (NODE)
398#define REAL_IDENTIFIER_TYPE_VALUE(NODE) TREE_TYPE (NODE)
399#define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = (TYPE))
400#define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0)
401
402#define IDENTIFIER_LABEL_VALUE(NODE) \
403  (LANG_IDENTIFIER_CAST (NODE)->label_value)
404#define SET_IDENTIFIER_LABEL_VALUE(NODE, VALUE)   \
405  IDENTIFIER_LABEL_VALUE (NODE) = (VALUE)
406
407/* Nonzero if this identifier is used as a virtual function name somewhere
408   (optimizes searches).  */
409#define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1 (NODE)
410
411/* Nonzero if this identifier is the prefix for a mangled C++ operator
412   name.  */
413#define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2 (NODE)
414
415/* Nonzero if this identifier is the name of a type-conversion
416   operator.  */
417#define IDENTIFIER_TYPENAME_P(NODE) \
418  TREE_LANG_FLAG_4 (NODE)
419
420/* Nonzero if this identifier is the name of a constructor or
421   destructor.  */
422#define IDENTIFIER_CTOR_OR_DTOR_P(NODE) \
423  TREE_LANG_FLAG_3 (NODE)
424
425/* True iff NAME is the DECL_ASSEMBLER_NAME for an entity with vague
426   linkage which the prelinker has assigned to this translation
427   unit.  */
428#define IDENTIFIER_REPO_CHOSEN(NAME) \
429  (TREE_LANG_FLAG_6 (NAME))
430
431/* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only.  */
432#define C_TYPE_FIELDS_READONLY(TYPE) \
433  (LANG_TYPE_CLASS_CHECK (TYPE)->fields_readonly)
434
435/* The tokens stored in the default argument.  */
436
437#define DEFARG_TOKENS(NODE) \
438  (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->tokens)
439#define DEFARG_INSTANTIATIONS(NODE) \
440  (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->instantiations)
441
442struct tree_default_arg GTY (())
443{
444  struct tree_common common;
445  struct cp_token_cache *tokens;
446  VEC(tree,gc) *instantiations;
447};
448
449enum cp_tree_node_structure_enum {
450  TS_CP_GENERIC,
451  TS_CP_IDENTIFIER,
452  TS_CP_TPI,
453  TS_CP_TINST_LEVEL,
454  TS_CP_PTRMEM,
455  TS_CP_BINDING,
456  TS_CP_OVERLOAD,
457  TS_CP_BASELINK,
458  TS_CP_WRAPPER,
459  TS_CP_DEFAULT_ARG,
460  LAST_TS_CP_ENUM
461};
462
463/* The resulting tree type.  */
464union lang_tree_node GTY((desc ("cp_tree_node_structure (&%h)"),
465       chain_next ("(union lang_tree_node *)TREE_CHAIN (&%h.generic)")))
466{
467  union tree_node GTY ((tag ("TS_CP_GENERIC"),
468			desc ("tree_node_structure (&%h)"))) generic;
469  struct template_parm_index_s GTY ((tag ("TS_CP_TPI"))) tpi;
470  struct tinst_level_s GTY ((tag ("TS_CP_TINST_LEVEL"))) tinst_level;
471  struct ptrmem_cst GTY ((tag ("TS_CP_PTRMEM"))) ptrmem;
472  struct tree_overload GTY ((tag ("TS_CP_OVERLOAD"))) overload;
473  struct tree_baselink GTY ((tag ("TS_CP_BASELINK"))) baselink;
474  struct tree_default_arg GTY ((tag ("TS_CP_DEFAULT_ARG"))) default_arg;
475  struct lang_identifier GTY ((tag ("TS_CP_IDENTIFIER"))) identifier;
476};
477
478
479enum cp_tree_index
480{
481    CPTI_JAVA_BYTE_TYPE,
482    CPTI_JAVA_SHORT_TYPE,
483    CPTI_JAVA_INT_TYPE,
484    CPTI_JAVA_LONG_TYPE,
485    CPTI_JAVA_FLOAT_TYPE,
486    CPTI_JAVA_DOUBLE_TYPE,
487    CPTI_JAVA_CHAR_TYPE,
488    CPTI_JAVA_BOOLEAN_TYPE,
489
490    CPTI_WCHAR_DECL,
491    CPTI_VTABLE_ENTRY_TYPE,
492    CPTI_DELTA_TYPE,
493    CPTI_VTABLE_INDEX_TYPE,
494    CPTI_CLEANUP_TYPE,
495    CPTI_VTT_PARM_TYPE,
496
497    CPTI_CLASS_TYPE,
498    CPTI_UNKNOWN_TYPE,
499    CPTI_VTBL_TYPE,
500    CPTI_VTBL_PTR_TYPE,
501    CPTI_STD,
502    CPTI_ABI,
503    CPTI_CONST_TYPE_INFO_TYPE,
504    CPTI_TYPE_INFO_PTR_TYPE,
505    CPTI_ABORT_FNDECL,
506    CPTI_GLOBAL_DELETE_FNDECL,
507    CPTI_AGGR_TAG,
508
509    CPTI_CTOR_IDENTIFIER,
510    CPTI_COMPLETE_CTOR_IDENTIFIER,
511    CPTI_BASE_CTOR_IDENTIFIER,
512    CPTI_DTOR_IDENTIFIER,
513    CPTI_COMPLETE_DTOR_IDENTIFIER,
514    CPTI_BASE_DTOR_IDENTIFIER,
515    CPTI_DELETING_DTOR_IDENTIFIER,
516    CPTI_DELTA_IDENTIFIER,
517    CPTI_IN_CHARGE_IDENTIFIER,
518    CPTI_VTT_PARM_IDENTIFIER,
519    CPTI_NELTS_IDENTIFIER,
520    CPTI_THIS_IDENTIFIER,
521    CPTI_PFN_IDENTIFIER,
522    CPTI_VPTR_IDENTIFIER,
523    CPTI_STD_IDENTIFIER,
524
525    CPTI_LANG_NAME_C,
526    CPTI_LANG_NAME_CPLUSPLUS,
527    CPTI_LANG_NAME_JAVA,
528
529    CPTI_EMPTY_EXCEPT_SPEC,
530    CPTI_JCLASS,
531    CPTI_TERMINATE,
532    CPTI_CALL_UNEXPECTED,
533    CPTI_ATEXIT,
534    CPTI_DSO_HANDLE,
535    CPTI_DCAST,
536
537    CPTI_KEYED_CLASSES,
538
539    CPTI_MAX
540};
541
542extern GTY(()) tree cp_global_trees[CPTI_MAX];
543
544#define java_byte_type_node		cp_global_trees[CPTI_JAVA_BYTE_TYPE]
545#define java_short_type_node		cp_global_trees[CPTI_JAVA_SHORT_TYPE]
546#define java_int_type_node		cp_global_trees[CPTI_JAVA_INT_TYPE]
547#define java_long_type_node		cp_global_trees[CPTI_JAVA_LONG_TYPE]
548#define java_float_type_node		cp_global_trees[CPTI_JAVA_FLOAT_TYPE]
549#define java_double_type_node		cp_global_trees[CPTI_JAVA_DOUBLE_TYPE]
550#define java_char_type_node		cp_global_trees[CPTI_JAVA_CHAR_TYPE]
551#define java_boolean_type_node		cp_global_trees[CPTI_JAVA_BOOLEAN_TYPE]
552
553#define wchar_decl_node			cp_global_trees[CPTI_WCHAR_DECL]
554#define vtable_entry_type		cp_global_trees[CPTI_VTABLE_ENTRY_TYPE]
555/* The type used to represent an offset by which to adjust the `this'
556   pointer in pointer-to-member types.  */
557#define delta_type_node			cp_global_trees[CPTI_DELTA_TYPE]
558/* The type used to represent an index into the vtable.  */
559#define vtable_index_type		cp_global_trees[CPTI_VTABLE_INDEX_TYPE]
560
561#define class_type_node			cp_global_trees[CPTI_CLASS_TYPE]
562#define unknown_type_node		cp_global_trees[CPTI_UNKNOWN_TYPE]
563#define vtbl_type_node			cp_global_trees[CPTI_VTBL_TYPE]
564#define vtbl_ptr_type_node		cp_global_trees[CPTI_VTBL_PTR_TYPE]
565#define std_node			cp_global_trees[CPTI_STD]
566#define abi_node			cp_global_trees[CPTI_ABI]
567#define const_type_info_type_node	cp_global_trees[CPTI_CONST_TYPE_INFO_TYPE]
568#define type_info_ptr_type		cp_global_trees[CPTI_TYPE_INFO_PTR_TYPE]
569#define abort_fndecl			cp_global_trees[CPTI_ABORT_FNDECL]
570#define global_delete_fndecl		cp_global_trees[CPTI_GLOBAL_DELETE_FNDECL]
571#define current_aggr			cp_global_trees[CPTI_AGGR_TAG]
572
573/* We cache these tree nodes so as to call get_identifier less
574   frequently.  */
575
576/* The name of a constructor that takes an in-charge parameter to
577   decide whether or not to construct virtual base classes.  */
578#define ctor_identifier			cp_global_trees[CPTI_CTOR_IDENTIFIER]
579/* The name of a constructor that constructs virtual base classes.  */
580#define complete_ctor_identifier	cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER]
581/* The name of a constructor that does not construct virtual base classes.  */
582#define base_ctor_identifier		cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER]
583/* The name of a destructor that takes an in-charge parameter to
584   decide whether or not to destroy virtual base classes and whether
585   or not to delete the object.  */
586#define dtor_identifier			cp_global_trees[CPTI_DTOR_IDENTIFIER]
587/* The name of a destructor that destroys virtual base classes.  */
588#define complete_dtor_identifier	cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER]
589/* The name of a destructor that does not destroy virtual base
590   classes.  */
591#define base_dtor_identifier		cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER]
592/* The name of a destructor that destroys virtual base classes, and
593   then deletes the entire object.  */
594#define deleting_dtor_identifier	cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER]
595#define delta_identifier		cp_global_trees[CPTI_DELTA_IDENTIFIER]
596#define in_charge_identifier		cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER]
597/* The name of the parameter that contains a pointer to the VTT to use
598   for this subobject constructor or destructor.  */
599#define vtt_parm_identifier		cp_global_trees[CPTI_VTT_PARM_IDENTIFIER]
600#define nelts_identifier		cp_global_trees[CPTI_NELTS_IDENTIFIER]
601#define this_identifier			cp_global_trees[CPTI_THIS_IDENTIFIER]
602#define pfn_identifier			cp_global_trees[CPTI_PFN_IDENTIFIER]
603#define vptr_identifier			cp_global_trees[CPTI_VPTR_IDENTIFIER]
604/* The name of the std namespace.  */
605#define std_identifier			cp_global_trees[CPTI_STD_IDENTIFIER]
606#define lang_name_c			cp_global_trees[CPTI_LANG_NAME_C]
607#define lang_name_cplusplus		cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS]
608#define lang_name_java			cp_global_trees[CPTI_LANG_NAME_JAVA]
609
610/* Exception specifier used for throw().  */
611#define empty_except_spec		cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC]
612
613/* If non-NULL, a POINTER_TYPE equivalent to (java::lang::Class*).  */
614#define jclass_node			cp_global_trees[CPTI_JCLASS]
615
616/* The declaration for `std::terminate'.  */
617#define terminate_node			cp_global_trees[CPTI_TERMINATE]
618
619/* The declaration for "__cxa_call_unexpected".  */
620#define call_unexpected_node		cp_global_trees[CPTI_CALL_UNEXPECTED]
621
622/* A pointer to `std::atexit'.  */
623#define atexit_node			cp_global_trees[CPTI_ATEXIT]
624
625/* A pointer to `__dso_handle'.  */
626#define dso_handle_node			cp_global_trees[CPTI_DSO_HANDLE]
627
628/* The declaration of the dynamic_cast runtime.  */
629#define dynamic_cast_node		cp_global_trees[CPTI_DCAST]
630
631/* The type of a destructor.  */
632#define cleanup_type			cp_global_trees[CPTI_CLEANUP_TYPE]
633
634/* The type of the vtt parameter passed to subobject constructors and
635   destructors.  */
636#define vtt_parm_type			cp_global_trees[CPTI_VTT_PARM_TYPE]
637
638/* A TREE_LIST of the dynamic classes whose vtables may have to be
639   emitted in this translation unit.  */
640
641#define keyed_classes			cp_global_trees[CPTI_KEYED_CLASSES]
642
643/* Node to indicate default access. This must be distinct from the
644   access nodes in tree.h.  */
645
646#define access_default_node		null_node
647
648/* Global state.  */
649
650struct saved_scope GTY(())
651{
652  VEC(cxx_saved_binding,gc) *old_bindings;
653  tree old_namespace;
654  tree decl_ns_list;
655  tree class_name;
656  tree class_type;
657  tree access_specifier;
658  tree function_decl;
659  VEC(tree,gc) *lang_base;
660  tree lang_name;
661  tree template_parms;
662  struct cp_binding_level *x_previous_class_level;
663  tree x_saved_tree;
664
665  HOST_WIDE_INT x_processing_template_decl;
666  int x_processing_specialization;
667  bool x_processing_explicit_instantiation;
668  int need_pop_function_context;
669  bool skip_evaluation;
670
671  struct stmt_tree_s x_stmt_tree;
672
673  struct cp_binding_level *class_bindings;
674  struct cp_binding_level *bindings;
675
676  struct saved_scope *prev;
677};
678
679/* The current open namespace.  */
680
681#define current_namespace scope_chain->old_namespace
682
683/* The stack for namespaces of current declarations.  */
684
685#define decl_namespace_list scope_chain->decl_ns_list
686
687/* IDENTIFIER_NODE: name of current class */
688
689#define current_class_name scope_chain->class_name
690
691/* _TYPE: the type of the current class */
692
693#define current_class_type scope_chain->class_type
694
695/* When parsing a class definition, the access specifier most recently
696   given by the user, or, if no access specifier was given, the
697   default value appropriate for the kind of class (i.e., struct,
698   class, or union).  */
699
700#define current_access_specifier scope_chain->access_specifier
701
702/* Pointer to the top of the language name stack.  */
703
704#define current_lang_base scope_chain->lang_base
705#define current_lang_name scope_chain->lang_name
706
707/* Parsing a function declarator leaves a list of parameter names
708   or a chain or parameter decls here.  */
709
710#define current_template_parms scope_chain->template_parms
711
712#define processing_template_decl scope_chain->x_processing_template_decl
713#define processing_specialization scope_chain->x_processing_specialization
714#define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation
715
716/* The cached class binding level, from the most recently exited
717   class, or NULL if none.  */
718
719#define previous_class_level scope_chain->x_previous_class_level
720
721/* A list of private types mentioned, for deferred access checking.  */
722
723extern GTY(()) struct saved_scope *scope_chain;
724
725struct cxx_int_tree_map GTY(())
726{
727  unsigned int uid;
728  tree to;
729};
730
731extern unsigned int cxx_int_tree_map_hash (const void *);
732extern int cxx_int_tree_map_eq (const void *, const void *);
733
734/* Global state pertinent to the current function.  */
735
736struct language_function GTY(())
737{
738  struct c_language_function base;
739
740  tree x_cdtor_label;
741  tree x_current_class_ptr;
742  tree x_current_class_ref;
743  tree x_eh_spec_block;
744  tree x_in_charge_parm;
745  tree x_vtt_parm;
746  tree x_return_value;
747
748  int returns_value;
749  int returns_null;
750  int returns_abnormally;
751  int in_function_try_handler;
752  int in_base_initializer;
753
754  /* True if this function can throw an exception.  */
755  BOOL_BITFIELD can_throw : 1;
756
757  htab_t GTY((param_is(struct named_label_entry))) x_named_labels;
758  struct cp_binding_level *bindings;
759  VEC(tree,gc) *x_local_names;
760  htab_t GTY((param_is (struct cxx_int_tree_map))) extern_decl_map;
761};
762
763/* The current C++-specific per-function global variables.  */
764
765#define cp_function_chain (cfun->language)
766
767/* In a constructor destructor, the point at which all derived class
768   destroying/construction has been has been done. Ie. just before a
769   constructor returns, or before any base class destroying will be done
770   in a destructor.  */
771
772#define cdtor_label cp_function_chain->x_cdtor_label
773
774/* When we're processing a member function, current_class_ptr is the
775   PARM_DECL for the `this' pointer.  The current_class_ref is an
776   expression for `*this'.  */
777
778#define current_class_ptr \
779  (cfun ? cp_function_chain->x_current_class_ptr : NULL_TREE)
780#define current_class_ref \
781  (cfun ? cp_function_chain->x_current_class_ref : NULL_TREE)
782
783/* The EH_SPEC_BLOCK for the exception-specifiers for the current
784   function, if any.  */
785
786#define current_eh_spec_block cp_function_chain->x_eh_spec_block
787
788/* The `__in_chrg' parameter for the current function.  Only used for
789   constructors and destructors.  */
790
791#define current_in_charge_parm cp_function_chain->x_in_charge_parm
792
793/* The `__vtt_parm' parameter for the current function.  Only used for
794   constructors and destructors.  */
795
796#define current_vtt_parm cp_function_chain->x_vtt_parm
797
798/* Set to 0 at beginning of a function definition, set to 1 if
799   a return statement that specifies a return value is seen.  */
800
801#define current_function_returns_value cp_function_chain->returns_value
802
803/* Set to 0 at beginning of a function definition, set to 1 if
804   a return statement with no argument is seen.  */
805
806#define current_function_returns_null cp_function_chain->returns_null
807
808/* Set to 0 at beginning of a function definition, set to 1 if
809   a call to a noreturn function is seen.  */
810
811#define current_function_returns_abnormally \
812  cp_function_chain->returns_abnormally
813
814/* Nonzero if we are processing a base initializer.  Zero elsewhere.  */
815#define in_base_initializer cp_function_chain->in_base_initializer
816
817#define in_function_try_handler cp_function_chain->in_function_try_handler
818
819/* Expression always returned from function, or error_mark_node
820   otherwise, for use by the automatic named return value optimization.  */
821
822#define current_function_return_value \
823  (cp_function_chain->x_return_value)
824
825/* True if NAME is the IDENTIFIER_NODE for an overloaded "operator
826   new" or "operator delete".  */
827#define NEW_DELETE_OPNAME_P(NAME)		\
828  ((NAME) == ansi_opname (NEW_EXPR)		\
829   || (NAME) == ansi_opname (VEC_NEW_EXPR)	\
830   || (NAME) == ansi_opname (DELETE_EXPR)	\
831   || (NAME) == ansi_opname (VEC_DELETE_EXPR))
832
833#define ansi_opname(CODE) \
834  (operator_name_info[(int) (CODE)].identifier)
835#define ansi_assopname(CODE) \
836  (assignment_operator_name_info[(int) (CODE)].identifier)
837
838/* True if NODE is an erroneous expression.  */
839
840#define error_operand_p(NODE)					\
841  ((NODE) == error_mark_node					\
842   || ((NODE) && TREE_TYPE ((NODE)) == error_mark_node))
843
844/* C++ language-specific tree codes.  */
845#define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
846enum cplus_tree_code {
847  CP_DUMMY_TREE_CODE = LAST_C_TREE_CODE,
848#include "cp-tree.def"
849  LAST_CPLUS_TREE_CODE
850};
851#undef DEFTREECODE
852
853/* TRUE if a tree code represents a statement.  */
854extern bool statement_code_p[MAX_TREE_CODES];
855
856#define STATEMENT_CODE_P(CODE) statement_code_p[(int) (CODE)]
857
858enum languages { lang_c, lang_cplusplus, lang_java };
859
860/* Macros to make error reporting functions' lives easier.  */
861#define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE)))
862#define TYPE_LINKAGE_IDENTIFIER(NODE) \
863  (TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (NODE)))
864#define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
865#define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
866
867/* Nonzero if NODE has no name for linkage purposes.  */
868#define TYPE_ANONYMOUS_P(NODE) \
869  (TAGGED_TYPE_P (NODE) && ANON_AGGRNAME_P (TYPE_LINKAGE_IDENTIFIER (NODE)))
870
871/* The _DECL for this _TYPE.  */
872#define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
873
874/* Nonzero if T is a class (or struct or union) type.  Also nonzero
875   for template type parameters, typename types, and instantiated
876   template template parameters.  Despite its name,
877   this macro has nothing to do with the definition of aggregate given
878   in the standard.  Think of this macro as MAYBE_CLASS_TYPE_P.  Keep
879   these checks in ascending code order.  */
880#define IS_AGGR_TYPE(T)					\
881  (TREE_CODE (T) == TEMPLATE_TYPE_PARM			\
882   || TREE_CODE (T) == TYPENAME_TYPE			\
883   || TREE_CODE (T) == TYPEOF_TYPE			\
884   || TREE_CODE (T) == BOUND_TEMPLATE_TEMPLATE_PARM	\
885   || TYPE_LANG_FLAG_5 (T))
886
887/* Set IS_AGGR_TYPE for T to VAL.  T must be a class, struct, or
888   union type.  */
889#define SET_IS_AGGR_TYPE(T, VAL) \
890  (TYPE_LANG_FLAG_5 (T) = (VAL))
891
892/* Nonzero if T is a class type.  Zero for template type parameters,
893   typename types, and so forth.  */
894#define CLASS_TYPE_P(T) \
895  (IS_AGGR_TYPE_CODE (TREE_CODE (T)) && TYPE_LANG_FLAG_5 (T))
896
897/* Keep these checks in ascending code order.  */
898#define IS_AGGR_TYPE_CODE(T)	\
899  ((T) == RECORD_TYPE || (T) == UNION_TYPE)
900#define TAGGED_TYPE_P(T) \
901  (CLASS_TYPE_P (T) || TREE_CODE (T) == ENUMERAL_TYPE)
902#define IS_OVERLOAD_TYPE(T) TAGGED_TYPE_P (T)
903
904/* True if this a "Java" type, defined in 'extern "Java"'.  */
905#define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3 (NODE)
906
907/* True if this type is dependent.  This predicate is only valid if
908   TYPE_DEPENDENT_P_VALID is true.  */
909#define TYPE_DEPENDENT_P(NODE) TYPE_LANG_FLAG_0 (NODE)
910
911/* True if dependent_type_p has been called for this type, with the
912   result that TYPE_DEPENDENT_P is valid.  */
913#define TYPE_DEPENDENT_P_VALID(NODE) TYPE_LANG_FLAG_6(NODE)
914
915/* Nonzero if this type is const-qualified.  */
916#define CP_TYPE_CONST_P(NODE)				\
917  ((cp_type_quals (NODE) & TYPE_QUAL_CONST) != 0)
918
919/* Nonzero if this type is volatile-qualified.  */
920#define CP_TYPE_VOLATILE_P(NODE)			\
921  ((cp_type_quals (NODE) & TYPE_QUAL_VOLATILE) != 0)
922
923/* Nonzero if this type is restrict-qualified.  */
924#define CP_TYPE_RESTRICT_P(NODE)			\
925  ((cp_type_quals (NODE) & TYPE_QUAL_RESTRICT) != 0)
926
927/* Nonzero if this type is const-qualified, but not
928   volatile-qualified.  Other qualifiers are ignored.  This macro is
929   used to test whether or not it is OK to bind an rvalue to a
930   reference.  */
931#define CP_TYPE_CONST_NON_VOLATILE_P(NODE)				\
932  ((cp_type_quals (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE))	\
933   == TYPE_QUAL_CONST)
934
935#define FUNCTION_ARG_CHAIN(NODE) \
936  TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE)))
937
938/* Given a FUNCTION_DECL, returns the first TREE_LIST out of TYPE_ARG_TYPES
939   which refers to a user-written parameter.  */
940#define FUNCTION_FIRST_USER_PARMTYPE(NODE) \
941  skip_artificial_parms_for ((NODE), TYPE_ARG_TYPES (TREE_TYPE (NODE)))
942
943/* Similarly, but for DECL_ARGUMENTS.  */
944#define FUNCTION_FIRST_USER_PARM(NODE) \
945  skip_artificial_parms_for ((NODE), DECL_ARGUMENTS (NODE))
946
947#define PROMOTES_TO_AGGR_TYPE(NODE, CODE)	\
948  (((CODE) == TREE_CODE (NODE)			\
949    && IS_AGGR_TYPE (TREE_TYPE (NODE)))		\
950   || IS_AGGR_TYPE (NODE))
951
952/* Nonzero iff TYPE is derived from PARENT. Ignores accessibility and
953   ambiguity issues.  */
954#define DERIVED_FROM_P(PARENT, TYPE) \
955  (lookup_base ((TYPE), (PARENT), ba_any, NULL) != NULL_TREE)
956/* Nonzero iff TYPE is uniquely derived from PARENT. Ignores
957   accessibility.  */
958#define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) \
959  (lookup_base ((TYPE), (PARENT), ba_unique | ba_quiet, NULL) != NULL_TREE)
960/* Nonzero iff TYPE is publicly & uniquely derived from PARENT.  */
961#define PUBLICLY_UNIQUELY_DERIVED_P(PARENT, TYPE) \
962  (lookup_base ((TYPE), (PARENT), ba_ignore_scope | ba_check | ba_quiet, \
963		NULL) != NULL_TREE)
964
965/* Gives the visibility specification for a class type.  */
966#define CLASSTYPE_VISIBILITY(TYPE)		\
967	DECL_VISIBILITY (TYPE_NAME (TYPE))
968#define CLASSTYPE_VISIBILITY_SPECIFIED(TYPE)	\
969	DECL_VISIBILITY_SPECIFIED (TYPE_NAME (TYPE))
970
971typedef struct tree_pair_s GTY (())
972{
973  tree purpose;
974  tree value;
975} tree_pair_s;
976typedef tree_pair_s *tree_pair_p;
977DEF_VEC_O (tree_pair_s);
978DEF_VEC_ALLOC_O (tree_pair_s,gc);
979
980/* This is a few header flags for 'struct lang_type'.  Actually,
981   all but the first are used only for lang_type_class; they
982   are put in this structure to save space.  */
983struct lang_type_header GTY(())
984{
985  BOOL_BITFIELD is_lang_type_class : 1;
986
987  BOOL_BITFIELD has_type_conversion : 1;
988  BOOL_BITFIELD has_init_ref : 1;
989  BOOL_BITFIELD has_default_ctor : 1;
990  BOOL_BITFIELD const_needs_init : 1;
991  BOOL_BITFIELD ref_needs_init : 1;
992  BOOL_BITFIELD has_const_assign_ref : 1;
993
994  BOOL_BITFIELD spare : 1;
995};
996
997/* This structure provides additional information above and beyond
998   what is provide in the ordinary tree_type.  In the past, we used it
999   for the types of class types, template parameters types, typename
1000   types, and so forth.  However, there can be many (tens to hundreds
1001   of thousands) of template parameter types in a compilation, and
1002   there's no need for this additional information in that case.
1003   Therefore, we now use this data structure only for class types.
1004
1005   In the past, it was thought that there would be relatively few
1006   class types.  However, in the presence of heavy use of templates,
1007   many (i.e., thousands) of classes can easily be generated.
1008   Therefore, we should endeavor to keep the size of this structure to
1009   a minimum.  */
1010struct lang_type_class GTY(())
1011{
1012  struct lang_type_header h;
1013
1014  unsigned char align;
1015
1016  unsigned has_mutable : 1;
1017  unsigned com_interface : 1;
1018  unsigned non_pod_class : 1;
1019  unsigned nearly_empty_p : 1;
1020  unsigned user_align : 1;
1021  unsigned has_assign_ref : 1;
1022  unsigned has_new : 1;
1023  unsigned has_array_new : 1;
1024
1025  unsigned gets_delete : 2;
1026  unsigned interface_only : 1;
1027  unsigned interface_unknown : 1;
1028  unsigned contains_empty_class_p : 1;
1029  unsigned anon_aggr : 1;
1030  unsigned non_zero_init : 1;
1031  unsigned empty_p : 1;
1032
1033  unsigned vec_new_uses_cookie : 1;
1034  unsigned declared_class : 1;
1035  unsigned diamond_shaped : 1;
1036  unsigned repeated_base : 1;
1037  unsigned being_defined : 1;
1038  unsigned java_interface : 1;
1039  unsigned debug_requested : 1;
1040  unsigned fields_readonly : 1;
1041
1042  unsigned use_template : 2;
1043  unsigned ptrmemfunc_flag : 1;
1044  unsigned was_anonymous : 1;
1045  unsigned lazy_default_ctor : 1;
1046  unsigned lazy_copy_ctor : 1;
1047  unsigned lazy_assignment_op : 1;
1048  unsigned lazy_destructor : 1;
1049
1050  unsigned has_const_init_ref : 1;
1051  unsigned has_complex_init_ref : 1;
1052  unsigned has_complex_assign_ref : 1;
1053  unsigned non_aggregate : 1;
1054
1055  /* APPLE LOCAL begin omit calls to empty destructors 5559195 */
1056  unsigned has_nontrivial_destructor_body : 1;
1057  unsigned destructor_nontrivial_because_of_base : 1;
1058  unsigned destructor_triviality_final : 1;
1059  /* APPLE LOCAL end omit calls to empty destructors 5559195 */
1060
1061
1062  /* When adding a flag here, consider whether or not it ought to
1063     apply to a template instance if it applies to the template.  If
1064     so, make sure to copy it in instantiate_class_template!  */
1065
1066  /* There are some bits left to fill out a 32-bit word.  Keep track
1067     of this by updating the size of this bitfield whenever you add or
1068     remove a flag.  */
1069  /* APPLE LOCAL begin omit calls to empty destructors 5559195 */
1070  unsigned dummy : 10;
1071  /* APPLE LOCAL end omit calls to empty destructors 5559195 */
1072
1073  tree primary_base;
1074  VEC(tree_pair_s,gc) *vcall_indices;
1075  tree vtables;
1076  tree typeinfo_var;
1077  VEC(tree,gc) *vbases;
1078  binding_table nested_udts;
1079  tree as_base;
1080  VEC(tree,gc) *pure_virtuals;
1081  tree friend_classes;
1082  VEC(tree,gc) * GTY((reorder ("resort_type_method_vec"))) methods;
1083  tree key_method;
1084  tree decl_list;
1085  tree template_info;
1086  tree befriending_classes;
1087  /* In a RECORD_TYPE, information specific to Objective-C++, such
1088     as a list of adopted protocols or a pointer to a corresponding
1089     @interface.  See objc/objc-act.h for details.  */
1090  tree objc_info;
1091};
1092
1093struct lang_type_ptrmem GTY(())
1094{
1095  struct lang_type_header h;
1096  tree record;
1097};
1098
1099struct lang_type GTY(())
1100{
1101  union lang_type_u
1102  {
1103    struct lang_type_header GTY((skip (""))) h;
1104    struct lang_type_class  GTY((tag ("1"))) c;
1105    struct lang_type_ptrmem GTY((tag ("0"))) ptrmem;
1106  } GTY((desc ("%h.h.is_lang_type_class"))) u;
1107};
1108
1109#if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
1110
1111#define LANG_TYPE_CLASS_CHECK(NODE) __extension__		\
1112({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);		\
1113    if (! lt->u.h.is_lang_type_class)				\
1114      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
1115    &lt->u.c; })
1116
1117#define LANG_TYPE_PTRMEM_CHECK(NODE) __extension__		\
1118({  struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE);		\
1119    if (lt->u.h.is_lang_type_class)				\
1120      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
1121    &lt->u.ptrmem; })
1122
1123#else
1124
1125#define LANG_TYPE_CLASS_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.c)
1126#define LANG_TYPE_PTRMEM_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.ptrmem)
1127
1128#endif /* ENABLE_TREE_CHECKING */
1129
1130/* Fields used for storing information before the class is defined.
1131   After the class is defined, these fields hold other information.  */
1132
1133/* VEC(tree) of friends which were defined inline in this class
1134   definition.  */
1135#define CLASSTYPE_INLINE_FRIENDS(NODE) CLASSTYPE_PURE_VIRTUALS (NODE)
1136
1137/* Nonzero for _CLASSTYPE means that operator delete is defined.  */
1138#define TYPE_GETS_DELETE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->gets_delete)
1139#define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
1140
1141/* Nonzero if `new NODE[x]' should cause the allocation of extra
1142   storage to indicate how many array elements are in use.  */
1143#define TYPE_VEC_NEW_USES_COOKIE(NODE)			\
1144  (CLASS_TYPE_P (NODE)					\
1145   && LANG_TYPE_CLASS_CHECK (NODE)->vec_new_uses_cookie)
1146
1147/* Nonzero means that this _CLASSTYPE node defines ways of converting
1148   itself to other types.  */
1149#define TYPE_HAS_CONVERSION(NODE) \
1150  (LANG_TYPE_CLASS_CHECK (NODE)->h.has_type_conversion)
1151
1152/* Nonzero means that NODE (a class type) has a default constructor --
1153   but that it has not yet been declared.  */
1154#define CLASSTYPE_LAZY_DEFAULT_CTOR(NODE) \
1155  (LANG_TYPE_CLASS_CHECK (NODE)->lazy_default_ctor)
1156
1157/* Nonzero means that NODE (a class type) has a copy constructor --
1158   but that it has not yet been declared.  */
1159#define CLASSTYPE_LAZY_COPY_CTOR(NODE) \
1160  (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_ctor)
1161
1162/* Nonzero means that NODE (a class type) has an assignment operator
1163   -- but that it has not yet been declared.  */
1164#define CLASSTYPE_LAZY_ASSIGNMENT_OP(NODE) \
1165  (LANG_TYPE_CLASS_CHECK (NODE)->lazy_assignment_op)
1166
1167/* Nonzero means that NODE (a class type) has a destructor -- but that
1168   it has not yet been declared.  */
1169#define CLASSTYPE_LAZY_DESTRUCTOR(NODE) \
1170  (LANG_TYPE_CLASS_CHECK (NODE)->lazy_destructor)
1171
1172/* Nonzero means that this _CLASSTYPE node overloads operator=(X&).  */
1173#define TYPE_HAS_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_assign_ref)
1174
1175/* True iff the class type NODE has an "operator =" whose parameter
1176   has a parameter of type "const X&".  */
1177#define TYPE_HAS_CONST_ASSIGN_REF(NODE) \
1178  (LANG_TYPE_CLASS_CHECK (NODE)->h.has_const_assign_ref)
1179
1180/* Nonzero means that this _CLASSTYPE node has an X(X&) constructor.  */
1181#define TYPE_HAS_INIT_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->h.has_init_ref)
1182#define TYPE_HAS_CONST_INIT_REF(NODE) \
1183  (LANG_TYPE_CLASS_CHECK (NODE)->has_const_init_ref)
1184
1185/* Nonzero if this class defines an overloaded operator new.  (An
1186   operator new [] doesn't count.)  */
1187#define TYPE_HAS_NEW_OPERATOR(NODE) \
1188  (LANG_TYPE_CLASS_CHECK (NODE)->has_new)
1189
1190/* Nonzero if this class defines an overloaded operator new[].  */
1191#define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \
1192  (LANG_TYPE_CLASS_CHECK (NODE)->has_array_new)
1193
1194/* Nonzero means that this type is being defined.  I.e., the left brace
1195   starting the definition of this type has been seen.  */
1196#define TYPE_BEING_DEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->being_defined)
1197
1198/* Mark bits for repeated base checks.  */
1199#define TYPE_MARKED_P(NODE) TREE_LANG_FLAG_6 (TYPE_CHECK (NODE))
1200
1201/* Nonzero if the class NODE has multiple paths to the same (virtual)
1202   base object.  */
1203#define CLASSTYPE_DIAMOND_SHAPED_P(NODE) \
1204  (LANG_TYPE_CLASS_CHECK(NODE)->diamond_shaped)
1205
1206/* Nonzero if the class NODE has multiple instances of the same base
1207   type.  */
1208#define CLASSTYPE_REPEATED_BASE_P(NODE) \
1209  (LANG_TYPE_CLASS_CHECK(NODE)->repeated_base)
1210
1211/* The member function with which the vtable will be emitted:
1212   the first noninline non-pure-virtual member function.  NULL_TREE
1213   if there is no key function or if this is a class template */
1214#define CLASSTYPE_KEY_METHOD(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->key_method)
1215
1216/* Vector member functions defined in this class.  Each element is
1217   either a FUNCTION_DECL, a TEMPLATE_DECL, or an OVERLOAD.  All
1218   functions with the same name end up in the same slot.  The first
1219   two elements are for constructors, and destructors, respectively.
1220   All template conversion operators to innermost template dependent
1221   types are overloaded on the next slot, if they exist.  Note, the
1222   names for these functions will not all be the same.  The
1223   non-template conversion operators & templated conversions to
1224   non-innermost template types are next, followed by ordinary member
1225   functions.  There may be empty entries at the end of the vector.
1226   The conversion operators are unsorted. The ordinary member
1227   functions are sorted, once the class is complete.  */
1228#define CLASSTYPE_METHOD_VEC(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->methods)
1229
1230/* For class templates, this is a TREE_LIST of all member data,
1231   functions, types, and friends in the order of declaration.
1232   The TREE_PURPOSE of each TREE_LIST is NULL_TREE for a friend,
1233   and the RECORD_TYPE for the class template otherwise.  */
1234#define CLASSTYPE_DECL_LIST(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->decl_list)
1235
1236/* The slot in the CLASSTYPE_METHOD_VEC where constructors go.  */
1237#define CLASSTYPE_CONSTRUCTOR_SLOT 0
1238
1239/* The slot in the CLASSTYPE_METHOD_VEC where destructors go.  */
1240#define CLASSTYPE_DESTRUCTOR_SLOT 1
1241
1242/* The first slot in the CLASSTYPE_METHOD_VEC where conversion
1243   operators can appear.  */
1244#define CLASSTYPE_FIRST_CONVERSION_SLOT 2
1245
1246/* A FUNCTION_DECL or OVERLOAD for the constructors for NODE.  These
1247   are the constructors that take an in-charge parameter.  */
1248#define CLASSTYPE_CONSTRUCTORS(NODE) \
1249  (VEC_index (tree, CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_CONSTRUCTOR_SLOT))
1250
1251/* A FUNCTION_DECL for the destructor for NODE.  These are the
1252   destructors that take an in-charge parameter.  If
1253   CLASSTYPE_LAZY_DESTRUCTOR is true, then this entry will be NULL
1254   until the destructor is created with lazily_declare_fn.  */
1255#define CLASSTYPE_DESTRUCTORS(NODE) \
1256  (CLASSTYPE_METHOD_VEC (NODE)						      \
1257   ? VEC_index (tree, CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_DESTRUCTOR_SLOT) \
1258   : NULL_TREE)
1259
1260/* A dictionary of the nested user-defined-types (class-types, or enums)
1261   found within this class.  This table includes nested member class
1262   templates.  */
1263#define CLASSTYPE_NESTED_UTDS(NODE) \
1264   (LANG_TYPE_CLASS_CHECK (NODE)->nested_udts)
1265
1266/* Nonzero if NODE has a primary base class, i.e., a base class with
1267   which it shares the virtual function table pointer.  */
1268#define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \
1269  (CLASSTYPE_PRIMARY_BINFO (NODE) != NULL_TREE)
1270
1271/* If non-NULL, this is the binfo for the primary base class, i.e.,
1272   the base class which contains the virtual function table pointer
1273   for this class.  */
1274#define CLASSTYPE_PRIMARY_BINFO(NODE) \
1275  (LANG_TYPE_CLASS_CHECK (NODE)->primary_base)
1276
1277/* A vector of BINFOs for the direct and indirect virtual base classes
1278   that this type uses in a post-order depth-first left-to-right
1279   order.  (In other words, these bases appear in the order that they
1280   should be initialized.)  */
1281#define CLASSTYPE_VBASECLASSES(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vbases)
1282
1283/* The type corresponding to NODE when NODE is used as a base class,
1284   i.e., NODE without virtual base classes.  */
1285
1286#define CLASSTYPE_AS_BASE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->as_base)
1287
1288/* True iff NODE is the CLASSTYPE_AS_BASE version of some type.  */
1289
1290#define IS_FAKE_BASE_TYPE(NODE)					\
1291  (TREE_CODE (NODE) == RECORD_TYPE				\
1292   && TYPE_CONTEXT (NODE) && CLASS_TYPE_P (TYPE_CONTEXT (NODE))	\
1293   && CLASSTYPE_AS_BASE (TYPE_CONTEXT (NODE)) == (NODE))
1294
1295/* These are the size and alignment of the type without its virtual
1296   base classes, for when we use this type as a base itself.  */
1297#define CLASSTYPE_SIZE(NODE) TYPE_SIZE (CLASSTYPE_AS_BASE (NODE))
1298#define CLASSTYPE_SIZE_UNIT(NODE) TYPE_SIZE_UNIT (CLASSTYPE_AS_BASE (NODE))
1299#define CLASSTYPE_ALIGN(NODE) TYPE_ALIGN (CLASSTYPE_AS_BASE (NODE))
1300#define CLASSTYPE_USER_ALIGN(NODE) TYPE_USER_ALIGN (CLASSTYPE_AS_BASE (NODE))
1301
1302/* The alignment of NODE, without its virtual bases, in bytes.  */
1303#define CLASSTYPE_ALIGN_UNIT(NODE) \
1304  (CLASSTYPE_ALIGN (NODE) / BITS_PER_UNIT)
1305
1306/* True if this a Java interface type, declared with
1307   '__attribute__ ((java_interface))'.  */
1308#define TYPE_JAVA_INTERFACE(NODE) \
1309  (LANG_TYPE_CLASS_CHECK (NODE)->java_interface)
1310
1311/* A VEC(tree) of virtual functions which cannot be inherited by
1312   derived classes.  When deriving from this type, the derived
1313   class must provide its own definition for each of these functions.  */
1314#define CLASSTYPE_PURE_VIRTUALS(NODE) \
1315  (LANG_TYPE_CLASS_CHECK (NODE)->pure_virtuals)
1316
1317/* Nonzero means that this type has an X() constructor.  */
1318#define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) \
1319  (LANG_TYPE_CLASS_CHECK (NODE)->h.has_default_ctor)
1320
1321/* Nonzero means that this type contains a mutable member.  */
1322#define CLASSTYPE_HAS_MUTABLE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_mutable)
1323#define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE))
1324
1325/* Nonzero means that this class type is a non-POD class.  */
1326#define CLASSTYPE_NON_POD_P(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_class)
1327
1328/* Nonzero means that this class contains pod types whose default
1329   initialization is not a zero initialization (namely, pointers to
1330   data members).  */
1331#define CLASSTYPE_NON_ZERO_INIT_P(NODE) \
1332  (LANG_TYPE_CLASS_CHECK (NODE)->non_zero_init)
1333
1334/* Nonzero if this class is "empty" in the sense of the C++ ABI.  */
1335#define CLASSTYPE_EMPTY_P(NODE) \
1336  (LANG_TYPE_CLASS_CHECK (NODE)->empty_p)
1337
1338/* Nonzero if this class is "nearly empty", i.e., contains only a
1339   virtual function table pointer.  */
1340#define CLASSTYPE_NEARLY_EMPTY_P(NODE) \
1341  (LANG_TYPE_CLASS_CHECK (NODE)->nearly_empty_p)
1342
1343/* Nonzero if this class contains an empty subobject.  */
1344#define CLASSTYPE_CONTAINS_EMPTY_CLASS_P(NODE) \
1345  (LANG_TYPE_CLASS_CHECK (NODE)->contains_empty_class_p)
1346
1347/* A list of class types of which this type is a friend.  The
1348   TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the
1349   case of a template friend.  */
1350#define CLASSTYPE_FRIEND_CLASSES(NODE) \
1351  (LANG_TYPE_CLASS_CHECK (NODE)->friend_classes)
1352
1353/* A list of the classes which grant friendship to this class.  */
1354#define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \
1355  (LANG_TYPE_CLASS_CHECK (NODE)->befriending_classes)
1356
1357/* Say whether this node was declared as a "class" or a "struct".  */
1358#define CLASSTYPE_DECLARED_CLASS(NODE) \
1359  (LANG_TYPE_CLASS_CHECK (NODE)->declared_class)
1360
1361/* Nonzero if this class has const members
1362   which have no specified initialization.  */
1363#define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE)	\
1364  (TYPE_LANG_SPECIFIC (NODE)				\
1365   ? LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init : 0)
1366#define SET_CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE, VALUE) \
1367  (LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init = (VALUE))
1368
1369/* Nonzero if this class has ref members
1370   which have no specified initialization.  */
1371#define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE)		\
1372  (TYPE_LANG_SPECIFIC (NODE)				\
1373   ? LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init : 0)
1374#define SET_CLASSTYPE_REF_FIELDS_NEED_INIT(NODE, VALUE) \
1375  (LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init = (VALUE))
1376
1377/* Nonzero if this class is included from a header file which employs
1378   `#pragma interface', and it is not included in its implementation file.  */
1379#define CLASSTYPE_INTERFACE_ONLY(NODE) \
1380  (LANG_TYPE_CLASS_CHECK (NODE)->interface_only)
1381
1382/* True if we have already determined whether or not vtables, VTTs,
1383   typeinfo, and other similar per-class data should be emitted in
1384   this translation unit.  This flag does not indicate whether or not
1385   these items should be emitted; it only indicates that we know one
1386   way or the other.  */
1387#define CLASSTYPE_INTERFACE_KNOWN(NODE) \
1388  (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown == 0)
1389/* The opposite of CLASSTYPE_INTERFACE_KNOWN.  */
1390#define CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
1391  (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown)
1392
1393#define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) \
1394  (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = !!(X))
1395#define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) \
1396  (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 1)
1397#define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) \
1398  (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 0)
1399
1400/* Nonzero if a _DECL node requires us to output debug info for this class.  */
1401#define CLASSTYPE_DEBUG_REQUESTED(NODE) \
1402  (LANG_TYPE_CLASS_CHECK (NODE)->debug_requested)
1403
1404/* Additional macros for inheritance information.  */
1405
1406/* Nonzero means that this class is on a path leading to a new vtable.  */
1407#define BINFO_VTABLE_PATH_MARKED(NODE) BINFO_FLAG_1 (NODE)
1408
1409/* Nonzero means B (a BINFO) has its own vtable.  Any copies will not
1410   have this flag set.  */
1411#define BINFO_NEW_VTABLE_MARKED(B) (BINFO_FLAG_2 (B))
1412
1413/* Compare a BINFO_TYPE with another type for equality.  For a binfo,
1414   this is functionally equivalent to using same_type_p, but
1415   measurably faster.  At least one of the arguments must be a
1416   BINFO_TYPE.  The other can be a BINFO_TYPE or a regular type.  If
1417   BINFO_TYPE(T) ever stops being the main variant of the class the
1418   binfo is for, this macro must change.  */
1419#define SAME_BINFO_TYPE_P(A, B) ((A) == (B))
1420
1421/* Any subobject that needs a new vtable must have a vptr and must not
1422   be a non-virtual primary base (since it would then use the vtable from a
1423   derived class and never become non-primary.)  */
1424#define SET_BINFO_NEW_VTABLE_MARKED(B)					 \
1425  (BINFO_NEW_VTABLE_MARKED (B) = 1,					 \
1426   gcc_assert (!BINFO_PRIMARY_P (B) || BINFO_VIRTUAL_P (B)),		 \
1427   gcc_assert (TYPE_VFIELD (BINFO_TYPE (B))))
1428
1429/* Nonzero if this binfo is for a dependent base - one that should not
1430   be searched.  */
1431#define BINFO_DEPENDENT_BASE_P(NODE) BINFO_FLAG_3 (NODE)
1432
1433/* Nonzero if this binfo has lost its primary base binfo (because that
1434   is a nearly-empty virtual base that has been taken by some other
1435   base in the complete hierarchy.  */
1436#define BINFO_LOST_PRIMARY_P(NODE) BINFO_FLAG_4 (NODE)
1437
1438/* Nonzero if this BINFO is a primary base class.  */
1439#define BINFO_PRIMARY_P(NODE) BINFO_FLAG_5(NODE)
1440
1441/* Used by various search routines.  */
1442#define IDENTIFIER_MARKED(NODE) TREE_LANG_FLAG_0 (NODE)
1443
1444/* A VEC(tree_pair_s) of the vcall indices associated with the class
1445   NODE.  The PURPOSE of each element is a FUNCTION_DECL for a virtual
1446   function.  The VALUE is the index into the virtual table where the
1447   vcall offset for that function is stored, when NODE is a virtual
1448   base.  */
1449#define CLASSTYPE_VCALL_INDICES(NODE) \
1450  (LANG_TYPE_CLASS_CHECK (NODE)->vcall_indices)
1451
1452/* The various vtables for the class NODE.  The primary vtable will be
1453   first, followed by the construction vtables and VTT, if any.  */
1454#define CLASSTYPE_VTABLES(NODE) \
1455  (LANG_TYPE_CLASS_CHECK (NODE)->vtables)
1456
1457/* The std::type_info variable representing this class, or NULL if no
1458   such variable has been created.  This field is only set for the
1459   TYPE_MAIN_VARIANT of the class.  */
1460#define CLASSTYPE_TYPEINFO_VAR(NODE) \
1461  (LANG_TYPE_CLASS_CHECK (NODE)->typeinfo_var)
1462
1463/* Accessor macros for the BINFO_VIRTUALS list.  */
1464
1465/* The number of bytes by which to adjust the `this' pointer when
1466   calling this virtual function.  Subtract this value from the this
1467   pointer. Always non-NULL, might be constant zero though.  */
1468#define BV_DELTA(NODE) (TREE_PURPOSE (NODE))
1469
1470/* If non-NULL, the vtable index at which to find the vcall offset
1471   when calling this virtual function.  Add the value at that vtable
1472   index to the this pointer.  */
1473#define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE))
1474
1475/* The function to call.  */
1476#define BV_FN(NODE) (TREE_VALUE (NODE))
1477
1478
1479/* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
1480   this type can raise.  Each TREE_VALUE is a _TYPE.  The TREE_VALUE
1481   will be NULL_TREE to indicate a throw specification of `()', or
1482   no exceptions allowed.  */
1483#define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_LANG_SLOT_1 (NODE)
1484
1485/* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'.  */
1486#define TYPE_NOTHROW_P(NODE) \
1487  (TYPE_RAISES_EXCEPTIONS (NODE) \
1488   && TREE_VALUE (TYPE_RAISES_EXCEPTIONS (NODE)) == NULL_TREE)
1489
1490/* The binding level associated with the namespace.  */
1491#define NAMESPACE_LEVEL(NODE) \
1492  (DECL_LANG_SPECIFIC (NODE)->decl_flags.u.level)
1493
1494
1495/* If a DECL has DECL_LANG_SPECIFIC, it is either a lang_decl_flags or
1496   a lang_decl (which has lang_decl_flags as its initial prefix).
1497   This macro is nonzero for tree nodes whose DECL_LANG_SPECIFIC is
1498   the full lang_decl, and not just lang_decl_flags.  Keep these
1499   checks in ascending code order.  */
1500#define CAN_HAVE_FULL_LANG_DECL_P(NODE)			\
1501  (!(TREE_CODE (NODE) == FIELD_DECL			\
1502     || TREE_CODE (NODE) == VAR_DECL			\
1503     || TREE_CODE (NODE) == CONST_DECL			\
1504     || TREE_CODE (NODE) == USING_DECL))
1505
1506struct lang_decl_flags GTY(())
1507{
1508  ENUM_BITFIELD(languages) language : 4;
1509  unsigned global_ctor_p : 1;
1510  unsigned global_dtor_p : 1;
1511  unsigned anticipated_p : 1;
1512  unsigned template_conv_p : 1;
1513
1514  unsigned operator_attr : 1;
1515  unsigned constructor_attr : 1;
1516  unsigned destructor_attr : 1;
1517  unsigned friend_attr : 1;
1518  unsigned static_function : 1;
1519  unsigned pure_virtual : 1;
1520  unsigned has_in_charge_parm_p : 1;
1521  unsigned has_vtt_parm_p : 1;
1522
1523  unsigned deferred : 1;
1524  unsigned use_template : 2;
1525  unsigned nonconverting : 1;
1526  unsigned not_really_extern : 1;
1527  unsigned initialized_in_class : 1;
1528  unsigned assignment_operator_p : 1;
1529  unsigned u1sel : 1;
1530
1531  unsigned u2sel : 1;
1532  unsigned can_be_full : 1;
1533  unsigned thunk_p : 1;
1534  unsigned this_thunk_p : 1;
1535  unsigned repo_available_p : 1;
1536  unsigned hidden_friend_p : 1;
1537  unsigned threadprivate_p : 1;
1538  /* One unused bit.  */
1539
1540  union lang_decl_u {
1541    /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
1542       THUNK_ALIAS.
1543       In a FUNCTION_DECL for which DECL_THUNK_P does not hold,
1544       VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this is
1545       DECL_TEMPLATE_INFO.  */
1546    tree GTY ((tag ("0"))) template_info;
1547
1548    /* In a NAMESPACE_DECL, this is NAMESPACE_LEVEL.  */
1549    struct cp_binding_level * GTY ((tag ("1"))) level;
1550  } GTY ((desc ("%1.u1sel"))) u;
1551
1552  union lang_decl_u2 {
1553    /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is
1554       THUNK_VIRTUAL_OFFSET.
1555       Otherwise this is DECL_ACCESS.  */
1556    tree GTY ((tag ("0"))) access;
1557
1558    /* For VAR_DECL in function, this is DECL_DISCRIMINATOR.  */
1559    int GTY ((tag ("1"))) discriminator;
1560  } GTY ((desc ("%1.u2sel"))) u2;
1561};
1562
1563/* sorted_fields is sorted based on a pointer, so we need to be able
1564   to resort it if pointers get rearranged.  */
1565
1566struct lang_decl GTY(())
1567{
1568  struct lang_decl_flags decl_flags;
1569
1570  union lang_decl_u4
1571    {
1572      struct full_lang_decl
1573      {
1574	/* In an overloaded operator, this is the value of
1575	   DECL_OVERLOADED_OPERATOR_P.  */
1576	ENUM_BITFIELD (tree_code) operator_code : 8;
1577
1578	unsigned u3sel : 1;
1579	unsigned pending_inline_p : 1;
1580	unsigned spare : 22;
1581
1582	/* For a non-thunk function decl, this is a tree list of
1583	   friendly classes. For a thunk function decl, it is the
1584	   thunked to function decl.  */
1585	tree befriending_classes;
1586
1587	/* For a non-virtual FUNCTION_DECL, this is
1588	   DECL_FRIEND_CONTEXT.  For a virtual FUNCTION_DECL for which
1589	   DECL_THIS_THUNK_P does not hold, this is DECL_THUNKS. Both
1590	   this pointer and result pointer adjusting thunks are
1591	   chained here.  This pointer thunks to return pointer thunks
1592	   will be chained on the return pointer thunk.  */
1593	tree context;
1594
1595	union lang_decl_u5
1596	{
1597	  /* In a non-thunk FUNCTION_DECL or TEMPLATE_DECL, this is
1598	     DECL_CLONED_FUNCTION.  */
1599	  tree GTY ((tag ("0"))) cloned_function;
1600
1601	  /* In a FUNCTION_DECL for which THUNK_P holds this is the
1602	     THUNK_FIXED_OFFSET.  */
1603	  HOST_WIDE_INT GTY ((tag ("1"))) fixed_offset;
1604	} GTY ((desc ("%0.decl_flags.thunk_p"))) u5;
1605
1606	union lang_decl_u3
1607	{
1608	  struct sorted_fields_type * GTY ((tag ("0"), reorder ("resort_sorted_fields")))
1609	       sorted_fields;
1610	  struct cp_token_cache * GTY ((tag ("2"))) pending_inline_info;
1611	  struct language_function * GTY ((tag ("1")))
1612	       saved_language_function;
1613	} GTY ((desc ("%1.u3sel + %1.pending_inline_p"))) u;
1614      } GTY ((tag ("1"))) f;
1615  } GTY ((desc ("%1.decl_flags.can_be_full"))) u;
1616};
1617
1618#if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007)
1619
1620#define LANG_DECL_U2_CHECK(NODE, TF) __extension__		\
1621({  struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE);		\
1622    if (lt->decl_flags.u2sel != TF)				\
1623      lang_check_failed (__FILE__, __LINE__, __FUNCTION__);	\
1624    &lt->decl_flags.u2; })
1625
1626#else
1627
1628#define LANG_DECL_U2_CHECK(NODE, TF) \
1629  (&DECL_LANG_SPECIFIC (NODE)->decl_flags.u2)
1630
1631#endif /* ENABLE_TREE_CHECKING */
1632
1633/* For a FUNCTION_DECL or a VAR_DECL, the language linkage for the
1634   declaration.  Some entities (like a member function in a local
1635   class, or a local variable) do not have linkage at all, and this
1636   macro should not be used in those cases.
1637
1638   Implementation note: A FUNCTION_DECL without DECL_LANG_SPECIFIC was
1639   created by language-independent code, and has C linkage.  Most
1640   VAR_DECLs have C++ linkage, and do not have DECL_LANG_SPECIFIC, but
1641   we do create DECL_LANG_SPECIFIC for variables with non-C++ linkage.  */
1642#define DECL_LANGUAGE(NODE)				\
1643  (DECL_LANG_SPECIFIC (NODE)				\
1644   ? DECL_LANG_SPECIFIC (NODE)->decl_flags.language	\
1645   : (TREE_CODE (NODE) == FUNCTION_DECL			\
1646      ? lang_c : lang_cplusplus))
1647
1648/* Set the language linkage for NODE to LANGUAGE.  */
1649#define SET_DECL_LANGUAGE(NODE, LANGUAGE) \
1650  (DECL_LANG_SPECIFIC (NODE)->decl_flags.language = (LANGUAGE))
1651
1652/* For FUNCTION_DECLs: nonzero means that this function is a constructor.  */
1653#define DECL_CONSTRUCTOR_P(NODE) \
1654  (DECL_LANG_SPECIFIC (NODE)->decl_flags.constructor_attr)
1655
1656/* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete
1657   object.  */
1658#define DECL_COMPLETE_CONSTRUCTOR_P(NODE)		\
1659  (DECL_CONSTRUCTOR_P (NODE)				\
1660   && DECL_NAME (NODE) == complete_ctor_identifier)
1661
1662/* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base
1663   object.  */
1664#define DECL_BASE_CONSTRUCTOR_P(NODE)		\
1665  (DECL_CONSTRUCTOR_P (NODE)			\
1666   && DECL_NAME (NODE) == base_ctor_identifier)
1667
1668/* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the
1669   specialized in-charge constructor or the specialized not-in-charge
1670   constructor.  */
1671#define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE)		\
1672  (DECL_CONSTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE))
1673
1674/* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor.  */
1675#define DECL_COPY_CONSTRUCTOR_P(NODE) \
1676  (DECL_CONSTRUCTOR_P (NODE) && copy_fn_p (NODE) > 0)
1677
1678/* Nonzero if NODE is a destructor.  */
1679#define DECL_DESTRUCTOR_P(NODE)				\
1680  (DECL_LANG_SPECIFIC (NODE)->decl_flags.destructor_attr)
1681
1682/* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the
1683   specialized in-charge constructor, in-charge deleting constructor,
1684   or the base destructor.  */
1685#define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE)			\
1686  (DECL_DESTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE))
1687
1688/* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
1689   object.  */
1690#define DECL_COMPLETE_DESTRUCTOR_P(NODE)		\
1691  (DECL_DESTRUCTOR_P (NODE)				\
1692   && DECL_NAME (NODE) == complete_dtor_identifier)
1693
1694/* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base
1695   object.  */
1696#define DECL_BASE_DESTRUCTOR_P(NODE)		\
1697  (DECL_DESTRUCTOR_P (NODE)			\
1698   && DECL_NAME (NODE) == base_dtor_identifier)
1699
1700/* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete
1701   object that deletes the object after it has been destroyed.  */
1702#define DECL_DELETING_DESTRUCTOR_P(NODE)		\
1703  (DECL_DESTRUCTOR_P (NODE)				\
1704   && DECL_NAME (NODE) == deleting_dtor_identifier)
1705
1706/* Nonzero if NODE (a FUNCTION_DECL) is a cloned constructor or
1707   destructor.  */
1708#define DECL_CLONED_FUNCTION_P(NODE)			\
1709  ((TREE_CODE (NODE) == FUNCTION_DECL			\
1710    || TREE_CODE (NODE) == TEMPLATE_DECL)		\
1711   && DECL_LANG_SPECIFIC (NODE)				\
1712   && !DECL_LANG_SPECIFIC (NODE)->decl_flags.thunk_p	\
1713   && DECL_CLONED_FUNCTION (NODE) != NULL_TREE)
1714
1715/* If DECL_CLONED_FUNCTION_P holds, this is the function that was
1716   cloned.  */
1717#define DECL_CLONED_FUNCTION(NODE) \
1718  (DECL_LANG_SPECIFIC (NON_THUNK_FUNCTION_CHECK(NODE))->u.f.u5.cloned_function)
1719
1720/* Perform an action for each clone of FN, if FN is a function with
1721   clones.  This macro should be used like:
1722
1723      FOR_EACH_CLONE (clone, fn)
1724	{ ... }
1725
1726  */
1727#define FOR_EACH_CLONE(CLONE, FN)			\
1728  if (TREE_CODE (FN) == FUNCTION_DECL			\
1729      && (DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P (FN)	\
1730	  || DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P (FN)))	\
1731     for (CLONE = TREE_CHAIN (FN);			\
1732	  CLONE && DECL_CLONED_FUNCTION_P (CLONE);	\
1733	  CLONE = TREE_CHAIN (CLONE))
1734
1735/* Nonzero if NODE has DECL_DISCRIMINATOR and not DECL_ACCESS.  */
1736#define DECL_DISCRIMINATOR_P(NODE)	\
1737  (TREE_CODE (NODE) == VAR_DECL		\
1738   && DECL_FUNCTION_SCOPE_P (NODE))
1739
1740/* Discriminator for name mangling.  */
1741#define DECL_DISCRIMINATOR(NODE) (LANG_DECL_U2_CHECK (NODE, 1)->discriminator)
1742
1743/* Nonzero if the VTT parm has been added to NODE.  */
1744#define DECL_HAS_VTT_PARM_P(NODE) \
1745  (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_vtt_parm_p)
1746
1747/* Nonzero if NODE is a FUNCTION_DECL for which a VTT parameter is
1748   required.  */
1749#define DECL_NEEDS_VTT_PARM_P(NODE)			\
1750  (CLASSTYPE_VBASECLASSES (DECL_CONTEXT (NODE))		\
1751   && (DECL_BASE_CONSTRUCTOR_P (NODE)			\
1752       || DECL_BASE_DESTRUCTOR_P (NODE)))
1753
1754/* Nonzero if NODE is a user-defined conversion operator.  */
1755#define DECL_CONV_FN_P(NODE) \
1756  (DECL_NAME (NODE) && IDENTIFIER_TYPENAME_P (DECL_NAME (NODE)))
1757
1758/* If FN is a conversion operator, the type to which it converts.
1759   Otherwise, NULL_TREE.  */
1760#define DECL_CONV_FN_TYPE(FN) \
1761  (DECL_CONV_FN_P (FN) ? TREE_TYPE (DECL_NAME (FN)) : NULL_TREE)
1762
1763/* Nonzero if NODE, which is a TEMPLATE_DECL, is a template
1764   conversion operator to a type dependent on the innermost template
1765   args.  */
1766#define DECL_TEMPLATE_CONV_FN_P(NODE) \
1767  (DECL_LANG_SPECIFIC (NODE)->decl_flags.template_conv_p)
1768
1769/* Set the overloaded operator code for NODE to CODE.  */
1770#define SET_OVERLOADED_OPERATOR_CODE(NODE, CODE) \
1771  (DECL_LANG_SPECIFIC (NODE)->u.f.operator_code = (CODE))
1772
1773/* If NODE is an overloaded operator, then this returns the TREE_CODE
1774   associated with the overloaded operator.
1775   DECL_ASSIGNMENT_OPERATOR_P must also be checked to determine
1776   whether or not NODE is an assignment operator.  If NODE is not an
1777   overloaded operator, ERROR_MARK is returned.  Since the numerical
1778   value of ERROR_MARK is zero, this macro can be used as a predicate
1779   to test whether or not NODE is an overloaded operator.  */
1780#define DECL_OVERLOADED_OPERATOR_P(NODE)		\
1781  (IDENTIFIER_OPNAME_P (DECL_NAME (NODE))		\
1782   ? DECL_LANG_SPECIFIC (NODE)->u.f.operator_code : ERROR_MARK)
1783
1784/* Nonzero if NODE is an assignment operator.  */
1785#define DECL_ASSIGNMENT_OPERATOR_P(NODE) \
1786  (DECL_LANG_SPECIFIC (NODE)->decl_flags.assignment_operator_p)
1787
1788/* For FUNCTION_DECLs: nonzero means that this function is a
1789   constructor or a destructor with an extra in-charge parameter to
1790   control whether or not virtual bases are constructed.  */
1791#define DECL_HAS_IN_CHARGE_PARM_P(NODE) \
1792  (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_in_charge_parm_p)
1793
1794/* Nonzero if DECL is a declaration of __builtin_constant_p.  */
1795#define DECL_IS_BUILTIN_CONSTANT_P(NODE)		\
1796 (TREE_CODE (NODE) == FUNCTION_DECL			\
1797  && DECL_BUILT_IN_CLASS (NODE) == BUILT_IN_NORMAL	\
1798  && DECL_FUNCTION_CODE (NODE) == BUILT_IN_CONSTANT_P)
1799
1800/* Nonzero for _DECL means that this decl appears in (or will appear
1801   in) as a member in a RECORD_TYPE or UNION_TYPE node.  It is also for
1802   detecting circularity in case members are multiply defined.  In the
1803   case of a VAR_DECL, it is also used to determine how program storage
1804   should be allocated.  */
1805#define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3 (NODE))
1806
1807/* Nonzero for a VAR_DECL means that the variable's initialization (if
1808   any) has been processed.  (In general, DECL_INITIALIZED_P is
1809   !DECL_EXTERN, but static data members may be initialized even if
1810   not defined.)  */
1811#define DECL_INITIALIZED_P(NODE) \
1812   (TREE_LANG_FLAG_1 (VAR_DECL_CHECK (NODE)))
1813
1814/* Nonzero for a VAR_DECL iff an explicit initializer was provided.  */
1815#define DECL_NONTRIVIALLY_INITIALIZED_P(NODE)	\
1816   (TREE_LANG_FLAG_3 (VAR_DECL_CHECK (NODE)))
1817
1818/* Nonzero for a VAR_DECL that was initialized with a
1819   constant-expression.  */
1820#define DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P(NODE) \
1821  (TREE_LANG_FLAG_2 (VAR_DECL_CHECK (NODE)))
1822
1823/* Nonzero for a VAR_DECL that can be used in an integral constant
1824   expression.
1825
1826      [expr.const]
1827
1828      An integral constant-expression can only involve ... const
1829      variables of static or enumeration types initialized with
1830      constant expressions ...
1831
1832   The standard does not require that the expression be non-volatile.
1833   G++ implements the proposed correction in DR 457.  */
1834#define DECL_INTEGRAL_CONSTANT_VAR_P(NODE)		\
1835  (TREE_CODE (NODE) == VAR_DECL				\
1836   && CP_TYPE_CONST_NON_VOLATILE_P (TREE_TYPE (NODE))	\
1837   && INTEGRAL_OR_ENUMERATION_TYPE_P (TREE_TYPE (NODE))	\
1838   && DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (NODE))
1839
1840/* Nonzero if the DECL was initialized in the class definition itself,
1841   rather than outside the class.  This is used for both static member
1842   VAR_DECLS, and FUNTION_DECLS that are defined in the class.  */
1843#define DECL_INITIALIZED_IN_CLASS_P(DECL) \
1844 (DECL_LANG_SPECIFIC (DECL)->decl_flags.initialized_in_class)
1845
1846/* Nonzero for DECL means that this decl is just a friend declaration,
1847   and should not be added to the list of members for this class.  */
1848#define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.friend_attr)
1849
1850/* A TREE_LIST of the types which have befriended this FUNCTION_DECL.  */
1851#define DECL_BEFRIENDING_CLASSES(NODE) \
1852  (DECL_LANG_SPECIFIC (NODE)->u.f.befriending_classes)
1853
1854/* Nonzero for FUNCTION_DECL means that this decl is a static
1855   member function.  */
1856#define DECL_STATIC_FUNCTION_P(NODE) \
1857  (DECL_LANG_SPECIFIC (NODE)->decl_flags.static_function)
1858
1859/* Nonzero for FUNCTION_DECL means that this decl is a non-static
1860   member function.  */
1861#define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \
1862  (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE)
1863
1864/* Nonzero for FUNCTION_DECL means that this decl is a member function
1865   (static or non-static).  */
1866#define DECL_FUNCTION_MEMBER_P(NODE) \
1867 (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE))
1868
1869/* Nonzero for FUNCTION_DECL means that this member function
1870   has `this' as const X *const.  */
1871#define DECL_CONST_MEMFUNC_P(NODE)					 \
1872  (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
1873   && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE				 \
1874				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
1875
1876/* Nonzero for FUNCTION_DECL means that this member function
1877   has `this' as volatile X *const.  */
1878#define DECL_VOLATILE_MEMFUNC_P(NODE)					 \
1879  (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)				 \
1880   && CP_TYPE_VOLATILE_P (TREE_TYPE (TREE_VALUE				 \
1881				  (TYPE_ARG_TYPES (TREE_TYPE (NODE))))))
1882
1883/* Nonzero for a DECL means that this member is a non-static member.  */
1884#define DECL_NONSTATIC_MEMBER_P(NODE)		\
1885  ((TREE_CODE (NODE) == FUNCTION_DECL		\
1886    && DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE))	\
1887   || TREE_CODE (NODE) == FIELD_DECL)
1888
1889/* Nonzero for _DECL means that this member object type
1890   is mutable.  */
1891#define DECL_MUTABLE_P(NODE) (DECL_LANG_FLAG_0 (NODE))
1892
1893/* Nonzero for _DECL means that this constructor is a non-converting
1894   constructor.  */
1895#define DECL_NONCONVERTING_P(NODE) \
1896  (DECL_LANG_SPECIFIC (NODE)->decl_flags.nonconverting)
1897
1898/* Nonzero for FUNCTION_DECL means that this member function is a pure
1899   virtual function.  */
1900#define DECL_PURE_VIRTUAL_P(NODE) \
1901  (DECL_LANG_SPECIFIC (NODE)->decl_flags.pure_virtual)
1902
1903/* True (in a FUNCTION_DECL) if NODE is a virtual function that is an
1904   invalid overrider for a function from a base class.  Once we have
1905   complained about an invalid overrider we avoid complaining about it
1906   again.  */
1907#define DECL_INVALID_OVERRIDER_P(NODE) \
1908  (DECL_LANG_FLAG_4 (NODE))
1909
1910/* The thunks associated with NODE, a FUNCTION_DECL.  */
1911#define DECL_THUNKS(NODE) \
1912  (DECL_LANG_SPECIFIC (NODE)->u.f.context)
1913
1914/* Nonzero if NODE is a thunk, rather than an ordinary function.  */
1915#define DECL_THUNK_P(NODE)			\
1916  (TREE_CODE (NODE) == FUNCTION_DECL		\
1917   && DECL_LANG_SPECIFIC (NODE)			\
1918   && DECL_LANG_SPECIFIC (NODE)->decl_flags.thunk_p)
1919
1920/* Set DECL_THUNK_P for node.  */
1921#define SET_DECL_THUNK_P(NODE, THIS_ADJUSTING)			\
1922  (DECL_LANG_SPECIFIC (NODE)->decl_flags.thunk_p = 1,		\
1923   DECL_LANG_SPECIFIC (NODE)->u.f.u3sel = 1,			\
1924   DECL_LANG_SPECIFIC (NODE)->decl_flags.this_thunk_p = (THIS_ADJUSTING))
1925
1926/* Nonzero if NODE is a this pointer adjusting thunk.  */
1927#define DECL_THIS_THUNK_P(NODE)			\
1928  (DECL_THUNK_P (NODE) && DECL_LANG_SPECIFIC (NODE)->decl_flags.this_thunk_p)
1929
1930/* Nonzero if NODE is a result pointer adjusting thunk.  */
1931#define DECL_RESULT_THUNK_P(NODE)			\
1932  (DECL_THUNK_P (NODE) && !DECL_LANG_SPECIFIC (NODE)->decl_flags.this_thunk_p)
1933
1934/* Nonzero if NODE is a FUNCTION_DECL, but not a thunk.  */
1935#define DECL_NON_THUNK_FUNCTION_P(NODE)				\
1936  (TREE_CODE (NODE) == FUNCTION_DECL && !DECL_THUNK_P (NODE))
1937
1938/* Nonzero if NODE is `extern "C"'.  */
1939#define DECL_EXTERN_C_P(NODE) \
1940  (DECL_LANGUAGE (NODE) == lang_c)
1941
1942/* Nonzero if NODE is an `extern "C"' function.  */
1943#define DECL_EXTERN_C_FUNCTION_P(NODE) \
1944  (DECL_NON_THUNK_FUNCTION_P (NODE) && DECL_EXTERN_C_P (NODE))
1945
1946/* True iff DECL is an entity with vague linkage whose definition is
1947   available in this translation unit.  */
1948#define DECL_REPO_AVAILABLE_P(NODE) \
1949  (DECL_LANG_SPECIFIC (NODE)->decl_flags.repo_available_p)
1950
1951/* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a
1952   template function.  */
1953#define DECL_PRETTY_FUNCTION_P(NODE) \
1954  (TREE_LANG_FLAG_0 (VAR_DECL_CHECK (NODE)))
1955
1956/* The _TYPE context in which this _DECL appears.  This field holds the
1957   class where a virtual function instance is actually defined.  */
1958#define DECL_CLASS_CONTEXT(NODE) \
1959  (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE)
1960
1961/* For a non-member friend function, the class (if any) in which this
1962   friend was defined.  For example, given:
1963
1964     struct S { friend void f (); };
1965
1966   the DECL_FRIEND_CONTEXT for `f' will be `S'.  */
1967#define DECL_FRIEND_CONTEXT(NODE)				\
1968  ((DECL_FRIEND_P (NODE) && !DECL_FUNCTION_MEMBER_P (NODE))	\
1969   ? DECL_LANG_SPECIFIC (NODE)->u.f.context			\
1970   : NULL_TREE)
1971
1972/* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT.  */
1973#define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \
1974  (DECL_LANG_SPECIFIC (NODE)->u.f.context = (CONTEXT))
1975
1976/* NULL_TREE in DECL_CONTEXT represents the global namespace.  */
1977#define CP_DECL_CONTEXT(NODE) \
1978  (DECL_CONTEXT (NODE) ? DECL_CONTEXT (NODE) : global_namespace)
1979#define CP_TYPE_CONTEXT(NODE) \
1980  (TYPE_CONTEXT (NODE) ? TYPE_CONTEXT (NODE) : global_namespace)
1981#define FROB_CONTEXT(NODE)   ((NODE) == global_namespace ? NULL_TREE : (NODE))
1982
1983/* 1 iff NODE has namespace scope, including the global namespace.  */
1984#define DECL_NAMESPACE_SCOPE_P(NODE)				\
1985  (!DECL_TEMPLATE_PARM_P (NODE)					\
1986   && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL)
1987
1988#define TYPE_NAMESPACE_SCOPE_P(NODE)				\
1989  (TREE_CODE (CP_TYPE_CONTEXT (NODE)) == NAMESPACE_DECL)
1990
1991/* 1 iff NODE is a class member.  */
1992#define DECL_CLASS_SCOPE_P(NODE) \
1993  (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE)))
1994
1995#define TYPE_CLASS_SCOPE_P(NODE) \
1996  (TYPE_CONTEXT (NODE) && TYPE_P (TYPE_CONTEXT (NODE)))
1997
1998/* 1 iff NODE is function-local.  */
1999#define DECL_FUNCTION_SCOPE_P(NODE) \
2000  (DECL_CONTEXT (NODE) \
2001   && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL)
2002
2003#define TYPE_FUNCTION_SCOPE_P(NODE) \
2004  (TYPE_CONTEXT (NODE) \
2005   && TREE_CODE (TYPE_CONTEXT (NODE)) == FUNCTION_DECL)
2006
2007/* 1 iff VAR_DECL node NODE is a type-info decl.  This flag is set for
2008   both the primary typeinfo object and the associated NTBS name.  */
2009#define DECL_TINFO_P(NODE) TREE_LANG_FLAG_4 (VAR_DECL_CHECK (NODE))
2010
2011/* 1 iff VAR_DECL node NODE is virtual table or VTT.  */
2012#define DECL_VTABLE_OR_VTT_P(NODE) TREE_LANG_FLAG_5 (VAR_DECL_CHECK (NODE))
2013
2014/* Returns 1 iff VAR_DECL is a construction virtual table.
2015   DECL_VTABLE_OR_VTT_P will be true in this case and must be checked
2016   before using this macro.  */
2017#define DECL_CONSTRUCTION_VTABLE_P(NODE) \
2018  TREE_LANG_FLAG_6 (VAR_DECL_CHECK (NODE))
2019
2020/* 1 iff NODE is function-local, but for types.  */
2021#define LOCAL_CLASS_P(NODE)				\
2022  (decl_function_context (TYPE_MAIN_DECL (NODE)) != NULL_TREE)
2023
2024/* For a NAMESPACE_DECL: the list of using namespace directives
2025   The PURPOSE is the used namespace, the value is the namespace
2026   that is the common ancestor.  */
2027#define DECL_NAMESPACE_USING(NODE) DECL_VINDEX (NAMESPACE_DECL_CHECK (NODE))
2028
2029/* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users
2030   of a namespace, to record the transitive closure of using namespace.  */
2031#define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NAMESPACE_DECL_CHECK (NODE))
2032
2033/* In a NAMESPACE_DECL, the list of namespaces which have associated
2034   themselves with this one.  */
2035#define DECL_NAMESPACE_ASSOCIATIONS(NODE) \
2036  (NAMESPACE_DECL_CHECK (NODE)->decl_non_common.saved_tree)
2037
2038/* In a NAMESPACE_DECL, points to the original namespace if this is
2039   a namespace alias.  */
2040#define DECL_NAMESPACE_ALIAS(NODE) \
2041	DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE))
2042#define ORIGINAL_NAMESPACE(NODE)  \
2043  (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE))
2044
2045/* Nonzero if NODE is the std namespace.  */
2046#define DECL_NAMESPACE_STD_P(NODE)			\
2047  (TREE_CODE (NODE) == NAMESPACE_DECL			\
2048   && CP_DECL_CONTEXT (NODE) == global_namespace	\
2049   && DECL_NAME (NODE) == std_identifier)
2050
2051/* In a TREE_LIST concatenating using directives, indicate indirect
2052   directives  */
2053#define TREE_INDIRECT_USING(NODE) (TREE_LIST_CHECK (NODE)->common.lang_flag_0)
2054
2055extern tree decl_shadowed_for_var_lookup (tree);
2056extern void decl_shadowed_for_var_insert (tree, tree);
2057
2058/* Non zero if this is a using decl for a dependent scope. */
2059#define DECL_DEPENDENT_P(NODE) DECL_LANG_FLAG_0 (USING_DECL_CHECK (NODE))
2060
2061/* The scope named in a using decl.  */
2062#define USING_DECL_SCOPE(NODE) TREE_TYPE (USING_DECL_CHECK (NODE))
2063
2064/* The decls named by a using decl.  */
2065#define USING_DECL_DECLS(NODE) DECL_INITIAL (USING_DECL_CHECK (NODE))
2066
2067/* In a VAR_DECL, true if we have a shadowed local variable
2068   in the shadowed var table for this VAR_DECL.  */
2069#define DECL_HAS_SHADOWED_FOR_VAR_P(NODE) \
2070  (VAR_DECL_CHECK (NODE)->decl_with_vis.shadowed_for_var_p)
2071
2072/* In a VAR_DECL for a variable declared in a for statement,
2073   this is the shadowed (local) variable.  */
2074#define DECL_SHADOWED_FOR_VAR(NODE) \
2075  (DECL_HAS_SHADOWED_FOR_VAR_P(NODE) ? decl_shadowed_for_var_lookup (NODE) : NULL)
2076
2077#define SET_DECL_SHADOWED_FOR_VAR(NODE, VAL) \
2078  (decl_shadowed_for_var_insert (NODE, VAL))
2079
2080/* In a FUNCTION_DECL, this is nonzero if this function was defined in
2081   the class definition.  We have saved away the text of the function,
2082   but have not yet processed it.  */
2083#define DECL_PENDING_INLINE_P(NODE) \
2084  (DECL_LANG_SPECIFIC (NODE)->u.f.pending_inline_p)
2085
2086/* If DECL_PENDING_INLINE_P holds, this is the saved text of the
2087   function.  */
2088#define DECL_PENDING_INLINE_INFO(NODE) \
2089  (DECL_LANG_SPECIFIC (NODE)->u.f.u.pending_inline_info)
2090
2091/* For a TYPE_DECL: if this structure has many fields, we'll sort them
2092   and put them into a TREE_VEC.  */
2093#define DECL_SORTED_FIELDS(NODE) \
2094  (DECL_LANG_SPECIFIC (TYPE_DECL_CHECK (NODE))->u.f.u.sorted_fields)
2095
2096/* True if on the deferred_fns (see decl2.c) list.  */
2097#define DECL_DEFERRED_FN(DECL) \
2098  (DECL_LANG_SPECIFIC (DECL)->decl_flags.deferred)
2099
2100/* If non-NULL for a VAR_DECL, FUNCTION_DECL, TYPE_DECL or
2101   TEMPLATE_DECL, the entity is either a template specialization (if
2102   DECL_USE_TEMPLATE is non-zero) or the abstract instance of the
2103   template itself.
2104
2105   In either case, DECL_TEMPLATE_INFO is a TREE_LIST, whose
2106   TREE_PURPOSE is the TEMPLATE_DECL of which this entity is a
2107   specialization or abstract instance.  The TREE_VALUE is the
2108   template arguments used to specialize the template.
2109
2110   Consider:
2111
2112      template <typename T> struct S { friend void f(T) {} };
2113
2114   In this case, S<int>::f is, from the point of view of the compiler,
2115   an instantiation of a template -- but, from the point of view of
2116   the language, each instantiation of S results in a wholly unrelated
2117   global function f.  In this case, DECL_TEMPLATE_INFO for S<int>::f
2118   will be non-NULL, but DECL_USE_TEMPLATE will be zero.  */
2119#define DECL_TEMPLATE_INFO(NODE) \
2120  (DECL_LANG_SPECIFIC (VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK (NODE)) \
2121   ->decl_flags.u.template_info)
2122
2123/* For a VAR_DECL, indicates that the variable is actually a
2124   non-static data member of anonymous union that has been promoted to
2125   variable status.  */
2126#define DECL_ANON_UNION_VAR_P(NODE) \
2127  (DECL_LANG_FLAG_4 (VAR_DECL_CHECK (NODE)))
2128
2129/* Template information for a RECORD_TYPE or UNION_TYPE.  */
2130#define CLASSTYPE_TEMPLATE_INFO(NODE) \
2131  (LANG_TYPE_CLASS_CHECK (RECORD_OR_UNION_CHECK (NODE))->template_info)
2132
2133/* Template information for an ENUMERAL_TYPE.  Although an enumeration may
2134   not be a primary template, it may be declared within the scope of a
2135   primary template and the enumeration constants may depend on
2136   non-type template parameters.  */
2137#define ENUM_TEMPLATE_INFO(NODE) \
2138  (TYPE_LANG_SLOT_1 (ENUMERAL_TYPE_CHECK (NODE)))
2139
2140/* Template information for a template template parameter.  */
2141#define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) \
2142  (LANG_TYPE_CLASS_CHECK (BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK (NODE)) \
2143   ->template_info)
2144
2145/* Template information for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
2146#define TYPE_TEMPLATE_INFO(NODE)			\
2147  (TREE_CODE (NODE) == ENUMERAL_TYPE			\
2148   ? ENUM_TEMPLATE_INFO (NODE) :			\
2149   (TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM	\
2150    ? TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (NODE) :	\
2151    (TYPE_LANG_SPECIFIC (NODE)				\
2152     ? CLASSTYPE_TEMPLATE_INFO (NODE)			\
2153     : NULL_TREE)))
2154
2155/* Set the template information for an ENUMERAL_, RECORD_, or
2156   UNION_TYPE to VAL.  */
2157#define SET_TYPE_TEMPLATE_INFO(NODE, VAL)	\
2158  (TREE_CODE (NODE) == ENUMERAL_TYPE		\
2159   ? (ENUM_TEMPLATE_INFO (NODE) = (VAL))	\
2160   : (CLASSTYPE_TEMPLATE_INFO (NODE) = (VAL)))
2161
2162#define TI_TEMPLATE(NODE) (TREE_PURPOSE (NODE))
2163#define TI_ARGS(NODE) (TREE_VALUE (NODE))
2164#define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE)
2165
2166/* We use TREE_VECs to hold template arguments.  If there is only one
2167   level of template arguments, then the TREE_VEC contains the
2168   arguments directly.  If there is more than one level of template
2169   arguments, then each entry in the TREE_VEC is itself a TREE_VEC,
2170   containing the template arguments for a single level.  The first
2171   entry in the outer TREE_VEC is the outermost level of template
2172   parameters; the last is the innermost.
2173
2174   It is incorrect to ever form a template argument vector containing
2175   only one level of arguments, but which is a TREE_VEC containing as
2176   its only entry the TREE_VEC for that level.  */
2177
2178/* Nonzero if the template arguments is actually a vector of vectors,
2179   rather than just a vector.  */
2180#define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE)		\
2181  (NODE && TREE_VEC_ELT (NODE, 0)			\
2182   && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC)
2183
2184/* The depth of a template argument vector.  When called directly by
2185   the parser, we use a TREE_LIST rather than a TREE_VEC to represent
2186   template arguments.  In fact, we may even see NULL_TREE if there
2187   are no template arguments.  In both of those cases, there is only
2188   one level of template arguments.  */
2189#define TMPL_ARGS_DEPTH(NODE)					\
2190  (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE) : 1)
2191
2192/* The LEVELth level of the template ARGS.  The outermost level of
2193   args is level 1, not level 0.  */
2194#define TMPL_ARGS_LEVEL(ARGS, LEVEL)		\
2195  (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS)	\
2196   ? TREE_VEC_ELT (ARGS, (LEVEL) - 1) : (ARGS))
2197
2198/* Set the LEVELth level of the template ARGS to VAL.  This macro does
2199   not work with single-level argument vectors.  */
2200#define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL)	\
2201  (TREE_VEC_ELT (ARGS, (LEVEL) - 1) = (VAL))
2202
2203/* Accesses the IDXth parameter in the LEVELth level of the ARGS.  */
2204#define TMPL_ARG(ARGS, LEVEL, IDX)				\
2205  (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX))
2206
2207/* Given a single level of template arguments in NODE, return the
2208   number of arguments.  */
2209#define NUM_TMPL_ARGS(NODE)				\
2210  (TREE_VEC_LENGTH (NODE))
2211
2212/* Returns the innermost level of template arguments in ARGS.  */
2213#define INNERMOST_TEMPLATE_ARGS(NODE) \
2214  (get_innermost_template_args ((NODE), 1))
2215
2216/* The number of levels of template parameters given by NODE.  */
2217#define TMPL_PARMS_DEPTH(NODE) \
2218  ((HOST_WIDE_INT) TREE_INT_CST_LOW (TREE_PURPOSE (NODE)))
2219
2220/* The TEMPLATE_DECL instantiated or specialized by NODE.  This
2221   TEMPLATE_DECL will be the immediate parent, not the most general
2222   template.  For example, in:
2223
2224      template <class T> struct S { template <class U> void f(U); }
2225
2226   the FUNCTION_DECL for S<int>::f<double> will have, as its
2227   DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'.
2228
2229   As a special case, for a member friend template of a template
2230   class, this value will not be a TEMPLATE_DECL, but rather an
2231   IDENTIFIER_NODE or OVERLOAD indicating the name of the template and
2232   any explicit template arguments provided.  For example, in:
2233
2234     template <class T> struct S { friend void f<int>(int, double); }
2235
2236   the DECL_TI_TEMPLATE will be an IDENTIFIER_NODE for `f' and the
2237   DECL_TI_ARGS will be {int}.  */
2238#define DECL_TI_TEMPLATE(NODE)      TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
2239
2240/* The template arguments used to obtain this decl from the most
2241   general form of DECL_TI_TEMPLATE.  For the example given for
2242   DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}.  These
2243   are always the full set of arguments required to instantiate this
2244   declaration from the most general template specialized here.  */
2245#define DECL_TI_ARGS(NODE)	    TI_ARGS (DECL_TEMPLATE_INFO (NODE))
2246
2247/* The TEMPLATE_DECL associated with NODE, a class type.  Even if NODE
2248   will be generated from a partial specialization, the TEMPLATE_DECL
2249   referred to here will be the original template.  For example,
2250   given:
2251
2252      template <typename T> struct S {};
2253      template <typename T> struct S<T*> {};
2254
2255   the CLASSTPYE_TI_TEMPLATE for S<int*> will be S, not the S<T*>.  */
2256#define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
2257#define CLASSTYPE_TI_ARGS(NODE)     TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
2258
2259/* For a template instantiation TYPE, returns the TYPE corresponding
2260   to the primary template.  Otherwise returns TYPE itself.  */
2261#define CLASSTYPE_PRIMARY_TEMPLATE_TYPE(TYPE)				\
2262  ((CLASSTYPE_USE_TEMPLATE ((TYPE))					\
2263    && !CLASSTYPE_TEMPLATE_SPECIALIZATION ((TYPE)))			\
2264   ? TREE_TYPE (DECL_TEMPLATE_RESULT (DECL_PRIMARY_TEMPLATE		\
2265				      (CLASSTYPE_TI_TEMPLATE ((TYPE))))) \
2266   : (TYPE))
2267
2268/* Like CLASS_TI_TEMPLATE, but also works for ENUMERAL_TYPEs.  */
2269#define TYPE_TI_TEMPLATE(NODE)			\
2270  (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE)))
2271
2272/* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE.  */
2273#define TYPE_TI_ARGS(NODE)			\
2274  (TI_ARGS (TYPE_TEMPLATE_INFO (NODE)))
2275
2276#define INNERMOST_TEMPLATE_PARMS(NODE)  TREE_VALUE (NODE)
2277
2278/* Nonzero if NODE (a TEMPLATE_DECL) is a member template, in the
2279   sense of [temp.mem].  */
2280#define DECL_MEMBER_TEMPLATE_P(NODE) \
2281  (DECL_LANG_FLAG_1 (TEMPLATE_DECL_CHECK (NODE)))
2282
2283/* Nonzero if the NODE corresponds to the template parameters for a
2284   member template, whose inline definition is being processed after
2285   the class definition is complete.  */
2286#define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE)
2287
2288/* In a FUNCTION_DECL, the saved language-specific per-function data.  */
2289#define DECL_SAVED_FUNCTION_DATA(NODE)			\
2290  (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))	\
2291   ->u.f.u.saved_language_function)
2292
2293/* Indicates an indirect_expr is for converting a reference.  */
2294#define REFERENCE_REF_P(NODE) \
2295  TREE_LANG_FLAG_0 (INDIRECT_REF_CHECK (NODE))
2296
2297#define NEW_EXPR_USE_GLOBAL(NODE) \
2298  TREE_LANG_FLAG_0 (NEW_EXPR_CHECK (NODE))
2299#define DELETE_EXPR_USE_GLOBAL(NODE) \
2300  TREE_LANG_FLAG_0 (DELETE_EXPR_CHECK (NODE))
2301#define DELETE_EXPR_USE_VEC(NODE) \
2302  TREE_LANG_FLAG_1 (DELETE_EXPR_CHECK (NODE))
2303
2304/* Indicates that this is a non-dependent COMPOUND_EXPR which will
2305   resolve to a function call.  */
2306#define COMPOUND_EXPR_OVERLOADED(NODE) \
2307  TREE_LANG_FLAG_0 (COMPOUND_EXPR_CHECK (NODE))
2308
2309/* In a CALL_EXPR appearing in a template, true if Koenig lookup
2310   should be performed at instantiation time.  */
2311#define KOENIG_LOOKUP_P(NODE) TREE_LANG_FLAG_0 (CALL_EXPR_CHECK (NODE))
2312
2313/* Indicates whether a string literal has been parenthesized. Such
2314   usages are disallowed in certain circumstances.  */
2315
2316#define PAREN_STRING_LITERAL_P(NODE) \
2317  TREE_LANG_FLAG_0 (STRING_CST_CHECK (NODE))
2318
2319/* Nonzero if this AGGR_INIT_EXPR provides for initialization via a
2320   constructor call, rather than an ordinary function call.  */
2321#define AGGR_INIT_VIA_CTOR_P(NODE) \
2322  TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE))
2323
2324/* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a
2325   TEMPLATE_DECL.  This macro determines whether or not a given class
2326   type is really a template type, as opposed to an instantiation or
2327   specialization of one.  */
2328#define CLASSTYPE_IS_TEMPLATE(NODE)  \
2329  (CLASSTYPE_TEMPLATE_INFO (NODE)    \
2330   && !CLASSTYPE_USE_TEMPLATE (NODE) \
2331   && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
2332
2333/* The name used by the user to name the typename type.  Typically,
2334   this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the
2335   corresponding TYPE_DECL.  However, this may also be a
2336   TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'.  */
2337#define TYPENAME_TYPE_FULLNAME(NODE) (TYPENAME_TYPE_CHECK (NODE))->type.values
2338
2339/* True if a TYPENAME_TYPE was declared as an "enum".  */
2340#define TYPENAME_IS_ENUM_P(NODE) \
2341  (TREE_LANG_FLAG_0 (TYPENAME_TYPE_CHECK (NODE)))
2342
2343/* True if a TYPENAME_TYPE was declared as a "class", "struct", or
2344   "union".  */
2345#define TYPENAME_IS_CLASS_P(NODE) \
2346  (TREE_LANG_FLAG_1 (TYPENAME_TYPE_CHECK (NODE)))
2347
2348/* Nonzero in INTEGER_CST means that this int is negative by dint of
2349   using a twos-complement negated operand.  */
2350#define TREE_NEGATED_INT(NODE) TREE_LANG_FLAG_0 (INTEGER_CST_CHECK (NODE))
2351
2352/* [class.virtual]
2353
2354   A class that declares or inherits a virtual function is called a
2355   polymorphic class.  */
2356#define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE))
2357
2358/* Nonzero if this class has a virtual function table pointer.  */
2359#define TYPE_CONTAINS_VPTR_P(NODE)		\
2360  (TYPE_POLYMORPHIC_P (NODE) || CLASSTYPE_VBASECLASSES (NODE))
2361
2362/* This flag is true of a local VAR_DECL if it was declared in a for
2363   statement, but we are no longer in the scope of the for.  */
2364#define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE))
2365
2366/* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL
2367   if we already emitted a warning about using it.  */
2368#define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (VAR_DECL_CHECK (NODE))
2369
2370/* Nonzero if NODE is a FUNCTION_DECL (for a function with global
2371   scope) declared in a local scope.  */
2372#define DECL_LOCAL_FUNCTION_P(NODE) \
2373  DECL_LANG_FLAG_0 (FUNCTION_DECL_CHECK (NODE))
2374
2375/* Nonzero if NODE is a DECL which we know about but which has not
2376   been explicitly declared, such as a built-in function or a friend
2377   declared inside a class.  In the latter case DECL_HIDDEN_FRIEND_P
2378   will be set.  */
2379#define DECL_ANTICIPATED(NODE) \
2380  (DECL_LANG_SPECIFIC (DECL_COMMON_CHECK (NODE))->decl_flags.anticipated_p)
2381
2382/* Nonzero if NODE is a FUNCTION_DECL which was declared as a friend
2383   within a class but has not been declared in the surrounding scope.
2384   The function is invisible except via argument dependent lookup.  */
2385#define DECL_HIDDEN_FRIEND_P(NODE) \
2386  (DECL_LANG_SPECIFIC (DECL_COMMON_CHECK (NODE))->decl_flags.hidden_friend_p)
2387
2388/* Nonzero if DECL has been declared threadprivate by
2389   #pragma omp threadprivate.  */
2390#define CP_DECL_THREADPRIVATE_P(DECL) \
2391  (DECL_LANG_SPECIFIC (VAR_DECL_CHECK (DECL))->decl_flags.threadprivate_p)
2392
2393/* Record whether a typedef for type `int' was actually `signed int'.  */
2394#define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP)
2395
2396/* Returns nonzero if DECL has external linkage, as specified by the
2397   language standard.  (This predicate may hold even when the
2398   corresponding entity is not actually given external linkage in the
2399   object file; see decl_linkage for details.)  */
2400#define DECL_EXTERNAL_LINKAGE_P(DECL) \
2401  (decl_linkage (DECL) == lk_external)
2402
2403/* Keep these codes in ascending code order.  */
2404
2405#define INTEGRAL_CODE_P(CODE)	\
2406  ((CODE) == ENUMERAL_TYPE	\
2407   || (CODE) == BOOLEAN_TYPE	\
2408   || (CODE) == INTEGER_TYPE)
2409
2410/* [basic.fundamental]
2411
2412   Types  bool, char, wchar_t, and the signed and unsigned integer types
2413   are collectively called integral types.
2414
2415   Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration
2416   types as well, which is incorrect in C++.  Keep these checks in
2417   ascending code order.  */
2418#define CP_INTEGRAL_TYPE_P(TYPE)		\
2419  (TREE_CODE (TYPE) == BOOLEAN_TYPE		\
2420   || TREE_CODE (TYPE) == INTEGER_TYPE)
2421
2422/* Returns true if TYPE is an integral or enumeration name.  Keep
2423   these checks in ascending code order.  */
2424#define INTEGRAL_OR_ENUMERATION_TYPE_P(TYPE) \
2425   (TREE_CODE (TYPE) == ENUMERAL_TYPE || CP_INTEGRAL_TYPE_P (TYPE))
2426
2427/* [basic.fundamental]
2428
2429   Integral and floating types are collectively called arithmetic
2430   types.
2431
2432   As a GNU extension, we also accept complex types.
2433
2434   Keep these checks in ascending code order.  */
2435#define ARITHMETIC_TYPE_P(TYPE) \
2436  (CP_INTEGRAL_TYPE_P (TYPE) \
2437   || TREE_CODE (TYPE) == REAL_TYPE \
2438   || TREE_CODE (TYPE) == COMPLEX_TYPE)
2439
2440/* [basic.types]
2441
2442   Arithmetic types, enumeration types, pointer types, and
2443   pointer-to-member types, are collectively called scalar types.
2444
2445   Keep these checks in ascending code order.  */
2446#define SCALAR_TYPE_P(TYPE)			\
2447  (TYPE_PTRMEM_P (TYPE)				\
2448   || TREE_CODE (TYPE) == ENUMERAL_TYPE		\
2449   || ARITHMETIC_TYPE_P (TYPE)			\
2450   || TYPE_PTR_P (TYPE)				\
2451   /* APPLE LOCAL blocks 6040305 */		\
2452   || TREE_CODE (TYPE) == BLOCK_POINTER_TYPE	\
2453   || TYPE_PTRMEMFUNC_P (TYPE))
2454
2455/* [dcl.init.aggr]
2456
2457   An aggregate is an array or a class with no user-declared
2458   constructors, no private or protected non-static data members, no
2459   base classes, and no virtual functions.
2460
2461   As an extension, we also treat vectors as aggregates.  Keep these
2462   checks in ascending code order.  */
2463#define CP_AGGREGATE_TYPE_P(TYPE)				\
2464  (TREE_CODE (TYPE) == VECTOR_TYPE				\
2465   ||TREE_CODE (TYPE) == ARRAY_TYPE				\
2466   || (CLASS_TYPE_P (TYPE) && !CLASSTYPE_NON_AGGREGATE (TYPE)))
2467
2468/* Nonzero for a class type means that the class type has a
2469   user-declared constructor.  */
2470#define TYPE_HAS_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1 (NODE))
2471
2472/* When appearing in an INDIRECT_REF, it means that the tree structure
2473   underneath is actually a call to a constructor.  This is needed
2474   when the constructor must initialize local storage (which can
2475   be automatically destroyed), rather than allowing it to allocate
2476   space from the heap.
2477
2478   When appearing in a SAVE_EXPR, it means that underneath
2479   is a call to a constructor.
2480
2481   When appearing in a CONSTRUCTOR, the expression is a
2482   compound literal.
2483
2484   When appearing in a FIELD_DECL, it means that this field
2485   has been duly initialized in its constructor.  */
2486#define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4 (NODE))
2487
2488/* True if NODE is a brace-enclosed initializer.  */
2489#define BRACE_ENCLOSED_INITIALIZER_P(NODE) \
2490  (TREE_CODE (NODE) == CONSTRUCTOR && !TREE_TYPE (NODE))
2491
2492/* True if NODE is a compound-literal, i.e., a brace-enclosed
2493   initializer cast to a particular type.  */
2494#define COMPOUND_LITERAL_P(NODE) \
2495  (TREE_CODE (NODE) == CONSTRUCTOR && TREE_HAS_CONSTRUCTOR (NODE))
2496
2497#define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \
2498				   && VEC_empty (constructor_elt, \
2499						 CONSTRUCTOR_ELTS (NODE)) \
2500				   && !TREE_HAS_CONSTRUCTOR (NODE))
2501
2502/* Nonzero means that an object of this type can not be initialized using
2503   an initializer list.  */
2504#define CLASSTYPE_NON_AGGREGATE(NODE) \
2505  (LANG_TYPE_CLASS_CHECK (NODE)->non_aggregate)
2506#define TYPE_NON_AGGREGATE_CLASS(NODE) \
2507  (IS_AGGR_TYPE (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
2508
2509/* Nonzero if there is a user-defined X::op=(x&) for this class.  */
2510#define TYPE_HAS_COMPLEX_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_assign_ref)
2511#define TYPE_HAS_COMPLEX_INIT_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_init_ref)
2512
2513/* Nonzero if TYPE has a trivial destructor.  From [class.dtor]:
2514
2515     A destructor is trivial if it is an implicitly declared
2516     destructor and if:
2517
2518       - all of the direct base classes of its class have trivial
2519	 destructors,
2520
2521       - for all of the non-static data members of its class that are
2522	 of class type (or array thereof), each such class has a
2523	 trivial destructor.  */
2524#define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \
2525  (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE))
2526
2527/* Nonzero for _TYPE node means that this type does not have a trivial
2528   destructor.  Therefore, destroying an object of this type will
2529   involve a call to a destructor.  This can apply to objects of
2530   ARRAY_TYPE is the type of the elements needs a destructor.  */
2531#define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \
2532  (TYPE_LANG_FLAG_4 (NODE))
2533
2534/* APPLE LOCAL begin omit calls to empty destructors 5559195 */
2535/* One if the body of the destructor of class type NODE has been shown to do
2536 nothing, else zero. */
2537#define CLASSTYPE_HAS_NONTRIVIAL_DESTRUCTOR_BODY(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_nontrivial_destructor_body)
2538
2539/* One if destructor of this type must be called by its base classes because
2540 one of its base classes' destructors must be called. */
2541#define CLASSTYPE_DESTRUCTOR_NONTRIVIAL_BECAUSE_OF_BASE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->destructor_nontrivial_because_of_base)
2542
2543/* One if the values of CLASSTYPE_DESTRUCTOR_NONTRIVIAL_BECAUSE_OF_BASE
2544 and CLASSTYPE_HAS_NONTRIVIAL_DESTRUCTOR_BODY are final. */
2545#define CLASSTYPE_DESTRUCTOR_TRIVIALITY_FINAL(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->destructor_triviality_final)
2546/* APPLE LOCAL end omit calls to empty destructors 5559195 */
2547
2548/* Nonzero for class type means that copy initialization of this type can use
2549   a bitwise copy.  */
2550#define TYPE_HAS_TRIVIAL_INIT_REF(NODE) \
2551  (TYPE_HAS_INIT_REF (NODE) && ! TYPE_HAS_COMPLEX_INIT_REF (NODE))
2552
2553/* Nonzero for class type means that assignment of this type can use
2554   a bitwise copy.  */
2555#define TYPE_HAS_TRIVIAL_ASSIGN_REF(NODE) \
2556  (TYPE_HAS_ASSIGN_REF (NODE) && ! TYPE_HAS_COMPLEX_ASSIGN_REF (NODE))
2557
2558/* Returns true if NODE is a pointer-to-data-member.  */
2559#define TYPE_PTRMEM_P(NODE)			\
2560  (TREE_CODE (NODE) == OFFSET_TYPE)
2561/* Returns true if NODE is a pointer.  */
2562#define TYPE_PTR_P(NODE)			\
2563  (TREE_CODE (NODE) == POINTER_TYPE)
2564
2565/* Returns true if NODE is an object type:
2566
2567     [basic.types]
2568
2569     An object type is a (possibly cv-qualified) type that is not a
2570     function type, not a reference type, and not a void type.
2571
2572   Keep these checks in ascending order, for speed.  */
2573#define TYPE_OBJ_P(NODE)			\
2574  (TREE_CODE (NODE) != REFERENCE_TYPE		\
2575   && TREE_CODE (NODE) != VOID_TYPE		\
2576   && TREE_CODE (NODE) != FUNCTION_TYPE		\
2577   && TREE_CODE (NODE) != METHOD_TYPE)
2578
2579/* Returns true if NODE is a pointer to an object.  Keep these checks
2580   in ascending tree code order.  */
2581#define TYPE_PTROB_P(NODE)					\
2582  (TYPE_PTR_P (NODE) && TYPE_OBJ_P (TREE_TYPE (NODE)))
2583
2584/* Returns true if NODE is a reference to an object.  Keep these checks
2585   in ascending tree code order.  */
2586#define TYPE_REF_OBJ_P(NODE)					\
2587  (TREE_CODE (NODE) == REFERENCE_TYPE && TYPE_OBJ_P (TREE_TYPE (NODE)))
2588
2589/* Returns true if NODE is a pointer to an object, or a pointer to
2590   void.  Keep these checks in ascending tree code order.  */
2591#define TYPE_PTROBV_P(NODE)					\
2592  (TYPE_PTR_P (NODE)						\
2593   && !(TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE		\
2594	|| TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE))
2595
2596/* Returns true if NODE is a pointer to function.  */
2597#define TYPE_PTRFN_P(NODE)				\
2598  (TREE_CODE (NODE) == POINTER_TYPE			\
2599   && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
2600
2601/* Returns true if NODE is a reference to function.  */
2602#define TYPE_REFFN_P(NODE)				\
2603  (TREE_CODE (NODE) == REFERENCE_TYPE			\
2604   && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
2605
2606/* Nonzero for _TYPE node means that this type is a pointer to member
2607   function type.  */
2608#define TYPE_PTRMEMFUNC_P(NODE)		\
2609  (TREE_CODE (NODE) == RECORD_TYPE	\
2610   && TYPE_LANG_SPECIFIC (NODE)		\
2611   && TYPE_PTRMEMFUNC_FLAG (NODE))
2612
2613#define TYPE_PTRMEMFUNC_FLAG(NODE) \
2614  (LANG_TYPE_CLASS_CHECK (NODE)->ptrmemfunc_flag)
2615
2616/* Returns true if NODE is a pointer-to-member.  */
2617#define TYPE_PTR_TO_MEMBER_P(NODE) \
2618  (TYPE_PTRMEM_P (NODE) || TYPE_PTRMEMFUNC_P (NODE))
2619
2620/* Indicates when overload resolution may resolve to a pointer to
2621   member function. [expr.unary.op]/3 */
2622#define PTRMEM_OK_P(NODE) \
2623  TREE_LANG_FLAG_0 (TREE_CHECK2 ((NODE), ADDR_EXPR, OFFSET_REF))
2624
2625/* Get the POINTER_TYPE to the METHOD_TYPE associated with this
2626   pointer to member function.  TYPE_PTRMEMFUNC_P _must_ be true,
2627   before using this macro.  */
2628#define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \
2629  (TREE_TYPE (TYPE_FIELDS (NODE)))
2630
2631/* Returns `A' for a type like `int (A::*)(double)' */
2632#define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \
2633  TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
2634
2635/* These are use to manipulate the canonical RECORD_TYPE from the
2636   hashed POINTER_TYPE, and can only be used on the POINTER_TYPE.  */
2637#define TYPE_GET_PTRMEMFUNC_TYPE(NODE) \
2638  (TYPE_LANG_SPECIFIC (NODE) ? LANG_TYPE_PTRMEM_CHECK (NODE)->record : NULL)
2639#define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE)				\
2640  do {									\
2641    if (TYPE_LANG_SPECIFIC (NODE) == NULL)				\
2642      {									\
2643	TYPE_LANG_SPECIFIC (NODE) = GGC_CNEWVAR				\
2644	 (struct lang_type, sizeof (struct lang_type_ptrmem));		\
2645	TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.h.is_lang_type_class = 0;	\
2646      }									\
2647    TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.record = (VALUE);		\
2648  } while (0)
2649
2650/* For a pointer-to-member type of the form `T X::*', this is `X'.
2651   For a type like `void (X::*)() const', this type is `X', not `const
2652   X'.  To get at the `const X' you have to look at the
2653   TYPE_PTRMEM_POINTED_TO_TYPE; there, the first parameter will have
2654   type `const X*'.  */
2655#define TYPE_PTRMEM_CLASS_TYPE(NODE)			\
2656  (TYPE_PTRMEM_P (NODE)					\
2657   ? TYPE_OFFSET_BASETYPE (NODE)		\
2658   : TYPE_PTRMEMFUNC_OBJECT_TYPE (NODE))
2659
2660/* For a pointer-to-member type of the form `T X::*', this is `T'.  */
2661#define TYPE_PTRMEM_POINTED_TO_TYPE(NODE)		\
2662   (TYPE_PTRMEM_P (NODE)				\
2663    ? TREE_TYPE (NODE)					\
2664    : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
2665
2666/* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for
2667   `X'.  */
2668#define PTRMEM_CST_CLASS(NODE) \
2669  TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE)))
2670
2671/* For a pointer-to-member constant `X::Y' this is the _DECL for
2672   `Y'.  */
2673#define PTRMEM_CST_MEMBER(NODE) (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member)
2674
2675/* The expression in question for a TYPEOF_TYPE.  */
2676#define TYPEOF_TYPE_EXPR(NODE) (TYPEOF_TYPE_CHECK (NODE))->type.values
2677
2678/* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
2679   specified in its declaration.  This can also be set for an
2680   erroneously declared PARM_DECL.  */
2681#define DECL_THIS_EXTERN(NODE) \
2682  DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
2683
2684/* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
2685   specified in its declaration.  This can also be set for an
2686   erroneously declared PARM_DECL.  */
2687#define DECL_THIS_STATIC(NODE) \
2688  DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE))
2689
2690/* Nonzero for FIELD_DECL node means that this field is a base class
2691   of the parent object, as opposed to a member field.  */
2692#define DECL_FIELD_IS_BASE(NODE) \
2693  DECL_LANG_FLAG_6 (FIELD_DECL_CHECK (NODE))
2694
2695/* Nonzero if TYPE is an anonymous union or struct type.  We have to use a
2696   flag for this because "A union for which objects or pointers are
2697   declared is not an anonymous union" [class.union].  */
2698#define ANON_AGGR_TYPE_P(NODE)				\
2699  (CLASS_TYPE_P (NODE) && LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr)
2700#define SET_ANON_AGGR_TYPE_P(NODE)			\
2701  (LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr = 1)
2702
2703/* Nonzero if TYPE is an anonymous union type.  */
2704#define ANON_UNION_TYPE_P(NODE) \
2705  (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE))
2706
2707#define UNKNOWN_TYPE LANG_TYPE
2708
2709/* Define fields and accessors for nodes representing declared names.  */
2710
2711#define TYPE_WAS_ANONYMOUS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->was_anonymous)
2712
2713/* C++: all of these are overloaded!  These apply only to TYPE_DECLs.  */
2714
2715/* The format of each node in the DECL_FRIENDLIST is as follows:
2716
2717   The TREE_PURPOSE will be the name of a function, i.e., an
2718   IDENTIFIER_NODE.  The TREE_VALUE will be itself a TREE_LIST, whose
2719   TREE_VALUEs are friends with the given name.  */
2720#define DECL_FRIENDLIST(NODE)		(DECL_INITIAL (NODE))
2721#define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
2722#define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
2723
2724/* The DECL_ACCESS, if non-NULL, is a TREE_LIST.  The TREE_PURPOSE of
2725   each node is a type; the TREE_VALUE is the access granted for this
2726   DECL in that type.  The DECL_ACCESS is set by access declarations.
2727   For example, if a member that would normally be public in a
2728   derived class is made protected, then the derived class and the
2729   protected_access_node will appear in the DECL_ACCESS for the node.  */
2730#define DECL_ACCESS(NODE) (LANG_DECL_U2_CHECK (NODE, 0)->access)
2731
2732/* Nonzero if the FUNCTION_DECL is a global constructor.  */
2733#define DECL_GLOBAL_CTOR_P(NODE) \
2734  (DECL_LANG_SPECIFIC (NODE)->decl_flags.global_ctor_p)
2735
2736/* Nonzero if the FUNCTION_DECL is a global destructor.  */
2737#define DECL_GLOBAL_DTOR_P(NODE) \
2738  (DECL_LANG_SPECIFIC (NODE)->decl_flags.global_dtor_p)
2739
2740/* Accessor macros for C++ template decl nodes.  */
2741
2742/* The DECL_TEMPLATE_PARMS are a list.  The TREE_PURPOSE of each node
2743   is a INT_CST whose TREE_INT_CST_LOW indicates the level of the
2744   template parameters, with 1 being the outermost set of template
2745   parameters.  The TREE_VALUE is a vector, whose elements are the
2746   template parameters at each level.  Each element in the vector is a
2747   TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a
2748   non-type parameter), or a TYPE_DECL (if the parameter is a type
2749   parameter).  The TREE_PURPOSE is the default value, if any.  The
2750   TEMPLATE_PARM_INDEX for the parameter is available as the
2751   DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a
2752   TYPE_DECL).  */
2753#define DECL_TEMPLATE_PARMS(NODE)       DECL_NON_COMMON_CHECK (NODE)->decl_non_common.arguments
2754#define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
2755   INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
2756#define DECL_NTPARMS(NODE) \
2757   TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
2758/* For function, method, class-data templates.  */
2759#define DECL_TEMPLATE_RESULT(NODE)      DECL_RESULT_FLD (NODE)
2760/* For a static member variable template, the
2761   DECL_TEMPLATE_INSTANTIATIONS list contains the explicitly and
2762   implicitly generated instantiations of the variable.  There are no
2763   partial instantiations of static member variables, so all of these
2764   will be full instantiations.
2765
2766   For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds
2767   all instantiations and specializations of the class type, including
2768   partial instantiations and partial specializations.
2769
2770   In both cases, the TREE_PURPOSE of each node contains the arguments
2771   used; the TREE_VALUE contains the generated variable.  The template
2772   arguments are always complete.  For example, given:
2773
2774      template <class T> struct S1 {
2775	template <class U> struct S2 {};
2776	template <class U> struct S2<U*> {};
2777      };
2778
2779   the record for the partial specialization will contain, as its
2780   argument list, { {T}, {U*} }, and will be on the
2781   DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template
2782   <class U> struct S1<T>::S2'.
2783
2784   This list is not used for function templates.  */
2785#define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX (NODE)
2786/* For a function template, the DECL_TEMPLATE_SPECIALIZATIONS lists
2787   contains all instantiations and specializations of the function,
2788   including partial instantiations.  For a partial instantiation
2789   which is a specialization, this list holds only full
2790   specializations of the template that are instantiations of the
2791   partial instantiation.  For example, given:
2792
2793      template <class T> struct S {
2794	template <class U> void f(U);
2795	template <> void f(T);
2796      };
2797
2798   the `S<int>::f<int>(int)' function will appear on the
2799   DECL_TEMPLATE_SPECIALIZATIONS list for both `template <class T>
2800   template <class U> void S<T>::f(U)' and `template <class T> void
2801   S<int>::f(T)'.  In the latter case, however, it will have only the
2802   innermost set of arguments (T, in this case).  The DECL_TI_TEMPLATE
2803   for the function declaration will point at the specialization, not
2804   the fully general template.
2805
2806   For a class template, this list contains the partial
2807   specializations of this template.  (Full specializations are not
2808   recorded on this list.)  The TREE_PURPOSE holds the arguments used
2809   in the partial specialization (e.g., for `template <class T> struct
2810   S<T*, int>' this will be `T*'.)  The arguments will also include
2811   any outer template arguments.  The TREE_VALUE holds the innermost
2812   template parameters for the specialization (e.g., `T' in the
2813   example above.)  The TREE_TYPE is the _TYPE node for the partial
2814   specialization.
2815
2816   This list is not used for static variable templates.  */
2817#define DECL_TEMPLATE_SPECIALIZATIONS(NODE)     DECL_SIZE (NODE)
2818
2819/* Nonzero for a DECL which is actually a template parameter.  Keep
2820   these checks in ascending tree code order.   */
2821#define DECL_TEMPLATE_PARM_P(NODE)		\
2822  (DECL_LANG_FLAG_0 (NODE)			\
2823   && (TREE_CODE (NODE) == CONST_DECL		\
2824       || TREE_CODE (NODE) == PARM_DECL		\
2825       || TREE_CODE (NODE) == TYPE_DECL		\
2826       || TREE_CODE (NODE) == TEMPLATE_DECL))
2827
2828/* Mark NODE as a template parameter.  */
2829#define SET_DECL_TEMPLATE_PARM_P(NODE) \
2830  (DECL_LANG_FLAG_0 (NODE) = 1)
2831
2832/* Nonzero if NODE is a template template parameter.  */
2833#define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \
2834  (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE))
2835
2836/* Nonzero if NODE is a TEMPLATE_DECL representing an
2837   UNBOUND_CLASS_TEMPLATE tree node.  */
2838#define DECL_UNBOUND_CLASS_TEMPLATE_P(NODE) \
2839  (TREE_CODE (NODE) == TEMPLATE_DECL && !DECL_TEMPLATE_RESULT (NODE))
2840
2841#define DECL_FUNCTION_TEMPLATE_P(NODE)  \
2842  (TREE_CODE (NODE) == TEMPLATE_DECL \
2843   && !DECL_UNBOUND_CLASS_TEMPLATE_P (NODE) \
2844   && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
2845
2846/* Nonzero for a DECL that represents a template class.  */
2847#define DECL_CLASS_TEMPLATE_P(NODE) \
2848  (TREE_CODE (NODE) == TEMPLATE_DECL \
2849   && !DECL_UNBOUND_CLASS_TEMPLATE_P (NODE) \
2850   && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL \
2851   && !DECL_TEMPLATE_TEMPLATE_PARM_P (NODE))
2852
2853/* Nonzero if NODE which declares a type.  */
2854#define DECL_DECLARES_TYPE_P(NODE) \
2855  (TREE_CODE (NODE) == TYPE_DECL || DECL_CLASS_TEMPLATE_P (NODE))
2856
2857/* Nonzero if NODE is the typedef implicitly generated for a type when
2858   the type is declared.  In C++, `struct S {};' is roughly
2859   equivalent to `struct S {}; typedef struct S S;' in C.
2860   DECL_IMPLICIT_TYPEDEF_P will hold for the typedef indicated in this
2861   example.  In C++, there is a second implicit typedef for each
2862   class, in the scope of `S' itself, so that you can say `S::S'.
2863   DECL_SELF_REFERENCE_P will hold for that second typedef.  */
2864#define DECL_IMPLICIT_TYPEDEF_P(NODE) \
2865  (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_2 (NODE))
2866#define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \
2867  (DECL_LANG_FLAG_2 (NODE) = 1)
2868#define DECL_SELF_REFERENCE_P(NODE) \
2869  (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_4 (NODE))
2870#define SET_DECL_SELF_REFERENCE_P(NODE) \
2871  (DECL_LANG_FLAG_4 (NODE) = 1)
2872
2873/* A `primary' template is one that has its own template header.  A
2874   member function of a class template is a template, but not primary.
2875   A member template is primary.  Friend templates are primary, too.  */
2876
2877/* Returns the primary template corresponding to these parameters.  */
2878#define DECL_PRIMARY_TEMPLATE(NODE) \
2879  (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)))
2880
2881/* Returns nonzero if NODE is a primary template.  */
2882#define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == (NODE))
2883
2884/* Non-zero iff NODE is a specialization of a template.  The value
2885   indicates the type of specializations:
2886
2887     1=implicit instantiation
2888
2889     2=partial or explicit specialization, e.g.:
2890
2891        template <> int min<int> (int, int),
2892
2893     3=explicit instantiation, e.g.:
2894
2895        template int min<int> (int, int);
2896
2897   Note that NODE will be marked as a specialization even if the
2898   template it is instantiating is not a primary template.  For
2899   example, given:
2900
2901     template <typename T> struct O {
2902       void f();
2903       struct I {};
2904     };
2905
2906   both O<int>::f and O<int>::I will be marked as instantiations.
2907
2908   If DECL_USE_TEMPLATE is non-zero, then DECL_TEMPLATE_INFO will also
2909   be non-NULL.  */
2910#define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.use_template)
2911
2912/* Like DECL_USE_TEMPLATE, but for class types.  */
2913#define CLASSTYPE_USE_TEMPLATE(NODE) \
2914  (LANG_TYPE_CLASS_CHECK (NODE)->use_template)
2915
2916/* True if NODE is a specialization of a primary template.  */
2917#define CLASSTYPE_SPECIALIZATION_OF_PRIMARY_TEMPLATE_P(NODE)	\
2918  (CLASS_TYPE_P (NODE)						\
2919   && CLASSTYPE_USE_TEMPLATE (NODE)				\
2920   && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (arg)))
2921
2922#define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
2923#define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
2924  (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
2925
2926#define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
2927#define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
2928
2929/* Returns true for an explicit or partial specialization of a class
2930   template.  */
2931#define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
2932  (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
2933#define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
2934  (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
2935
2936#define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
2937#define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
2938#define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
2939  (CLASSTYPE_USE_TEMPLATE (NODE) == 1)
2940#define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
2941  (CLASSTYPE_USE_TEMPLATE (NODE) = 1)
2942
2943#define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
2944#define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
2945#define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
2946  (CLASSTYPE_USE_TEMPLATE (NODE) == 3)
2947#define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
2948  (CLASSTYPE_USE_TEMPLATE (NODE) = 3)
2949
2950/* Nonzero if DECL is a friend function which is an instantiation
2951   from the point of view of the compiler, but not from the point of
2952   view of the language.  For example given:
2953      template <class T> struct S { friend void f(T) {}; };
2954   the declaration of `void f(int)' generated when S<int> is
2955   instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be
2956   a DECL_FRIEND_PSUEDO_TEMPLATE_INSTANTIATION.  */
2957#define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \
2958  (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL))
2959
2960/* Nonzero iff we are currently processing a declaration for an
2961   entity with its own template parameter list, and which is not a
2962   full specialization.  */
2963#define PROCESSING_REAL_TEMPLATE_DECL_P() \
2964  (processing_template_decl > template_class_depth (current_scope ()))
2965
2966/* Nonzero if this VAR_DECL or FUNCTION_DECL has already been
2967   instantiated, i.e. its definition has been generated from the
2968   pattern given in the template.  */
2969#define DECL_TEMPLATE_INSTANTIATED(NODE) \
2970  DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE))
2971
2972/* We know what we're doing with this decl now.  */
2973#define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
2974
2975/* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
2976   so that assemble_external will work properly.  So we have this flag to
2977   tell us whether the decl is really not external.  */
2978#define DECL_NOT_REALLY_EXTERN(NODE) \
2979  (DECL_LANG_SPECIFIC (NODE)->decl_flags.not_really_extern)
2980
2981#define DECL_REALLY_EXTERN(NODE) \
2982  (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE))
2983
2984/* A thunk is a stub function.
2985
2986   A thunk is an alternate entry point for an ordinary FUNCTION_DECL.
2987   The address of the ordinary FUNCTION_DECL is given by the
2988   DECL_INITIAL, which is always an ADDR_EXPR whose operand is a
2989   FUNCTION_DECL.  The job of the thunk is to either adjust the this
2990   pointer before transferring control to the FUNCTION_DECL, or call
2991   FUNCTION_DECL and then adjust the result value. Note, the result
2992   pointer adjusting thunk must perform a call to the thunked
2993   function, (or be implemented via passing some invisible parameter
2994   to the thunked function, which is modified to perform the
2995   adjustment just before returning).
2996
2997   A thunk may perform either, or both, of the following operations:
2998
2999   o Adjust the this or result pointer by a constant offset.
3000   o Adjust the this or result pointer by looking up a vcall or vbase offset
3001     in the vtable.
3002
3003   A this pointer adjusting thunk converts from a base to a derived
3004   class, and hence adds the offsets. A result pointer adjusting thunk
3005   converts from a derived class to a base, and hence subtracts the
3006   offsets.  If both operations are performed, then the constant
3007   adjustment is performed first for this pointer adjustment and last
3008   for the result pointer adjustment.
3009
3010   The constant adjustment is given by THUNK_FIXED_OFFSET.  If the
3011   vcall or vbase offset is required, THUNK_VIRTUAL_OFFSET is
3012   used. For this pointer adjusting thunks, it is the vcall offset
3013   into the vtable.  For result pointer adjusting thunks it is the
3014   binfo of the virtual base to convert to.  Use that binfo's vbase
3015   offset.
3016
3017   It is possible to have equivalent covariant thunks.  These are
3018   distinct virtual covariant thunks whose vbase offsets happen to
3019   have the same value.  THUNK_ALIAS is used to pick one as the
3020   canonical thunk, which will get all the this pointer adjusting
3021   thunks attached to it.  */
3022
3023/* An integer indicating how many bytes should be subtracted from the
3024   this or result pointer when this function is called.  */
3025#define THUNK_FIXED_OFFSET(DECL) \
3026  (DECL_LANG_SPECIFIC (THUNK_FUNCTION_CHECK (DECL))->u.f.u5.fixed_offset)
3027
3028/* A tree indicating how to perform the virtual adjustment. For a this
3029   adjusting thunk it is the number of bytes to be added to the vtable
3030   to find the vcall offset. For a result adjusting thunk, it is the
3031   binfo of the relevant virtual base.  If NULL, then there is no
3032   virtual adjust.  (The vptr is always located at offset zero from
3033   the this or result pointer.)  (If the covariant type is within the
3034   class hierarchy being laid out, the vbase index is not yet known
3035   at the point we need to create the thunks, hence the need to use
3036   binfos.)  */
3037
3038#define THUNK_VIRTUAL_OFFSET(DECL) \
3039  (LANG_DECL_U2_CHECK (FUNCTION_DECL_CHECK (DECL), 0)->access)
3040
3041/* A thunk which is equivalent to another thunk.  */
3042#define THUNK_ALIAS(DECL) \
3043  (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->decl_flags.u.template_info)
3044
3045/* For thunk NODE, this is the FUNCTION_DECL thunked to.  It is
3046   possible for the target to be a thunk too.  */
3047#define THUNK_TARGET(NODE)				\
3048  (DECL_LANG_SPECIFIC (NODE)->u.f.befriending_classes)
3049
3050/* True for a SCOPE_REF iff the "template" keyword was used to
3051   indicate that the qualified name denotes a template.  */
3052#define QUALIFIED_NAME_IS_TEMPLATE(NODE) \
3053  (TREE_LANG_FLAG_0 (SCOPE_REF_CHECK (NODE)))
3054
3055/* True for an OMP_ATOMIC that has dependent parameters.  These are stored
3056   as bare LHS/RHS, and not as ADDR/RHS, as in the generic statement.  */
3057#define OMP_ATOMIC_DEPENDENT_P(NODE) \
3058  (TREE_LANG_FLAG_0 (OMP_ATOMIC_CHECK (NODE)))
3059
3060/* Used to store the operation code when OMP_ATOMIC_DEPENDENT_P is set.  */
3061#define OMP_ATOMIC_CODE(NODE) \
3062  (OMP_ATOMIC_CHECK (NODE)->exp.complexity)
3063
3064/* Used while gimplifying continue statements bound to OMP_FOR nodes.  */
3065#define OMP_FOR_GIMPLIFYING_P(NODE) \
3066  (TREE_LANG_FLAG_0 (OMP_FOR_CHECK (NODE)))
3067
3068/* A language-specific token attached to the OpenMP data clauses to
3069   hold code (or code fragments) related to ctors, dtors, and op=.
3070   See semantics.c for details.  */
3071#define CP_OMP_CLAUSE_INFO(NODE) \
3072  TREE_TYPE (OMP_CLAUSE_RANGE_CHECK (NODE, OMP_CLAUSE_PRIVATE, \
3073				     OMP_CLAUSE_COPYPRIVATE))
3074
3075/* These macros provide convenient access to the various _STMT nodes
3076   created when parsing template declarations.  */
3077#define TRY_STMTS(NODE)		TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0)
3078#define TRY_HANDLERS(NODE)	TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1)
3079
3080#define EH_SPEC_STMTS(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 0)
3081#define EH_SPEC_RAISES(NODE)	TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 1)
3082
3083#define USING_STMT_NAMESPACE(NODE) TREE_OPERAND (USING_STMT_CHECK (NODE), 0)
3084
3085/* Nonzero if this try block is a function try block.  */
3086#define FN_TRY_BLOCK_P(NODE)	TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE))
3087#define HANDLER_PARMS(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 0)
3088#define HANDLER_BODY(NODE)	TREE_OPERAND (HANDLER_CHECK (NODE), 1)
3089#define HANDLER_TYPE(NODE)	TREE_TYPE (HANDLER_CHECK (NODE))
3090
3091/* CLEANUP_STMT accessors.  The statement(s) covered, the cleanup to run
3092   and the VAR_DECL for which this cleanup exists.  */
3093#define CLEANUP_BODY(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0)
3094#define CLEANUP_EXPR(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1)
3095#define CLEANUP_DECL(NODE)	TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 2)
3096
3097/* IF_STMT accessors. These give access to the condition of the if
3098   statement, the then block of the if statement, and the else block
3099   of the if statement if it exists.  */
3100#define IF_COND(NODE)		TREE_OPERAND (IF_STMT_CHECK (NODE), 0)
3101#define THEN_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 1)
3102#define ELSE_CLAUSE(NODE)	TREE_OPERAND (IF_STMT_CHECK (NODE), 2)
3103
3104/* WHILE_STMT accessors. These give access to the condition of the
3105   while statement and the body of the while statement, respectively.  */
3106#define WHILE_COND(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0)
3107#define WHILE_BODY(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1)
3108/* APPLE LOCAL begin for-fsf-4_4 3274130 5295549 */ \
3109#define WHILE_ATTRIBUTES(NODE)	TREE_OPERAND (WHILE_STMT_CHECK (NODE), 2)
3110
3111/* APPLE LOCAL end for-fsf-4_4 3274130 5295549 */ \
3112/* DO_STMT accessors. These give access to the condition of the do
3113   statement and the body of the do statement, respectively.  */
3114#define DO_COND(NODE)		TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
3115#define DO_BODY(NODE)		TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
3116/* APPLE LOCAL begin for-fsf-4_4 3274130 5295549 */ \
3117#define DO_ATTRIBUTES(NODE)	TREE_OPERAND (DO_STMT_CHECK (NODE), 2)
3118/* APPLE LOCAL begin C* language */
3119/* Used as a flag to indicate synthesized inner do-while loop of a
3120   foreach statement.  Used for generation of break/continue statement
3121   of the loop. */
3122#define DO_FOREACH(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 3)
3123/* APPLE LOCAL end C* language */
3124
3125/* APPLE LOCAL end for-fsf-4_4 3274130 5295549 */ \
3126/* FOR_STMT accessors. These give access to the init statement,
3127   condition, update expression, and body of the for statement,
3128   respectively.  */
3129#define FOR_INIT_STMT(NODE)	TREE_OPERAND (FOR_STMT_CHECK (NODE), 0)
3130#define FOR_COND(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 1)
3131#define FOR_EXPR(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 2)
3132#define FOR_BODY(NODE)		TREE_OPERAND (FOR_STMT_CHECK (NODE), 3)
3133/* APPLE LOCAL begin for-fsf-4_4 3274130 5295549 */ \
3134#define FOR_ATTRIBUTES(NODE)	TREE_OPERAND (FOR_STMT_CHECK (NODE), 4)
3135
3136/* APPLE LOCAL end for-fsf-4_4 3274130 5295549 */ \
3137#define SWITCH_STMT_COND(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0)
3138#define SWITCH_STMT_BODY(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1)
3139#define SWITCH_STMT_TYPE(NODE)	TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 2)
3140
3141/* STMT_EXPR accessor.  */
3142#define STMT_EXPR_STMT(NODE)	TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0)
3143
3144/* EXPR_STMT accessor. This gives the expression associated with an
3145   expression statement.  */
3146#define EXPR_STMT_EXPR(NODE)	TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0)
3147
3148/* True if this TARGET_EXPR was created by build_cplus_new, and so we can
3149   discard it if it isn't useful.  */
3150#define TARGET_EXPR_IMPLICIT_P(NODE) \
3151  TREE_LANG_FLAG_0 (TARGET_EXPR_CHECK (NODE))
3152
3153/* An enumeration of the kind of tags that C++ accepts.  */
3154enum tag_types {
3155  none_type = 0, /* Not a tag type.  */
3156  record_type,   /* "struct" types.  */
3157  class_type,    /* "class" types.  */
3158  union_type,    /* "union" types.  */
3159  enum_type,     /* "enum" types.  */
3160  typename_type  /* "typename" types.  */
3161};
3162
3163/* The various kinds of lvalues we distinguish.  */
3164typedef enum cp_lvalue_kind {
3165  clk_none = 0,     /* Things that are not an lvalue.  */
3166  clk_ordinary = 1, /* An ordinary lvalue.  */
3167  clk_class = 2,    /* An rvalue of class-type.  */
3168  clk_bitfield = 4, /* An lvalue for a bit-field.  */
3169  clk_packed = 8    /* An lvalue for a packed field.  */
3170} cp_lvalue_kind;
3171
3172/* Various kinds of template specialization, instantiation, etc.  */
3173typedef enum tmpl_spec_kind {
3174  tsk_none,		   /* Not a template at all.  */
3175  tsk_invalid_member_spec, /* An explicit member template
3176			      specialization, but the enclosing
3177			      classes have not all been explicitly
3178			      specialized.  */
3179  tsk_invalid_expl_inst,   /* An explicit instantiation containing
3180			      template parameter lists.  */
3181  tsk_excessive_parms,	   /* A template declaration with too many
3182			      template parameter lists.  */
3183  tsk_insufficient_parms,  /* A template declaration with too few
3184			      parameter lists.  */
3185  tsk_template,		   /* A template declaration.  */
3186  tsk_expl_spec,	   /* An explicit specialization.  */
3187  tsk_expl_inst		   /* An explicit instantiation.  */
3188} tmpl_spec_kind;
3189
3190/* The various kinds of access.  BINFO_ACCESS depends on these being
3191   two bit quantities.  The numerical values are important; they are
3192   used to initialize RTTI data structures, so changing them changes
3193   the ABI.  */
3194typedef enum access_kind {
3195  ak_none = 0,		   /* Inaccessible.  */
3196  ak_public = 1,	   /* Accessible, as a `public' thing.  */
3197  ak_protected = 2,	   /* Accessible, as a `protected' thing.  */
3198  ak_private = 3	   /* Accessible, as a `private' thing.  */
3199} access_kind;
3200
3201/* The various kinds of special functions.  If you add to this list,
3202   you should update special_function_p as well.  */
3203typedef enum special_function_kind {
3204  sfk_none = 0,		   /* Not a special function.  This enumeral
3205			      must have value zero; see
3206			      special_function_p.  */
3207  sfk_constructor,	   /* A constructor.  */
3208  sfk_copy_constructor,    /* A copy constructor.  */
3209  sfk_assignment_operator, /* An assignment operator.  */
3210  sfk_destructor,	   /* A destructor.  */
3211  sfk_complete_destructor, /* A destructor for complete objects.  */
3212  sfk_base_destructor,     /* A destructor for base subobjects.  */
3213  sfk_deleting_destructor, /* A destructor for complete objects that
3214			      deletes the object after it has been
3215			      destroyed.  */
3216  sfk_conversion	   /* A conversion operator.  */
3217} special_function_kind;
3218
3219/* The various kinds of linkage.  From [basic.link],
3220
3221      A name is said to have linkage when it might denote the same
3222      object, reference, function, type, template, namespace or value
3223      as a name introduced in another scope:
3224
3225      -- When a name has external linkage, the entity it denotes can
3226	 be referred to from scopes of other translation units or from
3227	 other scopes of the same translation unit.
3228
3229      -- When a name has internal linkage, the entity it denotes can
3230	 be referred to by names from other scopes in the same
3231	 translation unit.
3232
3233      -- When a name has no linkage, the entity it denotes cannot be
3234	 referred to by names from other scopes.  */
3235
3236typedef enum linkage_kind {
3237  lk_none,			/* No linkage.  */
3238  lk_internal,			/* Internal linkage.  */
3239  lk_external			/* External linkage.  */
3240} linkage_kind;
3241
3242/* Bitmask flags to control type substitution.  */
3243typedef enum tsubst_flags_t {
3244  tf_none = 0,			/* nothing special */
3245  tf_error = 1 << 0,		/* give error messages  */
3246  tf_warning = 1 << 1,		/* give warnings too  */
3247  tf_ignore_bad_quals = 1 << 2,	/* ignore bad cvr qualifiers */
3248  tf_keep_type_decl = 1 << 3,	/* retain typedef type decls
3249				   (make_typename_type use) */
3250  tf_ptrmem_ok = 1 << 4,	/* pointers to member ok (internal
3251				   instantiate_type use) */
3252  tf_user = 1 << 5,		/* found template must be a user template
3253				   (lookup_template_class use) */
3254  tf_conv = 1 << 6,		/* We are determining what kind of
3255				   conversion might be permissible,
3256				   not actually performing the
3257				   conversion.  */
3258  /* Convenient substitution flags combinations.  */
3259  tf_warning_or_error = tf_warning | tf_error
3260} tsubst_flags_t;
3261
3262/* The kind of checking we can do looking in a class hierarchy.  */
3263typedef enum base_access {
3264  ba_any = 0,  /* Do not check access, allow an ambiguous base,
3265		      prefer a non-virtual base */
3266  ba_unique = 1 << 0,  /* Must be a unique base.  */
3267  ba_check_bit = 1 << 1,   /* Check access.  */
3268  ba_check = ba_unique | ba_check_bit,
3269  ba_ignore_scope = 1 << 2, /* Ignore access allowed by local scope.  */
3270  ba_quiet = 1 << 3     /* Do not issue error messages.  */
3271} base_access;
3272
3273/* The various kinds of access check during parsing.  */
3274typedef enum deferring_kind {
3275  dk_no_deferred = 0, /* Check access immediately */
3276  dk_deferred = 1,    /* Deferred check */
3277  dk_no_check = 2     /* No access check */
3278} deferring_kind;
3279
3280/* The kind of base we can find, looking in a class hierarchy.
3281   Values <0 indicate we failed.  */
3282typedef enum base_kind {
3283  bk_inaccessible = -3,   /* The base is inaccessible */
3284  bk_ambig = -2,	  /* The base is ambiguous */
3285  bk_not_base = -1,	  /* It is not a base */
3286  bk_same_type = 0,	  /* It is the same type */
3287  bk_proper_base = 1,	  /* It is a proper base */
3288  bk_via_virtual = 2	  /* It is a proper base, but via a virtual
3289			     path. This might not be the canonical
3290			     binfo.  */
3291} base_kind;
3292
3293/* Node for "pointer to (virtual) function".
3294   This may be distinct from ptr_type_node so gdb can distinguish them.  */
3295#define vfunc_ptr_type_node  vtable_entry_type
3296
3297
3298/* For building calls to `delete'.  */
3299extern GTY(()) tree integer_two_node;
3300extern GTY(()) tree integer_three_node;
3301
3302/* The number of function bodies which we are currently processing.
3303   (Zero if we are at namespace scope, one inside the body of a
3304   function, two inside the body of a function in a local class, etc.)  */
3305extern int function_depth;
3306
3307/* in pt.c  */
3308
3309/* These values are used for the `STRICT' parameter to type_unification and
3310   fn_type_unification.  Their meanings are described with the
3311   documentation for fn_type_unification.  */
3312
3313typedef enum unification_kind_t {
3314  DEDUCE_CALL,
3315  DEDUCE_CONV,
3316  DEDUCE_EXACT
3317} unification_kind_t;
3318
3319/* Macros for operating on a template instantiation level node.  */
3320
3321#define TINST_DECL(NODE) \
3322  (((tinst_level_t) TINST_LEVEL_CHECK (NODE))->decl)
3323#define TINST_LOCATION(NODE) \
3324  (((tinst_level_t) TINST_LEVEL_CHECK (NODE))->locus)
3325#define TINST_IN_SYSTEM_HEADER_P(NODE) \
3326  (((tinst_level_t) TINST_LEVEL_CHECK (NODE))->in_system_header_p)
3327
3328/* in class.c */
3329
3330extern int current_class_depth;
3331
3332/* An array of all local classes present in this translation unit, in
3333   declaration order.  */
3334extern GTY(()) VEC(tree,gc) *local_classes;
3335
3336/* Here's where we control how name mangling takes place.  */
3337
3338/* Cannot use '$' up front, because this confuses gdb
3339   (names beginning with '$' are gdb-local identifiers).
3340
3341   Note that all forms in which the '$' is significant are long enough
3342   for direct indexing (meaning that if we know there is a '$'
3343   at a particular location, we can index into the string at
3344   any other location that provides distinguishing characters).  */
3345
3346/* Define NO_DOLLAR_IN_LABEL in your favorite tm file if your assembler
3347   doesn't allow '$' in symbol names.  */
3348#ifndef NO_DOLLAR_IN_LABEL
3349
3350#define JOINER '$'
3351
3352#define AUTO_TEMP_NAME "_$tmp_"
3353#define VFIELD_BASE "$vf"
3354#define VFIELD_NAME "_vptr$"
3355#define VFIELD_NAME_FORMAT "_vptr$%s"
3356#define ANON_AGGRNAME_FORMAT "$_%d"
3357
3358#else /* NO_DOLLAR_IN_LABEL */
3359
3360#ifndef NO_DOT_IN_LABEL
3361
3362#define JOINER '.'
3363
3364#define AUTO_TEMP_NAME "_.tmp_"
3365#define VFIELD_BASE ".vf"
3366#define VFIELD_NAME "_vptr."
3367#define VFIELD_NAME_FORMAT "_vptr.%s"
3368
3369#define ANON_AGGRNAME_FORMAT "._%d"
3370
3371#else /* NO_DOT_IN_LABEL */
3372
3373#define IN_CHARGE_NAME "__in_chrg"
3374#define AUTO_TEMP_NAME "__tmp_"
3375#define TEMP_NAME_P(ID_NODE) \
3376  (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \
3377	     sizeof (AUTO_TEMP_NAME) - 1))
3378#define VTABLE_NAME "__vt_"
3379#define VTABLE_NAME_P(ID_NODE) \
3380  (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
3381	     sizeof (VTABLE_NAME) - 1))
3382#define VFIELD_BASE "__vfb"
3383#define VFIELD_NAME "__vptr_"
3384#define VFIELD_NAME_P(ID_NODE) \
3385  (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
3386	    sizeof (VFIELD_NAME) - 1))
3387#define VFIELD_NAME_FORMAT "__vptr_%s"
3388
3389#define ANON_AGGRNAME_PREFIX "__anon_"
3390#define ANON_AGGRNAME_P(ID_NODE) \
3391  (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \
3392	     sizeof (ANON_AGGRNAME_PREFIX) - 1))
3393#define ANON_AGGRNAME_FORMAT "__anon_%d"
3394
3395#endif	/* NO_DOT_IN_LABEL */
3396#endif	/* NO_DOLLAR_IN_LABEL */
3397
3398#define THIS_NAME "this"
3399
3400#define IN_CHARGE_NAME "__in_chrg"
3401
3402#define VTBL_PTR_TYPE		"__vtbl_ptr_type"
3403#define VTABLE_DELTA_NAME	"__delta"
3404#define VTABLE_PFN_NAME		"__pfn"
3405
3406#if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
3407
3408#define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
3409  && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
3410  && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
3411
3412#define TEMP_NAME_P(ID_NODE) \
3413  (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1))
3414#define VFIELD_NAME_P(ID_NODE) \
3415  (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
3416
3417/* For anonymous aggregate types, we need some sort of name to
3418   hold on to.  In practice, this should not appear, but it should
3419   not be harmful if it does.  */
3420#define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
3421				  && IDENTIFIER_POINTER (ID_NODE)[1] == '_')
3422#endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
3423
3424
3425/* Nonzero if we're done parsing and into end-of-file activities.  */
3426
3427extern int at_eof;
3428
3429/* A list of namespace-scope objects which have constructors or
3430   destructors which reside in the global scope.  The decl is stored
3431   in the TREE_VALUE slot and the initializer is stored in the
3432   TREE_PURPOSE slot.  */
3433extern GTY(()) tree static_aggregates;
3434
3435/* Functions called along with real static constructors and destructors.  */
3436
3437extern GTY(()) tree static_ctors;
3438extern GTY(()) tree static_dtors;
3439
3440enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, OP_FLAG, TYPENAME_FLAG };
3441
3442/* These are uses as bits in flags passed to various functions to
3443   control their behavior.  Despite the LOOKUP_ prefix, many of these
3444   do not control name lookup.  ??? Functions using these flags should
3445   probably be modified to accept explicit boolean flags for the
3446   behaviors relevant to them.  */
3447/* Check for access violations.  */
3448#define LOOKUP_PROTECT (1 << 0)
3449/* Complain if no suitable member function matching the arguments is
3450   found.  */
3451#define LOOKUP_COMPLAIN (1 << 1)
3452#define LOOKUP_NORMAL (LOOKUP_PROTECT | LOOKUP_COMPLAIN)
3453/* Even if the function found by lookup is a virtual function, it
3454   should be called directly.  */
3455#define LOOKUP_NONVIRTUAL (1 << 2)
3456/* Non-converting (i.e., "explicit") constructors are not tried.  */
3457#define LOOKUP_ONLYCONVERTING (1 << 3)
3458/* If a temporary is created, it should be created so that it lives
3459   as long as the current variable bindings; otherwise it only lives
3460   until the end of the complete-expression.  It also forces
3461   direct-initialization in cases where other parts of the compiler
3462   have already generated a temporary, such as reference
3463   initialization and the catch parameter.  */
3464#define DIRECT_BIND (1 << 4)
3465/* User-defined conversions are not permitted.  (Built-in conversions
3466   are permitted.)  */
3467#define LOOKUP_NO_CONVERSION (1 << 5)
3468/* The user has explicitly called a destructor.  (Therefore, we do
3469   not need to check that the object is non-NULL before calling the
3470   destructor.)  */
3471#define LOOKUP_DESTRUCTOR (1 << 6)
3472/* Do not permit references to bind to temporaries.  */
3473#define LOOKUP_NO_TEMP_BIND (1 << 7)
3474/* Do not accept objects, and possibly namespaces.  */
3475#define LOOKUP_PREFER_TYPES (1 << 8)
3476/* Do not accept objects, and possibly types.   */
3477#define LOOKUP_PREFER_NAMESPACES (1 << 9)
3478/* Accept types or namespaces.  */
3479#define LOOKUP_PREFER_BOTH (LOOKUP_PREFER_TYPES | LOOKUP_PREFER_NAMESPACES)
3480/* We are checking that a constructor can be called -- but we do not
3481   actually plan to call it.  */
3482#define LOOKUP_CONSTRUCTOR_CALLABLE (1 << 10)
3483/* Return friend declarations and un-declared builtin functions.
3484   (Normally, these entities are registered in the symbol table, but
3485   not found by lookup.)  */
3486#define LOOKUP_HIDDEN (LOOKUP_CONSTRUCTOR_CALLABLE << 1)
3487
3488#define LOOKUP_NAMESPACES_ONLY(F)  \
3489  (((F) & LOOKUP_PREFER_NAMESPACES) && !((F) & LOOKUP_PREFER_TYPES))
3490#define LOOKUP_TYPES_ONLY(F)  \
3491  (!((F) & LOOKUP_PREFER_NAMESPACES) && ((F) & LOOKUP_PREFER_TYPES))
3492#define LOOKUP_QUALIFIERS_ONLY(F)     ((F) & LOOKUP_PREFER_BOTH)
3493
3494
3495/* These flags are used by the conversion code.
3496   CONV_IMPLICIT   :  Perform implicit conversions (standard and user-defined).
3497   CONV_STATIC     :  Perform the explicit conversions for static_cast.
3498   CONV_CONST      :  Perform the explicit conversions for const_cast.
3499   CONV_REINTERPRET:  Perform the explicit conversions for reinterpret_cast.
3500   CONV_PRIVATE    :  Perform upcasts to private bases.
3501   CONV_FORCE_TEMP :  Require a new temporary when converting to the same
3502		      aggregate type.  */
3503
3504#define CONV_IMPLICIT    1
3505#define CONV_STATIC      2
3506#define CONV_CONST       4
3507#define CONV_REINTERPRET 8
3508#define CONV_PRIVATE	 16
3509/* #define CONV_NONCONVERTING 32 */
3510#define CONV_FORCE_TEMP  64
3511#define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
3512			  | CONV_REINTERPRET)
3513#define CONV_C_CAST      (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
3514			  | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
3515
3516/* Used by build_expr_type_conversion to indicate which types are
3517   acceptable as arguments to the expression under consideration.  */
3518
3519#define WANT_INT	1 /* integer types, including bool */
3520#define WANT_FLOAT	2 /* floating point types */
3521#define WANT_ENUM	4 /* enumerated types */
3522#define WANT_POINTER	8 /* pointer types */
3523#define WANT_NULL      16 /* null pointer constant */
3524#define WANT_VECTOR    32 /* vector types */
3525#define WANT_ARITH	(WANT_INT | WANT_FLOAT | WANT_VECTOR)
3526
3527/* Used with comptypes, and related functions, to guide type
3528   comparison.  */
3529
3530#define COMPARE_STRICT	      0 /* Just check if the types are the
3531				   same.  */
3532#define COMPARE_BASE	      1 /* Check to see if the second type is
3533				   derived from the first.  */
3534#define COMPARE_DERIVED	      2 /* Like COMPARE_BASE, but in
3535				   reverse.  */
3536#define COMPARE_REDECLARATION 4 /* The comparison is being done when
3537				   another declaration of an existing
3538				   entity is seen.  */
3539
3540/* Used with push_overloaded_decl.  */
3541#define PUSH_GLOBAL	     0  /* Push the DECL into namespace scope,
3542				   regardless of the current scope.  */
3543#define PUSH_LOCAL	     1  /* Push the DECL into the current
3544				   scope.  */
3545#define PUSH_USING	     2  /* We are pushing this DECL as the
3546				   result of a using declaration.  */
3547
3548/* Used with start function.  */
3549#define SF_DEFAULT	     0  /* No flags.  */
3550#define SF_PRE_PARSED	     1  /* The function declaration has
3551				   already been parsed.  */
3552#define SF_INCLASS_INLINE    2  /* The function is an inline, defined
3553				   in the class body.  */
3554
3555/* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2
3556   is derived from TYPE1, or if TYPE2 is a pointer (reference) to a
3557   class derived from the type pointed to (referred to) by TYPE1.  */
3558#define same_or_base_type_p(TYPE1, TYPE2) \
3559  comptypes ((TYPE1), (TYPE2), COMPARE_BASE)
3560
3561/* These macros are used to access a TEMPLATE_PARM_INDEX.  */
3562#define TEMPLATE_PARM_INDEX_CAST(NODE) \
3563	((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE))
3564#define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index)
3565#define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level)
3566#define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE))
3567#define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level)
3568#define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl)
3569
3570/* These macros are for accessing the fields of TEMPLATE_TYPE_PARM,
3571   TEMPLATE_TEMPLATE_PARM and BOUND_TEMPLATE_TEMPLATE_PARM nodes.  */
3572#define TEMPLATE_TYPE_PARM_INDEX(NODE)					 \
3573  (TREE_CHECK3 ((NODE), TEMPLATE_TYPE_PARM, TEMPLATE_TEMPLATE_PARM,	\
3574		BOUND_TEMPLATE_TEMPLATE_PARM))->type.values
3575#define TEMPLATE_TYPE_IDX(NODE) \
3576  (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3577#define TEMPLATE_TYPE_LEVEL(NODE) \
3578  (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3579#define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \
3580  (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3581#define TEMPLATE_TYPE_DECL(NODE) \
3582  (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
3583
3584/* These constants can used as bit flags in the process of tree formatting.
3585
3586   TFF_PLAIN_IDENTIFIER: unqualified part of a name.
3587   TFF_SCOPE: include the class and namespace scope of the name.
3588   TFF_CHASE_TYPEDEF: print the original type-id instead of the typedef-name.
3589   TFF_DECL_SPECIFIERS: print decl-specifiers.
3590   TFF_CLASS_KEY_OR_ENUM: precede a class-type name (resp. enum name) with
3591       a class-key (resp. `enum').
3592   TFF_RETURN_TYPE: include function return type.
3593   TFF_FUNCTION_DEFAULT_ARGUMENTS: include function default parameter values.
3594   TFF_EXCEPTION_SPECIFICATION: show function exception specification.
3595   TFF_TEMPLATE_HEADER: show the template<...> header in a
3596       template-declaration.
3597   TFF_TEMPLATE_NAME: show only template-name.
3598   TFF_EXPR_IN_PARENS: parenthesize expressions.
3599   TFF_NO_FUNCTION_ARGUMENTS: don't show function arguments.  */
3600
3601#define TFF_PLAIN_IDENTIFIER			(0)
3602#define TFF_SCOPE				(1)
3603#define TFF_CHASE_TYPEDEF			(1 << 1)
3604#define TFF_DECL_SPECIFIERS			(1 << 2)
3605#define TFF_CLASS_KEY_OR_ENUM			(1 << 3)
3606#define TFF_RETURN_TYPE				(1 << 4)
3607#define TFF_FUNCTION_DEFAULT_ARGUMENTS		(1 << 5)
3608#define TFF_EXCEPTION_SPECIFICATION		(1 << 6)
3609#define TFF_TEMPLATE_HEADER			(1 << 7)
3610#define TFF_TEMPLATE_NAME			(1 << 8)
3611#define TFF_EXPR_IN_PARENS			(1 << 9)
3612#define TFF_NO_FUNCTION_ARGUMENTS		(1 << 10)
3613
3614/* Returns the TEMPLATE_DECL associated to a TEMPLATE_TEMPLATE_PARM
3615   node.  */
3616#define TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL(NODE)	\
3617  ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM)	\
3618   ? TYPE_TI_TEMPLATE (NODE)				\
3619   : TYPE_NAME (NODE))
3620
3621/* in lex.c  */
3622
3623extern void init_reswords (void);
3624
3625/* Indexed by TREE_CODE, these tables give C-looking names to
3626   operators represented by TREE_CODES.  For example,
3627   opname_tab[(int) MINUS_EXPR] == "-".  */
3628extern const char **opname_tab, **assignop_tab;
3629
3630typedef struct operator_name_info_t GTY(())
3631{
3632  /* The IDENTIFIER_NODE for the operator.  */
3633  tree identifier;
3634  /* The name of the operator.  */
3635  const char *name;
3636  /* The mangled name of the operator.  */
3637  const char *mangled_name;
3638  /* The arity of the operator.  */
3639  int arity;
3640} operator_name_info_t;
3641
3642/* A mapping from tree codes to operator name information.  */
3643extern GTY(()) operator_name_info_t operator_name_info
3644  [(int) LAST_CPLUS_TREE_CODE];
3645/* Similar, but for assignment operators.  */
3646extern GTY(()) operator_name_info_t assignment_operator_name_info
3647  [(int) LAST_CPLUS_TREE_CODE];
3648
3649/* A type-qualifier, or bitmask therefore, using the TYPE_QUAL
3650   constants.  */
3651
3652typedef int cp_cv_quals;
3653
3654/* A storage class.  */
3655
3656typedef enum cp_storage_class {
3657  /* sc_none must be zero so that zeroing a cp_decl_specifier_seq
3658     sets the storage_class field to sc_none.  */
3659  sc_none = 0,
3660  sc_auto,
3661  sc_register,
3662  sc_static,
3663  sc_extern,
3664  sc_mutable
3665} cp_storage_class;
3666
3667/* An individual decl-specifier.  */
3668
3669typedef enum cp_decl_spec {
3670  ds_first,
3671  ds_signed = ds_first,
3672  ds_unsigned,
3673  ds_short,
3674  ds_long,
3675  ds_const,
3676  ds_volatile,
3677  ds_restrict,
3678  ds_inline,
3679  ds_virtual,
3680  ds_explicit,
3681  ds_friend,
3682  ds_typedef,
3683  ds_complex,
3684  ds_thread,
3685  ds_last
3686} cp_decl_spec;
3687
3688/* A decl-specifier-seq.  */
3689
3690typedef struct cp_decl_specifier_seq {
3691  /* The number of times each of the keywords has been seen.  */
3692  unsigned specs[(int) ds_last];
3693  /* The primary type, if any, given by the decl-specifier-seq.
3694     Modifiers, like "short", "const", and "unsigned" are not
3695     reflected here.  This field will be a TYPE, unless a typedef-name
3696     was used, in which case it will be a TYPE_DECL.  */
3697  tree type;
3698  /* The attributes, if any, provided with the specifier sequence.  */
3699  tree attributes;
3700  /* If non-NULL, a built-in type that the user attempted to redefine
3701     to some other type.  */
3702  tree redefined_builtin_type;
3703  /* The storage class specified -- or sc_none if no storage class was
3704     explicitly specified.  */
3705  cp_storage_class storage_class;
3706  /* True iff TYPE_SPEC indicates a user-defined type.  */
3707  BOOL_BITFIELD user_defined_type_p : 1;
3708  /* True iff multiple types were (erroneously) specified for this
3709     decl-specifier-seq.  */
3710  BOOL_BITFIELD multiple_types_p : 1;
3711  /* True iff multiple storage classes were (erroneously) specified
3712     for this decl-specifier-seq or a combination of a storage class
3713     with a typedef specifier.  */
3714  BOOL_BITFIELD conflicting_specifiers_p : 1;
3715  /* True iff at least one decl-specifier was found.  */
3716  BOOL_BITFIELD any_specifiers_p : 1;
3717  /* True iff "int" was explicitly provided.  */
3718  BOOL_BITFIELD explicit_int_p : 1;
3719  /* True iff "char" was explicitly provided.  */
3720  BOOL_BITFIELD explicit_char_p : 1;
3721} cp_decl_specifier_seq;
3722
3723/* The various kinds of declarators.  */
3724
3725typedef enum cp_declarator_kind {
3726  cdk_id,
3727  cdk_function,
3728  cdk_array,
3729  cdk_pointer,
3730  cdk_reference,
3731  cdk_ptrmem,
3732  /* APPLE LOCAL blocks 6040305 (ch) */
3733  cdk_block_pointer,
3734  cdk_error
3735} cp_declarator_kind;
3736
3737/* A declarator.  */
3738
3739typedef struct cp_declarator cp_declarator;
3740
3741typedef struct cp_parameter_declarator cp_parameter_declarator;
3742
3743/* A parameter, before it has been semantically analyzed.  */
3744struct cp_parameter_declarator {
3745  /* The next parameter, or NULL_TREE if none.  */
3746  cp_parameter_declarator *next;
3747  /* The decl-specifiers-seq for the parameter.  */
3748  cp_decl_specifier_seq decl_specifiers;
3749  /* The declarator for the parameter.  */
3750  cp_declarator *declarator;
3751  /* The default-argument expression, or NULL_TREE, if none.  */
3752  tree default_argument;
3753  /* True iff this is the first parameter in the list and the
3754     parameter sequence ends with an ellipsis.  */
3755  bool ellipsis_p;
3756};
3757
3758/* A declarator.  */
3759struct cp_declarator {
3760  /* The kind of declarator.  */
3761  cp_declarator_kind kind;
3762  /* Attributes that apply to this declarator.  */
3763  tree attributes;
3764  /* For all but cdk_id and cdk_error, the contained declarator.  For
3765     cdk_id and cdk_error, guaranteed to be NULL.  */
3766  cp_declarator *declarator;
3767  location_t id_loc; /* Currently only set for cdk_id. */
3768  union {
3769    /* For identifiers.  */
3770    struct {
3771      /* If non-NULL, the qualifying scope (a NAMESPACE_DECL or
3772	 *_TYPE) for this identifier.  */
3773      tree qualifying_scope;
3774      /* The unqualified name of the entity -- an IDENTIFIER_NODE,
3775	 BIT_NOT_EXPR, or TEMPLATE_ID_EXPR.  */
3776      tree unqualified_name;
3777      /* If this is the name of a function, what kind of special
3778	 function (if any).  */
3779      special_function_kind sfk;
3780    } id;
3781    /* For functions.  */
3782    struct {
3783      /* The parameters to the function.  */
3784      cp_parameter_declarator *parameters;
3785      /* The cv-qualifiers for the function.  */
3786      cp_cv_quals qualifiers;
3787      /* The exception-specification for the function.  */
3788      tree exception_specification;
3789    } function;
3790    /* For arrays.  */
3791    struct {
3792      /* The bounds to the array.  */
3793      tree bounds;
3794    } array;
3795    /* For cdk_pointer, cdk_reference, and cdk_ptrmem.  */
3796    struct {
3797      /* The cv-qualifiers for the pointer.  */
3798      cp_cv_quals qualifiers;
3799      /* For cdk_ptrmem, the class type containing the member.  */
3800      tree class_type;
3801    } pointer;
3802    /* APPLE LOCAL begin blocks 6040305 (ch) */
3803    /* For cdk_block_pointer.  */
3804    struct {
3805	 /* The cv-qualifiers for the pointer.  */
3806	 cp_cv_quals qualifiers;
3807    } block_pointer;
3808    /* APPLE LOCAL end blocks 6040305 (ch) */
3809  } u;
3810};
3811
3812/* A parameter list indicating for a function with no parameters,
3813   e.g  "int f(void)".  */
3814extern cp_parameter_declarator *no_parameters;
3815
3816/* in call.c */
3817extern bool check_dtor_name			(tree, tree);
3818
3819extern tree build_vfield_ref			(tree, tree);
3820extern tree build_conditional_expr		(tree, tree, tree);
3821extern tree build_addr_func			(tree);
3822extern tree build_call				(tree, tree);
3823extern bool null_ptr_cst_p			(tree);
3824extern bool sufficient_parms_p			(tree);
3825extern tree type_decays_to			(tree);
3826extern tree build_user_type_conversion		(tree, tree, int);
3827extern tree build_new_function_call		(tree, tree, bool);
3828extern tree build_operator_new_call		(tree, tree, tree *, tree *,
3829						 tree *);
3830extern tree build_new_method_call		(tree, tree, tree, tree, int,
3831						 tree *);
3832extern tree build_special_member_call		(tree, tree, tree, tree, int);
3833extern tree build_new_op			(enum tree_code, int, tree, tree, tree, bool *);
3834extern tree build_op_delete_call		(enum tree_code, tree, tree, bool, tree, tree);
3835extern bool can_convert				(tree, tree);
3836extern bool can_convert_arg			(tree, tree, tree, int);
3837extern bool can_convert_arg_bad			(tree, tree, tree);
3838extern bool enforce_access			(tree, tree, tree);
3839extern tree convert_default_arg			(tree, tree, tree, int);
3840extern tree convert_arg_to_ellipsis		(tree);
3841extern tree build_x_va_arg			(tree, tree);
3842extern tree cxx_type_promotes_to		(tree);
3843extern tree type_passed_as			(tree);
3844extern tree convert_for_arg_passing		(tree, tree);
3845extern bool is_properly_derived_from		(tree, tree);
3846extern tree initialize_reference		(tree, tree, tree, tree *);
3847extern tree make_temporary_var_for_ref_to_temp	(tree, tree);
3848extern tree strip_top_quals			(tree);
3849extern tree perform_implicit_conversion		(tree, tree);
3850extern tree perform_direct_initialization_if_possible (tree, tree, bool);
3851extern tree in_charge_arg_for_name		(tree);
3852extern tree build_cxx_call			(tree, tree);
3853#ifdef ENABLE_CHECKING
3854extern void validate_conversion_obstack		(void);
3855#endif /* ENABLE_CHECKING */
3856
3857/* in class.c */
3858extern tree build_base_path			(enum tree_code, tree,
3859						 tree, int);
3860extern tree convert_to_base			(tree, tree, bool, bool);
3861extern tree convert_to_base_statically		(tree, tree);
3862extern tree build_vtbl_ref			(tree, tree);
3863extern tree build_vfn_ref			(tree, tree);
3864extern tree get_vtable_decl			(tree, int);
3865extern void resort_type_method_vec		(void *, void *,
3866						 gt_pointer_operator, void *);
3867extern bool add_method				(tree, tree, tree);
3868extern bool currently_open_class		(tree);
3869extern tree currently_open_derived_class	(tree);
3870extern tree finish_struct			(tree, tree);
3871extern void finish_struct_1			(tree);
3872extern int resolves_to_fixed_type_p		(tree, int *);
3873extern void init_class_processing		(void);
3874extern int is_empty_class			(tree);
3875extern void pushclass				(tree);
3876extern void popclass				(void);
3877extern void push_nested_class			(tree);
3878extern void pop_nested_class			(void);
3879extern int current_lang_depth			(void);
3880extern void push_lang_context			(tree);
3881extern void pop_lang_context			(void);
3882extern tree instantiate_type			(tree, tree, tsubst_flags_t);
3883extern void print_class_statistics		(void);
3884extern void cxx_print_statistics		(void);
3885extern void cxx_print_xnode			(FILE *, tree, int);
3886extern void cxx_print_decl			(FILE *, tree, int);
3887extern void cxx_print_type			(FILE *, tree, int);
3888extern void cxx_print_identifier		(FILE *, tree, int);
3889extern void cxx_print_error_function	(struct diagnostic_context *,
3890						 const char *);
3891extern void build_self_reference		(void);
3892extern int same_signature_p			(tree, tree);
3893extern void maybe_add_class_template_decl_list	(tree, tree, int);
3894extern void unreverse_member_declarations	(tree);
3895extern void invalidate_class_lookup_cache	(void);
3896extern void maybe_note_name_used_in_class	(tree, tree);
3897extern void note_name_declared_in_class		(tree, tree);
3898extern tree get_vtbl_decl_for_binfo		(tree);
3899extern void debug_class				(tree);
3900extern void debug_thunks			(tree);
3901extern tree cp_fold_obj_type_ref		(tree, tree);
3902extern void set_linkage_according_to_type	(tree, tree);
3903extern void determine_key_method		(tree);
3904extern void check_for_override			(tree, tree);
3905extern void push_class_stack			(void);
3906extern void pop_class_stack			(void);
3907
3908/* in cvt.c */
3909extern tree convert_to_reference		(tree, tree, int, int, tree);
3910extern tree convert_from_reference		(tree);
3911extern tree force_rvalue			(tree);
3912extern tree ocp_convert				(tree, tree, int, int);
3913extern tree cp_convert				(tree, tree);
3914extern tree convert_to_void	(tree, const char */*implicit context*/);
3915extern tree convert_force			(tree, tree, int);
3916extern tree build_expr_type_conversion		(int, tree, bool);
3917extern tree type_promotes_to			(tree);
3918extern tree perform_qualification_conversions	(tree, tree);
3919extern void clone_function_decl			(tree, int);
3920extern void adjust_clone_args			(tree);
3921
3922/* decl.c */
3923extern tree poplevel				(int, int, int);
3924extern void insert_block			(tree);
3925extern tree pushdecl				(tree);
3926extern tree pushdecl_maybe_friend		(tree, bool);
3927extern void cxx_init_decl_processing		(void);
3928enum cp_tree_node_structure_enum cp_tree_node_structure
3929						(union lang_tree_node *);
3930extern bool cxx_mark_addressable		(tree);
3931extern void cxx_push_function_context		(struct function *);
3932extern void cxx_pop_function_context		(struct function *);
3933extern void maybe_push_cleanup_level		(tree);
3934extern void finish_scope			(void);
3935extern void push_switch				(tree);
3936extern void pop_switch				(void);
3937extern tree pushtag				(tree, tree, tag_scope);
3938extern tree make_anon_name			(void);
3939extern int decls_match				(tree, tree);
3940extern tree duplicate_decls			(tree, tree, bool);
3941extern tree pushdecl_top_level_maybe_friend	(tree, bool);
3942extern tree pushdecl_top_level_and_finish	(tree, tree);
3943extern tree declare_local_label			(tree);
3944extern tree define_label			(location_t, tree);
3945extern void check_goto				(tree);
3946extern bool check_omp_return			(void);
3947extern tree make_typename_type			(tree, tree, enum tag_types, tsubst_flags_t);
3948extern tree make_unbound_class_template		(tree, tree, tree, tsubst_flags_t);
3949extern tree check_for_out_of_scope_variable	(tree);
3950extern tree build_library_fn			(tree, tree);
3951extern tree build_library_fn_ptr		(const char *, tree);
3952extern tree build_cp_library_fn_ptr		(const char *, tree);
3953extern tree push_library_fn			(tree, tree);
3954extern tree push_void_library_fn		(tree, tree);
3955extern tree push_throw_library_fn		(tree, tree);
3956extern tree check_tag_decl			(cp_decl_specifier_seq *);
3957extern tree shadow_tag				(cp_decl_specifier_seq *);
3958extern tree groktypename			(cp_decl_specifier_seq *, const cp_declarator *);
3959/* APPLE LOCAL 6339747 */
3960extern tree grokblockdecl			(cp_decl_specifier_seq *, const cp_declarator *);
3961extern tree start_decl				(const cp_declarator *, cp_decl_specifier_seq *, int, tree, tree, tree *);
3962extern void start_decl_1			(tree, bool);
3963extern void cp_finish_decl			(tree, tree, bool, tree, int);
3964extern void finish_decl				(tree, tree, tree);
3965extern int cp_complete_array_type		(tree *, tree, bool);
3966extern tree build_ptrmemfunc_type		(tree);
3967extern tree build_ptrmem_type			(tree, tree);
3968/* the grokdeclarator prototype is in decl.h */
3969extern tree build_this_parm			(tree, cp_cv_quals);
3970extern int copy_fn_p				(tree);
3971extern tree get_scope_of_declarator		(const cp_declarator *);
3972extern void grok_special_member_properties	(tree);
3973extern int grok_ctor_properties			(tree, tree);
3974extern bool grok_op_properties			(tree, bool);
3975extern tree xref_tag				(enum tag_types, tree, tag_scope, bool);
3976extern tree xref_tag_from_type			(tree, tree, tag_scope);
3977extern bool xref_basetypes			(tree, tree);
3978extern tree start_enum				(tree);
3979extern void finish_enum				(tree);
3980extern void build_enumerator			(tree, tree, tree);
3981extern void start_preparsed_function		(tree, tree, int);
3982extern int start_function			(cp_decl_specifier_seq *, const cp_declarator *, tree);
3983extern tree begin_function_body			(void);
3984extern void finish_function_body		(tree);
3985extern tree finish_function			(int);
3986extern tree start_method			(cp_decl_specifier_seq *, const cp_declarator *, tree);
3987extern tree finish_method			(tree);
3988extern void maybe_register_incomplete_var	(tree);
3989extern void complete_vars			(tree);
3990extern void finish_stmt				(void);
3991extern void print_other_binding_stack		(struct cp_binding_level *);
3992extern void revert_static_member_fn		(tree);
3993extern void fixup_anonymous_aggr		(tree);
3994extern int check_static_variable_definition	(tree, tree);
3995extern tree compute_array_index_type		(tree, tree);
3996extern tree check_default_argument		(tree, tree);
3997typedef int (*walk_namespaces_fn)		(tree, void *);
3998extern int walk_namespaces			(walk_namespaces_fn,
3999						 void *);
4000extern int wrapup_globals_for_namespace		(tree, void *);
4001extern tree create_implicit_typedef		(tree, tree);
4002extern tree maybe_push_decl			(tree);
4003extern tree force_target_expr			(tree, tree);
4004extern tree build_target_expr_with_type		(tree, tree);
4005extern int local_variable_p			(tree);
4006extern int nonstatic_local_decl_p		(tree);
4007extern tree register_dtor_fn			(tree);
4008extern tmpl_spec_kind current_tmpl_spec_kind	(int);
4009extern tree cp_fname_init			(const char *, tree *);
4010extern tree builtin_function			(const char *name, tree type,
4011						 int code,
4012						 enum built_in_class cl,
4013						 const char *libname,
4014						 tree attrs);
4015extern tree check_elaborated_type_specifier	(enum tag_types, tree, bool);
4016extern void warn_extern_redeclared_static	(tree, tree);
4017extern const char *cxx_comdat_group		(tree);
4018extern bool cp_missing_noreturn_ok_p		(tree);
4019extern void initialize_artificial_var		(tree, tree);
4020extern tree check_var_type			(tree, tree);
4021extern tree reshape_init (tree, tree);
4022
4023/* in decl2.c */
4024extern bool check_java_method			(tree);
4025extern tree build_memfn_type			(tree, tree, cp_cv_quals);
4026extern void maybe_retrofit_in_chrg		(tree);
4027extern void maybe_make_one_only			(tree);
4028extern void grokclassfn				(tree, tree,
4029						 enum overload_flags);
4030extern tree grok_array_decl			(tree, tree);
4031extern tree delete_sanity			(tree, tree, bool, int);
4032extern tree check_classfn			(tree, tree, tree);
4033extern void check_member_template		(tree);
4034extern tree grokfield (const cp_declarator *, cp_decl_specifier_seq *,
4035		       tree, bool, tree, tree);
4036extern tree grokbitfield (const cp_declarator *, cp_decl_specifier_seq *,
4037			  tree);
4038extern void cplus_decl_attributes		(tree *, tree, int);
4039extern void finish_anon_union			(tree);
4040extern void cp_finish_file			(void);
4041extern tree coerce_new_type			(tree);
4042extern tree coerce_delete_type			(tree);
4043extern void comdat_linkage			(tree);
4044extern void determine_visibility		(tree);
4045extern void constrain_class_visibility		(tree);
4046extern void update_member_visibility		(tree);
4047extern void import_export_decl			(tree);
4048extern tree build_cleanup			(tree);
4049extern tree build_offset_ref_call_from_tree	(tree, tree);
4050extern void check_default_args			(tree);
4051extern void mark_used				(tree);
4052extern void finish_static_data_member_decl	(tree, tree, bool, tree, int);
4053extern tree cp_build_parm_decl			(tree, tree);
4054extern tree get_guard				(tree);
4055extern tree get_guard_cond			(tree);
4056extern tree set_guard				(tree);
4057extern tree cxx_callgraph_analyze_expr		(tree *, int *, tree);
4058extern void mark_needed				(tree);
4059extern bool decl_needed_p			(tree);
4060extern void note_vague_linkage_fn		(tree);
4061extern tree build_artificial_parm		(tree, tree);
4062
4063/* in error.c */
4064extern void init_error				(void);
4065extern const char *type_as_string		(tree, int);
4066extern const char *decl_as_string		(tree, int);
4067extern const char *expr_as_string		(tree, int);
4068extern const char *lang_decl_name		(tree, int);
4069extern const char *language_to_string		(enum languages);
4070extern const char *class_key_or_enum_as_string	(tree);
4071extern void print_instantiation_context		(void);
4072
4073/* in except.c */
4074extern void init_exception_processing		(void);
4075extern tree expand_start_catch_block		(tree);
4076extern void expand_end_catch_block		(void);
4077extern tree build_exc_ptr			(void);
4078extern tree build_throw				(tree);
4079extern int nothrow_libfn_p			(tree);
4080extern void check_handlers			(tree);
4081extern void choose_personality_routine		(enum languages);
4082extern tree eh_type_info			(tree);
4083
4084/* in expr.c */
4085extern rtx cxx_expand_expr			(tree, rtx,
4086						 enum machine_mode,
4087						 int, rtx *);
4088extern tree cplus_expand_constant		(tree);
4089
4090/* friend.c */
4091extern int is_friend				(tree, tree);
4092extern void make_friend_class			(tree, tree, bool);
4093extern void add_friend				(tree, tree, bool);
4094extern tree do_friend				(tree, tree, tree, tree, enum overload_flags, bool);
4095
4096/* in init.c */
4097extern tree expand_member_init			(tree);
4098extern void emit_mem_initializers		(tree);
4099extern tree build_aggr_init			(tree, tree, int);
4100extern int is_aggr_type				(tree, int);
4101extern tree get_type_value			(tree);
4102extern tree build_zero_init			(tree, tree, bool);
4103extern tree build_offset_ref			(tree, tree, bool);
4104extern tree build_new				(tree, tree, tree, tree, int);
4105extern tree build_vec_init			(tree, tree, tree, bool, int);
4106extern tree build_delete			(tree, tree,
4107						 special_function_kind,
4108						 int, int);
4109extern void push_base_cleanups			(void);
4110extern tree build_vec_delete			(tree, tree,
4111						 special_function_kind, int);
4112extern tree create_temporary_var		(tree);
4113extern void initialize_vtbl_ptrs		(tree);
4114extern tree build_java_class_ref		(tree);
4115extern tree integral_constant_value		(tree);
4116
4117/* in lex.c */
4118extern void cxx_dup_lang_specific_decl		(tree);
4119extern void yyungetc				(int, int);
4120
4121extern tree unqualified_name_lookup_error	(tree);
4122extern tree unqualified_fn_lookup_error		(tree);
4123extern tree build_lang_decl			(enum tree_code, tree, tree);
4124extern void retrofit_lang_decl			(tree);
4125extern tree copy_decl				(tree);
4126extern tree copy_type				(tree);
4127extern tree cxx_make_type			(enum tree_code);
4128extern tree make_aggr_type			(enum tree_code);
4129extern void yyerror				(const char *);
4130extern void yyhook				(int);
4131extern bool cxx_init				(void);
4132extern void cxx_finish				(void);
4133extern bool in_main_input_context		(void);
4134
4135/* in method.c */
4136extern void init_method				(void);
4137extern tree make_thunk				(tree, bool, tree, tree);
4138extern void finish_thunk			(tree);
4139extern void use_thunk				(tree, bool);
4140extern void synthesize_method			(tree);
4141extern tree lazily_declare_fn			(special_function_kind,
4142						 tree);
4143extern tree skip_artificial_parms_for		(tree, tree);
4144extern tree make_alias_for			(tree, tree);
4145
4146/* In optimize.c */
4147extern bool maybe_clone_body			(tree);
4148
4149/* in pt.c */
4150extern void check_template_shadow		(tree);
4151extern tree get_innermost_template_args		(tree, int);
4152extern void maybe_begin_member_template_processing (tree);
4153extern void maybe_end_member_template_processing (void);
4154extern tree finish_member_template_decl		(tree);
4155extern void begin_template_parm_list		(void);
4156extern bool begin_specialization		(void);
4157extern void reset_specialization		(void);
4158extern void end_specialization			(void);
4159extern void begin_explicit_instantiation	(void);
4160extern void end_explicit_instantiation		(void);
4161extern tree check_explicit_specialization	(tree, tree, int, int);
4162extern tree process_template_parm		(tree, tree, bool);
4163extern tree end_template_parm_list		(tree);
4164extern void end_template_decl			(void);
4165extern tree push_template_decl			(tree);
4166extern tree push_template_decl_real		(tree, bool);
4167extern bool redeclare_class_template		(tree, tree);
4168extern tree lookup_template_class		(tree, tree, tree, tree,
4169						 int, tsubst_flags_t);
4170extern tree lookup_template_function		(tree, tree);
4171extern int uses_template_parms			(tree);
4172extern int uses_template_parms_level		(tree, int);
4173extern tree instantiate_class_template		(tree);
4174extern tree instantiate_template		(tree, tree, tsubst_flags_t);
4175extern int fn_type_unification			(tree, tree, tree, tree,
4176						 tree, unification_kind_t, int);
4177extern void mark_decl_instantiated		(tree, int);
4178extern int more_specialized_fn			(tree, tree, int);
4179extern void do_decl_instantiation		(tree, tree);
4180extern void do_type_instantiation		(tree, tree, tsubst_flags_t);
4181extern tree instantiate_decl			(tree, int, bool);
4182extern int comp_template_parms			(tree, tree);
4183extern int template_class_depth			(tree);
4184extern int is_specialization_of			(tree, tree);
4185extern bool is_specialization_of_friend		(tree, tree);
4186extern int comp_template_args			(tree, tree);
4187extern tree maybe_process_partial_specialization (tree);
4188extern tree most_specialized_instantiation	(tree);
4189extern void print_candidates			(tree);
4190extern void instantiate_pending_templates	(int);
4191extern tree tsubst_default_argument		(tree, tree, tree);
4192extern tree tsubst_copy_and_build		(tree, tree, tsubst_flags_t,
4193						 tree, bool, bool);
4194extern tree most_general_template		(tree);
4195extern tree get_mostly_instantiated_function_type (tree);
4196extern int problematic_instantiation_changed	(void);
4197extern void record_last_problematic_instantiation (void);
4198extern tree current_instantiation		(void);
4199extern tree maybe_get_template_decl_from_type_decl (tree);
4200extern int processing_template_parmlist;
4201extern bool dependent_type_p			(tree);
4202extern bool any_dependent_template_arguments_p  (tree);
4203extern bool dependent_template_p		(tree);
4204extern bool dependent_template_id_p		(tree, tree);
4205extern bool type_dependent_expression_p		(tree);
4206extern bool any_type_dependent_arguments_p      (tree);
4207extern bool value_dependent_expression_p	(tree);
4208extern bool any_value_dependent_elements_p      (tree);
4209extern tree resolve_typename_type		(tree, bool);
4210extern tree template_for_substitution		(tree);
4211extern tree build_non_dependent_expr		(tree);
4212extern tree build_non_dependent_args		(tree);
4213extern bool reregister_specialization		(tree, tree, tree);
4214extern tree fold_non_dependent_expr		(tree);
4215extern bool explicit_class_specialization_p     (tree);
4216extern tree outermost_tinst_level		(void);
4217
4218/* in repo.c */
4219extern void init_repo				(void);
4220extern int repo_emit_p				(tree);
4221extern bool repo_export_class_p			(tree);
4222extern void finish_repo				(void);
4223
4224/* in rtti.c */
4225/* A vector of all tinfo decls that haven't been emitted yet.  */
4226extern GTY(()) VEC(tree,gc) *unemitted_tinfo_decls;
4227
4228extern void init_rtti_processing		(void);
4229extern tree build_typeid			(tree);
4230extern tree get_tinfo_decl			(tree);
4231extern tree get_typeid				(tree);
4232extern tree build_dynamic_cast			(tree, tree);
4233extern void emit_support_tinfos			(void);
4234extern bool emit_tinfo_decl			(tree);
4235
4236/* in search.c */
4237extern bool accessible_base_p			(tree, tree, bool);
4238extern tree lookup_base				(tree, tree, base_access,
4239						 base_kind *);
4240extern tree dcast_base_hint			(tree, tree);
4241extern int accessible_p				(tree, tree, bool);
4242extern tree lookup_field_1			(tree, tree, bool);
4243extern tree lookup_field			(tree, tree, int, bool);
4244extern int lookup_fnfields_1			(tree, tree);
4245extern int class_method_index_for_fn		(tree, tree);
4246extern tree lookup_fnfields			(tree, tree, int);
4247extern tree lookup_member			(tree, tree, int, bool);
4248extern int look_for_overrides			(tree, tree);
4249extern void get_pure_virtuals			(tree);
4250extern void maybe_suppress_debug_info		(tree);
4251extern void note_debug_info_needed		(tree);
4252extern void print_search_statistics		(void);
4253extern void reinit_search_statistics		(void);
4254extern tree current_scope			(void);
4255extern int at_function_scope_p			(void);
4256extern bool at_class_scope_p			(void);
4257extern bool at_namespace_scope_p		(void);
4258extern tree context_for_name_lookup		(tree);
4259extern tree lookup_conversions			(tree);
4260extern tree binfo_from_vbase			(tree);
4261extern tree binfo_for_vbase			(tree, tree);
4262extern tree look_for_overrides_here		(tree, tree);
4263#define dfs_skip_bases ((tree)1)
4264extern tree dfs_walk_all (tree, tree (*) (tree, void *),
4265			  tree (*) (tree, void *), void *);
4266extern tree dfs_walk_once (tree, tree (*) (tree, void *),
4267			   tree (*) (tree, void *), void *);
4268extern tree binfo_via_virtual			(tree, tree);
4269extern tree build_baselink			(tree, tree, tree, tree);
4270extern tree adjust_result_of_qualified_name_lookup
4271						(tree, tree, tree);
4272extern tree copied_binfo			(tree, tree);
4273extern tree original_binfo			(tree, tree);
4274extern int shared_member_p			(tree);
4275
4276
4277/* The representation of a deferred access check.  */
4278
4279typedef struct deferred_access_check GTY(())
4280{
4281  /* The base class in which the declaration is referenced. */
4282  tree binfo;
4283  /* The declaration whose access must be checked.  */
4284  tree decl;
4285  /* The declaration that should be used in the error message.  */
4286  tree diag_decl;
4287} deferred_access_check;
4288DEF_VEC_O(deferred_access_check);
4289DEF_VEC_ALLOC_O(deferred_access_check,gc);
4290
4291/* in semantics.c */
4292extern void push_deferring_access_checks	(deferring_kind);
4293extern void resume_deferring_access_checks	(void);
4294extern void stop_deferring_access_checks	(void);
4295extern void pop_deferring_access_checks		(void);
4296extern VEC (deferred_access_check,gc)* get_deferred_access_checks		(void);
4297extern void pop_to_parent_deferring_access_checks (void);
4298extern void perform_access_checks		(VEC (deferred_access_check,gc)*);
4299extern void perform_deferred_access_checks	(void);
4300extern void perform_or_defer_access_check	(tree, tree, tree);
4301extern int stmts_are_full_exprs_p		(void);
4302extern void init_cp_semantics			(void);
4303extern tree do_poplevel				(tree);
4304extern void add_decl_expr			(tree);
4305extern tree finish_expr_stmt			(tree);
4306extern tree begin_if_stmt			(void);
4307extern void finish_if_stmt_cond			(tree, tree);
4308extern tree finish_then_clause			(tree);
4309extern void begin_else_clause			(tree);
4310extern void finish_else_clause			(tree);
4311extern void finish_if_stmt			(tree);
4312/* APPLE LOCAL begin for-fsf-4_4 3274130 5295549 */ \
4313extern tree begin_while_stmt			(tree);
4314/* APPLE LOCAL end for-fsf-4_4 3274130 5295549 */ \
4315extern void finish_while_stmt_cond		(tree, tree);
4316extern void finish_while_stmt			(tree);
4317/* APPLE LOCAL begin for-fsf-4_4 3274130 5295549 */ \
4318extern tree begin_do_stmt			(tree);
4319/* APPLE LOCAL end for-fsf-4_4 3274130 5295549 */ \
4320extern void finish_do_body			(tree);
4321extern void finish_do_stmt			(tree, tree);
4322extern tree finish_return_stmt			(tree);
4323/* APPLE LOCAL begin for-fsf-4_4 3274130 5295549 */ \
4324extern tree begin_for_stmt			(tree);
4325/* APPLE LOCAL end for-fsf-4_4 3274130 5295549 */ \
4326extern void finish_for_init_stmt		(tree);
4327extern void finish_for_cond			(tree, tree);
4328extern void finish_for_expr			(tree, tree);
4329extern void finish_for_stmt			(tree);
4330extern tree finish_break_stmt			(void);
4331extern tree finish_continue_stmt		(void);
4332extern tree begin_switch_stmt			(void);
4333extern void finish_switch_cond			(tree, tree);
4334extern void finish_switch_stmt			(tree);
4335extern tree finish_case_label			(tree, tree);
4336extern tree finish_goto_stmt			(tree);
4337extern tree begin_try_block			(void);
4338extern void finish_try_block			(tree);
4339extern tree begin_eh_spec_block			(void);
4340extern void finish_eh_spec_block		(tree, tree);
4341extern void finish_handler_sequence		(tree);
4342extern tree begin_function_try_block		(tree *);
4343extern void finish_function_try_block		(tree);
4344extern void finish_function_handler_sequence    (tree, tree);
4345extern void finish_cleanup_try_block		(tree);
4346extern tree begin_handler			(void);
4347extern void finish_handler_parms		(tree, tree);
4348extern void finish_handler			(tree);
4349extern void finish_cleanup			(tree, tree);
4350
4351enum {
4352  BCS_NO_SCOPE = 1,
4353  BCS_TRY_BLOCK = 2,
4354  BCS_FN_BODY = 4
4355};
4356extern tree begin_compound_stmt			(unsigned int);
4357
4358extern void finish_compound_stmt		(tree);
4359extern tree finish_asm_stmt			(int, tree, tree, tree, tree);
4360extern tree finish_label_stmt			(tree);
4361extern void finish_label_decl			(tree);
4362extern tree finish_parenthesized_expr		(tree);
4363extern tree finish_non_static_data_member       (tree, tree, tree);
4364extern tree begin_stmt_expr			(void);
4365extern tree finish_stmt_expr_expr		(tree, tree);
4366extern tree finish_stmt_expr			(tree, bool);
4367extern tree perform_koenig_lookup		(tree, tree);
4368extern tree finish_call_expr			(tree, tree, bool, bool);
4369extern tree finish_increment_expr		(tree, enum tree_code);
4370extern tree finish_this_expr			(void);
4371extern tree finish_pseudo_destructor_expr       (tree, tree, tree);
4372extern tree finish_unary_op_expr		(enum tree_code, tree);
4373extern tree finish_compound_literal		(tree, VEC(constructor_elt,gc) *);
4374extern tree finish_fname			(tree);
4375extern void finish_translation_unit		(void);
4376extern tree finish_template_type_parm		(tree, tree);
4377extern tree finish_template_template_parm       (tree, tree);
4378extern tree begin_class_definition		(tree, tree);
4379extern void finish_template_decl		(tree);
4380extern tree finish_template_type		(tree, tree, int);
4381extern tree finish_base_specifier		(tree, tree, bool);
4382extern void finish_member_declaration		(tree);
4383extern void qualified_name_lookup_error		(tree, tree, tree);
4384extern void check_template_keyword		(tree);
4385extern tree finish_id_expression		(tree, tree, tree,
4386						 cp_id_kind *,
4387						 bool, bool, bool *,
4388						 bool, bool, bool, bool,
4389						 const char **);
4390extern tree finish_typeof			(tree);
4391extern tree finish_offsetof			(tree);
4392extern void finish_decl_cleanup			(tree, tree);
4393extern void finish_eh_cleanup			(tree);
4394extern void expand_body				(tree);
4395extern void finish_mem_initializers		(tree);
4396extern tree check_template_template_default_arg (tree);
4397extern void expand_or_defer_fn			(tree);
4398extern void check_accessibility_of_qualified_id (tree, tree, tree);
4399extern tree finish_qualified_id_expr		(tree, tree, bool, bool,
4400						 bool, bool);
4401extern void simplify_aggr_init_expr		(tree *);
4402extern void finalize_nrv			(tree *, tree, tree);
4403extern void note_decl_for_pch			(tree);
4404extern tree finish_omp_clauses			(tree);
4405extern void finish_omp_threadprivate		(tree);
4406extern tree begin_omp_structured_block		(void);
4407extern tree finish_omp_structured_block		(tree);
4408extern tree begin_omp_parallel			(void);
4409extern tree finish_omp_parallel			(tree, tree);
4410extern tree finish_omp_for			(location_t, tree, tree,
4411						 tree, tree, tree, tree);
4412extern void finish_omp_atomic			(enum tree_code, tree, tree);
4413extern void finish_omp_barrier			(void);
4414extern void finish_omp_flush			(void);
4415extern enum omp_clause_default_kind cxx_omp_predetermined_sharing (tree);
4416extern tree cxx_omp_clause_default_ctor		(tree, tree);
4417extern tree cxx_omp_clause_copy_ctor		(tree, tree, tree);
4418extern tree cxx_omp_clause_assign_op		(tree, tree, tree);
4419extern tree cxx_omp_clause_dtor			(tree, tree);
4420extern bool cxx_omp_privatize_by_reference	(tree);
4421extern tree baselink_for_fns                    (tree);
4422
4423/* in tree.c */
4424extern void lang_check_failed			(const char *, int,
4425						 const char *) ATTRIBUTE_NORETURN;
4426extern tree stabilize_expr			(tree, tree *);
4427extern void stabilize_call			(tree, tree *);
4428extern bool stabilize_init			(tree, tree *);
4429extern tree add_stmt_to_compound		(tree, tree);
4430extern tree cxx_maybe_build_cleanup		(tree);
4431extern void init_tree				(void);
4432extern int pod_type_p				(tree);
4433extern bool class_tmpl_impl_spec_p		(tree);
4434extern int zero_init_p				(tree);
4435extern tree canonical_type_variant		(tree);
4436extern tree copy_binfo				(tree, tree, tree,
4437						 tree *, int);
4438extern int member_p				(tree);
4439extern cp_lvalue_kind real_lvalue_p		(tree);
4440extern bool builtin_valid_in_constant_expr_p    (tree);
4441extern tree build_min				(enum tree_code, tree, ...);
4442extern tree build_min_nt			(enum tree_code, ...);
4443extern tree build_min_non_dep			(enum tree_code, tree, ...);
4444extern tree build_cplus_new			(tree, tree);
4445extern tree get_target_expr			(tree);
4446extern tree build_cplus_array_type		(tree, tree);
4447extern tree hash_tree_cons			(tree, tree, tree);
4448extern tree hash_tree_chain			(tree, tree);
4449extern tree build_qualified_name		(tree, tree, tree, bool);
4450extern int is_overloaded_fn			(tree);
4451extern tree get_first_fn			(tree);
4452extern tree ovl_cons				(tree, tree);
4453extern tree build_overload			(tree, tree);
4454extern const char *cxx_printable_name		(tree, int);
4455extern tree build_exception_variant		(tree, tree);
4456extern tree bind_template_template_parm		(tree, tree);
4457extern tree array_type_nelts_total		(tree);
4458extern tree array_type_nelts_top		(tree);
4459extern tree break_out_target_exprs		(tree);
4460extern tree get_type_decl			(tree);
4461extern tree decl_namespace_context		(tree);
4462extern bool decl_anon_ns_mem_p			(tree);
4463extern tree lvalue_type				(tree);
4464extern tree error_type				(tree);
4465extern int varargs_function_p			(tree);
4466extern bool really_overloaded_fn		(tree);
4467extern bool cp_tree_equal			(tree, tree);
4468extern tree no_linkage_check			(tree, bool);
4469extern void debug_binfo				(tree);
4470extern tree build_dummy_object			(tree);
4471extern tree maybe_dummy_object			(tree, tree *);
4472extern int is_dummy_object			(tree);
4473extern const struct attribute_spec cxx_attribute_table[];
4474extern tree make_ptrmem_cst			(tree, tree);
4475extern tree cp_build_type_attribute_variant     (tree, tree);
4476extern tree cp_build_qualified_type_real	(tree, int, tsubst_flags_t);
4477#define cp_build_qualified_type(TYPE, QUALS) \
4478  cp_build_qualified_type_real ((TYPE), (QUALS), tf_warning_or_error)
4479extern special_function_kind special_function_p (tree);
4480extern int count_trees				(tree);
4481extern int char_type_p				(tree);
4482extern void verify_stmt_tree			(tree);
4483extern linkage_kind decl_linkage		(tree);
4484extern tree cp_walk_subtrees (tree*, int*, walk_tree_fn,
4485			      void*, struct pointer_set_t*);
4486extern int cp_cannot_inline_tree_fn		(tree*);
4487extern tree cp_add_pending_fn_decls		(void*,tree);
4488extern int cp_auto_var_in_fn_p			(tree,tree);
4489extern tree fold_if_not_in_template		(tree);
4490extern tree rvalue				(tree);
4491extern tree convert_bitfield_to_declared_type   (tree);
4492extern tree cp_save_expr			(tree);
4493extern bool cast_valid_in_integral_constant_expression_p (tree);
4494
4495/* in typeck.c */
4496extern int string_conv_p			(tree, tree, int);
4497extern tree cp_truthvalue_conversion		(tree);
4498extern tree condition_conversion		(tree);
4499extern tree require_complete_type		(tree);
4500extern tree complete_type			(tree);
4501extern tree complete_type_or_else		(tree, tree);
4502extern int type_unknown_p			(tree);
4503extern bool comp_except_specs			(tree, tree, bool);
4504extern bool comptypes				(tree, tree, int);
4505extern bool compparms				(tree, tree);
4506extern int comp_cv_qualification		(tree, tree);
4507extern int comp_cv_qual_signature		(tree, tree);
4508extern tree cxx_sizeof_or_alignof_expr		(tree, enum tree_code);
4509extern tree cxx_sizeof_or_alignof_type		(tree, enum tree_code, bool);
4510#define cxx_sizeof_nowarn(T) cxx_sizeof_or_alignof_type (T, SIZEOF_EXPR, false)
4511extern tree inline_conversion			(tree);
4512extern tree is_bitfield_expr_with_lowered_type  (tree);
4513extern tree unlowered_expr_type                 (tree);
4514extern tree decay_conversion			(tree);
4515extern tree build_class_member_access_expr      (tree, tree, tree, bool);
4516extern tree finish_class_member_access_expr     (tree, tree, bool);
4517extern tree build_x_indirect_ref		(tree, const char *);
4518extern tree build_indirect_ref			(tree, const char *);
4519extern tree build_array_ref			(tree, tree);
4520extern tree get_member_function_from_ptrfunc	(tree *, tree);
4521extern tree build_x_binary_op			(enum tree_code, tree,
4522						 enum tree_code, tree,
4523						 enum tree_code, bool *);
4524extern tree build_x_unary_op			(enum tree_code, tree);
4525extern tree unary_complex_lvalue		(enum tree_code, tree);
4526extern tree build_x_conditional_expr		(tree, tree, tree);
4527extern tree build_x_compound_expr_from_list	(tree, const char *);
4528extern tree build_x_compound_expr		(tree, tree);
4529extern tree build_compound_expr			(tree, tree);
4530extern tree build_static_cast			(tree, tree);
4531extern tree build_reinterpret_cast		(tree, tree);
4532extern tree build_const_cast			(tree, tree);
4533extern tree build_c_cast			(tree, tree);
4534extern tree build_x_modify_expr			(tree, enum tree_code, tree);
4535extern tree build_modify_expr			(tree, enum tree_code, tree);
4536extern tree convert_for_initialization		(tree, tree, tree, int,
4537						 const char *, tree, int);
4538extern int comp_ptr_ttypes			(tree, tree);
4539extern bool comp_ptr_ttypes_const		(tree, tree);
4540extern int ptr_reasonably_similar		(tree, tree);
4541extern tree build_ptrmemfunc			(tree, tree, int, bool);
4542extern int cp_type_quals			(tree);
4543extern bool cp_type_readonly			(tree);
4544extern bool cp_has_mutable_p			(tree);
4545extern bool at_least_as_qualified_p		(tree, tree);
4546extern void cp_apply_type_quals_to_decl		(int, tree);
4547extern tree build_ptrmemfunc1			(tree, tree, tree);
4548extern void expand_ptrmemfunc_cst		(tree, tree *, tree *);
4549extern tree type_after_usual_arithmetic_conversions (tree, tree);
4550extern tree composite_pointer_type		(tree, tree, tree, tree,
4551						 const char*);
4552extern tree merge_types				(tree, tree);
4553extern tree check_return_expr			(tree, bool *);
4554#define cp_build_binary_op(code, arg1, arg2) \
4555  build_binary_op(code, arg1, arg2, 1)
4556#define cxx_sizeof(T)  cxx_sizeof_or_alignof_type (T, SIZEOF_EXPR, true)
4557extern tree build_ptrmemfunc_access_expr	(tree, tree);
4558extern tree build_address			(tree);
4559extern tree build_nop				(tree, tree);
4560extern tree non_reference			(tree);
4561extern tree lookup_anon_field			(tree, tree);
4562extern bool invalid_nonstatic_memfn_p		(tree);
4563extern tree convert_member_func_to_ptr		(tree, tree);
4564extern tree convert_ptrmem			(tree, tree, bool, bool);
4565extern int lvalue_or_else			(tree, enum lvalue_use);
4566extern int lvalue_p				(tree);
4567
4568/* in typeck2.c */
4569extern void require_complete_eh_spec_types	(tree, tree);
4570extern void cxx_incomplete_type_diagnostic	(tree, tree, int);
4571#undef cxx_incomplete_type_error
4572extern void cxx_incomplete_type_error		(tree, tree);
4573#define cxx_incomplete_type_error(V,T) \
4574  (cxx_incomplete_type_diagnostic ((V), (T), 0))
4575extern tree error_not_base_type			(tree, tree);
4576extern tree binfo_or_else			(tree, tree);
4577extern void readonly_error			(tree, const char *, int);
4578extern void complete_type_check_abstract	(tree);
4579extern int abstract_virtuals_error		(tree, tree);
4580
4581extern tree store_init_value			(tree, tree);
4582extern tree digest_init				(tree, tree);
4583extern tree build_scoped_ref			(tree, tree, tree *);
4584extern tree build_x_arrow			(tree);
4585extern tree build_m_component_ref		(tree, tree);
4586extern tree build_functional_cast		(tree, tree);
4587extern tree add_exception_specifier		(tree, tree, int);
4588extern tree merge_exception_specifiers		(tree, tree);
4589
4590/* in mangle.c */
4591extern void init_mangle				(void);
4592extern void mangle_decl				(tree);
4593extern const char *mangle_type_string		(tree);
4594extern tree mangle_typeinfo_for_type		(tree);
4595extern tree mangle_typeinfo_string_for_type	(tree);
4596extern tree mangle_vtbl_for_type		(tree);
4597extern tree mangle_vtt_for_type			(tree);
4598extern tree mangle_ctor_vtbl_for_type		(tree, tree);
4599extern tree mangle_thunk			(tree, int, tree, tree);
4600extern tree mangle_conv_op_name_for_type	(tree);
4601extern tree mangle_guard_variable		(tree);
4602extern tree mangle_ref_init_variable		(tree);
4603
4604/* in dump.c */
4605extern bool cp_dump_tree			(void *, tree);
4606
4607/* In cp/cp-objcp-common.c.  */
4608
4609extern HOST_WIDE_INT cxx_get_alias_set		(tree);
4610extern bool cxx_warn_unused_global_decl		(tree);
4611extern tree cp_expr_size			(tree);
4612extern size_t cp_tree_size			(enum tree_code);
4613extern bool cp_var_mod_type_p			(tree, tree);
4614extern void cxx_initialize_diagnostics		(struct diagnostic_context *);
4615extern int cxx_types_compatible_p		(tree, tree);
4616extern void init_shadowed_var_for_decl		(void);
4617extern tree cxx_staticp                         (tree);
4618
4619/* in cp-gimplify.c */
4620extern int cp_gimplify_expr			(tree *, tree *, tree *);
4621extern void cp_genericize			(tree);
4622
4623/* -- end of C++ */
4624
4625/* In order for the format checking to accept the C++ frontend
4626   diagnostic framework extensions, you must include this file before
4627   toplev.h, not after.  We override the definition of GCC_DIAG_STYLE
4628   in c-common.h.  */
4629#undef GCC_DIAG_STYLE
4630#define GCC_DIAG_STYLE __gcc_cxxdiag__
4631#if GCC_VERSION >= 4001
4632#define ATTRIBUTE_GCC_CXXDIAG(m, n) __attribute__ ((__format__ (GCC_DIAG_STYLE, m, n))) ATTRIBUTE_NONNULL(m)
4633#else
4634#define ATTRIBUTE_GCC_CXXDIAG(m, n) ATTRIBUTE_NONNULL(m)
4635#endif
4636extern void cp_cpp_error			(cpp_reader *, int,
4637						 const char *, va_list *)
4638     ATTRIBUTE_GCC_CXXDIAG(3,0);
4639/* APPLE LOCAL radar 5741070  */
4640extern tree c_return_interface_record_type (tree);
4641
4642/* APPLE LOCAL begin blocks 6040305 (cg) */
4643extern cp_declarator* make_block_pointer_declarator (tree, cp_cv_quals,
4644											 cp_declarator *);
4645/* APPLE LOCAL end blocks 6040305 (cg) */
4646#endif /* ! GCC_CP_TREE_H */
4647