OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [cp/] [cp-tree.h] - Blame information for rev 284

Go to most recent revision | Details | Compare with Previous | View Log

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

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.