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