]> gcc.gnu.org Git - gcc.git/blame - gcc/cp/cp-tree.h
git://gcc.gnu.org / gcc.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Remove XFAIL
[gcc.git] / gcc / cp / cp-tree.h
CommitLineData
8d08fdba 1/* Definitions for C++ parsing and type checking.
357a4089 2 Copyright (C) 1987, 93, 94, 95, 1996 Free Software Foundation, Inc.
8d08fdba
MS		 3 Hacked by Michael Tiemann (tiemann@cygnus.com)
4
5This file is part of GNU CC.
6
7GNU CC is free software; you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
9the Free Software Foundation; either version 2, or (at your option)
10any later version.
11
12GNU CC is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
18along with GNU CC; see the file COPYING. If not, write to
e9fa0c7c
RK		 19the Free Software Foundation, 59 Temple Place - Suite 330,
20Boston, MA 02111-1307, USA. */
8d08fdba
MS		 21
22#ifndef _CP_TREE_H
23#define _CP_TREE_H
24
faf5394a 25#include "gansidecl.h"
8d08fdba 26
cfdd0551
PB		 27/* Usage of TREE_LANG_FLAG_?:
28 0: TREE_NONLOCAL_FLAG (in TREE_LIST or _TYPE).
29 BINFO_MARKED (BINFO nodes).
cfdd0551
PB		 30 COMPOUND_STMT_NO_SCOPE (in COMPOUND_STMT).
31 NEW_EXPR_USE_GLOBAL (in NEW_EXPR).
32 DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR).
33 LOOKUP_EXPR_GLOBAL (in LOOKUP_EXPR).
34 TREE_NEGATED_INT (in INTEGER_CST).
35 (TREE_MANGLED) (in IDENTIFIER_NODE) (commented-out).
36 1: IDENTIFIER_VIRTUAL_P.
37 TI_PENDING_TEMPLATE_FLAG.
cfdd0551
PB		 38 TEMPLATE_PARMS_FOR_INLINE.
39 DELETE_EXPR_USE_VEC (in DELETE_EXPR).
40 (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out).
41 TYPE_USES_COMPLEX_INHERITANCE (in _TYPE).
42 C_DECLARED_LABEL_FLAG.
43 2: IDENTIFIER_OPNAME_P.
0ec57017 44 BINFO_VBASE_MARKED.
cfdd0551
PB		 45 BINFO_FIELDS_MARKED.
46 TYPE_VIRTUAL_P.
47 PARM_DECL_EXPR (in SAVE_EXPR).
48 3: TYPE_USES_VIRTUAL_BASECLASSES (in a class TYPE).
49 BINFO_VTABLE_PATH_MARKED.
0ec57017 50 BINFO_PUSHDECLS_MARKED.
cfdd0551
PB		 51 (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out).
52 4: BINFO_NEW_VTABLE_MARKED.
53 TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR,
54 or FIELD_DECL).
0ec57017 55 5: Not used.
cfdd0551
PB		 56 6: Not used.
57
58 Usage of TYPE_LANG_FLAG_?:
59 0: C_TYPE_FIELDS_READONLY (in RECORD_TYPE or UNION_TYPE).
60 1: TYPE_HAS_CONSTRUCTOR.
61 2: TYPE_HAS_DESTRUCTOR.
ea419909 62 3: TYPE_FOR_JAVA.
cfdd0551
PB		 63 4: TYPE_NEEDS_DESTRUCTOR.
64 5: IS_AGGR_TYPE.
ea419909 65 6: TYPE_BUILT_IN.
cfdd0551
PB		 66
67 Usage of DECL_LANG_FLAG_?:
68 0: DECL_ERROR_REPORTED (in VAR_DECL).
69 1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL).
70 2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL).
71 3: DECL_IN_AGGR_P.
72 4: DECL_MAYBE_TEMPLATE.
73 5: DECL_INTERFACE_KNOWN.
74 6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL).
75 7: DECL_DEAD_FOR_LOCAL (in VAR_DECL).
76*/
77
8d08fdba
MS		 78/* Language-dependent contents of an identifier. */
79
80struct lang_identifier
81{
82 struct tree_identifier ignore;
32e02ee0 83 tree namespace_bindings, local_value;
8d08fdba
MS		 84 tree class_value;
85 tree class_template_info;
86 struct lang_id2 *x;
87};
88
89struct lang_id2
90{
91 tree label_value, implicit_decl;
92 tree type_desc, as_list, error_locus;
93};
94
46b02c6d
MS		 95typedef struct
96{
97 tree t;
98 int new_type_flag;
99} flagged_type_tree;
100
f84b4be9
JM		 101typedef struct
102{
103 char common[sizeof (struct tree_common)];
104 struct rtx_def *rtl; /* Unused, but required to match up with what
105 the middle-end expects. */
106 HOST_WIDE_INT index;
107 HOST_WIDE_INT level;
108 HOST_WIDE_INT orig_level;
109 tree decl;
110} template_parm_index;
111
2c73f9f5
ML		 112/* For a binding between a name and an entity, defines the scope
113 where the binding is declared. Currently always points to a
114 namespace declaration. */
115#define BINDING_SCOPE(NODE) (((struct tree_binding*)NODE)->scope)
116/* This is the declaration bound to the name. Possible values:
117 variable, overloaded function, namespace, template, enumerator. */
118#define BINDING_VALUE(NODE) (((struct tree_binding*)NODE)->value)
119/* If name is bound to a type, this is the type (struct, union, enum). */
120#define BINDING_TYPE(NODE) TREE_TYPE(NODE)
30394414 121#define IDENTIFIER_GLOBAL_VALUE(NODE) \
2c73f9f5
ML		 122 namespace_binding (NODE, global_namespace)
123#define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \
124 set_namespace_binding (NODE, global_namespace, VAL)
30394414 125#define IDENTIFIER_NAMESPACE_VALUE(NODE) \
2c73f9f5
ML		 126 namespace_binding (NODE, current_namespace)
127#define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \
128 set_namespace_binding (NODE, current_namespace, VAL)
30394414
JM		 129
130struct tree_binding
131{
132 char common[sizeof (struct tree_common)];
133 tree scope;
134 tree value;
135};
136
2c73f9f5
ML		 137/* The overloaded FUNCTION_DECL. */
138#define OVL_FUNCTION(NODE) (((struct tree_overload*)NODE)->function)
139#define OVL_CHAIN(NODE) TREE_CHAIN(NODE)
140/* Polymorphic access to FUNCTION and CHAIN. */
141#define OVL_CURRENT(NODE) \
142 ((TREE_CODE(NODE)==OVERLOAD) ? OVL_FUNCTION(NODE) : NODE)
143#define OVL_NEXT(NODE) \
144 ((TREE_CODE(NODE)==OVERLOAD) ? TREE_CHAIN(NODE) : NULL_TREE)
145/* If set, this was imported in a using declaration.
146 This is not to confuse with being used somewhere, which
147 is not important for this node. */
148#define OVL_USED(NODE) TREE_USED(NODE)
149
150struct tree_overload
151{
152 char common[sizeof (struct tree_common)];
153 tree function;
154};
155
5ffe581d
JM		 156#define WRAPPER_PTR(NODE) (((struct tree_wrapper*)NODE)->u.ptr)
157#define WRAPPER_INT(NODE) (((struct tree_wrapper*)NODE)->u.i)
158
159struct tree_wrapper
160{
161 char common[sizeof (struct tree_common)];
162 union {
163 void *ptr;
164 int i;
165 } u;
166};
167
1139b3d8
JM		 168#define SRCLOC_FILE(NODE) (((struct tree_srcloc*)NODE)->filename)
169#define SRCLOC_LINE(NODE) (((struct tree_srcloc*)NODE)->linenum)
170struct tree_srcloc
171{
172 char common[sizeof (struct tree_common)];
173 char *filename;
174 int linenum;
175};
176
8d08fdba
MS		 177/* To identify to the debug emitters if it should pay attention to the
178 flag `-Wtemplate-debugging'. */
179#define HAVE_TEMPLATES 1
180
181/* Macros for access to language-specific slots in an identifier. */
182
30394414 183#define IDENTIFIER_NAMESPACE_BINDINGS(NODE) \
32e02ee0 184 (((struct lang_identifier *)(NODE))->namespace_bindings)
8d08fdba
MS		 185#define IDENTIFIER_CLASS_VALUE(NODE) \
186 (((struct lang_identifier *)(NODE))->class_value)
187#define IDENTIFIER_LOCAL_VALUE(NODE) \
188 (((struct lang_identifier *)(NODE))->local_value)
189#define IDENTIFIER_TEMPLATE(NODE) \
190 (((struct lang_identifier *)(NODE))->class_template_info)
191
2c73f9f5
ML		 192/* TREE_TYPE only indicates on local and class scope the current
193 type. For namespace scope, the presence of a type in any namespace
194 is indicated with global_type_node, and the real type behind must
195 be found through lookup. */
196#define IDENTIFIER_TYPE_VALUE(NODE) (identifier_type_value(NODE))
197#define REAL_IDENTIFIER_TYPE_VALUE(NODE) (TREE_TYPE (NODE))
8d08fdba 198#define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = TYPE)
2c73f9f5 199#define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0)
8d08fdba
MS		 200
201#define LANG_ID_FIELD(NAME,NODE) \
202 (((struct lang_identifier *)(NODE))->x \
203 ? ((struct lang_identifier *)(NODE))->x->NAME : 0)
204#define SET_LANG_ID(NODE,VALUE,NAME) \
205 (((struct lang_identifier *)(NODE))->x == 0 \
206 ? ((struct lang_identifier *)(NODE))->x \
207 = (struct lang_id2 *)perm_calloc (1, sizeof (struct lang_id2)) : 0, \
208 ((struct lang_identifier *)(NODE))->x->NAME = (VALUE))
209
210#define IDENTIFIER_LABEL_VALUE(NODE) LANG_ID_FIELD(label_value, NODE)
211#define SET_IDENTIFIER_LABEL_VALUE(NODE,VALUE) \
212 SET_LANG_ID(NODE, VALUE, label_value)
213
214#define IDENTIFIER_IMPLICIT_DECL(NODE) LANG_ID_FIELD(implicit_decl, NODE)
215#define SET_IDENTIFIER_IMPLICIT_DECL(NODE,VALUE) \
216 SET_LANG_ID(NODE, VALUE, implicit_decl)
217
218#define IDENTIFIER_AS_DESC(NODE) LANG_ID_FIELD(type_desc, NODE)
219#define SET_IDENTIFIER_AS_DESC(NODE,DESC) \
220 SET_LANG_ID(NODE, DESC, type_desc)
221
222#define IDENTIFIER_AS_LIST(NODE) LANG_ID_FIELD(as_list, NODE)
223#define SET_IDENTIFIER_AS_LIST(NODE,LIST) \
224 SET_LANG_ID(NODE, LIST, as_list)
225
226#define IDENTIFIER_ERROR_LOCUS(NODE) LANG_ID_FIELD(error_locus, NODE)
227#define SET_IDENTIFIER_ERROR_LOCUS(NODE,VALUE) \
228 SET_LANG_ID(NODE, VALUE, error_locus)
229
230
231#define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1(NODE)
232
233/* Nonzero if this identifier is the prefix for a mangled C++ operator name. */
234#define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2(NODE)
235
236#define IDENTIFIER_TYPENAME_P(NODE) \
237 (! strncmp (IDENTIFIER_POINTER (NODE), \
238 IDENTIFIER_POINTER (ansi_opname[(int) TYPE_EXPR]), \
239 IDENTIFIER_LENGTH (ansi_opname[(int) TYPE_EXPR])))
240
241/* Nonzero means reject anything that ANSI standard C forbids. */
242extern int pedantic;
243
244/* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only. */
245#define C_TYPE_FIELDS_READONLY(type) TYPE_LANG_FLAG_0 (type)
e1cd6e56
MS		 246
247/* Record in each node resulting from a binary operator
248 what operator was specified for it. */
249#define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
250
251/* Store a value in that field. */
252#define C_SET_EXP_ORIGINAL_CODE(exp, code) \
253 (TREE_COMPLEXITY (exp) = (int)(code))
8d08fdba
MS		 254\f
255/* If non-zero, a VAR_DECL whose cleanup will cause a throw to the
256 next exception handler. */
257extern tree exception_throw_decl;
258
259extern tree double_type_node, long_double_type_node, float_type_node;
260extern tree char_type_node, unsigned_char_type_node, signed_char_type_node;
261extern tree ptrdiff_type_node;
262
263extern tree short_integer_type_node, short_unsigned_type_node;
264extern tree long_integer_type_node, long_unsigned_type_node;
265extern tree long_long_integer_type_node, long_long_unsigned_type_node;
266extern tree unsigned_type_node;
267extern tree string_type_node, char_array_type_node, int_array_type_node;
268extern tree wchar_array_type_node;
269extern tree wchar_type_node, signed_wchar_type_node, unsigned_wchar_type_node;
37c46b43
MS		 270
271extern tree complex_integer_type_node;
272extern tree complex_float_type_node;
273extern tree complex_double_type_node;
274extern tree complex_long_double_type_node;
275
8d08fdba
MS		 276extern tree intQI_type_node, unsigned_intQI_type_node;
277extern tree intHI_type_node, unsigned_intHI_type_node;
278extern tree intSI_type_node, unsigned_intSI_type_node;
279extern tree intDI_type_node, unsigned_intDI_type_node;
f7554e8c 280extern tree intTI_type_node, unsigned_intTI_type_node;
8d08fdba 281
ea419909
PB		 282extern tree java_byte_type_node;
283extern tree java_short_type_node;
284extern tree java_int_type_node;
285extern tree java_long_type_node;
286extern tree java_float_type_node;
287extern tree java_double_type_node;
288extern tree java_char_type_node;
289extern tree java_boolean_type_node;
290
8d08fdba
MS		 291extern int current_function_returns_value;
292extern int current_function_returns_null;
293extern tree current_function_return_value;
294
30394414
JM		 295extern tree current_namespace;
296extern tree global_namespace;
297
8d08fdba
MS		 298extern tree ridpointers[];
299extern tree ansi_opname[];
300extern tree ansi_assopname[];
301
302/* Nonzero means `$' can be in an identifier. */
303
304extern int dollars_in_ident;
305
306/* Nonzero means allow type mismatches in conditional expressions;
307 just make their values `void'. */
308
309extern int flag_cond_mismatch;
310
311/* Nonzero means don't recognize the keyword `asm'. */
312
313extern int flag_no_asm;
314
315/* For cross referencing. */
316
317extern int flag_gnu_xref;
318
319/* For environments where you can use GNU binutils (as, ld in particular). */
320
321extern int flag_gnu_binutils;
322
323/* Nonzero means ignore `#ident' directives. */
324
325extern int flag_no_ident;
326
327/* Nonzero means warn about implicit declarations. */
328
329extern int warn_implicit;
330
795add94
VM		 331/* Nonzero means warn about usage of long long when `-pedantic'. */
332
333extern int warn_long_long;
334
8d08fdba
MS		 335/* Nonzero means warn when all ctors or dtors are private, and the class
336 has no friends. */
337
338extern int warn_ctor_dtor_privacy;
339
340/* Nonzero means warn about function definitions that default the return type
341 or that use a null return and have a return-type other than void. */
342
343extern int warn_return_type;
344
d9cf7c82
JM		 345/* Nonzero means give string constants the type `const char *', as mandated
346 by the standard. */
347
348extern int flag_const_strings;
349
350/* Nonzero means warn about deprecated conversion from string constant to
351 `char *'. */
8d08fdba
MS		 352
353extern int warn_write_strings;
354
355/* Nonzero means warn about sizeof(function) or addition/subtraction
356 of function pointers. */
357
358extern int warn_pointer_arith;
359
8d08fdba
MS		 360/* Nonzero means warn about suggesting putting in ()'s. */
361
362extern int warn_parentheses;
363
364/* Nonzero means warn about multiple (redundant) decls for the same single
365 variable or function. */
366
367extern int warn_redundant_decls;
368
369/* Warn if initializer is not completely bracketed. */
370
371extern int warn_missing_braces;
372
2ee887f2
MS		 373/* Warn about comparison of signed and unsigned values. */
374
375extern int warn_sign_compare;
376
8d08fdba
MS		 377/* Warn about a subscript that has type char. */
378
379extern int warn_char_subscripts;
380
381/* Nonzero means warn about pointer casts that can drop a type qualifier
382 from the pointer target type. */
383
384extern int warn_cast_qual;
385
e92cc029 386/* Warn about *printf or *scanf format/argument anomalies. */
8d08fdba
MS		 387
388extern int warn_format;
389
390/* Nonzero means warn about non virtual destructors in classes that have
e92cc029 391 virtual functions. */
8d08fdba
MS		 392
393extern int warn_nonvdtor;
394
9a3b49ac
MS		 395/* Non-zero means warn when we convert a pointer to member function
396 into a pointer to (void or function). */
397
398extern int warn_pmf2ptr;
399
eb448459
MS		 400/* Nonzero means warn about violation of some Effective C++ style rules. */
401
402extern int warn_ecpp;
403
da20811c
JM		 404/* Nonzero means warn where overload resolution chooses a promotion from
405 unsigned to signed over a conversion to an unsigned of the same size. */
406
407extern int warn_sign_promo;
408
8d08fdba 409/* Non-zero means warn when a function is declared extern and later inline. */
eb448459 410
8d08fdba
MS		 411extern int warn_extern_inline;
412
0c4b14c4
JM		 413/* Non-zero means warn when an old-style cast is used. */
414
415extern int warn_old_style_cast;
416
8d08fdba
MS		 417/* Nonzero means to treat bitfields as unsigned unless they say `signed'. */
418
419extern int flag_signed_bitfields;
420
421/* 3 means write out only virtuals function tables `defined'
422 in this implementation file.
423 2 means write out only specific virtual function tables
424 and give them (C) public access.
425 1 means write out virtual function tables and give them
426 (C) public access.
427 0 means write out virtual function tables and give them
428 (C) static access (default).
429 -1 means declare virtual function tables extern. */
430
431extern int write_virtuals;
432
38e01259 433/* True for more efficient but incompatible (not fully tested)
8926095f 434 vtable implementation (using thunks).
e92cc029 435 0 is old behavior; 1 is new behavior. */
8926095f 436extern int flag_vtable_thunks;
51c184be 437
8d08fdba
MS		 438/* INTERFACE_ONLY nonzero means that we are in an "interface"
439 section of the compiler. INTERFACE_UNKNOWN nonzero means
440 we cannot trust the value of INTERFACE_ONLY. If INTERFACE_UNKNOWN
441 is zero and INTERFACE_ONLY is zero, it means that we are responsible
442 for exporting definitions that others might need. */
443extern int interface_only, interface_unknown;
444
445/* Nonzero means we should attempt to elide constructors when possible. */
446
447extern int flag_elide_constructors;
448
e1cd6e56
MS		 449/* Nonzero means enable obscure ANSI features and disable GNU extensions
450 that might cause ANSI-compliant code to be miscompiled. */
39211cd5
MS		 451
452extern int flag_ansi;
453
8d08fdba
MS		 454/* Nonzero means recognize and handle signature language constructs. */
455
456extern int flag_handle_signatures;
457
458/* Nonzero means that member functions defined in class scope are
459 inline by default. */
460
461extern int flag_default_inline;
386b8a85
JM		 462
463/* The name-mangling scheme to use. Versions of gcc before 2.8 use
464 version 0. */
465extern int name_mangling_version;
466
467/* Nonzero means that guiding declarations are allowed. */
468extern int flag_guiding_decls;
469
5bd17905
AM		 470/* Nonzero if squashed mangling is to be performed.
471 This uses the B and K codes to reference previously seen class types
472 and class qualifiers. */
473extern int flag_do_squangling;
474
dc8263bc
JM		 475/* Nonzero if we want to issue diagnostics that the standard says are not
476 required. */
477extern int flag_optional_diags;
a1dd0d36 478
830fcda8
JM		 479/* Nonzero means do not consider empty argument prototype to mean function
480 takes no arguments. */
481
482extern int flag_strict_prototype;
483
a1dd0d36
JM		 484/* Nonzero means output .vtable_{entry,inherit} for use in doing vtable gc. */
485extern int flag_vtable_gc;
8d08fdba
MS		 486\f
487/* C++ language-specific tree codes. */
488#define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
489enum cplus_tree_code {
490 __DUMMY = LAST_AND_UNUSED_TREE_CODE,
e92cc029 491#include "cp-tree.def"
8d08fdba
MS		 492 LAST_CPLUS_TREE_CODE
493};
494#undef DEFTREECODE
495
fcad5cf5 496enum languages { lang_c, lang_cplusplus, lang_java };
8d08fdba
MS		 497
498/* Macros to make error reporting functions' lives easier. */
499#define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE)))
500#define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
501#define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
502
503#define TYPE_ASSEMBLER_NAME_STRING(NODE) (IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE))))
504#define TYPE_ASSEMBLER_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE))))
505
a4443a08 506/* The _DECL for this _TYPE. */
d2e5ee5c 507#define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
a4443a08 508
c92366fb 509/* Nonzero if T is a class (or struct or union) type. Also nonzero
b80c4d77
MM		 510 for template type parameters and typename types. Despite its name,
511 this macro has nothing to do with the definition of aggregate given
512 in the standard. Think of this macro as MAYBE_CLASS_TYPE_P. */
8d08fdba 513#define IS_AGGR_TYPE(t) (TYPE_LANG_FLAG_5 (t))
c92366fb 514
b80c4d77
MM		 515/* Nonzero if T is a class type. Zero for template type parameters,
516 typename types, and so forth. */
c92366fb 517#define CLASS_TYPE_P(t) \
b80c4d77 518 (IS_AGGR_TYPE (t) && IS_AGGR_TYPE_CODE (TREE_CODE (t)))
c92366fb 519
5566b478 520#define IS_AGGR_TYPE_CODE(t) (t == RECORD_TYPE || t == UNION_TYPE)
8d08fdba
MS		 521#define IS_AGGR_TYPE_2(TYPE1,TYPE2) \
522 (TREE_CODE (TYPE1) == TREE_CODE (TYPE2) \
523 && IS_AGGR_TYPE (TYPE1)&IS_AGGR_TYPE (TYPE2))
6467930b
MS		 524#define IS_OVERLOAD_TYPE(t) \
525 (IS_AGGR_TYPE (t) || TREE_CODE (t) == ENUMERAL_TYPE)
8d08fdba
MS		 526
527/* In a *_TYPE, nonzero means a built-in type. */
528#define TYPE_BUILT_IN(NODE) TYPE_LANG_FLAG_6(NODE)
529
ea419909
PB		 530/* True if this a "Java" type, defined in 'extern "Java"'. */
531#define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3(NODE)
532
21474714
MS		 533#define DELTA_FROM_VTABLE_ENTRY(ENTRY) \
534 (!flag_vtable_thunks ? \
535 TREE_VALUE (CONSTRUCTOR_ELTS (ENTRY)) \
536 : TREE_CODE (TREE_OPERAND ((ENTRY), 0)) != THUNK_DECL ? integer_zero_node \
537 : build_int_2 (THUNK_DELTA (TREE_OPERAND ((ENTRY), 0)), 0))
bd6dd845 538
8d08fdba
MS		 539/* Virtual function addresses can be gotten from a virtual function
540 table entry using this macro. */
541#define FNADDR_FROM_VTABLE_ENTRY(ENTRY) \
8926095f
MS		 542 (!flag_vtable_thunks ? \
543 TREE_VALUE (TREE_CHAIN (TREE_CHAIN (CONSTRUCTOR_ELTS (ENTRY)))) \
544 : TREE_CODE (TREE_OPERAND ((ENTRY), 0)) != THUNK_DECL ? (ENTRY) \
545 : DECL_INITIAL (TREE_OPERAND ((ENTRY), 0)))
8d08fdba
MS		 546#define SET_FNADDR_FROM_VTABLE_ENTRY(ENTRY,VALUE) \
547 (TREE_VALUE (TREE_CHAIN (TREE_CHAIN (CONSTRUCTOR_ELTS (ENTRY)))) = (VALUE))
8d08fdba
MS		 548#define FUNCTION_ARG_CHAIN(NODE) (TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE))))
549#define PROMOTES_TO_AGGR_TYPE(NODE,CODE) \
550 (((CODE) == TREE_CODE (NODE) \
551 && IS_AGGR_TYPE (TREE_TYPE (NODE))) \
552 || IS_AGGR_TYPE (NODE))
553
8d08fdba
MS		 554/* Nonzero iff TYPE is uniquely derived from PARENT. Under MI, PARENT can
555 be an ambiguous base class of TYPE, and this macro will be false. */
556#define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 0, (tree *)0) >= 0)
557#define ACCESSIBLY_DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, -1, (tree *)0) >= 0)
558#define ACCESSIBLY_UNIQUELY_DERIVED_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 1, (tree *)0) >= 0)
a0a33927 559#define DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 0, (tree *)0) != -1)
8d08fdba 560\f
8d08fdba
MS		 561/* Statistics show that while the GNU C++ compiler may generate
562 thousands of different types during a compilation run, it
563 generates relatively few (tens) of classtypes. Because of this,
564 it is not costly to store a generous amount of information
565 in classtype nodes. This struct must fill out to a multiple of 4 bytes. */
566struct lang_type
567{
568 struct
569 {
570 unsigned has_type_conversion : 1;
8d08fdba 571 unsigned has_init_ref : 1;
8d08fdba
MS		 572 unsigned has_assignment : 1;
573 unsigned has_default_ctor : 1;
574 unsigned uses_multiple_inheritance : 1;
8d08fdba
MS		 575 unsigned const_needs_init : 1;
576 unsigned ref_needs_init : 1;
577 unsigned has_const_assign_ref : 1;
8d08fdba 578
0b41abe6
JM		 579 unsigned has_nonpublic_ctor : 2;
580 unsigned has_nonpublic_assign_ref : 2;
581 unsigned vtable_needs_writing : 1;
8d08fdba 582 unsigned has_assign_ref : 1;
a28e3c7f 583 unsigned gets_new : 2;
0b41abe6 584
a28e3c7f 585 unsigned gets_delete : 2;
8d08fdba
MS		 586 unsigned has_call_overloaded : 1;
587 unsigned has_array_ref_overloaded : 1;
588 unsigned has_arrow_overloaded : 1;
a28e3c7f 589 unsigned local_typedecls : 1;
8d08fdba
MS		 590 unsigned interface_only : 1;
591 unsigned interface_unknown : 1;
0b41abe6 592
8d08fdba 593 unsigned needs_virtual_reinit : 1;
db5ae43f 594 unsigned vec_delete_takes_size : 1;
8d08fdba
MS		 595 unsigned declared_class : 1;
596 unsigned being_defined : 1;
597 unsigned redefined : 1;
8d08fdba
MS		 598 unsigned marked : 1;
599 unsigned marked2 : 1;
600 unsigned marked3 : 1;
0b41abe6 601
8d08fdba
MS		 602 unsigned marked4 : 1;
603 unsigned marked5 : 1;
604 unsigned marked6 : 1;
fc378698 605 unsigned debug_requested : 1;
a28e3c7f 606 unsigned use_template : 2;
8d08fdba
MS		 607 unsigned got_semicolon : 1;
608 unsigned ptrmemfunc_flag : 1;
0b41abe6 609
8d08fdba
MS		 610 unsigned is_signature : 1;
611 unsigned is_signature_pointer : 1;
a28e3c7f 612 unsigned is_signature_reference : 1;
8d08fdba
MS		 613 unsigned has_opaque_typedecls : 1;
614 unsigned sigtable_has_been_generated : 1;
615 unsigned was_anonymous : 1;
616 unsigned has_real_assignment : 1;
617 unsigned has_real_assign_ref : 1;
0b41abe6 618
8d08fdba 619 unsigned has_const_init_ref : 1;
8d08fdba
MS		 620 unsigned has_complex_init_ref : 1;
621 unsigned has_complex_assign_ref : 1;
f0e01782 622 unsigned has_abstract_assign_ref : 1;
f30432d7 623 unsigned non_aggregate : 1;
8d08fdba
MS		 624
625 /* The MIPS compiler gets it wrong if this struct also
626 does not fill out to a multiple of 4 bytes. Add a
627 member `dummy' with new bits if you go over the edge. */
b0e0b31f 628 unsigned dummy : 11;
8d08fdba
MS		 629 } type_flags;
630
8d08fdba 631 int n_ancestors;
0b41abe6 632 int n_vancestors;
8d08fdba
MS		 633 int vsize;
634 int max_depth;
635 int vfield_parent;
636
8d08fdba
MS		 637 union tree_node *baselink_vec;
638 union tree_node *vfields;
639 union tree_node *vbases;
8d08fdba
MS		 640
641 union tree_node *tags;
8d08fdba 642
fc378698 643 union tree_node *search_slot;
8d08fdba 644
8d08fdba 645 unsigned char align;
0b41abe6 646 /* Room for another three unsigned chars. */
8d08fdba 647
8d08fdba
MS		 648 union tree_node *size;
649
650 union tree_node *base_init_list;
651 union tree_node *abstract_virtuals;
652 union tree_node *as_list;
653 union tree_node *id_as_list;
654 union tree_node *binfo_as_list;
8d08fdba
MS		 655 union tree_node *friend_classes;
656
db5ae43f 657 union tree_node *rtti;
8d08fdba 658
51c184be
MS		 659 union tree_node *methods;
660
8d08fdba
MS		 661 union tree_node *signature;
662 union tree_node *signature_pointer_to;
663 union tree_node *signature_reference_to;
f376e137 664
5566b478
MS		 665 union tree_node *template_info;
666
f376e137 667 int linenum;
8d08fdba
MS		 668};
669
f376e137
MS		 670#define CLASSTYPE_SOURCE_LINE(NODE) (TYPE_LANG_SPECIFIC(NODE)->linenum)
671
a0a33927
MS		 672/* Indicates whether or not (and how) a template was expanded for this class.
673 0=no information yet/non-template class
674 1=implicit template instantiation
675 2=explicit template specialization
676 3=explicit template instantiation */
8d08fdba
MS		 677#define CLASSTYPE_USE_TEMPLATE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.use_template)
678
679/* Fields used for storing information before the class is defined.
680 After the class is defined, these fields hold other information. */
681
682/* List of friends which were defined inline in this class definition. */
683#define CLASSTYPE_INLINE_FRIENDS(NODE) (TYPE_NONCOPIED_PARTS (NODE))
684
685/* Nonzero for _CLASSTYPE means that the _CLASSTYPE either has
686 a special meaning for the assignment operator ("operator="),
687 or one of its fields (or base members) has a special meaning
688 defined. */
689#define TYPE_HAS_ASSIGNMENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_assignment)
690#define TYPE_HAS_REAL_ASSIGNMENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_real_assignment)
691
692/* Nonzero for _CLASSTYPE means that operator new and delete are defined,
693 respectively. */
a28e3c7f
MS		 694#define TYPE_GETS_NEW(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.gets_new)
695#define TYPE_GETS_DELETE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.gets_delete)
696#define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
697
698/* Nonzero for _CLASSTYPE means that operator vec delete is defined and
699 takes the optional size_t argument. */
700#define TYPE_VEC_DELETE_TAKES_SIZE(NODE) \
701 (TYPE_LANG_SPECIFIC(NODE)->type_flags.vec_delete_takes_size)
702#define TYPE_VEC_NEW_USES_COOKIE(NODE) \
703 (TYPE_NEEDS_DESTRUCTOR (NODE) \
704 || (TYPE_LANG_SPECIFIC (NODE) && TYPE_VEC_DELETE_TAKES_SIZE (NODE)))
8d08fdba
MS		 705
706/* Nonzero for TREE_LIST or _TYPE node means that this node is class-local. */
707#define TREE_NONLOCAL_FLAG(NODE) (TREE_LANG_FLAG_0 (NODE))
708
8d08fdba
MS		 709/* Nonzero means that this _CLASSTYPE node defines ways of converting
710 itself to other types. */
711#define TYPE_HAS_CONVERSION(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_type_conversion)
712
8d08fdba
MS		 713/* Nonzero means that this _CLASSTYPE node overloads operator=(X&). */
714#define TYPE_HAS_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_assign_ref)
715#define TYPE_HAS_CONST_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_const_assign_ref)
716
717/* Nonzero means that this _CLASSTYPE node has an X(X&) constructor. */
718#define TYPE_HAS_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_init_ref)
719#define TYPE_HAS_CONST_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_const_init_ref)
720
8d08fdba
MS		 721/* Nonzero means that this type is being defined. I.e., the left brace
722 starting the definition of this type has been seen. */
723#define TYPE_BEING_DEFINED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.being_defined)
724/* Nonzero means that this type has been redefined. In this case, if
725 convenient, don't reprocess any methods that appear in its redefinition. */
726#define TYPE_REDEFINED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.redefined)
727
8d08fdba
MS		 728/* Nonzero means that this type is a signature. */
729# define IS_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)?TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature:0)
730# define SET_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature=1)
731# define CLEAR_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature=0)
732
733/* Nonzero means that this type is a signature pointer type. */
734# define IS_SIGNATURE_POINTER(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature_pointer)
735
736/* Nonzero means that this type is a signature reference type. */
737# define IS_SIGNATURE_REFERENCE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature_reference)
738
8d08fdba
MS		 739/* Nonzero means that this signature contains opaque type declarations. */
740#define SIGNATURE_HAS_OPAQUE_TYPEDECLS(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_opaque_typedecls)
741
742/* Nonzero means that a signature table has been generated
743 for this signature. */
744#define SIGTABLE_HAS_BEEN_GENERATED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.sigtable_has_been_generated)
745
746/* If NODE is a class, this is the signature type that contains NODE's
747 signature after it has been computed using sigof(). */
748#define CLASSTYPE_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature)
749
750/* If NODE is a signature pointer or signature reference, this is the
751 signature type the pointer/reference points to. */
752#define SIGNATURE_TYPE(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature)
753
754/* If NODE is a signature, this is a vector of all methods defined
755 in the signature or in its base types together with their default
756 implementations. */
757#define SIGNATURE_METHOD_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature)
758
759/* If NODE is a signature, this is the _TYPE node that contains NODE's
760 signature pointer type. */
761#define SIGNATURE_POINTER_TO(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature_pointer_to)
762
763/* If NODE is a signature, this is the _TYPE node that contains NODE's
764 signature reference type. */
765#define SIGNATURE_REFERENCE_TO(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature_reference_to)
766
db5ae43f
MS		 767/* The is the VAR_DECL that contains NODE's rtti. */
768#define CLASSTYPE_RTTI(NODE) (TYPE_LANG_SPECIFIC(NODE)->rtti)
8d08fdba
MS		 769
770/* Nonzero means that this _CLASSTYPE node overloads operator(). */
771#define TYPE_OVERLOADS_CALL_EXPR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_call_overloaded)
772
773/* Nonzero means that this _CLASSTYPE node overloads operator[]. */
774#define TYPE_OVERLOADS_ARRAY_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_array_ref_overloaded)
775
776/* Nonzero means that this _CLASSTYPE node overloads operator->. */
777#define TYPE_OVERLOADS_ARROW(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_arrow_overloaded)
778
779/* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses
780 multiple inheritance. If this is 0 for the root of a type
781 hierarchy, then we can use more efficient search techniques. */
782#define TYPE_USES_MULTIPLE_INHERITANCE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.uses_multiple_inheritance)
783
784/* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses
785 virtual base classes. If this is 0 for the root of a type
786 hierarchy, then we can use more efficient search techniques. */
787#define TYPE_USES_VIRTUAL_BASECLASSES(NODE) (TREE_LANG_FLAG_3(NODE))
788
789/* List of lists of member functions defined in this class. */
72b7eeff 790#define CLASSTYPE_METHOD_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->methods)
8d08fdba 791
e1cd6e56
MS		 792/* The first type conversion operator in the class (the others can be
793 searched with TREE_CHAIN), or the first non-constructor function if
794 there are no type conversion operators. */
795#define CLASSTYPE_FIRST_CONVERSION(NODE) \
fc378698
MS		 796 TREE_VEC_LENGTH (CLASSTYPE_METHOD_VEC (NODE)) > 2 \
797 ? TREE_VEC_ELT (CLASSTYPE_METHOD_VEC (NODE), 2) \
8ccc31eb 798 : NULL_TREE;
e1cd6e56 799
8d08fdba
MS		 800/* Pointer from any member function to the head of the list of
801 member functions of the type that member function belongs to. */
802#define CLASSTYPE_BASELINK_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->baselink_vec)
803
804/* Mark bits for depth-first and breath-first searches. */
805#define CLASSTYPE_MARKED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked)
806#define CLASSTYPE_MARKED2(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked2)
807#define CLASSTYPE_MARKED3(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked3)
808#define CLASSTYPE_MARKED4(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked4)
809#define CLASSTYPE_MARKED5(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked5)
810#define CLASSTYPE_MARKED6(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked6)
811/* Macros to modify the above flags */
812#define SET_CLASSTYPE_MARKED(NODE) (CLASSTYPE_MARKED(NODE) = 1)
813#define CLEAR_CLASSTYPE_MARKED(NODE) (CLASSTYPE_MARKED(NODE) = 0)
814#define SET_CLASSTYPE_MARKED2(NODE) (CLASSTYPE_MARKED2(NODE) = 1)
815#define CLEAR_CLASSTYPE_MARKED2(NODE) (CLASSTYPE_MARKED2(NODE) = 0)
816#define SET_CLASSTYPE_MARKED3(NODE) (CLASSTYPE_MARKED3(NODE) = 1)
817#define CLEAR_CLASSTYPE_MARKED3(NODE) (CLASSTYPE_MARKED3(NODE) = 0)
818#define SET_CLASSTYPE_MARKED4(NODE) (CLASSTYPE_MARKED4(NODE) = 1)
819#define CLEAR_CLASSTYPE_MARKED4(NODE) (CLASSTYPE_MARKED4(NODE) = 0)
820#define SET_CLASSTYPE_MARKED5(NODE) (CLASSTYPE_MARKED5(NODE) = 1)
821#define CLEAR_CLASSTYPE_MARKED5(NODE) (CLASSTYPE_MARKED5(NODE) = 0)
822#define SET_CLASSTYPE_MARKED6(NODE) (CLASSTYPE_MARKED6(NODE) = 1)
823#define CLEAR_CLASSTYPE_MARKED6(NODE) (CLASSTYPE_MARKED6(NODE) = 0)
824
35acd3f2
MM		 825/* A list of the nested tag-types (class, struct, union, or enum)
826 found within this class. The TREE_PURPOSE of each node is the name
827 of the type; the TREE_VALUE is the type itself. This list includes
828 nested member class templates. */
8d08fdba
MS		 829#define CLASSTYPE_TAGS(NODE) (TYPE_LANG_SPECIFIC(NODE)->tags)
830
831/* If this class has any bases, this is the number of the base class from
832 which our VFIELD is based, -1 otherwise. If this class has no base
833 classes, this is not used.
834 In D : B1, B2, PARENT would be 0, if D's vtable came from B1,
e92cc029 835 1, if D's vtable came from B2. */
8d08fdba
MS		 836#define CLASSTYPE_VFIELD_PARENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->vfield_parent)
837
838/* Remove when done merging. */
839#define CLASSTYPE_VFIELD(NODE) TYPE_VFIELD(NODE)
840
841/* The number of virtual functions defined for this
842 _CLASSTYPE node. */
843#define CLASSTYPE_VSIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->vsize)
844/* The virtual base classes that this type uses. */
845#define CLASSTYPE_VBASECLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->vbases)
846/* The virtual function pointer fields that this type contains. */
847#define CLASSTYPE_VFIELDS(NODE) (TYPE_LANG_SPECIFIC(NODE)->vfields)
848
849/* Number of baseclasses defined for this type.
850 0 means no base classes. */
851#define CLASSTYPE_N_BASECLASSES(NODE) \
852 (TYPE_BINFO_BASETYPES (NODE) ? TREE_VEC_LENGTH (TYPE_BINFO_BASETYPES(NODE)) : 0)
853
514a1f18 854/* Memoize the number of super classes (base classes) that this node
8d08fdba
MS		 855 has. That way we can know immediately (albeit conservatively how
856 large a multiple-inheritance matrix we need to build to find
857 derivation information. */
858#define CLASSTYPE_N_SUPERCLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->n_ancestors)
0b41abe6 859#define CLASSTYPE_N_VBASECLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->n_vancestors)
8d08fdba
MS		 860
861/* Record how deep the inheritance is for this class so `void*' conversions
862 are less favorable than a conversion to the most base type. */
863#define CLASSTYPE_MAX_DEPTH(NODE) (TYPE_LANG_SPECIFIC(NODE)->max_depth)
864
865/* Used for keeping search-specific information. Any search routine
866 which uses this must define what exactly this slot is used for. */
867#define CLASSTYPE_SEARCH_SLOT(NODE) (TYPE_LANG_SPECIFIC(NODE)->search_slot)
868
0b41abe6 869/* These are the size, mode and alignment of the type without its
9a71c18b 870 virtual base classes, for when we use this type as a base itself. */
8d08fdba 871#define CLASSTYPE_SIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->size)
8d08fdba
MS		 872#define CLASSTYPE_ALIGN(NODE) (TYPE_LANG_SPECIFIC(NODE)->align)
873
8d08fdba
MS		 874/* A cons list of structure elements which either have constructors
875 to be called, or virtual function table pointers which
876 need initializing. Depending on what is being initialized,
877 the TREE_PURPOSE and TREE_VALUE fields have different meanings:
878
879 Member initialization: <FIELD_DECL, TYPE>
880 Base class construction: <NULL_TREE, BASETYPE>
881 Base class initialization: <BASE_INITIALIZATION, THESE_INITIALIZATIONS>
882 Whole type: <MEMBER_INIT, BASE_INIT>. */
883#define CLASSTYPE_BASE_INIT_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->base_init_list)
884
885/* A cons list of virtual functions which cannot be inherited by
886 derived classes. When deriving from this type, the derived
887 class must provide its own definition for each of these functions. */
888#define CLASSTYPE_ABSTRACT_VIRTUALS(NODE) (TYPE_LANG_SPECIFIC(NODE)->abstract_virtuals)
889
890/* Nonzero means that this aggr type has been `closed' by a semicolon. */
891#define CLASSTYPE_GOT_SEMICOLON(NODE) (TYPE_LANG_SPECIFIC (NODE)->type_flags.got_semicolon)
892
893/* Nonzero means that the main virtual function table pointer needs to be
894 set because base constructors have placed the wrong value there.
895 If this is zero, it means that they placed the right value there,
896 and there is no need to change it. */
897#define CLASSTYPE_NEEDS_VIRTUAL_REINIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.needs_virtual_reinit)
898
899/* Nonzero means that if this type has virtual functions, that
900 the virtual function table will be written out. */
901#define CLASSTYPE_VTABLE_NEEDS_WRITING(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.vtable_needs_writing)
902
903/* Nonzero means that this type defines its own local type declarations. */
904#define CLASSTYPE_LOCAL_TYPEDECLS(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.local_typedecls)
905
906/* Nonzero means that this type has an X() constructor. */
907#define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_default_ctor)
908
909/* Nonzero means the type declared a ctor as private or protected. We
910 use this to make sure we don't try to generate a copy ctor for a
911 class that has a member of type NODE. */
912#define TYPE_HAS_NONPUBLIC_CTOR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_nonpublic_ctor)
913
914/* Ditto, for operator=. */
915#define TYPE_HAS_NONPUBLIC_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_nonpublic_assign_ref)
916
917/* Many routines need to cons up a list of basetypes for access
918 checking. This field contains a TREE_LIST node whose TREE_VALUE
919 is the main variant of the type, and whose TREE_VIA_PUBLIC
920 and TREE_VIA_VIRTUAL bits are correctly set. */
921#define CLASSTYPE_AS_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->as_list)
922/* Same, but cache a list whose value is the name of this type. */
923#define CLASSTYPE_ID_AS_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->id_as_list)
924/* Same, but cache a list whose value is the binfo of this type. */
925#define CLASSTYPE_BINFO_AS_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->binfo_as_list)
926
ea4e080b
MM		 927/* A list of class types with which this type is a friend. The
928 TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the
929 case of a template friend. */
8d08fdba
MS		 930#define CLASSTYPE_FRIEND_CLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->friend_classes)
931
8d08fdba
MS		 932/* Say whether this node was declared as a "class" or a "struct". */
933#define CLASSTYPE_DECLARED_CLASS(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.declared_class)
8d08fdba
MS		 934
935/* Nonzero if this class has const members which have no specified initialization. */
936#define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.const_needs_init)
937
938/* Nonzero if this class has ref members which have no specified initialization. */
939#define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.ref_needs_init)
940
941/* Nonzero if this class is included from a header file which employs
942 `#pragma interface', and it is not included in its implementation file. */
943#define CLASSTYPE_INTERFACE_ONLY(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_only)
944
945/* Same as above, but for classes whose purpose we do not know. */
946#define CLASSTYPE_INTERFACE_UNKNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown)
947#define CLASSTYPE_INTERFACE_KNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown == 0)
948#define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown = !!(X))
949#define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown = 1)
950#define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown = 0)
951
952/* Nonzero if a _DECL node requires us to output debug info for this class. */
953#define CLASSTYPE_DEBUG_REQUESTED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.debug_requested)
954\f
955/* Additional macros for inheritance information. */
956
ca107ded
MM		 957/* The BINFO_INHERITANCE_CHAIN is used opposite to the description in
958 gcc/tree.h. In particular if D is derived from B then the BINFO
959 for B (in D) will have a BINFO_INHERITANCE_CHAIN pointing to
960 D. In tree.h, this pointer is described as pointing in other
961 direction.
962
963 After a call to get_vbase_types, the vbases are chained together in
964 depth-first order via TREE_CHAIN. Other than that, TREE_CHAIN is
965 unused. */
966
8d08fdba
MS		 967/* Nonzero means marked by DFS or BFS search, including searches
968 by `get_binfo' and `get_base_distance'. */
969#define BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED(BINFO_TYPE(NODE)):TREE_LANG_FLAG_0(NODE))
970/* Macros needed because of C compilers that don't allow conditional
971 expressions to be lvalues. Grr! */
972#define SET_BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_0(NODE)=1))
973#define CLEAR_BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_0(NODE)=0))
974
8d08fdba
MS		 975/* Nonzero means marked in search through virtual inheritance hierarchy. */
976#define BINFO_VBASE_MARKED(NODE) CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
977/* Modifier macros */
978#define SET_BINFO_VBASE_MARKED(NODE) SET_CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
979#define CLEAR_BINFO_VBASE_MARKED(NODE) CLEAR_CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
980
981/* Nonzero means marked in search for members or member functions. */
982#define BINFO_FIELDS_MARKED(NODE) \
983 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED2 (BINFO_TYPE (NODE)):TREE_LANG_FLAG_2(NODE))
984#define SET_BINFO_FIELDS_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED2(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_2(NODE)=1))
985#define CLEAR_BINFO_FIELDS_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED2(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_2(NODE)=0))
986
987/* Nonzero means that this class is on a path leading to a new vtable. */
988#define BINFO_VTABLE_PATH_MARKED(NODE) \
989 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):TREE_LANG_FLAG_3(NODE))
990#define SET_BINFO_VTABLE_PATH_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_3(NODE)=1))
991#define CLEAR_BINFO_VTABLE_PATH_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_3(NODE)=0))
992
993/* Nonzero means that this class has a new vtable. */
994#define BINFO_NEW_VTABLE_MARKED(NODE) \
995 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED4(BINFO_TYPE(NODE)):TREE_LANG_FLAG_4(NODE))
996#define SET_BINFO_NEW_VTABLE_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED4(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_4(NODE)=1))
997#define CLEAR_BINFO_NEW_VTABLE_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED4(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_4(NODE)=0))
998
0ec57017
JM		 999/* Nonzero means this class has done dfs_pushdecls. */
1000#define BINFO_PUSHDECLS_MARKED(NODE) BINFO_VTABLE_PATH_MARKED (NODE)
1001#define SET_BINFO_PUSHDECLS_MARKED(NODE) SET_BINFO_VTABLE_PATH_MARKED (NODE)
1002#define CLEAR_BINFO_PUSHDECLS_MARKED(NODE) CLEAR_BINFO_VTABLE_PATH_MARKED (NODE)
8d08fdba
MS		 1003\f
1004/* Accessor macros for the vfield slots in structures. */
1005
1006/* Get the assoc info that caused this vfield to exist. */
1007#define VF_BINFO_VALUE(NODE) TREE_PURPOSE (NODE)
1008
1009/* Get that same information as a _TYPE. */
1010#define VF_BASETYPE_VALUE(NODE) TREE_VALUE (NODE)
1011
1012/* Get the value of the top-most type dominating the non-`normal' vfields. */
1013#define VF_DERIVED_VALUE(NODE) (VF_BINFO_VALUE (NODE) ? BINFO_TYPE (VF_BINFO_VALUE (NODE)) : NULL_TREE)
1014
1015/* Get the value of the top-most type that's `normal' for the vfield. */
1016#define VF_NORMAL_VALUE(NODE) TREE_TYPE (NODE)
1017\f
1018/* Nonzero for TREE_LIST node means that this list of things
1019 is a list of parameters, as opposed to a list of expressions. */
1020#define TREE_PARMLIST(NODE) ((NODE)->common.unsigned_flag) /* overloaded! */
1021
1022/* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
1023 this type can raise. */
1024#define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_NONCOPIED_PARTS (NODE)
a9aedbc2 1025
e92cc029 1026/* The binding level associated with the namespace. */
72b7eeff 1027#define NAMESPACE_LEVEL(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.level)
8d08fdba
MS		 1028\f
1029struct lang_decl_flags
1030{
1031#ifdef ONLY_INT_FIELDS
1032 int language : 8;
1033#else
1034 enum languages language : 8;
1035#endif
1036
1037 unsigned operator_attr : 1;
1038 unsigned constructor_attr : 1;
1039 unsigned returns_first_arg : 1;
1040 unsigned preserves_first_arg : 1;
1041 unsigned friend_attr : 1;
1042 unsigned static_function : 1;
1043 unsigned const_memfunc : 1;
1044 unsigned volatile_memfunc : 1;
1045
1046 unsigned abstract_virtual : 1;
1047 unsigned permanent_attr : 1 ;
1048 unsigned constructor_for_vbase_attr : 1;
1049 unsigned mutable_flag : 1;
1050 unsigned is_default_implementation : 1;
8926095f 1051 unsigned saved_inline : 1;
a0a33927
MS		 1052 unsigned use_template : 2;
1053
db5ae43f 1054 unsigned nonconverting : 1;
faae18ab
MS		 1055 unsigned declared_inline : 1;
1056 unsigned not_really_extern : 1;
77be6f82 1057 unsigned comdat : 1;
cdcb673e
MH		 1058 unsigned needs_final_overrider : 1;
1059 unsigned dummy : 3;
8d08fdba
MS		 1060
1061 tree access;
1062 tree context;
1063 tree memfunc_pointer_to;
5566b478 1064 tree template_info;
72b7eeff 1065 struct binding_level *level;
8d08fdba
MS		 1066};
1067
1068struct lang_decl
1069{
1070 struct lang_decl_flags decl_flags;
1071
8d08fdba
MS		 1072 tree main_decl_variant;
1073 struct pending_inline *pending_inline_info;
8d08fdba
MS		 1074};
1075
1076/* Non-zero if NODE is a _DECL with TREE_READONLY set. */
1077#define TREE_READONLY_DECL_P(NODE) \
1078 (TREE_READONLY (NODE) && TREE_CODE_CLASS (TREE_CODE (NODE)) == 'd')
1079
cffa8729
MS		 1080/* Non-zero iff DECL is memory-based. The DECL_RTL of
1081 certain const variables might be a CONST_INT, or a REG
1082 in some cases. We cannot use `memory_operand' as a test
1083 here because on most RISC machines, a variable's address
1084 is not, by itself, a legitimate address. */
1085#define DECL_IN_MEMORY_P(NODE) \
1086 (DECL_RTL (NODE) != NULL_RTX && GET_CODE (DECL_RTL (NODE)) == MEM)
1087
8d08fdba
MS		 1088/* For FUNCTION_DECLs: return the language in which this decl
1089 was declared. */
1090#define DECL_LANGUAGE(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.language)
1091
1092/* For FUNCTION_DECLs: nonzero means that this function is a constructor. */
1093#define DECL_CONSTRUCTOR_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.constructor_attr)
711734a9
JM		 1094#define DECL_DESTRUCTOR_P(NODE) (DESTRUCTOR_NAME_P (DECL_ASSEMBLER_NAME(NODE)))
1095
8d08fdba
MS		 1096/* For FUNCTION_DECLs: nonzero means that this function is a constructor
1097 for an object with virtual baseclasses. */
1098#define DECL_CONSTRUCTOR_FOR_VBASE_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.constructor_for_vbase_attr)
1099
1100/* For FUNCTION_DECLs: nonzero means that this function is a default
1101 implementation of a signature method. */
1102#define IS_DEFAULT_IMPLEMENTATION(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.is_default_implementation)
1103
1104/* For FUNCTION_DECLs: nonzero means that the constructor
1105 is known to return a non-zero `this' unchanged. */
1106#define DECL_RETURNS_FIRST_ARG(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.returns_first_arg)
1107
1108/* Nonzero for FUNCTION_DECL means that this constructor is known to
1109 not make any assignment to `this', and therefore can be trusted
4ac14744 1110 to return it unchanged. Otherwise, we must re-assign `current_class_ptr'
8d08fdba
MS		 1111 after performing base initializations. */
1112#define DECL_PRESERVES_THIS(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.preserves_first_arg)
1113
1114/* Nonzero for _DECL means that this decl appears in (or will appear
1115 in) as a member in a RECORD_TYPE or UNION_TYPE node. It is also for
1116 detecting circularity in case members are multiply defined. In the
1117 case of a VAR_DECL, it is also used to determine how program storage
1118 should be allocated. */
1119#define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3(NODE))
1120
1121/* Nonzero for FUNCTION_DECL means that this decl is just a
1122 friend declaration, and should not be added to the list of
1123 member functions for this class. */
1124#define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.friend_attr)
1125
1126/* Nonzero for FUNCTION_DECL means that this decl is a static
1127 member function. */
1128#define DECL_STATIC_FUNCTION_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.static_function)
1129
700f8a87
MS		 1130/* Nonzero for a class member means that it is shared between all objects
1131 of that class. */
1132#define SHARED_MEMBER_P(NODE) \
1133 (TREE_CODE (NODE) == VAR_DECL || TREE_CODE (NODE) == TYPE_DECL \
1134 || TREE_CODE (NODE) == CONST_DECL)
1135
8857f91e
MM		 1136/* Nonzero for FUNCTION_DECL means that this decl is a non-static
1137 member function. */
1138#define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \
1139 (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE)
1140
8926095f
MS		 1141/* Nonzero for FUNCTION_DECL means that this decl is a member function
1142 (static or non-static). */
1143#define DECL_FUNCTION_MEMBER_P(NODE) \
8857f91e 1144 (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE))
8926095f 1145
8d08fdba
MS		 1146/* Nonzero for FUNCTION_DECL means that this member function
1147 has `this' as const X *const. */
1148#define DECL_CONST_MEMFUNC_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.const_memfunc)
1149
1150/* Nonzero for FUNCTION_DECL means that this member function
1151 has `this' as volatile X *const. */
1152#define DECL_VOLATILE_MEMFUNC_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.volatile_memfunc)
1153
1154/* Nonzero for _DECL means that this member object type
1155 is mutable. */
1156#define DECL_MUTABLE_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.mutable_flag)
1157
db5ae43f
MS		 1158/* Nonzero for _DECL means that this constructor is a non-converting
1159 constructor. */
1160#define DECL_NONCONVERTING_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.nonconverting)
1161
8d08fdba
MS		 1162/* Nonzero for FUNCTION_DECL means that this member function
1163 exists as part of an abstract class's interface. */
1164#define DECL_ABSTRACT_VIRTUAL_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.abstract_virtual)
1165
cdcb673e
MH		 1166/* Nonzero for FUNCTION_DECL means that this member function
1167 must be overridden by derived classes. */
1168#define DECL_NEEDS_FINAL_OVERRIDER_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.needs_final_overrider)
1169
8d08fdba
MS		 1170/* Nonzero if allocated on permanent_obstack. */
1171#define LANG_DECL_PERMANENT(LANGDECL) ((LANGDECL)->decl_flags.permanent_attr)
1172
8926095f
MS		 1173/* The _TYPE context in which this _DECL appears. This field holds the
1174 class where a virtual function instance is actually defined, and the
30394414 1175 lexical scope of a friend function defined in a class body. */
8d08fdba 1176#define DECL_CLASS_CONTEXT(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.context)
f30432d7
MS		 1177#define DECL_REAL_CONTEXT(NODE) \
1178 ((TREE_CODE (NODE) == FUNCTION_DECL && DECL_FUNCTION_MEMBER_P (NODE)) \
cb0dbb9a
JM		 1179 ? DECL_CLASS_CONTEXT (NODE) : CP_DECL_CONTEXT (NODE))
1180
1181/* NULL_TREE in DECL_CONTEXT represents the global namespace. */
1182#define CP_DECL_CONTEXT(NODE) \
1183 (DECL_CONTEXT (NODE) ? DECL_CONTEXT (NODE) : global_namespace)
1184#define FROB_CONTEXT(NODE) ((NODE) == global_namespace ? NULL_TREE : (NODE))
8d08fdba 1185
42c7b807 1186/* 1 iff NODE has namespace scope, including the global namespace. */
6eb3bb27 1187#define DECL_NAMESPACE_SCOPE_P(NODE) \
42c7b807
JM		 1188 (DECL_CONTEXT (NODE) == NULL_TREE \
1189 || TREE_CODE (DECL_CONTEXT (NODE)) == NAMESPACE_DECL)
1190
1191/* 1 iff NODE is a class member. */
6eb3bb27 1192#define DECL_CLASS_SCOPE_P(NODE) \
42c7b807
JM		 1193 (DECL_CONTEXT (NODE) \
1194 && TREE_CODE_CLASS (TREE_CODE (DECL_CONTEXT (NODE))) == 't')
1195
2c73f9f5 1196/* For a NAMESPACE_DECL: the list of using namespace directives
30394414 1197 The PURPOSE is the used namespace, the value is the namespace
2c73f9f5
ML		 1198 that is the common ancestor. */
1199#define DECL_NAMESPACE_USING(NODE) DECL_VINDEX(NODE)
30394414
JM		 1200
1201/* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users
2c73f9f5 1202 of a namespace, to record the transitive closure of using namespace. */
30394414
JM		 1203#define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NODE)
1204
3e3f722c
ML		 1205/* In a NAMESPACE_DECL, points to the original namespace if this is
1206 a namespace alias. */
1207#define DECL_NAMESPACE_ALIAS(NODE) DECL_ABSTRACT_ORIGIN (NODE)
1208#define ORIGINAL_NAMESPACE(NODE) \
1209 (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE))
1210
30394414
JM		 1211/* In a TREE_LIST concatenating using directives, indicate indirekt
1212 directives */
1213#define TREE_INDIRECT_USING(NODE) ((NODE)->common.lang_flag_0)
8d08fdba 1214
d2ad151f 1215/* In a VAR_DECL for a variable declared in a for statement,
e92cc029 1216 this is the shadowed (local) variable. */
d2ad151f
PB		 1217#define DECL_SHADOWED_FOR_VAR(NODE) DECL_RESULT(NODE)
1218
8d08fdba
MS		 1219/* Points back to the decl which caused this lang_decl to be allocated. */
1220#define DECL_MAIN_VARIANT(NODE) (DECL_LANG_SPECIFIC(NODE)->main_decl_variant)
1221
1222/* For a FUNCTION_DECL: if this function was declared inline inside of
1223 a class declaration, this is where the text for the function is
1224 squirreled away. */
1225#define DECL_PENDING_INLINE_INFO(NODE) (DECL_LANG_SPECIFIC(NODE)->pending_inline_info)
1226
e92cc029 1227/* True if on the saved_inlines (see decl2.c) list. */
8926095f
MS		 1228#define DECL_SAVED_INLINE(DECL) \
1229 (DECL_LANG_SPECIFIC(DECL)->decl_flags.saved_inline)
1230
8d08fdba
MS		 1231/* For a FUNCTION_DECL: if this function was declared inside a signature
1232 declaration, this is the corresponding member function pointer that was
1233 created for it. */
1234#define DECL_MEMFUNC_POINTER_TO(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.memfunc_pointer_to)
1235
1236/* For a FIELD_DECL: this points to the signature member function from
1237 which this signature member function pointer was created. */
1238#define DECL_MEMFUNC_POINTING_TO(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.memfunc_pointer_to)
1239
5566b478
MS		 1240/* For a VAR_DECL or FUNCTION_DECL: template-specific information. */
1241#define DECL_TEMPLATE_INFO(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.template_info)
ed44da02
MM		 1242
1243/* Template information for a RECORD_TYPE or UNION_TYPE. */
5566b478 1244#define CLASSTYPE_TEMPLATE_INFO(NODE) (TYPE_LANG_SPECIFIC(NODE)->template_info)
ed44da02
MM		 1245
1246/* Template information for an ENUMERAL_TYPE. Although an enumeration may
1247 not be a primary template, it may be declared within the scope of a
1248 primary template and the enumeration constants may depend on
1249 non-type template parameters. */
1250#define ENUM_TEMPLATE_INFO(NODE) (TYPE_BINFO (NODE))
1251
1252/* Template information for an ENUMERAL_, RECORD_, or UNION_TYPE. */
1253#define TYPE_TEMPLATE_INFO(NODE) \
1254 (TREE_CODE (NODE) == ENUMERAL_TYPE \
1255 ? ENUM_TEMPLATE_INFO (NODE) : CLASSTYPE_TEMPLATE_INFO (NODE))
1256
1257/* Set the template information for an ENUMERAL_, RECORD_, or
1258 UNION_TYPE to VAL. */
1259#define SET_TYPE_TEMPLATE_INFO(NODE, VAL) \
1260 (TREE_CODE (NODE) == ENUMERAL_TYPE \
1261 ? (ENUM_TEMPLATE_INFO (NODE) = VAL) \
1262 : (CLASSTYPE_TEMPLATE_INFO (NODE) = VAL))
1263
5566b478
MS		 1264#define TI_TEMPLATE(NODE) (TREE_PURPOSE (NODE))
1265#define TI_ARGS(NODE) (TREE_VALUE (NODE))
6633d636 1266#define TI_SPEC_INFO(NODE) (TREE_CHAIN (NODE))
824b9a4c 1267#define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE)
ed44da02 1268
36a117a5
MM		 1269/* The TEMPLATE_DECL instantiated or specialized by NODE. This
1270 TEMPLATE_DECL will be the immediate parent, not the most general
1271 template. For example, in:
1272
1273 template <class T> struct S { template <class U> void f(U); }
1274
1275 the FUNCTION_DECL for S<int>::f<double> will have, as its
1276 DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'.
1277
1278 As a special case, for a member friend template of a template
1279 class, this value will not be a TEMPLATE_DECL, but rather a
672476cb
MM		 1280 LOOKUP_EXPR or IDENTIFIER_NODE indicating the name of the template
1281 and any explicit template arguments provided. For example, in:
36a117a5
MM		 1282
1283 template <class T> struct S { friend void f<int>(int, double); }
1284
1285 the DECL_TI_TEMPLATE will be a LOOKUP_EXPR for `f' and the
1286 DECL_TI_ARGS will be {int}. */
5566b478 1287#define DECL_TI_TEMPLATE(NODE) TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
ed44da02 1288
36a117a5
MM		 1289/* The template arguments used to obtain this decl from the most
1290 general form of DECL_TI_TEMPLATE. For the example given for
1291 DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}. These
1292 are always the full set of arguments required to instantiate this
1293 declaration from the most general template specialized here. */
5566b478
MS		 1294#define DECL_TI_ARGS(NODE) TI_ARGS (DECL_TEMPLATE_INFO (NODE))
1295#define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
1296#define CLASSTYPE_TI_ARGS(NODE) TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
6633d636 1297#define CLASSTYPE_TI_SPEC_INFO(NODE) TI_SPEC_INFO (CLASSTYPE_TEMPLATE_INFO (NODE))
ed44da02
MM		 1298#define ENUM_TI_TEMPLATE(NODE) \
1299 TI_TEMPLATE (ENUM_TEMPLATE_INFO (NODE))
1300#define ENUM_TI_ARGS(NODE) \
1301 TI_ARGS (ENUM_TEMPLATE_INFO (NODE))
1302
1303/* Like DECL_TI_TEMPLATE, but for an ENUMERAL_, RECORD_, or UNION_TYPE. */
1304#define TYPE_TI_TEMPLATE(NODE) \
1305 (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE)))
1306
1307/* Like DECL_TI_ARGS, , but for an ENUMERAL_, RECORD_, or UNION_TYPE. */
1308#define TYPE_TI_ARGS(NODE) \
1309 (TI_ARGS (TYPE_TEMPLATE_INFO (NODE)))
1310
98c1c668 1311#define INNERMOST_TEMPLATE_PARMS(NODE) TREE_VALUE(NODE)
5566b478 1312
cae40af6
JM		 1313#define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE)
1314
5566b478
MS		 1315#define DECL_SAVED_TREE(NODE) DECL_MEMFUNC_POINTER_TO (NODE)
1316#define COMPOUND_STMT_NO_SCOPE(NODE) TREE_LANG_FLAG_0 (NODE)
1317#define NEW_EXPR_USE_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE)
1318#define DELETE_EXPR_USE_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE)
1319#define DELETE_EXPR_USE_VEC(NODE) TREE_LANG_FLAG_1 (NODE)
1320#define LOOKUP_EXPR_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE)
8d08fdba 1321
6757edfe
MM		 1322/* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a
1323 TEMPLATE_DECL. This macro determines whether or not a given class
1324 type is really a template type, as opposed to an instantiation or
1325 specialization of one. */
1326#define CLASSTYPE_IS_TEMPLATE(NODE) \
1327 (CLASSTYPE_TEMPLATE_INFO (NODE) \
1328 && !CLASSTYPE_USE_TEMPLATE (NODE) \
1329 && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE)))
1330
ca40b399
JM		 1331#define TYPENAME_TYPE_FULLNAME(NODE) CLASSTYPE_SIZE (NODE)
1332
cfdd0551 1333/* Nonzero in INTEGER_CST means that this int is negative by dint of
8d08fdba
MS		 1334 using a twos-complement negated operand. */
1335#define TREE_NEGATED_INT(NODE) (TREE_LANG_FLAG_0 (NODE))
1336
a0d5fba7 1337#if 0 /* UNUSED */
8d08fdba
MS		 1338/* Nonzero in any kind of _EXPR or _REF node means that it is a call
1339 to a storage allocation routine. If, later, alternate storage
1340 is found to hold the object, this call can be ignored. */
1341#define TREE_CALLS_NEW(NODE) (TREE_LANG_FLAG_1 (NODE))
a0d5fba7 1342#endif
8d08fdba
MS		 1343
1344/* Nonzero in any kind of _TYPE that uses multiple inheritance
1345 or virtual baseclasses. */
1346#define TYPE_USES_COMPLEX_INHERITANCE(NODE) (TREE_LANG_FLAG_1 (NODE))
1347
a80e4195 1348#if 0 /* UNUSED */
8d2733ca
MS		 1349/* Nonzero in IDENTIFIER_NODE means that this name is not the name the user
1350 gave; it's a DECL_NESTED_TYPENAME. Someone may want to set this on
1351 mangled function names, too, but it isn't currently. */
1352#define TREE_MANGLED(NODE) (TREE_LANG_FLAG_0 (NODE))
a80e4195 1353#endif
8d2733ca 1354
7177d104 1355#if 0 /* UNUSED */
8d08fdba
MS		 1356/* Nonzero in IDENTIFIER_NODE means that this name is overloaded, and
1357 should be looked up in a non-standard way. */
73aad9b9 1358#define DECL_OVERLOADED(NODE) (FOO)
8926095f 1359#endif
8d08fdba
MS		 1360
1361/* Nonzero if this (non-TYPE)_DECL has its virtual attribute set.
1362 For a FUNCTION_DECL, this is when the function is a virtual function.
1363 For a VAR_DECL, this is when the variable is a virtual function table.
1364 For a FIELD_DECL, when the field is the field for the virtual function table.
1365 For an IDENTIFIER_NODE, nonzero if any function with this name
1366 has been declared virtual.
1367
1368 For a _TYPE if it uses virtual functions (or is derived from
1369 one that does). */
1370#define TYPE_VIRTUAL_P(NODE) (TREE_LANG_FLAG_2 (NODE))
1371
d2ad151f
PB		 1372extern int flag_new_for_scope;
1373
1374/* This flag is true of a local VAR_DECL if it was declared in a for
e92cc029 1375 statement, but we are no longer in the scope of the for. */
d2ad151f
PB		 1376#define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (NODE)
1377
1378/* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL
1379 if we already emitted a warning about using it. */
1380#define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (NODE)
1381
700f8a87 1382/* This _DECL represents a compiler-generated entity. */
863adfc0 1383#define SET_DECL_ARTIFICIAL(NODE) (DECL_ARTIFICIAL (NODE) = 1)
8d08fdba
MS		 1384
1385/* Record whether a typedef for type `int' was actually `signed int'. */
1386#define C_TYPEDEF_EXPLICITLY_SIGNED(exp) DECL_LANG_FLAG_1 ((exp))
1387
1388/* Nonzero if the type T promotes to itself.
1389 ANSI C states explicitly the list of types that promote;
1390 in particular, short promotes to int even if they have the same width. */
1391#define C_PROMOTING_INTEGER_TYPE_P(t) \
1392 (TREE_CODE ((t)) == INTEGER_TYPE \
1393 && (TYPE_MAIN_VARIANT (t) == char_type_node \
1394 || TYPE_MAIN_VARIANT (t) == signed_char_type_node \
1395 || TYPE_MAIN_VARIANT (t) == unsigned_char_type_node \
1396 || TYPE_MAIN_VARIANT (t) == short_integer_type_node \
1397 || TYPE_MAIN_VARIANT (t) == short_unsigned_type_node))
1398
2986ae00
MS		 1399#define INTEGRAL_CODE_P(CODE) \
1400 (CODE == INTEGER_TYPE || CODE == ENUMERAL_TYPE || CODE == BOOLEAN_TYPE)
1401#define ARITHMETIC_TYPE_P(TYPE) (INTEGRAL_TYPE_P (TYPE) || FLOAT_TYPE_P (TYPE))
1402
8d08fdba
MS		 1403/* Mark which labels are explicitly declared.
1404 These may be shadowed, and may be referenced from nested functions. */
1405#define C_DECLARED_LABEL_FLAG(label) TREE_LANG_FLAG_1 (label)
1406
8d08fdba
MS		 1407/* Nonzero for _TYPE means that the _TYPE defines
1408 at least one constructor. */
1409#define TYPE_HAS_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1(NODE))
1410
1411/* When appearing in an INDIRECT_REF, it means that the tree structure
1412 underneath is actually a call to a constructor. This is needed
1413 when the constructor must initialize local storage (which can
1414 be automatically destroyed), rather than allowing it to allocate
1415 space from the heap.
1416
1417 When appearing in a SAVE_EXPR, it means that underneath
1418 is a call to a constructor.
1419
1420 When appearing in a CONSTRUCTOR, it means that it was
1421 a GNU C constructor expression.
1422
1423 When appearing in a FIELD_DECL, it means that this field
1424 has been duly initialized in its constructor. */
1425#define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4(NODE))
1426
a3203465
MS		 1427#define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \
1428 && CONSTRUCTOR_ELTS (NODE) == NULL_TREE)
1429
eb66be0e 1430#if 0
8d08fdba
MS		 1431/* Indicates that a NON_LVALUE_EXPR came from a C++ reference.
1432 Used to generate more helpful error message in case somebody
1433 tries to take its address. */
1434#define TREE_REFERENCE_EXPR(NODE) (TREE_LANG_FLAG_3(NODE))
eb66be0e 1435#endif
8d08fdba
MS		 1436
1437/* Nonzero for _TYPE means that the _TYPE defines a destructor. */
1438#define TYPE_HAS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_2(NODE))
1439
f55c7d88 1440#if 0
8d08fdba
MS		 1441/* Nonzero for _TYPE node means that creating an object of this type
1442 will involve a call to a constructor. This can apply to objects
1443 of ARRAY_TYPE if the type of the elements needs a constructor. */
cfdd0551 1444#define TYPE_NEEDS_CONSTRUCTING(NODE) ... defined in ../tree.h ...
f55c7d88 1445#endif
8d08fdba 1446
f30432d7
MS		 1447/* Nonzero means that an object of this type can not be initialized using
1448 an initializer list. */
1449#define CLASSTYPE_NON_AGGREGATE(NODE) \
1450 (TYPE_LANG_SPECIFIC (NODE)->type_flags.non_aggregate)
1451#define TYPE_NON_AGGREGATE_CLASS(NODE) \
1452 (IS_AGGR_TYPE (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
1453
8d08fdba
MS		 1454/* Nonzero if there is a user-defined X::op=(x&) for this class. */
1455#define TYPE_HAS_REAL_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_real_assign_ref)
1456#define TYPE_HAS_COMPLEX_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_complex_assign_ref)
f0e01782 1457#define TYPE_HAS_ABSTRACT_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_abstract_assign_ref)
8d08fdba
MS		 1458#define TYPE_HAS_COMPLEX_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_complex_init_ref)
1459
1460/* Nonzero for _TYPE node means that destroying an object of this type
1461 will involve a call to a destructor. This can apply to objects
1462 of ARRAY_TYPE is the type of the elements needs a destructor. */
1463#define TYPE_NEEDS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_4(NODE))
1464
e8abc66f
MS		 1465/* Nonzero for class type means that initialization of this type can use
1466 a bitwise copy. */
1467#define TYPE_HAS_TRIVIAL_INIT_REF(NODE) \
1468 (TYPE_HAS_INIT_REF (NODE) && ! TYPE_HAS_COMPLEX_INIT_REF (NODE))
1469
1470/* Nonzero for class type means that assignment of this type can use
1471 a bitwise copy. */
1472#define TYPE_HAS_TRIVIAL_ASSIGN_REF(NODE) \
1473 (TYPE_HAS_ASSIGN_REF (NODE) && ! TYPE_HAS_COMPLEX_ASSIGN_REF (NODE))
1474
c11b6f21
MS		 1475#define TYPE_PTRMEM_P(NODE) \
1476 (TREE_CODE (NODE) == POINTER_TYPE \
1477 && TREE_CODE (TREE_TYPE (NODE)) == OFFSET_TYPE)
1478#define TYPE_PTR_P(NODE) \
1479 (TREE_CODE (NODE) == POINTER_TYPE \
1480 && TREE_CODE (TREE_TYPE (NODE)) != OFFSET_TYPE)
1481#define TYPE_PTROB_P(NODE) \
1482 (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE \
1483 && TREE_CODE (TREE_TYPE (NODE)) != VOID_TYPE)
1484#define TYPE_PTROBV_P(NODE) \
1485 (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE)
1486#define TYPE_PTRFN_P(NODE) \
1487 (TREE_CODE (NODE) == POINTER_TYPE \
1488 && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
1489
8d08fdba 1490/* Nonzero for _TYPE node means that this type is a pointer to member
e92cc029 1491 function type. */
8d08fdba
MS		 1492#define TYPE_PTRMEMFUNC_P(NODE) (TREE_CODE(NODE) == RECORD_TYPE && TYPE_LANG_SPECIFIC(NODE)->type_flags.ptrmemfunc_flag)
1493#define TYPE_PTRMEMFUNC_FLAG(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.ptrmemfunc_flag)
1494/* Get the POINTER_TYPE to the METHOD_TYPE associated with this
1495 pointer to member function. TYPE_PTRMEMFUNC_P _must_ be true,
e92cc029 1496 before using this macro. */
8d08fdba 1497#define TYPE_PTRMEMFUNC_FN_TYPE(NODE) (TREE_TYPE (TYPE_FIELDS (TREE_TYPE (TREE_CHAIN (TREE_CHAIN (TYPE_FIELDS (NODE)))))))
ceab47eb
MM		 1498
1499/* Returns `A' for a type like `int (A::*)(double)' */
1500#define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \
1501 TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE)))
1502
38e01259 1503/* These are use to manipulate the canonical RECORD_TYPE from the
e92cc029 1504 hashed POINTER_TYPE, and can only be used on the POINTER_TYPE. */
8d08fdba
MS		 1505#define TYPE_GET_PTRMEMFUNC_TYPE(NODE) ((tree)TYPE_LANG_SPECIFIC(NODE))
1506#define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE) (TYPE_LANG_SPECIFIC(NODE) = ((struct lang_type *)(void*)(VALUE)))
e92cc029 1507/* These are to get the delta2 and pfn fields from a TYPE_PTRMEMFUNC_P. */
4dabb379
MS		 1508#define DELTA2_FROM_PTRMEMFUNC(NODE) (build_component_ref (build_component_ref ((NODE), pfn_or_delta2_identifier, NULL_TREE, 0), delta2_identifier, NULL_TREE, 0))
1509#define PFN_FROM_PTRMEMFUNC(NODE) (build_component_ref (build_component_ref ((NODE), pfn_or_delta2_identifier, NULL_TREE, 0), pfn_identifier, NULL_TREE, 0))
8d08fdba 1510
faae18ab 1511/* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
8926095f 1512 specified in its declaration. */
8d08fdba
MS		 1513#define DECL_THIS_EXTERN(NODE) (DECL_LANG_FLAG_2(NODE))
1514
faae18ab
MS		 1515/* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
1516 specified in its declaration. */
1517#define DECL_THIS_STATIC(NODE) (DECL_LANG_FLAG_6(NODE))
1518
8d08fdba
MS		 1519/* Nonzero for SAVE_EXPR if used to initialize a PARM_DECL. */
1520#define PARM_DECL_EXPR(NODE) (TREE_LANG_FLAG_2(NODE))
1521
1522/* Nonzero in FUNCTION_DECL means it is really an operator.
1523 Just used to communicate formatting information to dbxout.c. */
1524#define DECL_OPERATOR(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.operator_attr)
1525
1526#define ANON_UNION_P(NODE) (DECL_NAME (NODE) == 0)
1527
67ffc812
MM		 1528/* Nonzero if TYPE is an anonymous union type. */
1529#define ANON_UNION_TYPE_P(TYPE) \
1530 (TREE_CODE (TYPE) == UNION_TYPE \
1531 && ANON_AGGRNAME_P (TYPE_IDENTIFIER (TYPE)))
1532
8d08fdba
MS		 1533#define UNKNOWN_TYPE LANG_TYPE
1534
1535/* Define fields and accessors for nodes representing declared names. */
1536
1537#if 0
1538/* C++: A derived class may be able to directly use the virtual
1539 function table of a base class. When it does so, it may
1540 still have a decl node used to access the virtual function
1541 table (so that variables of this type can initialize their
1542 virtual function table pointers by name). When such thievery
1543 is committed, know exactly which base class's virtual function
1544 table is the one being stolen. This effectively computes the
1545 transitive closure. */
1546#define DECL_VPARENT(NODE) ((NODE)->decl.arguments)
1547#endif
1548
8d08fdba
MS		 1549#define TYPE_WAS_ANONYMOUS(NODE) (TYPE_LANG_SPECIFIC (NODE)->type_flags.was_anonymous)
1550
1551/* C++: all of these are overloaded! These apply only to TYPE_DECLs. */
f84b4be9
JM		 1552
1553/* The format of each node in the DECL_FRIENDLIST is as follows:
1554
1555 The TREE_PURPOSE will be the name of a function, i.e., an
1556 IDENTIFIER_NODE. The TREE_VALUE will be itself a TREE_LIST, the
1557 list of functions with that name which are friends. The
1558 TREE_PURPOSE of each node in this sublist will be error_mark_node,
1559 if the function was declared a friend individually, in which case
1560 the TREE_VALUE will be the function_decl. If, however, all
1561 functions with a given name in a class were declared to be friends,
1562 the TREE_PUROSE will be the class type, and the TREE_VALUE will be
1563 NULL_TREE. */
8d08fdba 1564#define DECL_FRIENDLIST(NODE) (DECL_INITIAL (NODE))
8d08fdba
MS		 1565
1566/* The DECL_ACCESS is used to record under which context
1567 special access rules apply. */
1568#define DECL_ACCESS(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.access)
1569
1570/* C++: all of these are overloaded!
1571 These apply to PARM_DECLs and VAR_DECLs. */
1572#define DECL_REFERENCE_SLOT(NODE) ((tree)(NODE)->decl.arguments)
1573#define SET_DECL_REFERENCE_SLOT(NODE,VAL) ((NODE)->decl.arguments=VAL)
1574
8d08fdba 1575/* Accessor macros for C++ template decl nodes. */
f84b4be9
JM		 1576
1577/* The DECL_TEMPLATE_PARMS are a list. The TREE_PURPOSE of each node
36a117a5
MM		 1578 is a INT_CST whose TREE_INT_CST_HIGH indicates the level of the
1579 template parameters, with 1 being the outermost set of template
1580 parameters. The TREE_VALUE is a vector, whose elements are the
1581 template parameters at each level. Each element in the vector is a
1582 TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a
1583 non-type parameter), or a TYPE_DECL (if the parameter is a type
1584 parameter). The TREE_PURPOSE is the default value, if any. The
1585 TEMPLATE_PARM_INDEX for the parameter is avilable as the
1586 DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a
1587 TYPE_DECL). */
8d08fdba 1588#define DECL_TEMPLATE_PARMS(NODE) DECL_ARGUMENTS(NODE)
98c1c668
JM		 1589#define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
1590 INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
1591#define DECL_NTPARMS(NODE) \
1592 TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
8d08fdba
MS		 1593/* For function, method, class-data templates. */
1594#define DECL_TEMPLATE_RESULT(NODE) DECL_RESULT(NODE)
36a117a5
MM		 1595/* For a static member variable template, the
1596 DECL_TEMPLATE_INSTANTIATIONS list contains the explicitly and
1597 implicitly generated instantiations of the variable. There are no
1598 partial instantiations of static member variables, so all of these
1599 will be full instantiations.
1600
1601 For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds
1602 all instantiations and specializations of the class type, including
1603 partial instantiations and partial specializations.
1604
1605 In both cases, the TREE_PURPOSE of each node contains the arguments
1606 used; the TREE_VALUE contains the generated variable. The template
1607 arguments are always complete. For example, given:
1608
1609 template <class T> struct S1 {
1610 template <class U> struct S2 {};
1611 template <class U> struct S2<U*> {};
1612 };
1613
1614 the record for the partial specialization will contain, as its
1615 argument list, { {T}, {U*} }, and will be on the
1616 DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template
1617 <class U> struct S1<T>::S2'.
1618
1619 This list is not used for function templates. */
8d08fdba 1620#define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX(NODE)
36a117a5
MM		 1621/* For a function template, the DECL_TEMPLATE_SPECIALIZATIONS lists
1622 contains all instantiations and specializations of the function,
1623 including partial instantiations. For a partial instantiation
1624 which is a specialization, this list holds only full
1625 specializations of the template that are instantiations of the
1626 partial instantiation. For example, given:
1627
1628 template <class T> struct S {
1629 template <class U> void f(U);
1630 template <> void f(T);
1631 };
1632
1633 the `S<int>::f<int>(int)' function will appear on the
1634 DECL_TEMPLATE_SPECIALIZATIONS list for both `template <class T>
1635 template <class U> void S<T>::f(U)' and `template <class T> void
1636 S<int>::f(T)'. In the latter case, however, it will have only the
1637 innermost set of arguments (T, in this case). The DECL_TI_TEMPLATE
1638 for the function declaration will point at the specialization, not
1639 the fully general template.
1640
1641 For a class template, this list contains the partial
1642 specializations of this template. (Full specializations are not
1643 recorded on this list.) The TREE_PURPOSE holds the innermost
1644 arguments used in the partial specialization (e.g., for `template
1645 <class T> struct S<T*, int>' this will be `T*'.) The TREE_VALUE
1646 holds the innermost template parameters for the specialization
1647 (e.g., `T' in the example above.) The TREE_TYPE is the _TYPE node
1648 for the partial specialization.
1649
1650 This list is not used for static variable templates. */
1651#define DECL_TEMPLATE_SPECIALIZATIONS(NODE) DECL_SIZE(NODE)
5566b478
MS		 1652#define DECL_TEMPLATE_INJECT(NODE) DECL_INITIAL(NODE)
1653
73b0fce8
KL		 1654/* Nonzero for TEMPLATE_DECL nodes that represents template template
1655 parameters */
1656#define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \
1657 (TREE_CODE (NODE) == TEMPLATE_DECL && TREE_TYPE (NODE) \
1658 && TREE_CODE (TREE_TYPE (NODE)) == TEMPLATE_TEMPLATE_PARM)
1659
5566b478
MS		 1660#define DECL_FUNCTION_TEMPLATE_P(NODE) \
1661 (TREE_CODE (NODE) == TEMPLATE_DECL \
1662 && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
1663
6757edfe
MM		 1664/* Nonzero for a DECL that represents a template class. */
1665#define DECL_CLASS_TEMPLATE_P(NODE) \
1666 (TREE_CODE (NODE) == TEMPLATE_DECL \
1667 && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL \
1668 && !DECL_TEMPLATE_TEMPLATE_PARM_P (NODE))
1669
35acd3f2
MM		 1670/* Nonzero if NODE which declares a type. */
1671#define DECL_DECLARES_TYPE_P(NODE) \
1672 (TREE_CODE (NODE) == TYPE_DECL || DECL_CLASS_TEMPLATE_P (NODE))
1673
93cdc044
JM		 1674/* A `primary' template is one that has its own template header. A
1675 member function of a class template is a template, but not primary.
6757edfe
MM		 1676 A member template is primary. Friend templates are primary, too. */
1677
1678/* Returns the primary template corresponding to these parameters. */
1679#define DECL_PRIMARY_TEMPLATE(NODE) \
1680 (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)))
1681
1682/* Returns non-zero if NODE is a primary template. */
1683#define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == NODE)
5566b478
MS		 1684
1685#define CLASSTYPE_TEMPLATE_LEVEL(NODE) \
1686 (TREE_INT_CST_HIGH (TREE_PURPOSE (CLASSTYPE_TI_TEMPLATE (NODE))))
8d08fdba 1687
a0a33927
MS		 1688/* Indicates whether or not (and how) a template was expanded for this
1689 FUNCTION_DECL or VAR_DECL.
1690 0=normal declaration, e.g. int min (int, int);
1691 1=implicit template instantiation
1692 2=explicit template specialization, e.g. int min<int> (int, int);
e92cc029 1693 3=explicit template instantiation, e.g. template int min<int> (int, int); */
a0a33927
MS		 1694#define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.use_template)
1695
1696#define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
1697#define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
1698 (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
1699
1700#define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
1701#define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
1702#define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
1703 (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
1704#define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
1705 (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
1706
1707#define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
1708#define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
1709#define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
1710 (CLASSTYPE_USE_TEMPLATE(NODE) == 1)
1711#define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
1712 (CLASSTYPE_USE_TEMPLATE(NODE) = 1)
1713
1714#define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
1715#define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
1716#define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
1717 (CLASSTYPE_USE_TEMPLATE(NODE) == 3)
1718#define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
1719 (CLASSTYPE_USE_TEMPLATE(NODE) = 3)
7177d104 1720
61289ca3
MM		 1721/* Non-zero if DECL is a friend function which is an instantiation
1722 from the point of view of the compiler, but not from the point of
1723 view of the language. For example given:
1724 template <class T> struct S { friend void f(T) {}; };
1725 the declaration of `void f(int)' generated when S<int> is
1726 instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be
1727 a DECL_FRIEND_PSUEDO_TEMPLATE_INSTANTIATION. */
1728#define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \
1729 (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL))
1730
39c01e4c
MM		 1731/* Non-zero iff we are currently processing a declaration for an
1732 entity with its own template parameter list, and which is not a
1733 full specialization. */
1734#define PROCESSING_REAL_TEMPLATE_DECL_P() \
1735 (processing_template_decl > template_class_depth (current_class_type))
1736
73aad9b9
JM		 1737/* This function may be a guiding decl for a template. */
1738#define DECL_MAYBE_TEMPLATE(NODE) DECL_LANG_FLAG_4 (NODE)
db5ae43f 1739/* We know what we're doing with this decl now. */
e3417fcd 1740#define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
db5ae43f 1741
faae18ab
MS		 1742/* This function was declared inline. This flag controls the linkage
1743 semantics of 'inline'; whether or not the function is inlined is
1744 controlled by DECL_INLINE. */
1745#define DECL_THIS_INLINE(NODE) \
1746 (DECL_LANG_SPECIFIC (NODE)->decl_flags.declared_inline)
1747
1748/* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
1749 so that assemble_external will work properly. So we have this flag to
1750 tell us whether the decl is really not external. */
1751#define DECL_NOT_REALLY_EXTERN(NODE) \
1752 (DECL_LANG_SPECIFIC (NODE)->decl_flags.not_really_extern)
db5ae43f 1753
6b5fbb55
MS		 1754#define DECL_REALLY_EXTERN(NODE) \
1755 (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE))
1756
77be6f82
JM		 1757/* Used to tell cp_finish_decl that it should approximate comdat linkage
1758 as best it can for this decl. */
1759#define DECL_COMDAT(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.comdat)
1760
39211cd5 1761#define THUNK_DELTA(DECL) ((DECL)->decl.frame_size.i)
8926095f 1762
8d08fdba
MS		 1763/* ...and for unexpanded-parameterized-type nodes. */
1764#define UPT_TEMPLATE(NODE) TREE_PURPOSE(TYPE_VALUES(NODE))
1765#define UPT_PARMS(NODE) TREE_VALUE(TYPE_VALUES(NODE))
1766
42976354 1767/* An un-parsed default argument looks like an identifier. */
2b9dc906
JM		 1768#define DEFARG_NODE_CHECK(t) TREE_CHECK(t, DEFAULT_ARG)
1769#define DEFARG_LENGTH(NODE) (DEFARG_NODE_CHECK(NODE)->identifier.length)
1770#define DEFARG_POINTER(NODE) (DEFARG_NODE_CHECK(NODE)->identifier.pointer)
42976354 1771
72b7eeff 1772#define builtin_function(NAME, TYPE, CODE, LIBNAME) \
49c249e1 1773 define_function (NAME, TYPE, CODE, (void (*) PROTO((tree)))pushdecl, LIBNAME)
72b7eeff 1774
ad321293
MM		 1775/* These macros provide convenient access to the various _STMT nodes
1776 created when parsing template declarations. */
1777#define IF_COND(NODE) TREE_OPERAND (NODE, 0)
1778#define THEN_CLAUSE(NODE) TREE_OPERAND (NODE, 1)
1779#define ELSE_CLAUSE(NODE) TREE_OPERAND (NODE, 2)
1780#define WHILE_COND(NODE) TREE_OPERAND (NODE, 0)
1781#define WHILE_BODY(NODE) TREE_OPERAND (NODE, 1)
1782#define DO_COND(NODE) TREE_OPERAND (NODE, 0)
1783#define DO_BODY(NODE) TREE_OPERAND (NODE, 1)
1784#define RETURN_EXPR(NODE) TREE_OPERAND (NODE, 0)
1785#define EXPR_STMT_EXPR(NODE) TREE_OPERAND (NODE, 0)
1786#define FOR_INIT_STMT(NODE) TREE_OPERAND (NODE, 0)
1787#define FOR_COND(NODE) TREE_OPERAND (NODE, 1)
1788#define FOR_EXPR(NODE) TREE_OPERAND (NODE, 2)
1789#define FOR_BODY(NODE) TREE_OPERAND (NODE, 3)
1790#define SWITCH_COND(NODE) TREE_OPERAND (NODE, 0)
1791#define SWITCH_BODY(NODE) TREE_OPERAND (NODE, 1)
1792#define CASE_LOW(NODE) TREE_OPERAND (NODE, 0)
1793#define CASE_HIGH(NODE) TREE_OPERAND (NODE, 1)
1794#define GOTO_DESTINATION(NODE) TREE_OPERAND (NODE, 0)
1795#define TRY_STMTS(NODE) TREE_OPERAND (NODE, 0)
1796#define TRY_HANDLERS(NODE) TREE_OPERAND (NODE, 1)
1797#define HANDLER_PARMS(NODE) TREE_OPERAND (NODE, 0)
1798#define HANDLER_BODY(NODE) TREE_OPERAND (NODE, 1)
1799#define COMPOUND_BODY(NODE) TREE_OPERAND (NODE, 0)
1800#define ASM_CV_QUAL(NODE) TREE_OPERAND (NODE, 0)
1801#define ASM_STRING(NODE) TREE_OPERAND (NODE, 1)
1802#define ASM_OUTPUTS(NODE) TREE_OPERAND (NODE, 2)
1803#define ASM_INPUTS(NODE) TREE_OPERAND (NODE, 3)
1804#define ASM_CLOBBERS(NODE) TREE_OPERAND (NODE, 4)
1805
8d08fdba
MS		 1806/* An enumeration of the kind of tags that C++ accepts. */
1807enum tag_types { record_type, class_type, union_type, enum_type,
db5ae43f 1808 signature_type };
8d08fdba
MS		 1809
1810/* Zero means prototype weakly, as in ANSI C (no args means nothing).
1811 Each language context defines how this variable should be set. */
1812extern int strict_prototype;
1813extern int strict_prototypes_lang_c, strict_prototypes_lang_cplusplus;
1814
1815/* Non-zero means that if a label exists, and no other identifier
1816 applies, use the value of the label. */
1817extern int flag_labels_ok;
1818
1819/* Non-zero means to collect statistics which might be expensive
1820 and to print them when we are done. */
1821extern int flag_detailed_statistics;
1822
1823/* Non-zero means warn in function declared in derived class has the
1824 same name as a virtual in the base class, but fails to match the
1825 type signature of any virtual function in the base class. */
1826extern int warn_overloaded_virtual;
1827
dc8263bc
JM		 1828/* Nonzero means warn about use of multicharacter literals. */
1829extern int warn_multichar;
1830
9018ce4d
BK		 1831/* Non-zero means warn if a non-templatized friend function is
1832 declared in a templatized class. This behavior is warned about with
1833 flag_guiding_decls in do_friend. */
1834extern int warn_nontemplate_friend;
1835
8d08fdba
MS		 1836/* in c-common.c */
1837extern void declare_function_name PROTO((void));
820b778a 1838extern void decl_attributes PROTO((tree, tree, tree));
8d08fdba
MS		 1839extern void init_function_format_info PROTO((void));
1840extern void record_function_format PROTO((tree, tree, int, int, int));
1841extern void check_function_format PROTO((tree, tree, tree));
1842/* Print an error message for invalid operands to arith operation CODE.
1843 NOP_EXPR is used as a special case (see truthvalue_conversion). */
1844extern void binary_op_error PROTO((enum tree_code));
f376e137 1845extern tree cp_build_type_variant PROTO((tree, int, int));
53929c47 1846extern tree canonical_type_variant PROTO((tree));
8d08fdba
MS		 1847extern void c_expand_expr_stmt PROTO((tree));
1848/* Validate the expression after `case' and apply default promotions. */
1849extern tree check_case_value PROTO((tree));
1850/* Concatenate a list of STRING_CST nodes into one STRING_CST. */
1851extern tree combine_strings PROTO((tree));
1852extern void constant_expression_warning PROTO((tree));
1853extern tree convert_and_check PROTO((tree, tree));
1854extern void overflow_warning PROTO((tree));
1855extern void unsigned_conversion_warning PROTO((tree, tree));
1856/* Read the rest of the current #-directive line. */
d4dfe7d6
DB		 1857#if USE_CPPLIB
1858extern char *get_directive_line PROTO((void));
1859#define GET_DIRECTIVE_LINE() get_directive_line ()
1860#else
da20811c 1861extern char *get_directive_line PROTO((FILE *));
d4dfe7d6
DB		 1862#define GET_DIRECTIVE_LINE() get_directive_line (finput)
1863#endif
8d08fdba
MS		 1864/* Subroutine of build_binary_op, used for comparison operations.
1865 See if the operands have both been converted from subword integer types
1866 and, if so, perhaps change them both back to their original type. */
1867extern tree shorten_compare PROTO((tree *, tree *, tree *, enum tree_code *));
1868/* Prepare expr to be an argument of a TRUTH_NOT_EXPR,
e92cc029 1869 or validate its data type for an `if' or `while' statement or ?..: exp. */
8d08fdba
MS		 1870extern tree truthvalue_conversion PROTO((tree));
1871extern tree type_for_mode PROTO((enum machine_mode, int));
1872extern tree type_for_size PROTO((unsigned, int));
501ba25a 1873extern int c_get_alias_set PROTO((tree));
8d08fdba 1874
51c184be 1875/* in decl{2}.c */
8d08fdba
MS		 1876extern tree void_list_node;
1877extern tree void_zero_node;
1878extern tree default_function_type;
1879extern tree vtable_entry_type;
1880extern tree sigtable_entry_type;
db5ae43f 1881extern tree __t_desc_type_node;
5566b478 1882#if 0
db5ae43f 1883extern tree __tp_desc_type_node;
5566b478 1884#endif
db5ae43f
MS		 1885extern tree __access_mode_type_node;
1886extern tree __bltn_desc_type_node, __user_desc_type_node;
1887extern tree __class_desc_type_node, __attr_desc_type_node;
1888extern tree __ptr_desc_type_node, __func_desc_type_node;
1889extern tree __ptmf_desc_type_node, __ptmd_desc_type_node;
1890extern tree type_info_type_node;
8d08fdba
MS		 1891extern tree class_star_type_node;
1892extern tree this_identifier;
fc378698 1893extern tree ctor_identifier, dtor_identifier;
8d08fdba
MS		 1894extern tree pfn_identifier;
1895extern tree index_identifier;
1896extern tree delta_identifier;
1897extern tree delta2_identifier;
1898extern tree pfn_or_delta2_identifier;
46b49f6c 1899extern tree tag_identifier;
4abea095 1900extern tree vt_off_identifier;
8d08fdba
MS		 1901
1902/* A node that is a list (length 1) of error_mark_nodes. */
1903extern tree error_mark_list;
1904
0776059e 1905extern tree ptr_type_node;
8d08fdba 1906extern tree class_type_node, record_type_node, union_type_node, enum_type_node;
db5ae43f 1907extern tree unknown_type_node;
8d08fdba
MS		 1908extern tree opaque_type_node, signature_type_node;
1909
700f8a87 1910/* Node for "pointer to (virtual) function".
e92cc029 1911 This may be distinct from ptr_type_node so gdb can distinguish them. */
700f8a87
MS		 1912#define vfunc_ptr_type_node \
1913 (flag_vtable_thunks ? vtable_entry_type : ptr_type_node)
1914
8d08fdba
MS		 1915/* Array type `(void *)[]' */
1916extern tree vtbl_type_node;
1917extern tree delta_type_node;
6633d636 1918extern tree std_node;
8d08fdba
MS		 1919
1920extern tree long_long_integer_type_node, long_long_unsigned_type_node;
1921/* For building calls to `delete'. */
1922extern tree integer_two_node, integer_three_node;
28ed4616 1923extern tree boolean_type_node, boolean_true_node, boolean_false_node;
8d08fdba 1924
d11ad92e
MS		 1925extern tree null_node;
1926
0c8feefe
MM		 1927extern tree anonymous_namespace_name;
1928
51c184be 1929/* in pt.c */
5566b478 1930
830bfa74
MM		 1931/* These values are used for the `STRICT' parameter to type_unfication and
1932 fn_type_unification. Their meanings are described with the
1933 documentation for fn_type_unification. */
1934
1935typedef enum unification_kind_t {
1936 DEDUCE_CALL,
1937 DEDUCE_CONV,
1938 DEDUCE_EXACT
1939} unification_kind_t;
1940
5566b478
MS		 1941extern tree current_template_parms;
1942extern HOST_WIDE_INT processing_template_decl;
75650646 1943extern tree last_tree;
8d08fdba
MS		 1944
1945/* The template currently being instantiated, and where the instantiation
1946 was triggered. */
1947struct tinst_level
1948{
5566b478 1949 tree decl;
8d08fdba
MS		 1950 int line;
1951 char *file;
1952 struct tinst_level *next;
1953};
1954
5566b478
MS		 1955extern int minimal_parse_mode;
1956
bcb80729
KG		 1957extern void maybe_print_template_context PROTO ((void));
1958
51c184be 1959/* in class.c */
8d08fdba
MS		 1960extern tree current_class_name;
1961extern tree current_class_type;
824b9a4c 1962extern tree current_class_ptr;
8d08fdba 1963extern tree previous_class_type;
824b9a4c 1964extern tree current_class_ref;
b4c4a9ec 1965extern int current_class_depth;
8d08fdba 1966
fcad5cf5
BK		 1967extern tree current_lang_name;
1968extern tree lang_name_cplusplus, lang_name_c, lang_name_java;
8d08fdba
MS		 1969
1970/* Points to the name of that function. May not be the DECL_NAME
1971 of CURRENT_FUNCTION_DECL due to overloading */
1972extern tree original_function_name;
1973
51c184be 1974/* in init.c */
8d08fdba
MS		 1975extern tree global_base_init_list;
1976extern tree current_base_init_list, current_member_init_list;
1977
8d08fdba
MS		 1978extern int current_function_just_assigned_this;
1979extern int current_function_parms_stored;
1980\f
1981/* Here's where we control how name mangling takes place. */
1982
1983#define OPERATOR_ASSIGN_FORMAT "__a%s"
1984#define OPERATOR_FORMAT "__%s"
1985#define OPERATOR_TYPENAME_FORMAT "__op"
1986#define OPERATOR_TYPENAME_P(ID_NODE) \
1987 (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \
1988 && IDENTIFIER_POINTER (ID_NODE)[1] == '_' \
1989 && IDENTIFIER_POINTER (ID_NODE)[2] == 'o' \
1990 && IDENTIFIER_POINTER (ID_NODE)[3] == 'p')
1991
1992
1993/* Cannot use '$' up front, because this confuses gdb
1994 (names beginning with '$' are gdb-local identifiers).
1995
1996 Note that all forms in which the '$' is significant are long enough
1997 for direct indexing (meaning that if we know there is a '$'
1998 at a particular location, we can index into the string at
1999 any other location that provides distinguishing characters). */
2000
2001/* Define NO_DOLLAR_IN_LABEL in your favorite tm file if your assembler
2002 doesn't allow '$' in symbol names. */
2003#ifndef NO_DOLLAR_IN_LABEL
2004
2005#define JOINER '$'
2006
2007#define VPTR_NAME "$v"
2008#define THROW_NAME "$eh_throw"
2009#define DESTRUCTOR_DECL_PREFIX "_$_"
2010#define AUTO_VTABLE_NAME "__vtbl$me__"
2011#define AUTO_TEMP_NAME "_$tmp_"
2012#define AUTO_TEMP_FORMAT "_$tmp_%d"
2013#define VTABLE_BASE "$vb"
a0a33927 2014#define VTABLE_NAME_FORMAT (flag_vtable_thunks ? "__vt_%s" : "_vt$%s")
8d08fdba
MS		 2015#define VFIELD_BASE "$vf"
2016#define VFIELD_NAME "_vptr$"
2017#define VFIELD_NAME_FORMAT "_vptr$%s"
2018#define VBASE_NAME "_vb$"
2019#define VBASE_NAME_FORMAT "_vb$%s"
2020#define STATIC_NAME_FORMAT "_%s$%s"
2021#define ANON_AGGRNAME_FORMAT "$_%d"
2022
2023#else /* NO_DOLLAR_IN_LABEL */
2024
2025#ifndef NO_DOT_IN_LABEL
2026
2027#define JOINER '.'
2028
2029#define VPTR_NAME ".v"
2030#define THROW_NAME ".eh_throw"
2031#define DESTRUCTOR_DECL_PREFIX "_._"
2032#define AUTO_VTABLE_NAME "__vtbl.me__"
2033#define AUTO_TEMP_NAME "_.tmp_"
2034#define AUTO_TEMP_FORMAT "_.tmp_%d"
2035#define VTABLE_BASE ".vb"
a0a33927 2036#define VTABLE_NAME_FORMAT (flag_vtable_thunks ? "__vt_%s" : "_vt.%s")
8d08fdba
MS		 2037#define VFIELD_BASE ".vf"
2038#define VFIELD_NAME "_vptr."
2039#define VFIELD_NAME_FORMAT "_vptr.%s"
2040#define VBASE_NAME "_vb."
2041#define VBASE_NAME_FORMAT "_vb.%s"
2042#define STATIC_NAME_FORMAT "_%s.%s"
2043
2044#define ANON_AGGRNAME_FORMAT "._%d"
2045
2046#else /* NO_DOT_IN_LABEL */
2047
2048#define VPTR_NAME "__vptr"
2049#define VPTR_NAME_P(ID_NODE) \
2050 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VPTR_NAME, sizeof (VPTR_NAME) - 1))
2051#define THROW_NAME "__eh_throw"
2052#define DESTRUCTOR_DECL_PREFIX "__destr_"
2053#define DESTRUCTOR_NAME_P(ID_NODE) \
2054 (!strncmp (IDENTIFIER_POINTER (ID_NODE), DESTRUCTOR_DECL_PREFIX, \
2055 sizeof (DESTRUCTOR_DECL_PREFIX) - 1))
2056#define IN_CHARGE_NAME "__in_chrg"
2057#define AUTO_VTABLE_NAME "__vtbl_me__"
2058#define AUTO_TEMP_NAME "__tmp_"
2059#define TEMP_NAME_P(ID_NODE) \
2060 (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \
2061 sizeof (AUTO_TEMP_NAME) - 1))
2062#define AUTO_TEMP_FORMAT "__tmp_%d"
2063#define VTABLE_BASE "__vtb"
2064#define VTABLE_NAME "__vt_"
a0a33927 2065#define VTABLE_NAME_FORMAT (flag_vtable_thunks ? "__vt_%s" : "_vt_%s")
8d08fdba
MS		 2066#define VTABLE_NAME_P(ID_NODE) \
2067 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
2068 sizeof (VTABLE_NAME) - 1))
2069#define VFIELD_BASE "__vfb"
2070#define VFIELD_NAME "__vptr_"
2071#define VFIELD_NAME_P(ID_NODE) \
2072 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
2073 sizeof (VFIELD_NAME) - 1))
2074#define VFIELD_NAME_FORMAT "_vptr_%s"
2075#define VBASE_NAME "__vb_"
2076#define VBASE_NAME_P(ID_NODE) \
2077 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VBASE_NAME, \
2078 sizeof (VBASE_NAME) - 1))
2079#define VBASE_NAME_FORMAT "__vb_%s"
2080#define STATIC_NAME_FORMAT "__static_%s_%s"
2081
2082#define ANON_AGGRNAME_PREFIX "__anon_"
2083#define ANON_AGGRNAME_P(ID_NODE) \
2084 (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \
2085 sizeof (ANON_AGGRNAME_PREFIX) - 1))
2086#define ANON_AGGRNAME_FORMAT "__anon_%d"
2087#define ANON_PARMNAME_FORMAT "__%d"
2088#define ANON_PARMNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \
2089 && IDENTIFIER_POINTER (ID_NODE)[1] == '_' \
2090 && IDENTIFIER_POINTER (ID_NODE)[2] <= '9')
2091
2092#endif /* NO_DOT_IN_LABEL */
2093#endif /* NO_DOLLAR_IN_LABEL */
2094
2095#define THIS_NAME "this"
2096#define DESTRUCTOR_NAME_FORMAT "~%s"
2097#define FILE_FUNCTION_PREFIX_LEN 9
fc378698
MS		 2098#define CTOR_NAME "__ct"
2099#define DTOR_NAME "__dt"
8d08fdba
MS		 2100
2101#define IN_CHARGE_NAME "__in_chrg"
2102
2103#define VTBL_PTR_TYPE "__vtbl_ptr_type"
2104#define VTABLE_DELTA_NAME "__delta"
2105#define VTABLE_INDEX_NAME "__index"
2106#define VTABLE_PFN_NAME "__pfn"
2107#define VTABLE_DELTA2_NAME "__delta2"
2108
2109#define SIGNATURE_FIELD_NAME "__s_"
2110#define SIGNATURE_FIELD_NAME_FORMAT "__s_%s"
2111#define SIGNATURE_OPTR_NAME "__optr"
2112#define SIGNATURE_SPTR_NAME "__sptr"
8d08fdba
MS		 2113#define SIGNATURE_POINTER_NAME "__sp_"
2114#define SIGNATURE_POINTER_NAME_FORMAT "__%s%ssp_%s"
2115#define SIGNATURE_REFERENCE_NAME "__sr_"
2116#define SIGNATURE_REFERENCE_NAME_FORMAT "__%s%ssr_%s"
2117
2118#define SIGTABLE_PTR_TYPE "__sigtbl_ptr_type"
2119#define SIGTABLE_NAME_FORMAT "__st_%s_%s"
2120#define SIGTABLE_NAME_FORMAT_LONG "__st_%s_%s_%d"
46b49f6c 2121#define SIGTABLE_TAG_NAME "__tag"
4abea095
GB		 2122#define SIGTABLE_VB_OFF_NAME "__vb_off"
2123#define SIGTABLE_VT_OFF_NAME "__vt_off"
8d08fdba
MS		 2124#define EXCEPTION_CLEANUP_NAME "exception cleanup"
2125
2126#define THIS_NAME_P(ID_NODE) (strcmp(IDENTIFIER_POINTER (ID_NODE), "this") == 0)
2127
2128#if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
2129
2130#define VPTR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
2131 && IDENTIFIER_POINTER (ID_NODE)[1] == 'v')
2132#define DESTRUCTOR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == JOINER \
2133 && IDENTIFIER_POINTER (ID_NODE)[2] == '_')
2134
2135#define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
2136 && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
2137 && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
2138
2139#define VBASE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
2140 && IDENTIFIER_POINTER (ID_NODE)[2] == 'b' \
2141 && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
2142
2143#define TEMP_NAME_P(ID_NODE) (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1))
2144#define VFIELD_NAME_P(ID_NODE) (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
2145
2146/* For anonymous aggregate types, we need some sort of name to
2147 hold on to. In practice, this should not appear, but it should
2148 not be harmful if it does. */
2149#define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
2150 && IDENTIFIER_POINTER (ID_NODE)[1] == '_')
2151#define ANON_PARMNAME_FORMAT "_%d"
2152#define ANON_PARMNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \
2153 && IDENTIFIER_POINTER (ID_NODE)[1] <= '9')
2154#endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
35680744
MM		 2155
2156/* Returns non-zero iff ID_NODE is an IDENTIFIER_NODE whose name is
2157 `main'. */
2158#define MAIN_NAME_P(ID_NODE) \
2159 (strcmp (IDENTIFIER_POINTER (ID_NODE), "main") == 0)
2160
2161/* Returns non-zero iff NODE is a declaration for the global function
2162 `main'. */
2163#define DECL_MAIN_P(NODE) \
2164 (TREE_CODE (NODE) == FUNCTION_DECL \
cb0dbb9a 2165 && DECL_CONTEXT (NODE) == NULL_TREE \
35680744
MM		 2166 && DECL_NAME (NODE) != NULL_TREE \
2167 && MAIN_NAME_P (DECL_NAME (NODE)))
2168
8d08fdba
MS		 2169\f
2170/* Define the sets of attributes that member functions and baseclasses
2171 can have. These are sensible combinations of {public,private,protected}
2172 cross {virtual,non-virtual}. */
2173
e92cc029 2174/* in class.c. */
be99da77
MS		 2175extern tree access_default_node; /* 0 */
2176extern tree access_public_node; /* 1 */
2177extern tree access_protected_node; /* 2 */
2178extern tree access_private_node; /* 3 */
2179extern tree access_default_virtual_node; /* 4 */
2180extern tree access_public_virtual_node; /* 5 */
d8b55a76
JM		 2181extern tree access_protected_virtual_node; /* 6 */
2182extern tree access_private_virtual_node; /* 7 */
8d08fdba 2183
8d08fdba
MS		 2184/* Things for handling inline functions. */
2185
2186struct pending_inline
2187{
2188 struct pending_inline *next; /* pointer to next in chain */
2189 int lineno; /* line number we got the text from */
2190 char *filename; /* name of file we were processing */
2191 tree fndecl; /* FUNCTION_DECL that brought us here */
2192 int token; /* token we were scanning */
2193 int token_value; /* value of token we were scanning (YYSTYPE) */
2194
2195 char *buf; /* pointer to character stream */
2196 int len; /* length of stream */
8d08fdba
MS		 2197 unsigned int can_free : 1; /* free this after we're done with it? */
2198 unsigned int deja_vu : 1; /* set iff we don't want to see it again. */
2199 unsigned int interface : 2; /* 0=interface 1=unknown 2=implementation */
2200};
2201
51c184be 2202/* in method.c */
8d08fdba
MS		 2203extern struct pending_inline *pending_inlines;
2204
8d08fdba
MS		 2205/* Positive values means that we cannot make optimizing assumptions about
2206 `this'. Negative values means we know `this' to be of static type. */
2207
2208extern int flag_this_is_variable;
2209
db5ae43f 2210/* Nonzero means generate 'rtti' that give run-time type information. */
8d08fdba 2211
db5ae43f 2212extern int flag_rtti;
8d08fdba 2213
a0a33927
MS		 2214/* Nonzero means do emit exported implementations of functions even if
2215 they can be inlined. */
2216
2217extern int flag_implement_inlines;
2218
8d08fdba
MS		 2219/* Nonzero means templates obey #pragma interface and implementation. */
2220
2221extern int flag_external_templates;
2222
2223/* Nonzero means templates are emitted where they are instantiated. */
2224
2225extern int flag_alt_external_templates;
2226
ddd5a7c1 2227/* Nonzero means implicit template instantiations are emitted. */
a0a33927
MS		 2228
2229extern int flag_implicit_templates;
2230
72b7eeff
MS		 2231/* Nonzero if we want to emit defined symbols with common-like linkage as
2232 weak symbols where possible, in order to conform to C++ semantics.
2233 Otherwise, emit them as local symbols. */
2234
2235extern int flag_weak;
2236
732dcb6f
JM		 2237/* Nonzero to enable experimental ABI changes. */
2238
2239extern int flag_new_abi;
2240
2c73f9f5
ML		 2241/* Nonzero to not ignore namespace std. */
2242
2243extern int flag_honor_std;
2244
5566b478
MS		 2245/* Nonzero if we're done parsing and into end-of-file activities. */
2246
2247extern int at_eof;
2248
8d08fdba
MS		 2249enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, OP_FLAG, TYPENAME_FLAG };
2250
8d08fdba
MS		 2251/* The following two can be derived from the previous one */
2252extern tree current_class_name; /* IDENTIFIER_NODE: name of current class */
2253extern tree current_class_type; /* _TYPE: the type of the current class */
2254
2255/* Some macros for char-based bitfields. */
2256#define B_SET(a,x) (a[x>>3] |= (1 << (x&7)))
2257#define B_CLR(a,x) (a[x>>3] &= ~(1 << (x&7)))
2258#define B_TST(a,x) (a[x>>3] & (1 << (x&7)))
2259
2260/* These are uses as bits in flags passed to build_method_call
2261 to control its error reporting behavior.
2262
2263 LOOKUP_PROTECT means flag access violations.
2264 LOOKUP_COMPLAIN mean complain if no suitable member function
2265 matching the arguments is found.
2266 LOOKUP_NORMAL is just a combination of these two.
8d08fdba
MS		 2267 LOOKUP_NONVIRTUAL means make a direct call to the member function found
2268 LOOKUP_GLOBAL means search through the space of overloaded functions,
2269 as well as the space of member functions.
2270 LOOKUP_HAS_IN_CHARGE means that the "in charge" variable is already
2271 in the parameter list.
6060a796 2272 LOOKUP_ONLYCONVERTING means that non-conversion constructors are not tried.
9a3b49ac
MS		 2273 DIRECT_BIND means that if a temporary is created, it should be created so
2274 that it lives as long as the current variable bindings; otherwise it
2275 only lives until the end of the complete-expression.
878cd289
MS		 2276 LOOKUP_SPECULATIVELY means return NULL_TREE if we cannot find what we are
2277 after. Note, LOOKUP_COMPLAIN is checked and error messages printed
2278 before LOOKUP_SPECULATIVELY is checked.
8d08fdba
MS		 2279 LOOKUP_NO_CONVERSION means that user-defined conversions are not
2280 permitted. Built-in conversions are permitted.
c73964b2 2281 LOOKUP_DESTRUCTOR means explicit call to destructor.
52c11ef6
JM		 2282 LOOKUP_NO_TEMP_BIND means temporaries will not be bound to references.
2283
2284 These are used in global lookup to support elaborated types and
2285 qualifiers.
2286
2287 LOOKUP_PREFER_TYPES means not to accept objects, and possibly namespaces.
2288 LOOKUP_PREFER_NAMESPACES means not to accept objects, and possibly types.
2289 LOOKUP_PREFER_BOTH means class-or-namespace-name.
2290 LOOKUP_TEMPLATES_EXPECTED means that class templates also count
2291 as types. */
8d08fdba
MS		 2292
2293#define LOOKUP_PROTECT (1)
2294#define LOOKUP_COMPLAIN (2)
2295#define LOOKUP_NORMAL (3)
4ac14744 2296/* #define LOOKUP_UNUSED (4) */
8d08fdba
MS		 2297#define LOOKUP_NONVIRTUAL (8)
2298#define LOOKUP_GLOBAL (16)
2299#define LOOKUP_HAS_IN_CHARGE (32)
2300#define LOOKUP_SPECULATIVELY (64)
db5ae43f 2301#define LOOKUP_ONLYCONVERTING (128)
9a3b49ac 2302#define DIRECT_BIND (256)
8d08fdba
MS		 2303#define LOOKUP_NO_CONVERSION (512)
2304#define LOOKUP_DESTRUCTOR (512)
c73964b2 2305#define LOOKUP_NO_TEMP_BIND (1024)
52c11ef6
JM		 2306#define LOOKUP_PREFER_TYPES (2048)
2307#define LOOKUP_PREFER_NAMESPACES (4096)
2308#define LOOKUP_PREFER_BOTH (6144)
2309#define LOOKUP_TEMPLATES_EXPECTED (8192)
2310
2311#define LOOKUP_NAMESPACES_ONLY(f) \
2312 (((f) & LOOKUP_PREFER_NAMESPACES) && !((f) & LOOKUP_PREFER_TYPES))
2313#define LOOKUP_TYPES_ONLY(f) \
2314 (!((f) & LOOKUP_PREFER_NAMESPACES) && ((f) & LOOKUP_PREFER_TYPES))
2315#define LOOKUP_QUALIFIERS_ONLY(f) ((f) & LOOKUP_PREFER_BOTH)
2316
8d08fdba 2317
a4443a08
MS		 2318/* These flags are used by the conversion code.
2319 CONV_IMPLICIT : Perform implicit conversions (standard and user-defined).
2320 CONV_STATIC : Perform the explicit conversions for static_cast.
2321 CONV_CONST : Perform the explicit conversions for const_cast.
2322 CONV_REINTERPRET: Perform the explicit conversions for reinterpret_cast.
6060a796 2323 CONV_PRIVATE : Perform upcasts to private bases.
8ccc31eb
MS		 2324 CONV_FORCE_TEMP : Require a new temporary when converting to the same
2325 aggregate type. */
a4443a08
MS		 2326
2327#define CONV_IMPLICIT 1
2328#define CONV_STATIC 2
2329#define CONV_CONST 4
2330#define CONV_REINTERPRET 8
2331#define CONV_PRIVATE 16
faf5394a 2332/* #define CONV_NONCONVERTING 32 */
8ccc31eb
MS		 2333#define CONV_FORCE_TEMP 64
2334#define CONV_STATIC_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_FORCE_TEMP)
a4443a08
MS		 2335#define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
2336 | CONV_REINTERPRET)
2337#define CONV_C_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
8ccc31eb 2338 | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
a4443a08 2339
b7484fbe
MS		 2340/* Used by build_expr_type_conversion to indicate which types are
2341 acceptable as arguments to the expression under consideration. */
2342
2343#define WANT_INT 1 /* integer types, including bool */
2344#define WANT_FLOAT 2 /* floating point types */
2345#define WANT_ENUM 4 /* enumerated types */
2346#define WANT_POINTER 8 /* pointer types */
2347#define WANT_NULL 16 /* null pointer constant */
2348
2349#define WANT_ARITH (WANT_INT | WANT_FLOAT)
2350
8d08fdba
MS		 2351#define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
2352#define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
2353
f84b4be9
JM		 2354/* These macros are used to access a TEMPLATE_PARM_INDEX. */
2355#define TEMPLATE_PARM_IDX(NODE) (((template_parm_index*) NODE)->index)
2356#define TEMPLATE_PARM_LEVEL(NODE) (((template_parm_index*) NODE)->level)
2357#define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE))
2358#define TEMPLATE_PARM_ORIG_LEVEL(NODE) (((template_parm_index*) NODE)->orig_level)
2359#define TEMPLATE_PARM_DECL(NODE) (((template_parm_index*) NODE)->decl)
2360
73b0fce8
KL		 2361/* These macros are for accessing the fields of TEMPLATE_TYPE_PARM
2362 and TEMPLATE_TEMPLATE_PARM nodes. */
f84b4be9
JM		 2363#define TEMPLATE_TYPE_PARM_INDEX(NODE) (TYPE_FIELDS (NODE))
2364#define TEMPLATE_TYPE_IDX(NODE) \
2365 (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE)))
2366#define TEMPLATE_TYPE_LEVEL(NODE) \
2367 (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
2368#define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \
2369 (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
2370#define TEMPLATE_TYPE_DECL(NODE) \
2371 (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE)))
8d08fdba 2372
51c184be 2373/* in lex.c */
8d08fdba
MS		 2374/* Indexed by TREE_CODE, these tables give C-looking names to
2375 operators represented by TREE_CODES. For example,
2376 opname_tab[(int) MINUS_EXPR] == "-". */
2377extern char **opname_tab, **assignop_tab;
2378\f
51c184be 2379/* in call.c */
63d088b7 2380extern int check_dtor_name PROTO((tree, tree));
824b9a4c 2381extern int get_arglist_len_in_bytes PROTO((tree));
8d08fdba 2382
8d08fdba 2383extern tree build_vfield_ref PROTO((tree, tree));
8d08fdba
MS		 2384extern tree resolve_scope_to_name PROTO((tree, tree));
2385extern tree build_scoped_method_call PROTO((tree, tree, tree, tree));
824b9a4c
MS		 2386extern tree build_addr_func PROTO((tree));
2387extern tree build_call PROTO((tree, tree, tree));
8d08fdba 2388extern tree build_method_call PROTO((tree, tree, tree, tree, int));
824b9a4c
MS		 2389extern int null_ptr_cst_p PROTO((tree));
2390extern tree type_decays_to PROTO((tree));
faf5394a 2391extern tree build_user_type_conversion PROTO((tree, tree, int));
9babbf20 2392extern tree build_new_function_call PROTO((tree, tree));
c73964b2 2393extern tree build_new_op PROTO((enum tree_code, int, tree, tree, tree));
da4768fe 2394extern tree build_op_new_call PROTO((enum tree_code, tree, tree, int));
519ebd1e 2395extern tree build_op_delete_call PROTO((enum tree_code, tree, tree, int, tree));
824b9a4c
MS		 2396extern int can_convert PROTO((tree, tree));
2397extern int can_convert_arg PROTO((tree, tree, tree));
38afd588 2398extern void enforce_access PROTO((tree, tree));
41efda8f
MM		 2399extern tree convert_default_arg PROTO((tree, tree));
2400extern tree convert_arg_to_ellipsis PROTO((tree));
8d08fdba 2401
51c184be 2402/* in class.c */
8d08fdba 2403extern tree build_vbase_path PROTO((enum tree_code, tree, tree, tree, int));
6b5fbb55 2404extern tree build_vtbl_ref PROTO((tree, tree));
8d08fdba
MS		 2405extern tree build_vfn_ref PROTO((tree *, tree, tree));
2406extern void add_method PROTO((tree, tree *, tree));
77dc0938 2407extern int currently_open_class PROTO((tree));
51c184be 2408extern tree get_vfield_offset PROTO((tree));
8d08fdba 2409extern void duplicate_tag_error PROTO((tree));
2ee887f2 2410extern tree finish_struct PROTO((tree, tree, tree, int));
6467930b 2411extern tree finish_struct_1 PROTO((tree, int));
8d08fdba
MS		 2412extern int resolves_to_fixed_type_p PROTO((tree, int *));
2413extern void init_class_processing PROTO((void));
77dc0938 2414extern int is_empty_class PROTO((tree));
8d08fdba
MS		 2415extern void pushclass PROTO((tree, int));
2416extern void popclass PROTO((int));
2417extern void push_nested_class PROTO((tree, int));
2418extern void pop_nested_class PROTO((int));
2419extern void push_lang_context PROTO((tree));
2420extern void pop_lang_context PROTO((void));
8d08fdba
MS		 2421extern tree instantiate_type PROTO((tree, tree, int));
2422extern void print_class_statistics PROTO((void));
2423extern void maybe_push_cache_obstack PROTO((void));
f30432d7 2424extern unsigned HOST_WIDE_INT skip_rtti_stuff PROTO((tree *));
c91a56d2 2425extern tree build_self_reference PROTO((void));
49c249e1 2426extern void warn_hidden PROTO((tree));
b54ccf71
JM		 2427extern tree get_enclosing_class PROTO((tree));
2428int is_base_of_enclosing_class PROTO((tree, tree));
8d08fdba 2429
51c184be 2430/* in cvt.c */
a4443a08 2431extern tree convert_to_reference PROTO((tree, tree, int, int, tree));
8d08fdba 2432extern tree convert_from_reference PROTO((tree));
8d08fdba 2433extern tree convert_pointer_to_real PROTO((tree, tree));
824b9a4c 2434extern tree convert_pointer_to PROTO((tree, tree));
37c46b43
MS		 2435extern tree ocp_convert PROTO((tree, tree, int, int));
2436extern tree cp_convert PROTO((tree, tree));
824b9a4c 2437extern tree convert PROTO((tree, tree));
6060a796 2438extern tree convert_force PROTO((tree, tree, int));
8d08fdba 2439extern tree build_type_conversion PROTO((enum tree_code, tree, tree, int));
b7484fbe 2440extern tree build_expr_type_conversion PROTO((int, tree, int));
39211cd5 2441extern tree type_promotes_to PROTO((tree));
75650646 2442extern tree perform_qualification_conversions PROTO((tree, tree));
8d08fdba 2443
51c184be 2444/* decl.c */
824b9a4c 2445/* resume_binding_level */
69789cfc 2446extern void set_identifier_local_value PROTO((tree, tree));
8d08fdba 2447extern int global_bindings_p PROTO((void));
a9aedbc2 2448extern int toplevel_bindings_p PROTO((void));
8d08fdba
MS		 2449extern void keep_next_level PROTO((void));
2450extern int kept_level_p PROTO((void));
2451extern void declare_parm_level PROTO((void));
8d08fdba
MS		 2452extern void declare_pseudo_global_level PROTO((void));
2453extern int pseudo_global_level_p PROTO((void));
824b9a4c 2454extern void set_class_shadows PROTO((tree));
8d08fdba 2455extern void pushlevel PROTO((int));
824b9a4c 2456extern void note_level_for_for PROTO((void));
8d08fdba
MS		 2457extern void pushlevel_temporary PROTO((int));
2458extern tree poplevel PROTO((int, int, int));
49c249e1 2459extern void resume_level PROTO((struct binding_level *));
8d08fdba
MS		 2460extern void delete_block PROTO((tree));
2461extern void insert_block PROTO((tree));
2462extern void add_block_current_level PROTO((tree));
2463extern void set_block PROTO((tree));
2464extern void pushlevel_class PROTO((void));
700f8a87 2465extern tree poplevel_class PROTO((int));
8d08fdba 2466extern void print_binding_stack PROTO((void));
49c249e1 2467extern void print_binding_level PROTO((struct binding_level *));
824b9a4c
MS		 2468extern void push_namespace PROTO((tree));
2469extern void pop_namespace PROTO((void));
2470extern void maybe_push_to_top_level PROTO((int));
8d08fdba
MS		 2471extern void push_to_top_level PROTO((void));
2472extern void pop_from_top_level PROTO((void));
2c73f9f5 2473extern tree identifier_type_value PROTO((tree));
8d08fdba 2474extern void set_identifier_type_value PROTO((tree, tree));
c6160f8f 2475extern void set_identifier_local_value PROTO((tree, tree));
8926095f 2476extern void pop_everything PROTO((void));
8d08fdba
MS		 2477extern void pushtag PROTO((tree, tree, int));
2478extern tree make_anon_name PROTO((void));
2479extern void clear_anon_tags PROTO((void));
824b9a4c
MS		 2480extern int decls_match PROTO((tree, tree));
2481extern int duplicate_decls PROTO((tree, tree));
8d08fdba
MS		 2482extern tree pushdecl PROTO((tree));
2483extern tree pushdecl_top_level PROTO((tree));
8d08fdba 2484extern tree pushdecl_class_level PROTO((tree));
bd6dd845 2485#if 0
5566b478 2486extern void pushdecl_nonclass_level PROTO((tree));
bd6dd845 2487#endif
2c73f9f5
ML		 2488extern tree pushdecl_namespace_level PROTO((tree));
2489extern tree push_using_decl PROTO((tree, tree));
9ed182dc 2490extern tree push_using_directive PROTO((tree));
824b9a4c 2491extern void push_class_level_binding PROTO((tree, tree));
ea9635c7 2492extern tree push_using_decl PROTO((tree, tree));
8d08fdba
MS		 2493extern tree implicitly_declare PROTO((tree));
2494extern tree lookup_label PROTO((tree));
2495extern tree shadow_label PROTO((tree));
2496extern tree define_label PROTO((char *, int, tree));
824b9a4c
MS		 2497extern void push_switch PROTO((void));
2498extern void pop_switch PROTO((void));
8d08fdba
MS		 2499extern void define_case_label PROTO((tree));
2500extern tree getdecls PROTO((void));
2501extern tree gettags PROTO((void));
bd6dd845 2502#if 0
8d08fdba 2503extern void set_current_level_tags_transparency PROTO((int));
bd6dd845 2504#endif
30394414 2505extern tree binding_for_name PROTO((tree, tree));
2c73f9f5
ML		 2506extern tree namespace_binding PROTO((tree, tree));
2507extern void set_namespace_binding PROTO((tree, tree, tree));
a9aedbc2 2508extern tree lookup_namespace_name PROTO((tree, tree));
824b9a4c
MS		 2509extern tree make_typename_type PROTO((tree, tree));
2510extern tree lookup_name_nonclass PROTO((tree));
2c73f9f5 2511extern tree lookup_function_nonclass PROTO((tree, tree));
824b9a4c 2512extern tree lookup_name PROTO((tree, int));
8d08fdba 2513extern tree lookup_name_current_level PROTO((tree));
9ed182dc 2514extern tree lookup_type_current_level PROTO((tree));
3e3f722c
ML		 2515extern tree lookup_name_namespace_only PROTO((tree));
2516extern void begin_only_namespace_names PROTO((void));
2517extern void end_only_namespace_names PROTO((void));
9ed182dc 2518extern tree namespace_ancestor PROTO((tree, tree));
52c11ef6
JM		 2519extern int lookup_using_namespace PROTO((tree,tree,tree,tree,int));
2520extern int qualified_lookup_using_namespace PROTO((tree,tree,tree,int));
824b9a4c 2521extern tree auto_function PROTO((tree, tree, enum built_in_function));
8d08fdba 2522extern void init_decl_processing PROTO((void));
5566b478 2523extern int init_type_desc PROTO((void));
49c249e1
JM		 2524extern tree define_function
2525 PROTO((char *, tree, enum built_in_function,
2526 void (*) (tree), char *));
8d08fdba 2527extern void shadow_tag PROTO((tree));
8d08fdba 2528extern tree groktypename PROTO((tree));
fcad5cf5 2529extern tree start_decl PROTO((tree, tree, int, tree, tree));
824b9a4c 2530extern void start_decl_1 PROTO((tree));
b3417a04 2531extern void cp_finish_decl PROTO((tree, tree, tree, int, int));
824b9a4c 2532extern void finish_decl PROTO((tree, tree, tree));
8d08fdba
MS		 2533extern void expand_static_init PROTO((tree, tree));
2534extern int complete_array_type PROTO((tree, tree, int));
2535extern tree build_ptrmemfunc_type PROTO((tree));
f30432d7 2536/* the grokdeclarator prototype is in decl.h */
8926095f 2537extern int parmlist_is_exprlist PROTO((tree));
824b9a4c
MS		 2538extern int copy_args_p PROTO((tree));
2539extern int grok_ctor_properties PROTO((tree, tree));
2540extern void grok_op_properties PROTO((tree, int, int));
ca107ded 2541extern tree xref_tag PROTO((tree, tree, int));
fc378698 2542extern tree xref_tag_from_type PROTO((tree, tree, int));
8ccc31eb 2543extern void xref_basetypes PROTO((tree, tree, tree, tree));
8d08fdba 2544extern tree start_enum PROTO((tree));
dbfe2124 2545extern tree finish_enum PROTO((tree));
079e1098 2546extern tree build_enumerator PROTO((tree, tree, tree));
86052cc3 2547extern tree grok_enum_decls PROTO((tree));
c11b6f21 2548extern int start_function PROTO((tree, tree, tree, int));
f30432d7 2549extern void expand_start_early_try_stmts PROTO((void));
824b9a4c 2550extern void store_parm_decls PROTO((void));
8d08fdba 2551extern void store_return_init PROTO((tree, tree));
db5ae43f 2552extern void finish_function PROTO((int, int, int));
c11b6f21 2553extern tree start_method PROTO((tree, tree));
8d08fdba
MS		 2554extern tree finish_method PROTO((tree));
2555extern void hack_incomplete_structures PROTO((tree));
c73964b2 2556extern tree maybe_build_cleanup_and_delete PROTO((tree));
824b9a4c 2557extern tree maybe_build_cleanup PROTO((tree));
8d08fdba
MS		 2558extern void cplus_expand_expr_stmt PROTO((tree));
2559extern void finish_stmt PROTO((void));
5566b478
MS		 2560extern int id_in_current_class PROTO((tree));
2561extern void push_cp_function_context PROTO((tree));
2562extern void pop_cp_function_context PROTO((tree));
824b9a4c 2563extern int in_function_p PROTO((void));
49c249e1
JM		 2564extern void replace_defarg PROTO((tree, tree));
2565extern void print_other_binding_stack PROTO((struct binding_level *));
8857f91e 2566extern void revert_static_member_fn PROTO((tree*, tree*, tree*));
2c73f9f5 2567extern void cat_namespace_levels PROTO((void));
8d08fdba 2568
51c184be 2569/* in decl2.c */
264a8100 2570extern int check_java_method PROTO((tree, tree));
297441fd 2571extern int lang_decode_option PROTO((int, char **));
8d08fdba 2572extern tree grok_method_quals PROTO((tree, tree, tree));
824b9a4c
MS		 2573extern void warn_if_unknown_interface PROTO((tree));
2574extern tree grok_x_components PROTO((tree, tree));
711734a9 2575extern void maybe_retrofit_in_chrg PROTO((tree));
bcb80729 2576extern void maybe_make_one_only PROTO((tree));
8d08fdba
MS		 2577extern void grokclassfn PROTO((tree, tree, tree, enum overload_flags, tree));
2578extern tree grok_alignof PROTO((tree));
2579extern tree grok_array_decl PROTO((tree, tree));
2580extern tree delete_sanity PROTO((tree, tree, int, int));
5566b478 2581extern tree check_classfn PROTO((tree, tree));
98c1c668 2582extern void check_member_template PROTO((tree));
c11b6f21 2583extern tree grokfield PROTO((tree, tree, tree, tree, tree));
8d08fdba
MS		 2584extern tree grokbitfield PROTO((tree, tree, tree));
2585extern tree groktypefield PROTO((tree, tree));
51c184be 2586extern tree grokoptypename PROTO((tree, tree));
5566b478 2587extern int copy_assignment_arg_p PROTO((tree, int));
f6abb50a 2588extern void cplus_decl_attributes PROTO((tree, tree, tree));
8d08fdba
MS		 2589extern tree constructor_name_full PROTO((tree));
2590extern tree constructor_name PROTO((tree));
2591extern void setup_vtbl_ptr PROTO((void));
2592extern void mark_inline_for_output PROTO((tree));
2593extern void clear_temp_name PROTO((void));
2594extern tree get_temp_name PROTO((tree, int));
2595extern tree get_temp_regvar PROTO((tree, tree));
2596extern void finish_anon_union PROTO((tree));
2597extern tree finish_table PROTO((tree, tree, tree, int));
2598extern void finish_builtin_type PROTO((tree, char *, tree *, int, tree));
2599extern tree coerce_new_type PROTO((tree));
2600extern tree coerce_delete_type PROTO((tree));
824b9a4c 2601extern void comdat_linkage PROTO((tree));
7e776093 2602extern void import_export_class PROTO((tree));
5566b478 2603extern void import_export_vtable PROTO((tree, tree, int));
c73964b2 2604extern int finish_prevtable_vardecl PROTO((tree, tree));
49c249e1
JM		 2605extern int walk_vtables PROTO((void (*)(tree, tree),
2606 int (*)(tree, tree)));
2607extern void walk_sigtables PROTO((void (*)(tree, tree),
2608 void (*)(tree, tree)));
824b9a4c
MS		 2609extern void import_export_decl PROTO((tree));
2610extern tree build_cleanup PROTO((tree));
8d08fdba 2611extern void finish_file PROTO((void));
51c184be
MS		 2612extern tree reparse_absdcl_as_expr PROTO((tree, tree));
2613extern tree reparse_absdcl_as_casts PROTO((tree, tree));
5566b478 2614extern tree build_expr_from_tree PROTO((tree));
51c184be
MS		 2615extern tree reparse_decl_as_expr PROTO((tree, tree));
2616extern tree finish_decl_parsing PROTO((tree));
2986ae00 2617extern tree check_cp_case_value PROTO((tree));
2c73f9f5
ML		 2618extern void set_decl_namespace PROTO((tree, tree));
2619extern tree current_decl_namespace PROTO((void));
2620extern void push_decl_namespace PROTO((tree));
2621extern void pop_decl_namespace PROTO((void));
824b9a4c 2622extern void do_namespace_alias PROTO((tree, tree));
6b5fbb55 2623extern void do_toplevel_using_decl PROTO((tree));
ea9635c7 2624extern void do_local_using_decl PROTO((tree));
a9aedbc2 2625extern tree do_class_using_decl PROTO((tree));
824b9a4c 2626extern void do_using_directive PROTO((tree));
f30432d7 2627extern void check_default_args PROTO((tree));
5566b478 2628extern void mark_used PROTO((tree));
49c249e1 2629extern tree handle_class_head PROTO((tree, tree, tree));
2c73f9f5 2630extern tree lookup_arg_dependent PROTO((tree, tree, tree));
8d08fdba 2631
824b9a4c 2632/* in errfn.c */
8251199e
JM		 2633extern void cp_error ();
2634extern void cp_error_at ();
2635extern void cp_warning ();
2636extern void cp_warning_at ();
2637extern void cp_pedwarn ();
2638extern void cp_pedwarn_at ();
2639extern void cp_compiler_error ();
2640extern void cp_sprintf ();
824b9a4c
MS		 2641
2642/* in error.c */
2643extern void init_error PROTO((void));
2644extern char *fndecl_as_string PROTO((tree, int));
2645extern char *type_as_string PROTO((tree, int));
294471c3 2646extern char *type_as_string_real PROTO((tree, int, int));
824b9a4c
MS		 2647extern char *args_as_string PROTO((tree, int));
2648extern char *decl_as_string PROTO((tree, int));
2649extern char *expr_as_string PROTO((tree, int));
2650extern char *code_as_string PROTO((enum tree_code, int));
2651extern char *language_as_string PROTO((enum languages, int));
2652extern char *parm_as_string PROTO((int, int));
2653extern char *op_as_string PROTO((enum tree_code, int));
2654extern char *assop_as_string PROTO((enum tree_code, int));
2655extern char *cv_as_string PROTO((tree, int));
2ba25f50 2656extern char *lang_decl_name PROTO((tree, int));
49c249e1
JM		 2657extern char *cp_file_of PROTO((tree));
2658extern int cp_line_of PROTO((tree));
824b9a4c 2659
51c184be 2660/* in except.c */
8d08fdba 2661extern void init_exception_processing PROTO((void));
824b9a4c
MS		 2662extern void expand_start_catch_block PROTO((tree, tree));
2663extern void expand_end_catch_block PROTO((void));
f30432d7
MS		 2664extern void expand_builtin_throw PROTO((void));
2665extern void expand_start_eh_spec PROTO((void));
824b9a4c 2666extern void expand_exception_blocks PROTO((void));
72b7eeff 2667extern tree start_anon_func PROTO((void));
824b9a4c
MS		 2668extern void end_anon_func PROTO((void));
2669extern void expand_throw PROTO((tree));
2670extern tree build_throw PROTO((tree));
9c606f69 2671extern void mark_all_runtime_matches PROTO((void));
8d08fdba 2672
51c184be 2673/* in expr.c */
8d08fdba
MS		 2674extern void init_cplus_expand PROTO((void));
2675extern void fixup_result_decl PROTO((tree, struct rtx_def *));
824b9a4c
MS		 2676extern int extract_init PROTO((tree, tree));
2677extern void do_case PROTO((tree, tree));
8d08fdba 2678
bd6dd845
MS		 2679/* friend.c */
2680extern int is_friend PROTO((tree, tree));
2681extern void make_friend_class PROTO((tree, tree));
2682extern tree do_friend PROTO((tree, tree, tree, tree, enum overload_flags, tree, int));
2683
51c184be 2684/* in init.c */
824b9a4c
MS		 2685extern void init_init_processing PROTO((void));
2686extern void expand_direct_vtbls_init PROTO((tree, tree, int, int, tree));
8d08fdba
MS		 2687extern void emit_base_init PROTO((tree, int));
2688extern void check_base_init PROTO((tree));
8d08fdba 2689extern void expand_member_init PROTO((tree, tree, tree));
6060a796 2690extern void expand_aggr_init PROTO((tree, tree, int, int));
8d08fdba 2691extern int is_aggr_typedef PROTO((tree, int));
5566b478 2692extern int is_aggr_type PROTO((tree, int));
8d08fdba
MS		 2693extern tree get_aggr_from_typedef PROTO((tree, int));
2694extern tree get_type_value PROTO((tree));
2695extern tree build_member_call PROTO((tree, tree, tree));
2696extern tree build_offset_ref PROTO((tree, tree));
8d08fdba
MS		 2697extern tree resolve_offset_ref PROTO((tree));
2698extern tree decl_constant_value PROTO((tree));
8d08fdba 2699extern tree build_new PROTO((tree, tree, tree, int));
a0d5fba7 2700extern tree build_new_1 PROTO((tree));
8d08fdba
MS		 2701extern tree expand_vec_init PROTO((tree, tree, tree, tree, int));
2702extern tree build_x_delete PROTO((tree, tree, int, tree));
2703extern tree build_delete PROTO((tree, tree, tree, int, int));
2704extern tree build_vbase_delete PROTO((tree, tree));
5566b478 2705extern tree build_vec_delete PROTO((tree, tree, tree, tree, int));
8d08fdba 2706
51c184be 2707/* in input.c */
8d08fdba 2708
51c184be 2709/* in lex.c */
46c04501 2710extern char *file_name_nondirectory PROTO((char *));
8d08fdba
MS		 2711extern tree make_pointer_declarator PROTO((tree, tree));
2712extern tree make_reference_declarator PROTO((tree, tree));
c11b6f21
MS		 2713extern tree make_call_declarator PROTO((tree, tree, tree, tree));
2714extern void set_quals_and_spec PROTO((tree, tree, tree));
8d08fdba
MS		 2715extern char *operator_name_string PROTO((tree));
2716extern void lang_init PROTO((void));
2717extern void lang_finish PROTO((void));
2718extern void init_filename_times PROTO((void));
bd6dd845 2719#if 0
8d08fdba 2720extern void reinit_lang_specific PROTO((void));
bd6dd845 2721#endif
8d08fdba 2722extern void reinit_parse_for_function PROTO((void));
8d08fdba
MS		 2723extern void print_parse_statistics PROTO((void));
2724extern void extract_interface_info PROTO((void));
8d08fdba
MS		 2725extern void do_pending_inlines PROTO((void));
2726extern void process_next_inline PROTO((tree));
49c249e1
JM		 2727extern struct pending_input *save_pending_input PROTO((void));
2728extern void restore_pending_input PROTO((struct pending_input *));
8d08fdba
MS		 2729extern void yyungetc PROTO((int, int));
2730extern void reinit_parse_for_method PROTO((int, tree));
bd6dd845 2731extern void reinit_parse_for_block PROTO((int, struct obstack *));
f376e137 2732extern tree cons_up_default_function PROTO((tree, tree, int));
8d08fdba
MS		 2733extern void check_for_missing_semicolon PROTO((tree));
2734extern void note_got_semicolon PROTO((tree));
2735extern void note_list_got_semicolon PROTO((tree));
824b9a4c 2736extern void do_pending_lang_change PROTO((void));
8d08fdba
MS		 2737extern int identifier_type PROTO((tree));
2738extern void see_typename PROTO((void));
a759e627 2739extern tree do_identifier PROTO((tree, int, tree));
5566b478 2740extern tree do_scoped_id PROTO((tree, int));
8d08fdba
MS		 2741extern tree identifier_typedecl_value PROTO((tree));
2742extern int real_yylex PROTO((void));
824b9a4c 2743extern int is_rid PROTO((tree));
8d08fdba
MS		 2744extern tree build_lang_decl PROTO((enum tree_code, tree, tree));
2745extern tree build_lang_field_decl PROTO((enum tree_code, tree, tree));
2746extern void copy_lang_decl PROTO((tree));
2747extern tree make_lang_type PROTO((enum tree_code));
8d08fdba
MS		 2748extern void dump_time_statistics PROTO((void));
2749/* extern void compiler_error PROTO((char *, HOST_WIDE_INT, HOST_WIDE_INT)); */
8d08fdba 2750extern void yyerror PROTO((char *));
49c249e1
JM		 2751extern void clear_inline_text_obstack PROTO((void));
2752extern void maybe_snarf_defarg PROTO((void));
2753extern tree snarf_defarg PROTO((void));
2754extern void add_defarg_fn PROTO((tree));
2755extern void do_pending_defargs PROTO((void));
2756extern int identifier_type PROTO((tree));
9f617717 2757extern void yyhook PROTO((int));
8d08fdba 2758
51c184be 2759/* in method.c */
8d08fdba 2760extern void init_method PROTO((void));
8d08fdba 2761extern void do_inline_function_hair PROTO((tree, tree));
8d08fdba 2762extern char *build_overload_name PROTO((tree, int, int));
f376e137 2763extern tree build_static_name PROTO((tree, tree));
8d08fdba 2764extern tree build_decl_overload PROTO((tree, tree, int));
36a117a5
MM		 2765extern tree build_decl_overload_real PROTO((tree, tree, tree, tree,
2766 tree, int));
c1def683 2767extern void set_mangled_name_for_decl PROTO((tree));
8d08fdba 2768extern tree build_typename_overload PROTO((tree));
6b5fbb55 2769extern tree build_overload_with_type PROTO((tree, tree));
711734a9 2770extern tree build_destructor_name PROTO((tree));
8d08fdba 2771extern tree build_opfncall PROTO((enum tree_code, int, tree, tree, tree));
5566b478 2772extern tree hack_identifier PROTO((tree, tree));
6b5fbb55 2773extern tree make_thunk PROTO((tree, int));
824b9a4c 2774extern void emit_thunk PROTO((tree));
5566b478 2775extern void synthesize_method PROTO((tree));
49c249e1 2776extern tree get_id_2 PROTO((char *, tree));
8d08fdba 2777
51c184be 2778/* in pt.c */
36a117a5 2779extern tree innermost_args PROTO ((tree));
f7d98d58
JM		 2780extern tree tsubst PROTO ((tree, tree, tree));
2781extern tree tsubst_expr PROTO ((tree, tree, tree));
2782extern tree tsubst_copy PROTO ((tree, tree, tree));
5566b478 2783extern tree tsubst_chain PROTO((tree, tree));
f84b4be9
JM		 2784extern void maybe_begin_member_template_processing PROTO((tree));
2785extern void maybe_end_member_template_processing PROTO((tree));
e1467ff2 2786extern tree finish_member_template_decl PROTO((tree, tree));
8d08fdba 2787extern void begin_template_parm_list PROTO((void));
386b8a85
JM		 2788extern void begin_specialization PROTO((void));
2789extern void reset_specialization PROTO((void));
2790extern void end_specialization PROTO((void));
75650646
MM		 2791extern void begin_explicit_instantiation PROTO((void));
2792extern void end_explicit_instantiation PROTO((void));
2793extern tree determine_specialization PROTO((tree, tree, tree *, int, int));
e1467ff2 2794extern tree check_explicit_specialization PROTO((tree, tree, int, int));
8d08fdba
MS		 2795extern tree process_template_parm PROTO((tree, tree));
2796extern tree end_template_parm_list PROTO((tree));
5566b478 2797extern void end_template_decl PROTO((void));
9a3b49ac 2798extern tree current_template_args PROTO((void));
3ac3d9ea 2799extern tree push_template_decl PROTO((tree));
6757edfe
MM		 2800extern tree push_template_decl_real PROTO((tree, int));
2801extern void redeclare_class_template PROTO((tree, tree));
36a117a5 2802extern tree lookup_template_class PROTO((tree, tree, tree, tree, int));
386b8a85 2803extern tree lookup_template_function PROTO((tree, tree));
8d08fdba 2804extern int uses_template_parms PROTO((tree));
5566b478 2805extern tree instantiate_class_template PROTO((tree));
98c1c668 2806extern tree instantiate_template PROTO((tree, tree));
6b5fbb55 2807extern void overload_template_name PROTO((tree));
830bfa74
MM		 2808extern int fn_type_unification PROTO((tree, tree, tree, tree, tree, unification_kind_t, tree));
2809extern int type_unification PROTO((tree, tree, tree, tree, tree, unification_kind_t, int));
8d08fdba 2810struct tinst_level *tinst_for_decl PROTO((void));
5566b478 2811extern void mark_decl_instantiated PROTO((tree, int));
e1467ff2 2812extern int more_specialized PROTO((tree, tree, tree));
5566b478 2813extern void mark_class_instantiated PROTO((tree, int));
6633d636 2814extern void do_decl_instantiation PROTO((tree, tree, tree));
f0e01782 2815extern void do_type_instantiation PROTO((tree, tree));
5566b478 2816extern tree instantiate_decl PROTO((tree));
5566b478 2817extern tree do_poplevel PROTO((void));
e1467ff2 2818extern tree get_bindings PROTO((tree, tree, tree));
824b9a4c
MS		 2819/* CONT ... */
2820extern void add_tree PROTO((tree));
75650646
MM		 2821extern void begin_tree PROTO((void));
2822extern void end_tree PROTO((void));
824b9a4c 2823extern void add_maybe_template PROTO((tree, tree));
49c249e1 2824extern void pop_tinst_level PROTO((void));
49c249e1
JM		 2825extern int more_specialized_class PROTO((tree, tree));
2826extern void do_pushlevel PROTO((void));
98c1c668 2827extern int is_member_template PROTO((tree));
75650646 2828extern int comp_template_parms PROTO((tree, tree));
2450bb7d 2829extern int decl_template_parm_p PROTO((tree));
f84b4be9 2830extern int template_class_depth PROTO((tree));
6757edfe
MM		 2831extern int is_specialization_of PROTO((tree, tree));
2832extern int comp_template_args PROTO((tree, tree));
36a117a5 2833extern void maybe_process_partial_specialization PROTO((tree));
39c01e4c 2834extern void maybe_check_template_type PROTO((tree));
6757edfe 2835
92eca640 2836extern int processing_specialization;
75650646 2837extern int processing_explicit_instantiation;
67ffc812 2838extern int processing_template_parmlist;
824b9a4c
MS		 2839
2840/* in repo.c */
2841extern void repo_template_used PROTO((tree));
2842extern void repo_template_instantiated PROTO((tree, int));
2843extern void init_repo PROTO((char*));
2844extern void finish_repo PROTO((void));
2845
2846/* in rtti.c */
2847extern void init_rtti_processing PROTO((void));
2848extern tree get_tinfo_fn_dynamic PROTO((tree));
2849extern tree build_typeid PROTO((tree));
2850extern tree build_x_typeid PROTO((tree));
2851extern tree get_tinfo_fn PROTO((tree));
2852extern tree get_typeid PROTO((tree));
2853extern tree build_dynamic_cast PROTO((tree, tree));
2854extern void synthesize_tinfo_fn PROTO((tree));
8d08fdba 2855
51c184be 2856/* in search.c */
7dee3f36 2857extern int types_overlap_p PROTO((tree, tree));
bd6dd845 2858extern tree get_vbase PROTO((tree, tree));
8d08fdba
MS		 2859extern tree get_binfo PROTO((tree, tree, int));
2860extern int get_base_distance PROTO((tree, tree, int, tree *));
be99da77 2861extern tree compute_access PROTO((tree, tree));
8d08fdba
MS		 2862extern tree lookup_field PROTO((tree, tree, int, int));
2863extern tree lookup_nested_field PROTO((tree, int));
2864extern tree lookup_fnfields PROTO((tree, tree, int));
d23a1bb1 2865extern tree lookup_member PROTO((tree, tree, int, int));
a28e3c7f 2866extern tree lookup_nested_tag PROTO((tree, tree));
7177d104 2867extern tree get_matching_virtual PROTO((tree, tree, int));
8d08fdba
MS		 2868extern tree get_abstract_virtuals PROTO((tree));
2869extern tree get_baselinks PROTO((tree, tree, tree));
2870extern tree next_baselink PROTO((tree));
2871extern tree init_vbase_pointers PROTO((tree, tree));
9e9ff709 2872extern void expand_indirect_vtbls_init PROTO((tree, tree, tree));
8d08fdba
MS		 2873extern void clear_search_slots PROTO((tree));
2874extern tree get_vbase_types PROTO((tree));
8d08fdba 2875extern void note_debug_info_needed PROTO((tree));
45537677 2876extern void push_class_decls PROTO((tree));
49c249e1 2877extern void pop_class_decls PROTO((void));
8d08fdba 2878extern void unuse_fields PROTO((tree));
8d08fdba
MS		 2879extern void print_search_statistics PROTO((void));
2880extern void init_search_processing PROTO((void));
2881extern void reinit_search_statistics PROTO((void));
2882extern tree current_scope PROTO((void));
e1cd6e56 2883extern tree lookup_conversions PROTO((tree));
c73964b2 2884extern tree get_template_base PROTO((tree, tree));
84663f74 2885extern tree binfo_for_vtable PROTO((tree));
8d08fdba 2886
ad321293
MM		 2887/* in semantics.c */
2888extern void finish_expr_stmt PROTO((tree));
2889extern tree begin_if_stmt PROTO((void));
2890extern void finish_if_stmt_cond PROTO((tree, tree));
2891extern tree finish_then_clause PROTO((tree));
2892extern void begin_else_clause PROTO((void));
2893extern void finish_else_clause PROTO((tree));
2894extern void finish_if_stmt PROTO((void));
2895extern tree begin_while_stmt PROTO((void));
2896extern void finish_while_stmt_cond PROTO((tree, tree));
2897extern void finish_while_stmt PROTO((tree));
2898extern tree begin_do_stmt PROTO((void));
2899extern void finish_do_body PROTO((tree));
2900extern void finish_do_stmt PROTO((tree, tree));
2901extern void finish_return_stmt PROTO((tree));
2902extern tree begin_for_stmt PROTO((void));
2903extern void finish_for_init_stmt PROTO((tree));
2904extern void finish_for_cond PROTO((tree, tree));
e4959d7c 2905extern void finish_for_expr PROTO((tree, tree));
ad321293
MM		 2906extern void finish_for_stmt PROTO((tree, tree));
2907extern void finish_break_stmt PROTO((void));
2908extern void finish_continue_stmt PROTO((void));
2909extern void begin_switch_stmt PROTO((void));
2910extern tree finish_switch_cond PROTO((tree));
2911extern void finish_switch_stmt PROTO((tree, tree));
2912extern void finish_case_label PROTO((tree, tree));
2913extern void finish_goto_stmt PROTO((tree));
2914extern tree begin_try_block PROTO((void));
2915extern void finish_try_block PROTO((tree));
2916extern void finish_handler_sequence PROTO((tree));
2917extern tree begin_handler PROTO((void));
2918extern void finish_handler_parms PROTO((tree));
2919extern void finish_handler PROTO((tree));
2920extern tree begin_compound_stmt PROTO((int));
2921extern tree finish_compound_stmt PROTO((int, tree));
2922extern void finish_asm_stmt PROTO((tree, tree, tree, tree, tree));
b4c4a9ec
MM		 2923extern tree finish_parenthesized_expr PROTO((tree));
2924extern tree begin_stmt_expr PROTO((void));
2925extern tree finish_stmt_expr PROTO((tree, tree));
a759e627 2926extern tree finish_call_expr PROTO((tree, tree, int));
b4c4a9ec
MM		 2927extern tree finish_increment_expr PROTO((tree, enum tree_code));
2928extern tree finish_this_expr PROTO((void));
2929extern tree finish_object_call_expr PROTO((tree, tree, tree));
2930extern tree finish_qualified_object_call_expr PROTO((tree, tree, tree));
2931extern tree finish_pseudo_destructor_call_expr PROTO((tree, tree, tree));
75d587eb 2932extern tree finish_qualified_call_expr PROTO ((tree, tree));
b4c4a9ec 2933extern tree finish_label_address_expr PROTO((tree));
ce4a0391
MM		 2934extern tree finish_unary_op_expr PROTO((enum tree_code, tree));
2935extern tree finish_id_expr PROTO((tree));
2936extern int begin_new_placement PROTO((void));
2937extern tree finish_new_placement PROTO((tree, int));
b4c4a9ec
MM		 2938extern int begin_function_definition PROTO((tree, tree));
2939extern tree begin_constructor_declarator PROTO((tree, tree));
ce4a0391
MM		 2940extern tree finish_declarator PROTO((tree, tree, tree, tree, int));
2941extern void finish_translation_unit PROTO((void));
b4c4a9ec
MM		 2942extern tree finish_template_type_parm PROTO((tree, tree));
2943extern tree finish_template_template_parm PROTO((tree, tree));
ce4a0391
MM		 2944extern tree finish_parmlist PROTO((tree, int));
2945extern tree begin_class_definition PROTO((tree));
2946extern tree finish_class_definition PROTO((tree, tree, tree, int));
2947extern void finish_default_args PROTO((void));
2948extern void begin_inline_definitions PROTO((void));
35acd3f2 2949extern tree finish_member_class_template PROTO((tree, tree));
36a117a5
MM		 2950extern void finish_template_decl PROTO((tree));
2951extern tree finish_template_type PROTO((tree, tree, int));
648f19f6 2952extern void enter_scope_of PROTO((tree));
ea6021e8 2953extern tree finish_base_specifier PROTO((tree, tree, int));
b4c4a9ec 2954
51c184be 2955/* in sig.c */
8d08fdba
MS		 2956extern tree build_signature_pointer_type PROTO((tree, int, int));
2957extern tree build_signature_reference_type PROTO((tree, int, int));
2958extern tree build_signature_pointer_constructor PROTO((tree, tree));
c11b6f21 2959extern tree build_signature_method_call PROTO((tree, tree));
8d08fdba 2960extern tree build_optr_ref PROTO((tree));
5566b478 2961extern void append_signature_fields PROTO((tree));
8d08fdba 2962
51c184be 2963/* in spew.c */
8d08fdba 2964extern void init_spew PROTO((void));
49c249e1 2965extern int peekyylex PROTO((void));
8d08fdba
MS		 2966extern int yylex PROTO((void));
2967extern tree arbitrate_lookup PROTO((tree, tree, tree));
2968
51c184be 2969/* in tree.c */
77dc0938 2970extern int member_p PROTO((tree));
5566b478
MS		 2971extern int real_lvalue_p PROTO((tree));
2972extern tree build_min PVPROTO((enum tree_code, tree, ...));
2973extern tree build_min_nt PVPROTO((enum tree_code, ...));
2974extern tree min_tree_cons PROTO((tree, tree, tree));
8d08fdba
MS		 2975extern int lvalue_p PROTO((tree));
2976extern int lvalue_or_else PROTO((tree, char *));
5566b478 2977extern tree build_cplus_new PROTO((tree, tree));
aa36c081 2978extern tree get_target_expr PROTO((tree));
8d08fdba
MS		 2979extern tree break_out_cleanups PROTO((tree));
2980extern tree break_out_calls PROTO((tree));
2981extern tree build_cplus_method_type PROTO((tree, tree, tree));
2982extern tree build_cplus_staticfn_type PROTO((tree, tree, tree));
2983extern tree build_cplus_array_type PROTO((tree, tree));
9a71c18b
JM		 2984extern int layout_basetypes PROTO((tree, int));
2985extern tree build_vbase_pointer_fields PROTO((tree));
2986extern tree build_base_fields PROTO((tree));
8d08fdba
MS		 2987extern tree hash_tree_cons PROTO((int, int, int, tree, tree, tree));
2988extern tree hash_tree_chain PROTO((tree, tree));
2989extern tree hash_chainon PROTO((tree, tree));
2990extern tree get_decl_list PROTO((tree));
ca107ded 2991extern tree make_binfo PROTO((tree, tree, tree, tree));
8d08fdba 2992extern tree binfo_value PROTO((tree, tree));
dfbcd65a 2993extern tree reverse_path PROTO((tree));
8926095f 2994extern int count_functions PROTO((tree));
8d08fdba
MS		 2995extern int is_overloaded_fn PROTO((tree));
2996extern tree get_first_fn PROTO((tree));
2c73f9f5
ML		 2997extern tree binding_init PROTO((struct tree_binding*));
2998extern tree ovl_cons PROTO((tree, tree));
2999extern tree scratch_ovl_cons PROTO((tree, tree));
3000extern int ovl_member PROTO((tree, tree));
3001extern tree build_overload PROTO((tree, tree));
8d08fdba 3002extern tree fnaddr_from_vtable_entry PROTO((tree));
8d08fdba
MS		 3003extern tree function_arg_chain PROTO((tree));
3004extern int promotes_to_aggr_type PROTO((tree, enum tree_code));
3005extern int is_aggr_type_2 PROTO((tree, tree));
2ba25f50 3006extern char *lang_printable_name PROTO((tree, int));
f30432d7 3007extern tree build_exception_variant PROTO((tree, tree));
73b0fce8 3008extern tree copy_template_template_parm PROTO((tree));
8d08fdba
MS		 3009extern tree copy_to_permanent PROTO((tree));
3010extern void print_lang_statistics PROTO((void));
49c249e1
JM		 3011extern void __eprintf
3012 PROTO((const char *, const char *, unsigned, const char *));
8d08fdba
MS		 3013extern tree array_type_nelts_total PROTO((tree));
3014extern tree array_type_nelts_top PROTO((tree));
878cd289 3015extern tree break_out_target_exprs PROTO((tree));
5566b478 3016extern tree get_type_decl PROTO((tree));
6b5fbb55 3017extern tree vec_binfo_member PROTO((tree, tree));
e76a2646 3018extern tree hack_decl_function_context PROTO((tree));
d11ad92e
MS		 3019extern tree lvalue_type PROTO((tree));
3020extern tree error_type PROTO((tree));
49c249e1 3021extern tree make_temp_vec PROTO((int));
5ffe581d
JM		 3022extern tree build_ptr_wrapper PROTO((void *));
3023extern tree build_expr_ptr_wrapper PROTO((void *));
3024extern tree build_int_wrapper PROTO((int));
1139b3d8
JM		 3025extern tree build_srcloc PROTO((char *, int));
3026extern tree build_srcloc_here PROTO((void));
49c249e1
JM		 3027extern int varargs_function_p PROTO((tree));
3028extern int really_overloaded_fn PROTO((tree));
3029extern int cp_tree_equal PROTO((tree, tree));
3030extern int can_free PROTO((struct obstack *, tree));
3031extern tree mapcar PROTO((tree, tree (*) (tree)));
50a6dbd7 3032extern tree no_linkage_check PROTO((tree));
49c249e1 3033extern void debug_binfo PROTO((tree));
00c493f2 3034extern void push_expression_obstack PROTO((void));
e66d884e
JM		 3035#define scratchalloc expralloc
3036#define scratch_tree_cons expr_tree_cons
3037#define build_scratch_list build_expr_list
3038#define make_scratch_vec make_temp_vec
2c73f9f5 3039#define push_scratch_obstack push_expression_obstack
cabc336a
MM		 3040#define hash_tree_cons_simple(PURPOSE, VALUE, CHAIN) \
3041 hash_tree_cons (0, 0, 0, (PURPOSE), (VALUE), (CHAIN))
8d08fdba 3042
51c184be 3043/* in typeck.c */
8ccc31eb 3044extern tree condition_conversion PROTO((tree));
8d08fdba
MS		 3045extern tree target_type PROTO((tree));
3046extern tree require_complete_type PROTO((tree));
5566b478 3047extern tree complete_type PROTO((tree));
8f259df3 3048extern tree complete_type_or_else PROTO((tree));
8d08fdba
MS		 3049extern int type_unknown_p PROTO((tree));
3050extern int fntype_p PROTO((tree));
3051extern tree require_instantiated_type PROTO((tree, tree, tree));
3052extern tree commonparms PROTO((tree, tree));
f2ee215b 3053extern tree original_type PROTO((tree));
8d08fdba 3054extern tree common_type PROTO((tree, tree));
5566b478 3055extern int compexcepttypes PROTO((tree, tree));
8d08fdba
MS		 3056extern int comptypes PROTO((tree, tree, int));
3057extern int comp_target_types PROTO((tree, tree, int));
8d08fdba
MS		 3058extern int compparms PROTO((tree, tree, int));
3059extern int comp_target_types PROTO((tree, tree, int));
ceab47eb
MM		 3060extern int comp_cv_qualification PROTO((tree, tree));
3061extern int comp_cv_qual_signature PROTO((tree, tree));
a28e3c7f 3062extern int self_promoting_args_p PROTO((tree));
8d08fdba
MS		 3063extern tree unsigned_type PROTO((tree));
3064extern tree signed_type PROTO((tree));
3065extern tree signed_or_unsigned_type PROTO((int, tree));
5566b478 3066extern tree expr_sizeof PROTO((tree));
8d08fdba
MS		 3067extern tree c_sizeof PROTO((tree));
3068extern tree c_sizeof_nowarn PROTO((tree));
3069extern tree c_alignof PROTO((tree));
6b5fbb55 3070extern tree inline_conversion PROTO((tree));
f30432d7 3071extern tree decay_conversion PROTO((tree));
8d08fdba
MS		 3072extern tree default_conversion PROTO((tree));
3073extern tree build_object_ref PROTO((tree, tree, tree));
3074extern tree build_component_ref_1 PROTO((tree, tree, int));
3075extern tree build_component_ref PROTO((tree, tree, tree, int));
5156628f 3076extern tree build_x_component_ref PROTO((tree, tree, tree, int));
8d08fdba
MS		 3077extern tree build_x_indirect_ref PROTO((tree, char *));
3078extern tree build_indirect_ref PROTO((tree, char *));
8d08fdba
MS		 3079extern tree build_array_ref PROTO((tree, tree));
3080extern tree build_x_function_call PROTO((tree, tree, tree));
824b9a4c 3081extern tree get_member_function_from_ptrfunc PROTO((tree *, tree));
8d08fdba
MS		 3082extern tree build_function_call_real PROTO((tree, tree, int, int));
3083extern tree build_function_call PROTO((tree, tree));
3084extern tree build_function_call_maybe PROTO((tree, tree));
56ae6d77 3085extern tree convert_arguments PROTO((tree, tree, tree, int));
8d08fdba
MS		 3086extern tree build_x_binary_op PROTO((enum tree_code, tree, tree));
3087extern tree build_binary_op PROTO((enum tree_code, tree, tree, int));
3088extern tree build_binary_op_nodefault PROTO((enum tree_code, tree, tree, enum tree_code));
3089extern tree build_component_addr PROTO((tree, tree, char *));
3090extern tree build_x_unary_op PROTO((enum tree_code, tree));
3091extern tree build_unary_op PROTO((enum tree_code, tree, int));
3092extern tree unary_complex_lvalue PROTO((enum tree_code, tree));
3093extern int mark_addressable PROTO((tree));
3094extern tree build_x_conditional_expr PROTO((tree, tree, tree));
3095extern tree build_conditional_expr PROTO((tree, tree, tree));
3096extern tree build_x_compound_expr PROTO((tree));
3097extern tree build_compound_expr PROTO((tree));
2986ae00
MS		 3098extern tree build_static_cast PROTO((tree, tree));
3099extern tree build_reinterpret_cast PROTO((tree, tree));
3100extern tree build_const_cast PROTO((tree, tree));
faf5394a 3101extern tree build_c_cast PROTO((tree, tree));
5566b478 3102extern tree build_x_modify_expr PROTO((tree, enum tree_code, tree));
8d08fdba 3103extern tree build_modify_expr PROTO((tree, enum tree_code, tree));
8d08fdba
MS		 3104extern void warn_for_assignment PROTO((char *, char *, char *, tree, int, int));
3105extern tree convert_for_initialization PROTO((tree, tree, tree, int, char *, tree, int));
3106extern void c_expand_asm_operands PROTO((tree, tree, tree, tree, int, char *, int));
3107extern void c_expand_return PROTO((tree));
3108extern tree c_expand_start_case PROTO((tree));
bd6dd845 3109extern int comp_ptr_ttypes PROTO((tree, tree));
d2e5ee5c 3110extern int ptr_reasonably_similar PROTO((tree, tree));
8d08fdba
MS		 3111extern tree build_ptrmemfunc PROTO((tree, tree, int));
3112
51c184be 3113/* in typeck2.c */
8d08fdba
MS		 3114extern tree error_not_base_type PROTO((tree, tree));
3115extern tree binfo_or_else PROTO((tree, tree));
8d08fdba
MS		 3116extern void readonly_error PROTO((tree, char *, int));
3117extern void abstract_virtuals_error PROTO((tree, tree));
5566b478 3118extern void signature_error PROTO((tree, tree));
8d08fdba
MS		 3119extern void incomplete_type_error PROTO((tree, tree));
3120extern void my_friendly_abort PROTO((int));
3121extern void my_friendly_assert PROTO((int, int));
3122extern tree store_init_value PROTO((tree, tree));
3123extern tree digest_init PROTO((tree, tree, tree *));
3124extern tree build_scoped_ref PROTO((tree, tree));
3125extern tree build_x_arrow PROTO((tree));
3126extern tree build_m_component_ref PROTO((tree, tree));
3127extern tree build_functional_cast PROTO((tree, tree));
3128extern char *enum_name_string PROTO((tree, tree));
3129extern void report_case_error PROTO((int, tree, tree, tree));
49c249e1
JM		 3130extern void check_for_new_type PROTO((char *,flagged_type_tree));
3131extern tree initializer_constant_valid_p PROTO((tree, tree));
8d08fdba 3132
51c184be 3133/* in xref.c */
8d08fdba
MS		 3134extern void GNU_xref_begin PROTO((char *));
3135extern void GNU_xref_end PROTO((int));
3136extern void GNU_xref_file PROTO((char *));
3137extern void GNU_xref_start_scope PROTO((HOST_WIDE_INT));
5566b478 3138extern void GNU_xref_end_scope PROTO((HOST_WIDE_INT, HOST_WIDE_INT, int, int));
00595019 3139extern void GNU_xref_ref PROTO((tree, char *));
8d08fdba
MS		 3140extern void GNU_xref_decl PROTO((tree, tree));
3141extern void GNU_xref_call PROTO((tree, char *));
3142extern void GNU_xref_function PROTO((tree, tree));
3143extern void GNU_xref_assign PROTO((tree));
11b5139c 3144extern void GNU_xref_hier PROTO((tree, tree, int, int, int));
8d08fdba
MS		 3145extern void GNU_xref_member PROTO((tree, tree));
3146
3147/* -- end of C++ */
3148
3149#endif /* not _CP_TREE_H */
GNU Compiler Collection
This page took 0.905415 seconds and 5 git commands to generate.