]> 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
mips.md (muldi3_r4000): Broaden the output template and attribute assignments to...
[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
MS		 26
27/* Language-dependent contents of an identifier. */
28
29struct lang_identifier
30{
31 struct tree_identifier ignore;
32 tree global_value, local_value;
33 tree class_value;
34 tree class_template_info;
35 struct lang_id2 *x;
36};
37
38struct lang_id2
39{
40 tree label_value, implicit_decl;
41 tree type_desc, as_list, error_locus;
42};
43
46b02c6d
MS		 44typedef struct
45{
46 tree t;
47 int new_type_flag;
48} flagged_type_tree;
49
8d08fdba
MS		 50/* To identify to the debug emitters if it should pay attention to the
51 flag `-Wtemplate-debugging'. */
52#define HAVE_TEMPLATES 1
53
54/* Macros for access to language-specific slots in an identifier. */
55
56#define IDENTIFIER_GLOBAL_VALUE(NODE) \
57 (((struct lang_identifier *)(NODE))->global_value)
58#define IDENTIFIER_CLASS_VALUE(NODE) \
59 (((struct lang_identifier *)(NODE))->class_value)
60#define IDENTIFIER_LOCAL_VALUE(NODE) \
61 (((struct lang_identifier *)(NODE))->local_value)
62#define IDENTIFIER_TEMPLATE(NODE) \
63 (((struct lang_identifier *)(NODE))->class_template_info)
64
65#define IDENTIFIER_TYPE_VALUE(NODE) (TREE_TYPE (NODE))
66#define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = TYPE)
67#define IDENTIFIER_HAS_TYPE_VALUE(NODE) (TREE_TYPE (NODE) ? 1 : 0)
8d08fdba
MS		 68
69#define LANG_ID_FIELD(NAME,NODE) \
70 (((struct lang_identifier *)(NODE))->x \
71 ? ((struct lang_identifier *)(NODE))->x->NAME : 0)
72#define SET_LANG_ID(NODE,VALUE,NAME) \
73 (((struct lang_identifier *)(NODE))->x == 0 \
74 ? ((struct lang_identifier *)(NODE))->x \
75 = (struct lang_id2 *)perm_calloc (1, sizeof (struct lang_id2)) : 0, \
76 ((struct lang_identifier *)(NODE))->x->NAME = (VALUE))
77
78#define IDENTIFIER_LABEL_VALUE(NODE) LANG_ID_FIELD(label_value, NODE)
79#define SET_IDENTIFIER_LABEL_VALUE(NODE,VALUE) \
80 SET_LANG_ID(NODE, VALUE, label_value)
81
82#define IDENTIFIER_IMPLICIT_DECL(NODE) LANG_ID_FIELD(implicit_decl, NODE)
83#define SET_IDENTIFIER_IMPLICIT_DECL(NODE,VALUE) \
84 SET_LANG_ID(NODE, VALUE, implicit_decl)
85
86#define IDENTIFIER_AS_DESC(NODE) LANG_ID_FIELD(type_desc, NODE)
87#define SET_IDENTIFIER_AS_DESC(NODE,DESC) \
88 SET_LANG_ID(NODE, DESC, type_desc)
89
90#define IDENTIFIER_AS_LIST(NODE) LANG_ID_FIELD(as_list, NODE)
91#define SET_IDENTIFIER_AS_LIST(NODE,LIST) \
92 SET_LANG_ID(NODE, LIST, as_list)
93
94#define IDENTIFIER_ERROR_LOCUS(NODE) LANG_ID_FIELD(error_locus, NODE)
95#define SET_IDENTIFIER_ERROR_LOCUS(NODE,VALUE) \
96 SET_LANG_ID(NODE, VALUE, error_locus)
97
98
99#define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1(NODE)
100
101/* Nonzero if this identifier is the prefix for a mangled C++ operator name. */
102#define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2(NODE)
103
104#define IDENTIFIER_TYPENAME_P(NODE) \
105 (! strncmp (IDENTIFIER_POINTER (NODE), \
106 IDENTIFIER_POINTER (ansi_opname[(int) TYPE_EXPR]), \
107 IDENTIFIER_LENGTH (ansi_opname[(int) TYPE_EXPR])))
108
109/* Nonzero means reject anything that ANSI standard C forbids. */
110extern int pedantic;
111
112/* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only. */
113#define C_TYPE_FIELDS_READONLY(type) TYPE_LANG_FLAG_0 (type)
e1cd6e56
MS		 114
115/* Record in each node resulting from a binary operator
116 what operator was specified for it. */
117#define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
118
119/* Store a value in that field. */
120#define C_SET_EXP_ORIGINAL_CODE(exp, code) \
121 (TREE_COMPLEXITY (exp) = (int)(code))
8d08fdba
MS		 122\f
123/* If non-zero, a VAR_DECL whose cleanup will cause a throw to the
124 next exception handler. */
125extern tree exception_throw_decl;
126
127extern tree double_type_node, long_double_type_node, float_type_node;
128extern tree char_type_node, unsigned_char_type_node, signed_char_type_node;
129extern tree ptrdiff_type_node;
130
131extern tree short_integer_type_node, short_unsigned_type_node;
132extern tree long_integer_type_node, long_unsigned_type_node;
133extern tree long_long_integer_type_node, long_long_unsigned_type_node;
134extern tree unsigned_type_node;
135extern tree string_type_node, char_array_type_node, int_array_type_node;
136extern tree wchar_array_type_node;
137extern tree wchar_type_node, signed_wchar_type_node, unsigned_wchar_type_node;
37c46b43
MS		 138
139extern tree complex_integer_type_node;
140extern tree complex_float_type_node;
141extern tree complex_double_type_node;
142extern tree complex_long_double_type_node;
143
8d08fdba
MS		 144extern tree intQI_type_node, unsigned_intQI_type_node;
145extern tree intHI_type_node, unsigned_intHI_type_node;
146extern tree intSI_type_node, unsigned_intSI_type_node;
147extern tree intDI_type_node, unsigned_intDI_type_node;
148
149extern int current_function_returns_value;
150extern int current_function_returns_null;
151extern tree current_function_return_value;
152
153extern tree ridpointers[];
154extern tree ansi_opname[];
155extern tree ansi_assopname[];
156
157/* Nonzero means `$' can be in an identifier. */
158
159extern int dollars_in_ident;
160
161/* Nonzero means allow type mismatches in conditional expressions;
162 just make their values `void'. */
163
164extern int flag_cond_mismatch;
165
166/* Nonzero means don't recognize the keyword `asm'. */
167
168extern int flag_no_asm;
169
170/* For cross referencing. */
171
172extern int flag_gnu_xref;
173
174/* For environments where you can use GNU binutils (as, ld in particular). */
175
176extern int flag_gnu_binutils;
177
178/* Nonzero means ignore `#ident' directives. */
179
180extern int flag_no_ident;
181
182/* Nonzero means warn about implicit declarations. */
183
184extern int warn_implicit;
185
186/* Nonzero means warn when all ctors or dtors are private, and the class
187 has no friends. */
188
189extern int warn_ctor_dtor_privacy;
190
191/* Nonzero means warn about function definitions that default the return type
192 or that use a null return and have a return-type other than void. */
193
194extern int warn_return_type;
195
196/* Nonzero means give string constants the type `const char *'
197 to get extra warnings from them. These warnings will be too numerous
198 to be useful, except in thoroughly ANSIfied programs. */
199
200extern int warn_write_strings;
201
202/* Nonzero means warn about sizeof(function) or addition/subtraction
203 of function pointers. */
204
205extern int warn_pointer_arith;
206
8d08fdba
MS		 207/* Nonzero means warn about suggesting putting in ()'s. */
208
209extern int warn_parentheses;
210
211/* Nonzero means warn about multiple (redundant) decls for the same single
212 variable or function. */
213
214extern int warn_redundant_decls;
215
216/* Warn if initializer is not completely bracketed. */
217
218extern int warn_missing_braces;
219
2ee887f2
MS		 220/* Warn about comparison of signed and unsigned values. */
221
222extern int warn_sign_compare;
223
8d08fdba
MS		 224/* Warn about a subscript that has type char. */
225
226extern int warn_char_subscripts;
227
228/* Nonzero means warn about pointer casts that can drop a type qualifier
229 from the pointer target type. */
230
231extern int warn_cast_qual;
232
e92cc029 233/* Warn about *printf or *scanf format/argument anomalies. */
8d08fdba
MS		 234
235extern int warn_format;
236
237/* Nonzero means warn about non virtual destructors in classes that have
e92cc029 238 virtual functions. */
8d08fdba
MS		 239
240extern int warn_nonvdtor;
241
9a3b49ac
MS		 242/* Non-zero means warn when we convert a pointer to member function
243 into a pointer to (void or function). */
244
245extern int warn_pmf2ptr;
246
eb448459
MS		 247/* Nonzero means warn about violation of some Effective C++ style rules. */
248
249extern int warn_ecpp;
250
da20811c
JM		 251/* Nonzero means warn where overload resolution chooses a promotion from
252 unsigned to signed over a conversion to an unsigned of the same size. */
253
254extern int warn_sign_promo;
255
8d08fdba 256/* Non-zero means warn when a function is declared extern and later inline. */
eb448459 257
8d08fdba
MS		 258extern int warn_extern_inline;
259
0c4b14c4
JM		 260/* Non-zero means warn when an old-style cast is used. */
261
262extern int warn_old_style_cast;
263
8d08fdba
MS		 264/* Nonzero means to treat bitfields as unsigned unless they say `signed'. */
265
266extern int flag_signed_bitfields;
267
268/* 3 means write out only virtuals function tables `defined'
269 in this implementation file.
270 2 means write out only specific virtual function tables
271 and give them (C) public access.
272 1 means write out virtual function tables and give them
273 (C) public access.
274 0 means write out virtual function tables and give them
275 (C) static access (default).
276 -1 means declare virtual function tables extern. */
277
278extern int write_virtuals;
279
8926095f
MS		 280/* True for more efficient but incompatible (not not fully tested)
281 vtable implementation (using thunks).
e92cc029 282 0 is old behavior; 1 is new behavior. */
8926095f 283extern int flag_vtable_thunks;
51c184be 284
8d08fdba
MS		 285/* INTERFACE_ONLY nonzero means that we are in an "interface"
286 section of the compiler. INTERFACE_UNKNOWN nonzero means
287 we cannot trust the value of INTERFACE_ONLY. If INTERFACE_UNKNOWN
288 is zero and INTERFACE_ONLY is zero, it means that we are responsible
289 for exporting definitions that others might need. */
290extern int interface_only, interface_unknown;
291
292/* Nonzero means we should attempt to elide constructors when possible. */
293
294extern int flag_elide_constructors;
295
e1cd6e56
MS		 296/* Nonzero means enable obscure ANSI features and disable GNU extensions
297 that might cause ANSI-compliant code to be miscompiled. */
39211cd5
MS		 298
299extern int flag_ansi;
300
c73964b2
MS		 301/* Nonzero means do argument matching for overloading according to the
302 ANSI rules, rather than what g++ used to believe to be correct. */
303
304extern int flag_ansi_overloading;
305
8d08fdba
MS		 306/* Nonzero means recognize and handle signature language constructs. */
307
308extern int flag_handle_signatures;
309
310/* Nonzero means that member functions defined in class scope are
311 inline by default. */
312
313extern int flag_default_inline;
386b8a85
JM		 314
315/* The name-mangling scheme to use. Versions of gcc before 2.8 use
316 version 0. */
317extern int name_mangling_version;
318
319/* Nonzero means that guiding declarations are allowed. */
320extern int flag_guiding_decls;
321
8d08fdba
MS		 322\f
323/* C++ language-specific tree codes. */
324#define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
325enum cplus_tree_code {
326 __DUMMY = LAST_AND_UNUSED_TREE_CODE,
e92cc029 327#include "cp-tree.def"
8d08fdba
MS		 328 LAST_CPLUS_TREE_CODE
329};
330#undef DEFTREECODE
331
8d08fdba
MS		 332enum languages { lang_c, lang_cplusplus };
333
334/* Macros to make error reporting functions' lives easier. */
335#define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE)))
336#define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE)))
337#define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE)))
338
339#define TYPE_ASSEMBLER_NAME_STRING(NODE) (IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE))))
340#define TYPE_ASSEMBLER_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE))))
341
a4443a08 342/* The _DECL for this _TYPE. */
d2e5ee5c 343#define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE)))
a4443a08 344
8d08fdba 345#define IS_AGGR_TYPE(t) (TYPE_LANG_FLAG_5 (t))
5566b478 346#define IS_AGGR_TYPE_CODE(t) (t == RECORD_TYPE || t == UNION_TYPE)
8d08fdba
MS		 347#define IS_AGGR_TYPE_2(TYPE1,TYPE2) \
348 (TREE_CODE (TYPE1) == TREE_CODE (TYPE2) \
349 && IS_AGGR_TYPE (TYPE1)&IS_AGGR_TYPE (TYPE2))
6467930b
MS		 350#define IS_OVERLOAD_TYPE(t) \
351 (IS_AGGR_TYPE (t) || TREE_CODE (t) == ENUMERAL_TYPE)
8d08fdba
MS		 352
353/* In a *_TYPE, nonzero means a built-in type. */
354#define TYPE_BUILT_IN(NODE) TYPE_LANG_FLAG_6(NODE)
355
21474714
MS		 356#define DELTA_FROM_VTABLE_ENTRY(ENTRY) \
357 (!flag_vtable_thunks ? \
358 TREE_VALUE (CONSTRUCTOR_ELTS (ENTRY)) \
359 : TREE_CODE (TREE_OPERAND ((ENTRY), 0)) != THUNK_DECL ? integer_zero_node \
360 : build_int_2 (THUNK_DELTA (TREE_OPERAND ((ENTRY), 0)), 0))
bd6dd845 361
8d08fdba
MS		 362/* Virtual function addresses can be gotten from a virtual function
363 table entry using this macro. */
364#define FNADDR_FROM_VTABLE_ENTRY(ENTRY) \
8926095f
MS		 365 (!flag_vtable_thunks ? \
366 TREE_VALUE (TREE_CHAIN (TREE_CHAIN (CONSTRUCTOR_ELTS (ENTRY)))) \
367 : TREE_CODE (TREE_OPERAND ((ENTRY), 0)) != THUNK_DECL ? (ENTRY) \
368 : DECL_INITIAL (TREE_OPERAND ((ENTRY), 0)))
8d08fdba
MS		 369#define SET_FNADDR_FROM_VTABLE_ENTRY(ENTRY,VALUE) \
370 (TREE_VALUE (TREE_CHAIN (TREE_CHAIN (CONSTRUCTOR_ELTS (ENTRY)))) = (VALUE))
8d08fdba
MS		 371#define FUNCTION_ARG_CHAIN(NODE) (TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE))))
372#define PROMOTES_TO_AGGR_TYPE(NODE,CODE) \
373 (((CODE) == TREE_CODE (NODE) \
374 && IS_AGGR_TYPE (TREE_TYPE (NODE))) \
375 || IS_AGGR_TYPE (NODE))
376
8d08fdba
MS		 377/* Nonzero iff TYPE is uniquely derived from PARENT. Under MI, PARENT can
378 be an ambiguous base class of TYPE, and this macro will be false. */
379#define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 0, (tree *)0) >= 0)
380#define ACCESSIBLY_DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, -1, (tree *)0) >= 0)
381#define ACCESSIBLY_UNIQUELY_DERIVED_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 1, (tree *)0) >= 0)
a0a33927 382#define DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 0, (tree *)0) != -1)
8d08fdba 383\f
8d08fdba
MS		 384/* Statistics show that while the GNU C++ compiler may generate
385 thousands of different types during a compilation run, it
386 generates relatively few (tens) of classtypes. Because of this,
387 it is not costly to store a generous amount of information
388 in classtype nodes. This struct must fill out to a multiple of 4 bytes. */
389struct lang_type
390{
391 struct
392 {
393 unsigned has_type_conversion : 1;
394 unsigned has_int_conversion : 1;
395 unsigned has_float_conversion : 1;
396 unsigned has_init_ref : 1;
397 unsigned gets_init_aggr : 1;
398 unsigned has_assignment : 1;
399 unsigned has_default_ctor : 1;
400 unsigned uses_multiple_inheritance : 1;
401
402 unsigned has_nonpublic_ctor : 2;
403 unsigned has_nonpublic_assign_ref : 2;
404 unsigned const_needs_init : 1;
405 unsigned ref_needs_init : 1;
406 unsigned has_const_assign_ref : 1;
407 unsigned vtable_needs_writing : 1;
408
409 unsigned has_assign_ref : 1;
a28e3c7f
MS		 410 unsigned gets_new : 2;
411 unsigned gets_delete : 2;
8d08fdba
MS		 412 unsigned has_call_overloaded : 1;
413 unsigned has_array_ref_overloaded : 1;
414 unsigned has_arrow_overloaded : 1;
8d08fdba 415
a28e3c7f 416 unsigned local_typedecls : 1;
8d08fdba
MS		 417 unsigned interface_only : 1;
418 unsigned interface_unknown : 1;
419 unsigned needs_virtual_reinit : 1;
db5ae43f 420 unsigned vec_delete_takes_size : 1;
8d08fdba
MS		 421 unsigned declared_class : 1;
422 unsigned being_defined : 1;
423 unsigned redefined : 1;
8d08fdba 424
a28e3c7f 425 unsigned no_globalize : 1;
8d08fdba
MS		 426 unsigned marked : 1;
427 unsigned marked2 : 1;
428 unsigned marked3 : 1;
429 unsigned marked4 : 1;
430 unsigned marked5 : 1;
431 unsigned marked6 : 1;
fc378698 432 unsigned debug_requested : 1;
8d08fdba 433
a28e3c7f 434 unsigned use_template : 2;
8d08fdba
MS		 435 unsigned has_method_call_overloaded : 1;
436 unsigned private_attr : 1;
437 unsigned got_semicolon : 1;
438 unsigned ptrmemfunc_flag : 1;
439 unsigned is_signature : 1;
440 unsigned is_signature_pointer : 1;
8d08fdba 441
a28e3c7f 442 unsigned is_signature_reference : 1;
8d08fdba
MS		 443 unsigned has_opaque_typedecls : 1;
444 unsigned sigtable_has_been_generated : 1;
445 unsigned was_anonymous : 1;
446 unsigned has_real_assignment : 1;
447 unsigned has_real_assign_ref : 1;
448 unsigned has_const_init_ref : 1;
8d08fdba 449 unsigned has_complex_init_ref : 1;
824b9a4c 450
8d08fdba 451 unsigned has_complex_assign_ref : 1;
f0e01782 452 unsigned has_abstract_assign_ref : 1;
f30432d7 453 unsigned non_aggregate : 1;
8d08fdba
MS		 454
455 /* The MIPS compiler gets it wrong if this struct also
456 does not fill out to a multiple of 4 bytes. Add a
457 member `dummy' with new bits if you go over the edge. */
824b9a4c 458 unsigned dummy : 21;
8d08fdba
MS		 459
460 unsigned n_vancestors : 16;
461 } type_flags;
462
463 int cid;
464 int n_ancestors;
465 int vsize;
466 int max_depth;
467 int vfield_parent;
468
469 union tree_node *vbinfo[2];
470 union tree_node *baselink_vec;
471 union tree_node *vfields;
472 union tree_node *vbases;
473 union tree_node *vbase_size;
474
475 union tree_node *tags;
476 char *memoized_table_entry;
477
fc378698 478 union tree_node *search_slot;
8d08fdba
MS		 479
480#ifdef ONLY_INT_FIELDS
481 unsigned int mode : 8;
482#else
483 enum machine_mode mode : 8;
484#endif
485
486 unsigned char size_unit;
487 unsigned char align;
488 unsigned char sep_unit;
489
490 union tree_node *sep;
491 union tree_node *size;
492
493 union tree_node *base_init_list;
494 union tree_node *abstract_virtuals;
495 union tree_node *as_list;
496 union tree_node *id_as_list;
497 union tree_node *binfo_as_list;
8d08fdba
MS		 498 union tree_node *friend_classes;
499
500 char *mi_matrix;
8d08fdba 501
db5ae43f 502 union tree_node *rtti;
8d08fdba 503
51c184be
MS		 504 union tree_node *methods;
505
8d08fdba
MS		 506 union tree_node *signature;
507 union tree_node *signature_pointer_to;
508 union tree_node *signature_reference_to;
f376e137 509
5566b478
MS		 510 union tree_node *template_info;
511
f376e137 512 int linenum;
8d08fdba
MS		 513};
514
f376e137
MS		 515#define CLASSTYPE_SOURCE_LINE(NODE) (TYPE_LANG_SPECIFIC(NODE)->linenum)
516
a0a33927
MS		 517/* Indicates whether or not (and how) a template was expanded for this class.
518 0=no information yet/non-template class
519 1=implicit template instantiation
520 2=explicit template specialization
521 3=explicit template instantiation */
8d08fdba
MS		 522#define CLASSTYPE_USE_TEMPLATE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.use_template)
523
524/* Fields used for storing information before the class is defined.
525 After the class is defined, these fields hold other information. */
526
527/* List of friends which were defined inline in this class definition. */
528#define CLASSTYPE_INLINE_FRIENDS(NODE) (TYPE_NONCOPIED_PARTS (NODE))
529
530/* Nonzero for _CLASSTYPE means that the _CLASSTYPE either has
531 a special meaning for the assignment operator ("operator="),
532 or one of its fields (or base members) has a special meaning
533 defined. */
534#define TYPE_HAS_ASSIGNMENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_assignment)
535#define TYPE_HAS_REAL_ASSIGNMENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_real_assignment)
536
537/* Nonzero for _CLASSTYPE means that operator new and delete are defined,
538 respectively. */
a28e3c7f
MS		 539#define TYPE_GETS_NEW(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.gets_new)
540#define TYPE_GETS_DELETE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.gets_delete)
541#define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1)
542
543/* Nonzero for _CLASSTYPE means that operator vec delete is defined and
544 takes the optional size_t argument. */
545#define TYPE_VEC_DELETE_TAKES_SIZE(NODE) \
546 (TYPE_LANG_SPECIFIC(NODE)->type_flags.vec_delete_takes_size)
547#define TYPE_VEC_NEW_USES_COOKIE(NODE) \
548 (TYPE_NEEDS_DESTRUCTOR (NODE) \
549 || (TYPE_LANG_SPECIFIC (NODE) && TYPE_VEC_DELETE_TAKES_SIZE (NODE)))
8d08fdba
MS		 550
551/* Nonzero for TREE_LIST or _TYPE node means that this node is class-local. */
552#define TREE_NONLOCAL_FLAG(NODE) (TREE_LANG_FLAG_0 (NODE))
553
554/* Nonzero for a _CLASSTYPE node which we know to be private. */
555#define TYPE_PRIVATE_P(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.private_attr)
556
557/* Nonzero means that this _CLASSTYPE node defines ways of converting
558 itself to other types. */
559#define TYPE_HAS_CONVERSION(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_type_conversion)
560
561/* Nonzero means that this _CLASSTYPE node can convert itself to an
562 INTEGER_TYPE. */
563#define TYPE_HAS_INT_CONVERSION(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_int_conversion)
564
565/* Nonzero means that this _CLASSTYPE node can convert itself to an
566 REAL_TYPE. */
567#define TYPE_HAS_REAL_CONVERSION(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_float_conversion)
568
569/* Nonzero means that this _CLASSTYPE node overloads operator=(X&). */
570#define TYPE_HAS_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_assign_ref)
571#define TYPE_HAS_CONST_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_const_assign_ref)
572
573/* Nonzero means that this _CLASSTYPE node has an X(X&) constructor. */
574#define TYPE_HAS_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_init_ref)
575#define TYPE_HAS_CONST_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_const_init_ref)
576
577/* Nonzero means that this _CLASSTYPE node has an X(X ...) constructor.
578 Note that there must be other arguments, or this constructor is flagged
579 as being erroneous. */
580#define TYPE_GETS_INIT_AGGR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.gets_init_aggr)
581
582/* Nonzero means that this type is being defined. I.e., the left brace
583 starting the definition of this type has been seen. */
584#define TYPE_BEING_DEFINED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.being_defined)
585/* Nonzero means that this type has been redefined. In this case, if
586 convenient, don't reprocess any methods that appear in its redefinition. */
587#define TYPE_REDEFINED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.redefined)
588
589/* Nonzero means that this _CLASSTYPE node overloads the method call
590 operator. In this case, all method calls go through `operator->()(...). */
591#define TYPE_OVERLOADS_METHOD_CALL_EXPR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_method_call_overloaded)
592
593/* Nonzero means that this type is a signature. */
594# define IS_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)?TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature:0)
595# define SET_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature=1)
596# define CLEAR_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature=0)
597
598/* Nonzero means that this type is a signature pointer type. */
599# define IS_SIGNATURE_POINTER(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature_pointer)
600
601/* Nonzero means that this type is a signature reference type. */
602# define IS_SIGNATURE_REFERENCE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.is_signature_reference)
603
8d08fdba
MS		 604/* Nonzero means that this signature contains opaque type declarations. */
605#define SIGNATURE_HAS_OPAQUE_TYPEDECLS(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_opaque_typedecls)
606
607/* Nonzero means that a signature table has been generated
608 for this signature. */
609#define SIGTABLE_HAS_BEEN_GENERATED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.sigtable_has_been_generated)
610
611/* If NODE is a class, this is the signature type that contains NODE's
612 signature after it has been computed using sigof(). */
613#define CLASSTYPE_SIGNATURE(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature)
614
615/* If NODE is a signature pointer or signature reference, this is the
616 signature type the pointer/reference points to. */
617#define SIGNATURE_TYPE(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature)
618
619/* If NODE is a signature, this is a vector of all methods defined
620 in the signature or in its base types together with their default
621 implementations. */
622#define SIGNATURE_METHOD_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature)
623
624/* If NODE is a signature, this is the _TYPE node that contains NODE's
625 signature pointer type. */
626#define SIGNATURE_POINTER_TO(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature_pointer_to)
627
628/* If NODE is a signature, this is the _TYPE node that contains NODE's
629 signature reference type. */
630#define SIGNATURE_REFERENCE_TO(NODE) (TYPE_LANG_SPECIFIC(NODE)->signature_reference_to)
631
db5ae43f
MS		 632/* The is the VAR_DECL that contains NODE's rtti. */
633#define CLASSTYPE_RTTI(NODE) (TYPE_LANG_SPECIFIC(NODE)->rtti)
8d08fdba
MS		 634
635/* Nonzero means that this _CLASSTYPE node overloads operator(). */
636#define TYPE_OVERLOADS_CALL_EXPR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_call_overloaded)
637
638/* Nonzero means that this _CLASSTYPE node overloads operator[]. */
639#define TYPE_OVERLOADS_ARRAY_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_array_ref_overloaded)
640
641/* Nonzero means that this _CLASSTYPE node overloads operator->. */
642#define TYPE_OVERLOADS_ARROW(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_arrow_overloaded)
643
644/* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses
645 multiple inheritance. If this is 0 for the root of a type
646 hierarchy, then we can use more efficient search techniques. */
647#define TYPE_USES_MULTIPLE_INHERITANCE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.uses_multiple_inheritance)
648
649/* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses
650 virtual base classes. If this is 0 for the root of a type
651 hierarchy, then we can use more efficient search techniques. */
652#define TYPE_USES_VIRTUAL_BASECLASSES(NODE) (TREE_LANG_FLAG_3(NODE))
653
654/* List of lists of member functions defined in this class. */
72b7eeff 655#define CLASSTYPE_METHOD_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->methods)
8d08fdba 656
e1cd6e56
MS		 657/* The first type conversion operator in the class (the others can be
658 searched with TREE_CHAIN), or the first non-constructor function if
659 there are no type conversion operators. */
660#define CLASSTYPE_FIRST_CONVERSION(NODE) \
fc378698
MS		 661 TREE_VEC_LENGTH (CLASSTYPE_METHOD_VEC (NODE)) > 2 \
662 ? TREE_VEC_ELT (CLASSTYPE_METHOD_VEC (NODE), 2) \
8ccc31eb 663 : NULL_TREE;
e1cd6e56 664
8d08fdba
MS		 665/* Pointer from any member function to the head of the list of
666 member functions of the type that member function belongs to. */
667#define CLASSTYPE_BASELINK_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->baselink_vec)
668
669/* Mark bits for depth-first and breath-first searches. */
670#define CLASSTYPE_MARKED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked)
671#define CLASSTYPE_MARKED2(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked2)
672#define CLASSTYPE_MARKED3(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked3)
673#define CLASSTYPE_MARKED4(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked4)
674#define CLASSTYPE_MARKED5(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked5)
675#define CLASSTYPE_MARKED6(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.marked6)
676/* Macros to modify the above flags */
677#define SET_CLASSTYPE_MARKED(NODE) (CLASSTYPE_MARKED(NODE) = 1)
678#define CLEAR_CLASSTYPE_MARKED(NODE) (CLASSTYPE_MARKED(NODE) = 0)
679#define SET_CLASSTYPE_MARKED2(NODE) (CLASSTYPE_MARKED2(NODE) = 1)
680#define CLEAR_CLASSTYPE_MARKED2(NODE) (CLASSTYPE_MARKED2(NODE) = 0)
681#define SET_CLASSTYPE_MARKED3(NODE) (CLASSTYPE_MARKED3(NODE) = 1)
682#define CLEAR_CLASSTYPE_MARKED3(NODE) (CLASSTYPE_MARKED3(NODE) = 0)
683#define SET_CLASSTYPE_MARKED4(NODE) (CLASSTYPE_MARKED4(NODE) = 1)
684#define CLEAR_CLASSTYPE_MARKED4(NODE) (CLASSTYPE_MARKED4(NODE) = 0)
685#define SET_CLASSTYPE_MARKED5(NODE) (CLASSTYPE_MARKED5(NODE) = 1)
686#define CLEAR_CLASSTYPE_MARKED5(NODE) (CLASSTYPE_MARKED5(NODE) = 0)
687#define SET_CLASSTYPE_MARKED6(NODE) (CLASSTYPE_MARKED6(NODE) = 1)
688#define CLEAR_CLASSTYPE_MARKED6(NODE) (CLASSTYPE_MARKED6(NODE) = 0)
689
690#define CLASSTYPE_TAGS(NODE) (TYPE_LANG_SPECIFIC(NODE)->tags)
691
692/* If this class has any bases, this is the number of the base class from
693 which our VFIELD is based, -1 otherwise. If this class has no base
694 classes, this is not used.
695 In D : B1, B2, PARENT would be 0, if D's vtable came from B1,
e92cc029 696 1, if D's vtable came from B2. */
8d08fdba
MS		 697#define CLASSTYPE_VFIELD_PARENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->vfield_parent)
698
699/* Remove when done merging. */
700#define CLASSTYPE_VFIELD(NODE) TYPE_VFIELD(NODE)
701
702/* The number of virtual functions defined for this
703 _CLASSTYPE node. */
704#define CLASSTYPE_VSIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->vsize)
705/* The virtual base classes that this type uses. */
706#define CLASSTYPE_VBASECLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->vbases)
707/* The virtual function pointer fields that this type contains. */
708#define CLASSTYPE_VFIELDS(NODE) (TYPE_LANG_SPECIFIC(NODE)->vfields)
709
710/* Number of baseclasses defined for this type.
711 0 means no base classes. */
712#define CLASSTYPE_N_BASECLASSES(NODE) \
713 (TYPE_BINFO_BASETYPES (NODE) ? TREE_VEC_LENGTH (TYPE_BINFO_BASETYPES(NODE)) : 0)
714
715/* Memoize the number of super classes (base classes) tha this node
716 has. That way we can know immediately (albeit conservatively how
717 large a multiple-inheritance matrix we need to build to find
718 derivation information. */
719#define CLASSTYPE_N_SUPERCLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->n_ancestors)
720#define CLASSTYPE_N_VBASECLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.n_vancestors)
721
722/* Record how deep the inheritance is for this class so `void*' conversions
723 are less favorable than a conversion to the most base type. */
724#define CLASSTYPE_MAX_DEPTH(NODE) (TYPE_LANG_SPECIFIC(NODE)->max_depth)
725
726/* Used for keeping search-specific information. Any search routine
727 which uses this must define what exactly this slot is used for. */
728#define CLASSTYPE_SEARCH_SLOT(NODE) (TYPE_LANG_SPECIFIC(NODE)->search_slot)
729
730/* Entry for keeping memoization tables for this type to
731 hopefully speed up search routines. Since it is a pointer,
732 it can mean almost anything. */
733#define CLASSTYPE_MTABLE_ENTRY(NODE) (TYPE_LANG_SPECIFIC(NODE)->memoized_table_entry)
734
735/* This is the total size of the baseclasses defined for this type.
736 Needed because it is desirable to layout such information
737 before beginning to process the class itself, and we
738 don't want to compute it second time when actually laying
739 out the type for real. */
740#define CLASSTYPE_SIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->size)
741#define CLASSTYPE_SIZE_UNIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->size_unit)
742#define CLASSTYPE_MODE(NODE) (TYPE_LANG_SPECIFIC(NODE)->mode)
743#define CLASSTYPE_ALIGN(NODE) (TYPE_LANG_SPECIFIC(NODE)->align)
744
745/* This is the space needed for virtual base classes. NULL if
746 there are no virtual basetypes. */
747#define CLASSTYPE_VBASE_SIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->vbase_size)
748
749/* A cons list of structure elements which either have constructors
750 to be called, or virtual function table pointers which
751 need initializing. Depending on what is being initialized,
752 the TREE_PURPOSE and TREE_VALUE fields have different meanings:
753
754 Member initialization: <FIELD_DECL, TYPE>
755 Base class construction: <NULL_TREE, BASETYPE>
756 Base class initialization: <BASE_INITIALIZATION, THESE_INITIALIZATIONS>
757 Whole type: <MEMBER_INIT, BASE_INIT>. */
758#define CLASSTYPE_BASE_INIT_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->base_init_list)
759
760/* A cons list of virtual functions which cannot be inherited by
761 derived classes. When deriving from this type, the derived
762 class must provide its own definition for each of these functions. */
763#define CLASSTYPE_ABSTRACT_VIRTUALS(NODE) (TYPE_LANG_SPECIFIC(NODE)->abstract_virtuals)
764
765/* Nonzero means that this aggr type has been `closed' by a semicolon. */
766#define CLASSTYPE_GOT_SEMICOLON(NODE) (TYPE_LANG_SPECIFIC (NODE)->type_flags.got_semicolon)
767
768/* Nonzero means that the main virtual function table pointer needs to be
769 set because base constructors have placed the wrong value there.
770 If this is zero, it means that they placed the right value there,
771 and there is no need to change it. */
772#define CLASSTYPE_NEEDS_VIRTUAL_REINIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.needs_virtual_reinit)
773
774/* Nonzero means that if this type has virtual functions, that
775 the virtual function table will be written out. */
776#define CLASSTYPE_VTABLE_NEEDS_WRITING(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.vtable_needs_writing)
777
778/* Nonzero means that this type defines its own local type declarations. */
779#define CLASSTYPE_LOCAL_TYPEDECLS(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.local_typedecls)
780
781/* Nonzero means that this type has an X() constructor. */
782#define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_default_ctor)
783
784/* Nonzero means the type declared a ctor as private or protected. We
785 use this to make sure we don't try to generate a copy ctor for a
786 class that has a member of type NODE. */
787#define TYPE_HAS_NONPUBLIC_CTOR(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_nonpublic_ctor)
788
789/* Ditto, for operator=. */
790#define TYPE_HAS_NONPUBLIC_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_nonpublic_assign_ref)
791
792/* Many routines need to cons up a list of basetypes for access
793 checking. This field contains a TREE_LIST node whose TREE_VALUE
794 is the main variant of the type, and whose TREE_VIA_PUBLIC
795 and TREE_VIA_VIRTUAL bits are correctly set. */
796#define CLASSTYPE_AS_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->as_list)
797/* Same, but cache a list whose value is the name of this type. */
798#define CLASSTYPE_ID_AS_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->id_as_list)
799/* Same, but cache a list whose value is the binfo of this type. */
800#define CLASSTYPE_BINFO_AS_LIST(NODE) (TYPE_LANG_SPECIFIC(NODE)->binfo_as_list)
801
8d08fdba
MS		 802/* A list of class types with which this type is a friend. */
803#define CLASSTYPE_FRIEND_CLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->friend_classes)
804
805/* Keep an inheritance lattice around so we can quickly tell whether
806 a type is derived from another or not. */
807#define CLASSTYPE_MI_MATRIX(NODE) (TYPE_LANG_SPECIFIC(NODE)->mi_matrix)
808
8d08fdba
MS		 809/* Say whether this node was declared as a "class" or a "struct". */
810#define CLASSTYPE_DECLARED_CLASS(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.declared_class)
8d08fdba
MS		 811/* whether this can be globalized. */
812#define CLASSTYPE_NO_GLOBALIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.no_globalize)
813
814/* Nonzero if this class has const members which have no specified initialization. */
815#define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.const_needs_init)
816
817/* Nonzero if this class has ref members which have no specified initialization. */
818#define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.ref_needs_init)
819
820/* Nonzero if this class is included from a header file which employs
821 `#pragma interface', and it is not included in its implementation file. */
822#define CLASSTYPE_INTERFACE_ONLY(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_only)
823
824/* Same as above, but for classes whose purpose we do not know. */
825#define CLASSTYPE_INTERFACE_UNKNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown)
826#define CLASSTYPE_INTERFACE_KNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown == 0)
827#define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown = !!(X))
828#define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown = 1)
829#define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.interface_unknown = 0)
830
831/* Nonzero if a _DECL node requires us to output debug info for this class. */
832#define CLASSTYPE_DEBUG_REQUESTED(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.debug_requested)
833\f
834/* Additional macros for inheritance information. */
835
836#define CLASSTYPE_VBINFO(NODE,VIA_PUBLIC) \
837 (TYPE_LANG_SPECIFIC (NODE)->vbinfo[VIA_PUBLIC])
838
839/* When following an binfo-specific chain, this is the cumulative
840 via-public flag. */
841#define BINFO_VIA_PUBLIC(NODE) TREE_LANG_FLAG_5 (NODE)
842
843/* When building a matrix to determine by a single lookup
844 whether one class is derived from another or not,
845 this field is the index of the class in the table. */
846#define CLASSTYPE_CID(NODE) (TYPE_LANG_SPECIFIC(NODE)->cid)
847#define BINFO_CID(NODE) CLASSTYPE_CID(BINFO_TYPE(NODE))
848
849/* Nonzero means marked by DFS or BFS search, including searches
850 by `get_binfo' and `get_base_distance'. */
851#define BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED(BINFO_TYPE(NODE)):TREE_LANG_FLAG_0(NODE))
852/* Macros needed because of C compilers that don't allow conditional
853 expressions to be lvalues. Grr! */
854#define SET_BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_0(NODE)=1))
855#define CLEAR_BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_0(NODE)=0))
856
857/* Nonzero means marked in building initialization list. */
858#define BINFO_BASEINIT_MARKED(NODE) CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
859/* Modifier macros */
860#define SET_BINFO_BASEINIT_MARKED(NODE) SET_CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
861#define CLEAR_BINFO_BASEINIT_MARKED(NODE) CLEAR_CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
862
863/* Nonzero means marked in search through virtual inheritance hierarchy. */
864#define BINFO_VBASE_MARKED(NODE) CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
865/* Modifier macros */
866#define SET_BINFO_VBASE_MARKED(NODE) SET_CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
867#define CLEAR_BINFO_VBASE_MARKED(NODE) CLEAR_CLASSTYPE_MARKED2 (BINFO_TYPE (NODE))
868
869/* Nonzero means marked in search for members or member functions. */
870#define BINFO_FIELDS_MARKED(NODE) \
871 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED2 (BINFO_TYPE (NODE)):TREE_LANG_FLAG_2(NODE))
872#define SET_BINFO_FIELDS_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED2(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_2(NODE)=1))
873#define CLEAR_BINFO_FIELDS_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED2(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_2(NODE)=0))
874
875/* Nonzero means that this class is on a path leading to a new vtable. */
876#define BINFO_VTABLE_PATH_MARKED(NODE) \
877 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):TREE_LANG_FLAG_3(NODE))
878#define SET_BINFO_VTABLE_PATH_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_3(NODE)=1))
879#define CLEAR_BINFO_VTABLE_PATH_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_3(NODE)=0))
880
881/* Nonzero means that this class has a new vtable. */
882#define BINFO_NEW_VTABLE_MARKED(NODE) \
883 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED4(BINFO_TYPE(NODE)):TREE_LANG_FLAG_4(NODE))
884#define SET_BINFO_NEW_VTABLE_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED4(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_4(NODE)=1))
885#define CLEAR_BINFO_NEW_VTABLE_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED4(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_4(NODE)=0))
886
887/* Nonzero means this class has initialized its virtual baseclasses. */
888#define BINFO_VBASE_INIT_MARKED(NODE) \
889 (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED5(BINFO_TYPE(NODE)):TREE_LANG_FLAG_5(NODE))
890#define SET_BINFO_VBASE_INIT_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED5(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_5(NODE)=1))
891#define CLEAR_BINFO_VBASE_INIT_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED5(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_5(NODE)=0))
892\f
893/* Accessor macros for the vfield slots in structures. */
894
895/* Get the assoc info that caused this vfield to exist. */
896#define VF_BINFO_VALUE(NODE) TREE_PURPOSE (NODE)
897
898/* Get that same information as a _TYPE. */
899#define VF_BASETYPE_VALUE(NODE) TREE_VALUE (NODE)
900
901/* Get the value of the top-most type dominating the non-`normal' vfields. */
902#define VF_DERIVED_VALUE(NODE) (VF_BINFO_VALUE (NODE) ? BINFO_TYPE (VF_BINFO_VALUE (NODE)) : NULL_TREE)
903
904/* Get the value of the top-most type that's `normal' for the vfield. */
905#define VF_NORMAL_VALUE(NODE) TREE_TYPE (NODE)
906\f
907/* Nonzero for TREE_LIST node means that this list of things
908 is a list of parameters, as opposed to a list of expressions. */
909#define TREE_PARMLIST(NODE) ((NODE)->common.unsigned_flag) /* overloaded! */
910
911/* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that
912 this type can raise. */
913#define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_NONCOPIED_PARTS (NODE)
a9aedbc2 914
e92cc029 915/* The binding level associated with the namespace. */
72b7eeff 916#define NAMESPACE_LEVEL(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.level)
8d08fdba
MS		 917\f
918struct lang_decl_flags
919{
920#ifdef ONLY_INT_FIELDS
921 int language : 8;
922#else
923 enum languages language : 8;
924#endif
925
926 unsigned operator_attr : 1;
927 unsigned constructor_attr : 1;
928 unsigned returns_first_arg : 1;
929 unsigned preserves_first_arg : 1;
930 unsigned friend_attr : 1;
931 unsigned static_function : 1;
932 unsigned const_memfunc : 1;
933 unsigned volatile_memfunc : 1;
934
935 unsigned abstract_virtual : 1;
936 unsigned permanent_attr : 1 ;
937 unsigned constructor_for_vbase_attr : 1;
938 unsigned mutable_flag : 1;
939 unsigned is_default_implementation : 1;
8926095f 940 unsigned saved_inline : 1;
a0a33927
MS		 941 unsigned use_template : 2;
942
db5ae43f 943 unsigned nonconverting : 1;
faae18ab
MS		 944 unsigned declared_inline : 1;
945 unsigned not_really_extern : 1;
77be6f82
JM		 946 unsigned comdat : 1;
947 unsigned dummy : 4;
8d08fdba
MS		 948
949 tree access;
950 tree context;
951 tree memfunc_pointer_to;
5566b478 952 tree template_info;
72b7eeff 953 struct binding_level *level;
8d08fdba
MS		 954};
955
956struct lang_decl
957{
958 struct lang_decl_flags decl_flags;
959
8d08fdba
MS		 960 tree main_decl_variant;
961 struct pending_inline *pending_inline_info;
8d08fdba
MS		 962 tree chain;
963};
964
965/* Non-zero if NODE is a _DECL with TREE_READONLY set. */
966#define TREE_READONLY_DECL_P(NODE) \
967 (TREE_READONLY (NODE) && TREE_CODE_CLASS (TREE_CODE (NODE)) == 'd')
968
cffa8729
MS		 969/* Non-zero iff DECL is memory-based. The DECL_RTL of
970 certain const variables might be a CONST_INT, or a REG
971 in some cases. We cannot use `memory_operand' as a test
972 here because on most RISC machines, a variable's address
973 is not, by itself, a legitimate address. */
974#define DECL_IN_MEMORY_P(NODE) \
975 (DECL_RTL (NODE) != NULL_RTX && GET_CODE (DECL_RTL (NODE)) == MEM)
976
8d08fdba
MS		 977/* For FUNCTION_DECLs: return the language in which this decl
978 was declared. */
979#define DECL_LANGUAGE(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.language)
980
981/* For FUNCTION_DECLs: nonzero means that this function is a constructor. */
982#define DECL_CONSTRUCTOR_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.constructor_attr)
983/* For FUNCTION_DECLs: nonzero means that this function is a constructor
984 for an object with virtual baseclasses. */
985#define DECL_CONSTRUCTOR_FOR_VBASE_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.constructor_for_vbase_attr)
986
987/* For FUNCTION_DECLs: nonzero means that this function is a default
988 implementation of a signature method. */
989#define IS_DEFAULT_IMPLEMENTATION(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.is_default_implementation)
990
991/* For FUNCTION_DECLs: nonzero means that the constructor
992 is known to return a non-zero `this' unchanged. */
993#define DECL_RETURNS_FIRST_ARG(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.returns_first_arg)
994
995/* Nonzero for FUNCTION_DECL means that this constructor is known to
996 not make any assignment to `this', and therefore can be trusted
4ac14744 997 to return it unchanged. Otherwise, we must re-assign `current_class_ptr'
8d08fdba
MS		 998 after performing base initializations. */
999#define DECL_PRESERVES_THIS(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.preserves_first_arg)
1000
1001/* Nonzero for _DECL means that this decl appears in (or will appear
1002 in) as a member in a RECORD_TYPE or UNION_TYPE node. It is also for
1003 detecting circularity in case members are multiply defined. In the
1004 case of a VAR_DECL, it is also used to determine how program storage
1005 should be allocated. */
1006#define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3(NODE))
1007
1008/* Nonzero for FUNCTION_DECL means that this decl is just a
1009 friend declaration, and should not be added to the list of
1010 member functions for this class. */
1011#define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.friend_attr)
1012
1013/* Nonzero for FUNCTION_DECL means that this decl is a static
1014 member function. */
1015#define DECL_STATIC_FUNCTION_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.static_function)
1016
700f8a87
MS		 1017/* Nonzero for a class member means that it is shared between all objects
1018 of that class. */
1019#define SHARED_MEMBER_P(NODE) \
1020 (TREE_CODE (NODE) == VAR_DECL || TREE_CODE (NODE) == TYPE_DECL \
1021 || TREE_CODE (NODE) == CONST_DECL)
1022
8926095f
MS		 1023/* Nonzero for FUNCTION_DECL means that this decl is a member function
1024 (static or non-static). */
1025#define DECL_FUNCTION_MEMBER_P(NODE) \
1026 (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE || DECL_STATIC_FUNCTION_P (NODE))
1027
8d08fdba
MS		 1028/* Nonzero for FUNCTION_DECL means that this member function
1029 has `this' as const X *const. */
1030#define DECL_CONST_MEMFUNC_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.const_memfunc)
1031
1032/* Nonzero for FUNCTION_DECL means that this member function
1033 has `this' as volatile X *const. */
1034#define DECL_VOLATILE_MEMFUNC_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.volatile_memfunc)
1035
1036/* Nonzero for _DECL means that this member object type
1037 is mutable. */
1038#define DECL_MUTABLE_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.mutable_flag)
1039
db5ae43f
MS		 1040/* Nonzero for _DECL means that this constructor is a non-converting
1041 constructor. */
1042#define DECL_NONCONVERTING_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.nonconverting)
1043
8d08fdba
MS		 1044/* Nonzero for FUNCTION_DECL means that this member function
1045 exists as part of an abstract class's interface. */
1046#define DECL_ABSTRACT_VIRTUAL_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.abstract_virtual)
1047
1048/* Nonzero if allocated on permanent_obstack. */
1049#define LANG_DECL_PERMANENT(LANGDECL) ((LANGDECL)->decl_flags.permanent_attr)
1050
8926095f
MS		 1051/* The _TYPE context in which this _DECL appears. This field holds the
1052 class where a virtual function instance is actually defined, and the
1053 lexical scope of a friend function defined in a class body. */
8d08fdba 1054#define DECL_CLASS_CONTEXT(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.context)
f30432d7
MS		 1055#define DECL_REAL_CONTEXT(NODE) \
1056 ((TREE_CODE (NODE) == FUNCTION_DECL && DECL_FUNCTION_MEMBER_P (NODE)) \
1057 ? DECL_CLASS_CONTEXT (NODE) : DECL_CONTEXT (NODE))
8d08fdba
MS		 1058
1059/* For a FUNCTION_DECL: the chain through which the next method
5566b478
MS		 1060 with the same name is found. We now use TREE_CHAIN to
1061 walk through the methods in order of declaration. */
8d08fdba
MS		 1062#if 1
1063#define DECL_CHAIN(NODE) (DECL_LANG_SPECIFIC(NODE)->chain)
1064#else
1065#define DECL_CHAIN(NODE) (TREE_CHAIN (NODE))
1066#endif
1067
d2ad151f 1068/* In a VAR_DECL for a variable declared in a for statement,
e92cc029 1069 this is the shadowed (local) variable. */
d2ad151f
PB		 1070#define DECL_SHADOWED_FOR_VAR(NODE) DECL_RESULT(NODE)
1071
8d08fdba
MS		 1072/* Points back to the decl which caused this lang_decl to be allocated. */
1073#define DECL_MAIN_VARIANT(NODE) (DECL_LANG_SPECIFIC(NODE)->main_decl_variant)
1074
1075/* For a FUNCTION_DECL: if this function was declared inline inside of
1076 a class declaration, this is where the text for the function is
1077 squirreled away. */
1078#define DECL_PENDING_INLINE_INFO(NODE) (DECL_LANG_SPECIFIC(NODE)->pending_inline_info)
1079
e92cc029 1080/* True if on the saved_inlines (see decl2.c) list. */
8926095f
MS		 1081#define DECL_SAVED_INLINE(DECL) \
1082 (DECL_LANG_SPECIFIC(DECL)->decl_flags.saved_inline)
1083
8d08fdba
MS		 1084/* For a FUNCTION_DECL: if this function was declared inside a signature
1085 declaration, this is the corresponding member function pointer that was
1086 created for it. */
1087#define DECL_MEMFUNC_POINTER_TO(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.memfunc_pointer_to)
1088
1089/* For a FIELD_DECL: this points to the signature member function from
1090 which this signature member function pointer was created. */
1091#define DECL_MEMFUNC_POINTING_TO(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.memfunc_pointer_to)
1092
5566b478
MS		 1093/* For a VAR_DECL or FUNCTION_DECL: template-specific information. */
1094#define DECL_TEMPLATE_INFO(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.template_info)
1095#define CLASSTYPE_TEMPLATE_INFO(NODE) (TYPE_LANG_SPECIFIC(NODE)->template_info)
1096#define TI_TEMPLATE(NODE) (TREE_PURPOSE (NODE))
1097#define TI_ARGS(NODE) (TREE_VALUE (NODE))
6633d636 1098#define TI_SPEC_INFO(NODE) (TREE_CHAIN (NODE))
5566b478 1099#define TI_USES_TEMPLATE_PARMS(NODE) TREE_LANG_FLAG_0 (NODE)
824b9a4c 1100#define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE)
5566b478
MS		 1101#define DECL_TI_TEMPLATE(NODE) TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE))
1102#define DECL_TI_ARGS(NODE) TI_ARGS (DECL_TEMPLATE_INFO (NODE))
1103#define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE))
1104#define CLASSTYPE_TI_ARGS(NODE) TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE))
6633d636 1105#define CLASSTYPE_TI_SPEC_INFO(NODE) TI_SPEC_INFO (CLASSTYPE_TEMPLATE_INFO (NODE))
98c1c668 1106#define INNERMOST_TEMPLATE_PARMS(NODE) TREE_VALUE(NODE)
5566b478
MS		 1107
1108#define DECL_SAVED_TREE(NODE) DECL_MEMFUNC_POINTER_TO (NODE)
1109#define COMPOUND_STMT_NO_SCOPE(NODE) TREE_LANG_FLAG_0 (NODE)
1110#define NEW_EXPR_USE_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE)
1111#define DELETE_EXPR_USE_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE)
1112#define DELETE_EXPR_USE_VEC(NODE) TREE_LANG_FLAG_1 (NODE)
1113#define LOOKUP_EXPR_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE)
8d08fdba
MS		 1114
1115/* Nonzero in INT_CST means that this int is negative by dint of
1116 using a twos-complement negated operand. */
1117#define TREE_NEGATED_INT(NODE) (TREE_LANG_FLAG_0 (NODE))
1118
1119/* Nonzero in any kind of _EXPR or _REF node means that it is a call
1120 to a storage allocation routine. If, later, alternate storage
1121 is found to hold the object, this call can be ignored. */
1122#define TREE_CALLS_NEW(NODE) (TREE_LANG_FLAG_1 (NODE))
1123
1124/* Nonzero in any kind of _TYPE that uses multiple inheritance
1125 or virtual baseclasses. */
1126#define TYPE_USES_COMPLEX_INHERITANCE(NODE) (TREE_LANG_FLAG_1 (NODE))
1127
a80e4195 1128#if 0 /* UNUSED */
8d2733ca
MS		 1129/* Nonzero in IDENTIFIER_NODE means that this name is not the name the user
1130 gave; it's a DECL_NESTED_TYPENAME. Someone may want to set this on
1131 mangled function names, too, but it isn't currently. */
1132#define TREE_MANGLED(NODE) (TREE_LANG_FLAG_0 (NODE))
a80e4195 1133#endif
8d2733ca 1134
7177d104 1135#if 0 /* UNUSED */
8d08fdba
MS		 1136/* Nonzero in IDENTIFIER_NODE means that this name is overloaded, and
1137 should be looked up in a non-standard way. */
73aad9b9 1138#define DECL_OVERLOADED(NODE) (FOO)
8926095f 1139#endif
8d08fdba
MS		 1140
1141/* Nonzero if this (non-TYPE)_DECL has its virtual attribute set.
1142 For a FUNCTION_DECL, this is when the function is a virtual function.
1143 For a VAR_DECL, this is when the variable is a virtual function table.
1144 For a FIELD_DECL, when the field is the field for the virtual function table.
1145 For an IDENTIFIER_NODE, nonzero if any function with this name
1146 has been declared virtual.
1147
1148 For a _TYPE if it uses virtual functions (or is derived from
1149 one that does). */
1150#define TYPE_VIRTUAL_P(NODE) (TREE_LANG_FLAG_2 (NODE))
1151
d2ad151f
PB		 1152extern int flag_new_for_scope;
1153
1154/* This flag is true of a local VAR_DECL if it was declared in a for
e92cc029 1155 statement, but we are no longer in the scope of the for. */
d2ad151f
PB		 1156#define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (NODE)
1157
1158/* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL
1159 if we already emitted a warning about using it. */
1160#define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (NODE)
1161
700f8a87 1162/* This _DECL represents a compiler-generated entity. */
863adfc0 1163#define SET_DECL_ARTIFICIAL(NODE) (DECL_ARTIFICIAL (NODE) = 1)
8d08fdba
MS		 1164
1165/* Record whether a typedef for type `int' was actually `signed int'. */
1166#define C_TYPEDEF_EXPLICITLY_SIGNED(exp) DECL_LANG_FLAG_1 ((exp))
1167
1168/* Nonzero if the type T promotes to itself.
1169 ANSI C states explicitly the list of types that promote;
1170 in particular, short promotes to int even if they have the same width. */
1171#define C_PROMOTING_INTEGER_TYPE_P(t) \
1172 (TREE_CODE ((t)) == INTEGER_TYPE \
1173 && (TYPE_MAIN_VARIANT (t) == char_type_node \
1174 || TYPE_MAIN_VARIANT (t) == signed_char_type_node \
1175 || TYPE_MAIN_VARIANT (t) == unsigned_char_type_node \
1176 || TYPE_MAIN_VARIANT (t) == short_integer_type_node \
1177 || TYPE_MAIN_VARIANT (t) == short_unsigned_type_node))
1178
2986ae00
MS		 1179#define INTEGRAL_CODE_P(CODE) \
1180 (CODE == INTEGER_TYPE || CODE == ENUMERAL_TYPE || CODE == BOOLEAN_TYPE)
1181#define ARITHMETIC_TYPE_P(TYPE) (INTEGRAL_TYPE_P (TYPE) || FLOAT_TYPE_P (TYPE))
1182
8d08fdba
MS		 1183/* Mark which labels are explicitly declared.
1184 These may be shadowed, and may be referenced from nested functions. */
1185#define C_DECLARED_LABEL_FLAG(label) TREE_LANG_FLAG_1 (label)
1186
1187/* Record whether a type or decl was written with nonconstant size.
1188 Note that TYPE_SIZE may have simplified to a constant. */
1189#define C_TYPE_VARIABLE_SIZE(type) TREE_LANG_FLAG_4 (type)
1190#define C_DECL_VARIABLE_SIZE(type) DECL_LANG_FLAG_8 (type)
1191
1192/* Nonzero for _TYPE means that the _TYPE defines
1193 at least one constructor. */
1194#define TYPE_HAS_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1(NODE))
1195
1196/* When appearing in an INDIRECT_REF, it means that the tree structure
1197 underneath is actually a call to a constructor. This is needed
1198 when the constructor must initialize local storage (which can
1199 be automatically destroyed), rather than allowing it to allocate
1200 space from the heap.
1201
1202 When appearing in a SAVE_EXPR, it means that underneath
1203 is a call to a constructor.
1204
1205 When appearing in a CONSTRUCTOR, it means that it was
1206 a GNU C constructor expression.
1207
1208 When appearing in a FIELD_DECL, it means that this field
1209 has been duly initialized in its constructor. */
1210#define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4(NODE))
1211
a3203465
MS		 1212#define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \
1213 && CONSTRUCTOR_ELTS (NODE) == NULL_TREE)
1214
eb66be0e 1215#if 0
8d08fdba
MS		 1216/* Indicates that a NON_LVALUE_EXPR came from a C++ reference.
1217 Used to generate more helpful error message in case somebody
1218 tries to take its address. */
1219#define TREE_REFERENCE_EXPR(NODE) (TREE_LANG_FLAG_3(NODE))
eb66be0e 1220#endif
8d08fdba
MS		 1221
1222/* Nonzero for _TYPE means that the _TYPE defines a destructor. */
1223#define TYPE_HAS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_2(NODE))
1224
f55c7d88 1225#if 0
8d08fdba
MS		 1226/* Nonzero for _TYPE node means that creating an object of this type
1227 will involve a call to a constructor. This can apply to objects
1228 of ARRAY_TYPE if the type of the elements needs a constructor. */
1229#define TYPE_NEEDS_CONSTRUCTING(NODE) (TYPE_LANG_FLAG_3(NODE))
f55c7d88 1230#endif
8d08fdba 1231
f30432d7
MS		 1232/* Nonzero means that an object of this type can not be initialized using
1233 an initializer list. */
1234#define CLASSTYPE_NON_AGGREGATE(NODE) \
1235 (TYPE_LANG_SPECIFIC (NODE)->type_flags.non_aggregate)
1236#define TYPE_NON_AGGREGATE_CLASS(NODE) \
1237 (IS_AGGR_TYPE (NODE) && CLASSTYPE_NON_AGGREGATE (NODE))
1238
8d08fdba
MS		 1239/* Nonzero if there is a user-defined X::op=(x&) for this class. */
1240#define TYPE_HAS_REAL_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_real_assign_ref)
1241#define TYPE_HAS_COMPLEX_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_complex_assign_ref)
f0e01782 1242#define TYPE_HAS_ABSTRACT_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_abstract_assign_ref)
8d08fdba
MS		 1243#define TYPE_HAS_COMPLEX_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.has_complex_init_ref)
1244
1245/* Nonzero for _TYPE node means that destroying an object of this type
1246 will involve a call to a destructor. This can apply to objects
1247 of ARRAY_TYPE is the type of the elements needs a destructor. */
1248#define TYPE_NEEDS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_4(NODE))
1249
e8abc66f
MS		 1250/* Nonzero for class type means that initialization of this type can use
1251 a bitwise copy. */
1252#define TYPE_HAS_TRIVIAL_INIT_REF(NODE) \
1253 (TYPE_HAS_INIT_REF (NODE) && ! TYPE_HAS_COMPLEX_INIT_REF (NODE))
1254
1255/* Nonzero for class type means that assignment of this type can use
1256 a bitwise copy. */
1257#define TYPE_HAS_TRIVIAL_ASSIGN_REF(NODE) \
1258 (TYPE_HAS_ASSIGN_REF (NODE) && ! TYPE_HAS_COMPLEX_ASSIGN_REF (NODE))
1259
c11b6f21
MS		 1260#define TYPE_PTRMEM_P(NODE) \
1261 (TREE_CODE (NODE) == POINTER_TYPE \
1262 && TREE_CODE (TREE_TYPE (NODE)) == OFFSET_TYPE)
1263#define TYPE_PTR_P(NODE) \
1264 (TREE_CODE (NODE) == POINTER_TYPE \
1265 && TREE_CODE (TREE_TYPE (NODE)) != OFFSET_TYPE)
1266#define TYPE_PTROB_P(NODE) \
1267 (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE \
1268 && TREE_CODE (TREE_TYPE (NODE)) != VOID_TYPE)
1269#define TYPE_PTROBV_P(NODE) \
1270 (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE)
1271#define TYPE_PTRFN_P(NODE) \
1272 (TREE_CODE (NODE) == POINTER_TYPE \
1273 && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE)
1274
8d08fdba 1275/* Nonzero for _TYPE node means that this type is a pointer to member
e92cc029 1276 function type. */
8d08fdba
MS		 1277#define TYPE_PTRMEMFUNC_P(NODE) (TREE_CODE(NODE) == RECORD_TYPE && TYPE_LANG_SPECIFIC(NODE)->type_flags.ptrmemfunc_flag)
1278#define TYPE_PTRMEMFUNC_FLAG(NODE) (TYPE_LANG_SPECIFIC(NODE)->type_flags.ptrmemfunc_flag)
1279/* Get the POINTER_TYPE to the METHOD_TYPE associated with this
1280 pointer to member function. TYPE_PTRMEMFUNC_P _must_ be true,
e92cc029 1281 before using this macro. */
8d08fdba
MS		 1282#define TYPE_PTRMEMFUNC_FN_TYPE(NODE) (TREE_TYPE (TYPE_FIELDS (TREE_TYPE (TREE_CHAIN (TREE_CHAIN (TYPE_FIELDS (NODE)))))))
1283/* These are use to manipulate the the canonical RECORD_TYPE from the
e92cc029 1284 hashed POINTER_TYPE, and can only be used on the POINTER_TYPE. */
8d08fdba
MS		 1285#define TYPE_GET_PTRMEMFUNC_TYPE(NODE) ((tree)TYPE_LANG_SPECIFIC(NODE))
1286#define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE) (TYPE_LANG_SPECIFIC(NODE) = ((struct lang_type *)(void*)(VALUE)))
e92cc029 1287/* These are to get the delta2 and pfn fields from a TYPE_PTRMEMFUNC_P. */
4dabb379
MS		 1288#define DELTA2_FROM_PTRMEMFUNC(NODE) (build_component_ref (build_component_ref ((NODE), pfn_or_delta2_identifier, NULL_TREE, 0), delta2_identifier, NULL_TREE, 0))
1289#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 1290
faae18ab 1291/* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was
8926095f 1292 specified in its declaration. */
8d08fdba
MS		 1293#define DECL_THIS_EXTERN(NODE) (DECL_LANG_FLAG_2(NODE))
1294
faae18ab
MS		 1295/* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was
1296 specified in its declaration. */
1297#define DECL_THIS_STATIC(NODE) (DECL_LANG_FLAG_6(NODE))
1298
8d08fdba
MS		 1299/* Nonzero for SAVE_EXPR if used to initialize a PARM_DECL. */
1300#define PARM_DECL_EXPR(NODE) (TREE_LANG_FLAG_2(NODE))
1301
1302/* Nonzero in FUNCTION_DECL means it is really an operator.
1303 Just used to communicate formatting information to dbxout.c. */
1304#define DECL_OPERATOR(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.operator_attr)
1305
1306#define ANON_UNION_P(NODE) (DECL_NAME (NODE) == 0)
1307
1308#define UNKNOWN_TYPE LANG_TYPE
1309
1310/* Define fields and accessors for nodes representing declared names. */
1311
1312#if 0
1313/* C++: A derived class may be able to directly use the virtual
1314 function table of a base class. When it does so, it may
1315 still have a decl node used to access the virtual function
1316 table (so that variables of this type can initialize their
1317 virtual function table pointers by name). When such thievery
1318 is committed, know exactly which base class's virtual function
1319 table is the one being stolen. This effectively computes the
1320 transitive closure. */
1321#define DECL_VPARENT(NODE) ((NODE)->decl.arguments)
1322#endif
1323
8d08fdba
MS		 1324#define TYPE_WAS_ANONYMOUS(NODE) (TYPE_LANG_SPECIFIC (NODE)->type_flags.was_anonymous)
1325
1326/* C++: all of these are overloaded! These apply only to TYPE_DECLs. */
1327#define DECL_FRIENDLIST(NODE) (DECL_INITIAL (NODE))
8d08fdba
MS		 1328
1329/* The DECL_ACCESS is used to record under which context
1330 special access rules apply. */
1331#define DECL_ACCESS(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.access)
1332
1333/* C++: all of these are overloaded!
1334 These apply to PARM_DECLs and VAR_DECLs. */
1335#define DECL_REFERENCE_SLOT(NODE) ((tree)(NODE)->decl.arguments)
1336#define SET_DECL_REFERENCE_SLOT(NODE,VAL) ((NODE)->decl.arguments=VAL)
1337
8d08fdba 1338/* Accessor macros for C++ template decl nodes. */
8d08fdba 1339#define DECL_TEMPLATE_PARMS(NODE) DECL_ARGUMENTS(NODE)
98c1c668
JM		 1340#define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \
1341 INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE))
1342#define DECL_NTPARMS(NODE) \
1343 TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE))
8d08fdba 1344/* For class templates. */
73aad9b9 1345#define DECL_TEMPLATE_SPECIALIZATIONS(NODE) DECL_SIZE(NODE)
8d08fdba
MS		 1346/* For function, method, class-data templates. */
1347#define DECL_TEMPLATE_RESULT(NODE) DECL_RESULT(NODE)
1348#define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX(NODE)
5566b478
MS		 1349#define DECL_TEMPLATE_INJECT(NODE) DECL_INITIAL(NODE)
1350
1351#define DECL_FUNCTION_TEMPLATE_P(NODE) \
1352 (TREE_CODE (NODE) == TEMPLATE_DECL \
1353 && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL)
1354
1355#define PRIMARY_TEMPLATE_P(NODE) \
98c1c668 1356 (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE)) == (NODE))
5566b478
MS		 1357
1358#define CLASSTYPE_TEMPLATE_LEVEL(NODE) \
1359 (TREE_INT_CST_HIGH (TREE_PURPOSE (CLASSTYPE_TI_TEMPLATE (NODE))))
8d08fdba 1360
a0a33927
MS		 1361/* Indicates whether or not (and how) a template was expanded for this
1362 FUNCTION_DECL or VAR_DECL.
1363 0=normal declaration, e.g. int min (int, int);
1364 1=implicit template instantiation
1365 2=explicit template specialization, e.g. int min<int> (int, int);
e92cc029 1366 3=explicit template instantiation, e.g. template int min<int> (int, int); */
a0a33927
MS		 1367#define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.use_template)
1368
1369#define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1)
1370#define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \
1371 (CLASSTYPE_USE_TEMPLATE (NODE) & 1)
1372
1373#define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2)
1374#define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2)
1375#define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
1376 (CLASSTYPE_USE_TEMPLATE (NODE) == 2)
1377#define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \
1378 (CLASSTYPE_USE_TEMPLATE (NODE) = 2)
1379
1380#define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1)
1381#define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1)
1382#define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
1383 (CLASSTYPE_USE_TEMPLATE(NODE) == 1)
1384#define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \
1385 (CLASSTYPE_USE_TEMPLATE(NODE) = 1)
1386
1387#define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3)
1388#define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3)
1389#define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
1390 (CLASSTYPE_USE_TEMPLATE(NODE) == 3)
1391#define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \
1392 (CLASSTYPE_USE_TEMPLATE(NODE) = 3)
7177d104 1393
73aad9b9
JM		 1394/* This function may be a guiding decl for a template. */
1395#define DECL_MAYBE_TEMPLATE(NODE) DECL_LANG_FLAG_4 (NODE)
db5ae43f 1396/* We know what we're doing with this decl now. */
e3417fcd 1397#define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE)
db5ae43f 1398
faae18ab
MS		 1399/* This function was declared inline. This flag controls the linkage
1400 semantics of 'inline'; whether or not the function is inlined is
1401 controlled by DECL_INLINE. */
1402#define DECL_THIS_INLINE(NODE) \
1403 (DECL_LANG_SPECIFIC (NODE)->decl_flags.declared_inline)
1404
1405/* DECL_EXTERNAL must be set on a decl until the decl is actually emitted,
1406 so that assemble_external will work properly. So we have this flag to
1407 tell us whether the decl is really not external. */
1408#define DECL_NOT_REALLY_EXTERN(NODE) \
1409 (DECL_LANG_SPECIFIC (NODE)->decl_flags.not_really_extern)
db5ae43f 1410
6b5fbb55
MS		 1411#define DECL_REALLY_EXTERN(NODE) \
1412 (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE))
1413
77be6f82
JM		 1414/* Used to tell cp_finish_decl that it should approximate comdat linkage
1415 as best it can for this decl. */
1416#define DECL_COMDAT(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.comdat)
1417
39211cd5 1418#define THUNK_DELTA(DECL) ((DECL)->decl.frame_size.i)
8926095f 1419
8d08fdba
MS		 1420/* ...and for unexpanded-parameterized-type nodes. */
1421#define UPT_TEMPLATE(NODE) TREE_PURPOSE(TYPE_VALUES(NODE))
1422#define UPT_PARMS(NODE) TREE_VALUE(TYPE_VALUES(NODE))
1423
42976354
BK		 1424/* An un-parsed default argument looks like an identifier. */
1425#define DEFARG_LENGTH(NODE) IDENTIFIER_LENGTH(NODE)
1426#define DEFARG_POINTER(NODE) IDENTIFIER_POINTER(NODE)
1427
72b7eeff 1428#define builtin_function(NAME, TYPE, CODE, LIBNAME) \
49c249e1 1429 define_function (NAME, TYPE, CODE, (void (*) PROTO((tree)))pushdecl, LIBNAME)
72b7eeff 1430
8d08fdba
MS		 1431/* An enumeration of the kind of tags that C++ accepts. */
1432enum tag_types { record_type, class_type, union_type, enum_type,
db5ae43f 1433 signature_type };
8d08fdba
MS		 1434
1435/* Zero means prototype weakly, as in ANSI C (no args means nothing).
1436 Each language context defines how this variable should be set. */
1437extern int strict_prototype;
1438extern int strict_prototypes_lang_c, strict_prototypes_lang_cplusplus;
1439
1440/* Non-zero means that if a label exists, and no other identifier
1441 applies, use the value of the label. */
1442extern int flag_labels_ok;
1443
1444/* Non-zero means to collect statistics which might be expensive
1445 and to print them when we are done. */
1446extern int flag_detailed_statistics;
1447
1448/* Non-zero means warn in function declared in derived class has the
1449 same name as a virtual in the base class, but fails to match the
1450 type signature of any virtual function in the base class. */
1451extern int warn_overloaded_virtual;
1452
1453/* in c-common.c */
1454extern void declare_function_name PROTO((void));
820b778a 1455extern void decl_attributes PROTO((tree, tree, tree));
8d08fdba
MS		 1456extern void init_function_format_info PROTO((void));
1457extern void record_function_format PROTO((tree, tree, int, int, int));
1458extern void check_function_format PROTO((tree, tree, tree));
1459/* Print an error message for invalid operands to arith operation CODE.
1460 NOP_EXPR is used as a special case (see truthvalue_conversion). */
1461extern void binary_op_error PROTO((enum tree_code));
f376e137 1462extern tree cp_build_type_variant PROTO((tree, int, int));
8d08fdba
MS		 1463extern void c_expand_expr_stmt PROTO((tree));
1464/* Validate the expression after `case' and apply default promotions. */
1465extern tree check_case_value PROTO((tree));
1466/* Concatenate a list of STRING_CST nodes into one STRING_CST. */
1467extern tree combine_strings PROTO((tree));
1468extern void constant_expression_warning PROTO((tree));
1469extern tree convert_and_check PROTO((tree, tree));
1470extern void overflow_warning PROTO((tree));
1471extern void unsigned_conversion_warning PROTO((tree, tree));
1472/* Read the rest of the current #-directive line. */
da20811c 1473extern char *get_directive_line PROTO((FILE *));
8d08fdba
MS		 1474/* Subroutine of build_binary_op, used for comparison operations.
1475 See if the operands have both been converted from subword integer types
1476 and, if so, perhaps change them both back to their original type. */
1477extern tree shorten_compare PROTO((tree *, tree *, tree *, enum tree_code *));
1478/* Prepare expr to be an argument of a TRUTH_NOT_EXPR,
e92cc029 1479 or validate its data type for an `if' or `while' statement or ?..: exp. */
8d08fdba
MS		 1480extern tree truthvalue_conversion PROTO((tree));
1481extern tree type_for_mode PROTO((enum machine_mode, int));
1482extern tree type_for_size PROTO((unsigned, int));
1483
51c184be 1484/* in decl{2}.c */
8d08fdba
MS		 1485extern tree void_list_node;
1486extern tree void_zero_node;
1487extern tree default_function_type;
1488extern tree vtable_entry_type;
1489extern tree sigtable_entry_type;
db5ae43f 1490extern tree __t_desc_type_node;
5566b478 1491#if 0
db5ae43f 1492extern tree __tp_desc_type_node;
5566b478 1493#endif
db5ae43f
MS		 1494extern tree __access_mode_type_node;
1495extern tree __bltn_desc_type_node, __user_desc_type_node;
1496extern tree __class_desc_type_node, __attr_desc_type_node;
1497extern tree __ptr_desc_type_node, __func_desc_type_node;
1498extern tree __ptmf_desc_type_node, __ptmd_desc_type_node;
1499extern tree type_info_type_node;
8d08fdba
MS		 1500extern tree class_star_type_node;
1501extern tree this_identifier;
fc378698 1502extern tree ctor_identifier, dtor_identifier;
8d08fdba
MS		 1503extern tree pfn_identifier;
1504extern tree index_identifier;
1505extern tree delta_identifier;
1506extern tree delta2_identifier;
1507extern tree pfn_or_delta2_identifier;
46b49f6c 1508extern tree tag_identifier;
4abea095 1509extern tree vt_off_identifier;
8d08fdba
MS		 1510
1511/* A node that is a list (length 1) of error_mark_nodes. */
1512extern tree error_mark_list;
1513
bd6dd845 1514extern tree ptr_type_node;
8d08fdba 1515extern tree class_type_node, record_type_node, union_type_node, enum_type_node;
db5ae43f 1516extern tree unknown_type_node;
8d08fdba
MS		 1517extern tree opaque_type_node, signature_type_node;
1518
700f8a87 1519/* Node for "pointer to (virtual) function".
e92cc029 1520 This may be distinct from ptr_type_node so gdb can distinguish them. */
700f8a87
MS		 1521#define vfunc_ptr_type_node \
1522 (flag_vtable_thunks ? vtable_entry_type : ptr_type_node)
1523
8d08fdba
MS		 1524/* Array type `(void *)[]' */
1525extern tree vtbl_type_node;
1526extern tree delta_type_node;
6633d636 1527extern tree std_node;
8d08fdba
MS		 1528
1529extern tree long_long_integer_type_node, long_long_unsigned_type_node;
1530/* For building calls to `delete'. */
1531extern tree integer_two_node, integer_three_node;
28ed4616 1532extern tree boolean_type_node, boolean_true_node, boolean_false_node;
8d08fdba 1533
d11ad92e
MS		 1534extern tree null_node;
1535
51c184be 1536/* in pt.c */
5566b478
MS		 1537
1538extern tree current_template_parms;
1539extern HOST_WIDE_INT processing_template_decl;
8d08fdba
MS		 1540
1541/* The template currently being instantiated, and where the instantiation
1542 was triggered. */
1543struct tinst_level
1544{
5566b478 1545 tree decl;
8d08fdba
MS		 1546 int line;
1547 char *file;
1548 struct tinst_level *next;
1549};
1550
5566b478
MS		 1551extern int minimal_parse_mode;
1552
51c184be 1553/* in class.c */
8d08fdba
MS		 1554extern tree current_class_name;
1555extern tree current_class_type;
824b9a4c 1556extern tree current_class_ptr;
8d08fdba 1557extern tree previous_class_type;
824b9a4c 1558extern tree current_class_ref;
8d08fdba
MS		 1559
1560extern tree current_lang_name, lang_name_cplusplus, lang_name_c;
1561
1562/* Points to the name of that function. May not be the DECL_NAME
1563 of CURRENT_FUNCTION_DECL due to overloading */
1564extern tree original_function_name;
1565
51c184be 1566/* in init.c */
8d08fdba
MS		 1567extern tree global_base_init_list;
1568extern tree current_base_init_list, current_member_init_list;
1569
8d08fdba
MS		 1570extern int current_function_just_assigned_this;
1571extern int current_function_parms_stored;
1572\f
1573/* Here's where we control how name mangling takes place. */
1574
1575#define OPERATOR_ASSIGN_FORMAT "__a%s"
1576#define OPERATOR_FORMAT "__%s"
1577#define OPERATOR_TYPENAME_FORMAT "__op"
1578#define OPERATOR_TYPENAME_P(ID_NODE) \
1579 (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \
1580 && IDENTIFIER_POINTER (ID_NODE)[1] == '_' \
1581 && IDENTIFIER_POINTER (ID_NODE)[2] == 'o' \
1582 && IDENTIFIER_POINTER (ID_NODE)[3] == 'p')
1583
1584
1585/* Cannot use '$' up front, because this confuses gdb
1586 (names beginning with '$' are gdb-local identifiers).
1587
1588 Note that all forms in which the '$' is significant are long enough
1589 for direct indexing (meaning that if we know there is a '$'
1590 at a particular location, we can index into the string at
1591 any other location that provides distinguishing characters). */
1592
1593/* Define NO_DOLLAR_IN_LABEL in your favorite tm file if your assembler
1594 doesn't allow '$' in symbol names. */
1595#ifndef NO_DOLLAR_IN_LABEL
1596
1597#define JOINER '$'
1598
1599#define VPTR_NAME "$v"
1600#define THROW_NAME "$eh_throw"
1601#define DESTRUCTOR_DECL_PREFIX "_$_"
1602#define AUTO_VTABLE_NAME "__vtbl$me__"
1603#define AUTO_TEMP_NAME "_$tmp_"
1604#define AUTO_TEMP_FORMAT "_$tmp_%d"
1605#define VTABLE_BASE "$vb"
a0a33927 1606#define VTABLE_NAME_FORMAT (flag_vtable_thunks ? "__vt_%s" : "_vt$%s")
8d08fdba
MS		 1607#define VFIELD_BASE "$vf"
1608#define VFIELD_NAME "_vptr$"
1609#define VFIELD_NAME_FORMAT "_vptr$%s"
1610#define VBASE_NAME "_vb$"
1611#define VBASE_NAME_FORMAT "_vb$%s"
1612#define STATIC_NAME_FORMAT "_%s$%s"
1613#define ANON_AGGRNAME_FORMAT "$_%d"
1614
1615#else /* NO_DOLLAR_IN_LABEL */
1616
1617#ifndef NO_DOT_IN_LABEL
1618
1619#define JOINER '.'
1620
1621#define VPTR_NAME ".v"
1622#define THROW_NAME ".eh_throw"
1623#define DESTRUCTOR_DECL_PREFIX "_._"
1624#define AUTO_VTABLE_NAME "__vtbl.me__"
1625#define AUTO_TEMP_NAME "_.tmp_"
1626#define AUTO_TEMP_FORMAT "_.tmp_%d"
1627#define VTABLE_BASE ".vb"
a0a33927 1628#define VTABLE_NAME_FORMAT (flag_vtable_thunks ? "__vt_%s" : "_vt.%s")
8d08fdba
MS		 1629#define VFIELD_BASE ".vf"
1630#define VFIELD_NAME "_vptr."
1631#define VFIELD_NAME_FORMAT "_vptr.%s"
1632#define VBASE_NAME "_vb."
1633#define VBASE_NAME_FORMAT "_vb.%s"
1634#define STATIC_NAME_FORMAT "_%s.%s"
1635
1636#define ANON_AGGRNAME_FORMAT "._%d"
1637
1638#else /* NO_DOT_IN_LABEL */
1639
1640#define VPTR_NAME "__vptr"
1641#define VPTR_NAME_P(ID_NODE) \
1642 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VPTR_NAME, sizeof (VPTR_NAME) - 1))
1643#define THROW_NAME "__eh_throw"
1644#define DESTRUCTOR_DECL_PREFIX "__destr_"
1645#define DESTRUCTOR_NAME_P(ID_NODE) \
1646 (!strncmp (IDENTIFIER_POINTER (ID_NODE), DESTRUCTOR_DECL_PREFIX, \
1647 sizeof (DESTRUCTOR_DECL_PREFIX) - 1))
1648#define IN_CHARGE_NAME "__in_chrg"
1649#define AUTO_VTABLE_NAME "__vtbl_me__"
1650#define AUTO_TEMP_NAME "__tmp_"
1651#define TEMP_NAME_P(ID_NODE) \
1652 (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \
1653 sizeof (AUTO_TEMP_NAME) - 1))
1654#define AUTO_TEMP_FORMAT "__tmp_%d"
1655#define VTABLE_BASE "__vtb"
1656#define VTABLE_NAME "__vt_"
a0a33927 1657#define VTABLE_NAME_FORMAT (flag_vtable_thunks ? "__vt_%s" : "_vt_%s")
8d08fdba
MS		 1658#define VTABLE_NAME_P(ID_NODE) \
1659 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \
1660 sizeof (VTABLE_NAME) - 1))
1661#define VFIELD_BASE "__vfb"
1662#define VFIELD_NAME "__vptr_"
1663#define VFIELD_NAME_P(ID_NODE) \
1664 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \
1665 sizeof (VFIELD_NAME) - 1))
1666#define VFIELD_NAME_FORMAT "_vptr_%s"
1667#define VBASE_NAME "__vb_"
1668#define VBASE_NAME_P(ID_NODE) \
1669 (!strncmp (IDENTIFIER_POINTER (ID_NODE), VBASE_NAME, \
1670 sizeof (VBASE_NAME) - 1))
1671#define VBASE_NAME_FORMAT "__vb_%s"
1672#define STATIC_NAME_FORMAT "__static_%s_%s"
1673
1674#define ANON_AGGRNAME_PREFIX "__anon_"
1675#define ANON_AGGRNAME_P(ID_NODE) \
1676 (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \
1677 sizeof (ANON_AGGRNAME_PREFIX) - 1))
1678#define ANON_AGGRNAME_FORMAT "__anon_%d"
1679#define ANON_PARMNAME_FORMAT "__%d"
1680#define ANON_PARMNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \
1681 && IDENTIFIER_POINTER (ID_NODE)[1] == '_' \
1682 && IDENTIFIER_POINTER (ID_NODE)[2] <= '9')
1683
1684#endif /* NO_DOT_IN_LABEL */
1685#endif /* NO_DOLLAR_IN_LABEL */
1686
1687#define THIS_NAME "this"
1688#define DESTRUCTOR_NAME_FORMAT "~%s"
1689#define FILE_FUNCTION_PREFIX_LEN 9
fc378698
MS		 1690#define CTOR_NAME "__ct"
1691#define DTOR_NAME "__dt"
8d08fdba
MS		 1692
1693#define IN_CHARGE_NAME "__in_chrg"
1694
1695#define VTBL_PTR_TYPE "__vtbl_ptr_type"
1696#define VTABLE_DELTA_NAME "__delta"
1697#define VTABLE_INDEX_NAME "__index"
1698#define VTABLE_PFN_NAME "__pfn"
1699#define VTABLE_DELTA2_NAME "__delta2"
1700
1701#define SIGNATURE_FIELD_NAME "__s_"
1702#define SIGNATURE_FIELD_NAME_FORMAT "__s_%s"
1703#define SIGNATURE_OPTR_NAME "__optr"
1704#define SIGNATURE_SPTR_NAME "__sptr"
8d08fdba
MS		 1705#define SIGNATURE_POINTER_NAME "__sp_"
1706#define SIGNATURE_POINTER_NAME_FORMAT "__%s%ssp_%s"
1707#define SIGNATURE_REFERENCE_NAME "__sr_"
1708#define SIGNATURE_REFERENCE_NAME_FORMAT "__%s%ssr_%s"
1709
1710#define SIGTABLE_PTR_TYPE "__sigtbl_ptr_type"
1711#define SIGTABLE_NAME_FORMAT "__st_%s_%s"
1712#define SIGTABLE_NAME_FORMAT_LONG "__st_%s_%s_%d"
46b49f6c 1713#define SIGTABLE_TAG_NAME "__tag"
4abea095
GB		 1714#define SIGTABLE_VB_OFF_NAME "__vb_off"
1715#define SIGTABLE_VT_OFF_NAME "__vt_off"
8d08fdba
MS		 1716#define EXCEPTION_CLEANUP_NAME "exception cleanup"
1717
1718#define THIS_NAME_P(ID_NODE) (strcmp(IDENTIFIER_POINTER (ID_NODE), "this") == 0)
1719
1720#if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL)
1721
1722#define VPTR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
1723 && IDENTIFIER_POINTER (ID_NODE)[1] == 'v')
1724#define DESTRUCTOR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == JOINER \
1725 && IDENTIFIER_POINTER (ID_NODE)[2] == '_')
1726
1727#define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
1728 && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \
1729 && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
1730
1731#define VBASE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \
1732 && IDENTIFIER_POINTER (ID_NODE)[2] == 'b' \
1733 && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER)
1734
1735#define TEMP_NAME_P(ID_NODE) (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1))
1736#define VFIELD_NAME_P(ID_NODE) (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1))
1737
1738/* For anonymous aggregate types, we need some sort of name to
1739 hold on to. In practice, this should not appear, but it should
1740 not be harmful if it does. */
1741#define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \
1742 && IDENTIFIER_POINTER (ID_NODE)[1] == '_')
1743#define ANON_PARMNAME_FORMAT "_%d"
1744#define ANON_PARMNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \
1745 && IDENTIFIER_POINTER (ID_NODE)[1] <= '9')
1746#endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */
1747\f
1748/* Define the sets of attributes that member functions and baseclasses
1749 can have. These are sensible combinations of {public,private,protected}
1750 cross {virtual,non-virtual}. */
1751
e92cc029 1752/* in class.c. */
be99da77
MS		 1753extern tree access_default_node; /* 0 */
1754extern tree access_public_node; /* 1 */
1755extern tree access_protected_node; /* 2 */
1756extern tree access_private_node; /* 3 */
1757extern tree access_default_virtual_node; /* 4 */
1758extern tree access_public_virtual_node; /* 5 */
1759extern tree access_private_virtual_node; /* 6 */
8d08fdba 1760
8d08fdba
MS		 1761/* Things for handling inline functions. */
1762
1763struct pending_inline
1764{
1765 struct pending_inline *next; /* pointer to next in chain */
1766 int lineno; /* line number we got the text from */
1767 char *filename; /* name of file we were processing */
1768 tree fndecl; /* FUNCTION_DECL that brought us here */
1769 int token; /* token we were scanning */
1770 int token_value; /* value of token we were scanning (YYSTYPE) */
1771
1772 char *buf; /* pointer to character stream */
1773 int len; /* length of stream */
8d08fdba
MS		 1774 unsigned int can_free : 1; /* free this after we're done with it? */
1775 unsigned int deja_vu : 1; /* set iff we don't want to see it again. */
1776 unsigned int interface : 2; /* 0=interface 1=unknown 2=implementation */
1777};
1778
51c184be 1779/* in method.c */
8d08fdba
MS		 1780extern struct pending_inline *pending_inlines;
1781
1782/* 1 for -fall-virtual: make every member function (except
1783 constructors) lay down in the virtual function table.
1784 Calls can then either go through the virtual function table or not,
1785 depending on whether we know what function will actually be called. */
1786
1787extern int flag_all_virtual;
1788
1789/* Positive values means that we cannot make optimizing assumptions about
1790 `this'. Negative values means we know `this' to be of static type. */
1791
1792extern int flag_this_is_variable;
1793
1794/* Controls whether enums and ints freely convert.
1795 1 means with complete freedom.
1796 0 means enums can convert to ints, but not vice-versa. */
1797
1798extern int flag_int_enum_equivalence;
1799
db5ae43f 1800/* Nonzero means generate 'rtti' that give run-time type information. */
8d08fdba 1801
db5ae43f 1802extern int flag_rtti;
8d08fdba 1803
a0a33927
MS		 1804/* Nonzero means do emit exported implementations of functions even if
1805 they can be inlined. */
1806
1807extern int flag_implement_inlines;
1808
8d08fdba
MS		 1809/* Nonzero means templates obey #pragma interface and implementation. */
1810
1811extern int flag_external_templates;
1812
1813/* Nonzero means templates are emitted where they are instantiated. */
1814
1815extern int flag_alt_external_templates;
1816
ddd5a7c1 1817/* Nonzero means implicit template instantiations are emitted. */
a0a33927
MS		 1818
1819extern int flag_implicit_templates;
1820
72b7eeff
MS		 1821/* Nonzero if we want to emit defined symbols with common-like linkage as
1822 weak symbols where possible, in order to conform to C++ semantics.
1823 Otherwise, emit them as local symbols. */
1824
1825extern int flag_weak;
1826
5566b478
MS		 1827/* Nonzero if we're done parsing and into end-of-file activities. */
1828
1829extern int at_eof;
1830
8d08fdba
MS		 1831enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, OP_FLAG, TYPENAME_FLAG };
1832
8d08fdba
MS		 1833/* The following two can be derived from the previous one */
1834extern tree current_class_name; /* IDENTIFIER_NODE: name of current class */
1835extern tree current_class_type; /* _TYPE: the type of the current class */
1836
1837/* Some macros for char-based bitfields. */
1838#define B_SET(a,x) (a[x>>3] |= (1 << (x&7)))
1839#define B_CLR(a,x) (a[x>>3] &= ~(1 << (x&7)))
1840#define B_TST(a,x) (a[x>>3] & (1 << (x&7)))
1841
1842/* These are uses as bits in flags passed to build_method_call
1843 to control its error reporting behavior.
1844
1845 LOOKUP_PROTECT means flag access violations.
1846 LOOKUP_COMPLAIN mean complain if no suitable member function
1847 matching the arguments is found.
1848 LOOKUP_NORMAL is just a combination of these two.
8d08fdba
MS		 1849 LOOKUP_NONVIRTUAL means make a direct call to the member function found
1850 LOOKUP_GLOBAL means search through the space of overloaded functions,
1851 as well as the space of member functions.
1852 LOOKUP_HAS_IN_CHARGE means that the "in charge" variable is already
1853 in the parameter list.
6060a796 1854 LOOKUP_ONLYCONVERTING means that non-conversion constructors are not tried.
9a3b49ac
MS		 1855 DIRECT_BIND means that if a temporary is created, it should be created so
1856 that it lives as long as the current variable bindings; otherwise it
1857 only lives until the end of the complete-expression.
878cd289
MS		 1858 LOOKUP_SPECULATIVELY means return NULL_TREE if we cannot find what we are
1859 after. Note, LOOKUP_COMPLAIN is checked and error messages printed
1860 before LOOKUP_SPECULATIVELY is checked.
8d08fdba
MS		 1861 LOOKUP_NO_CONVERSION means that user-defined conversions are not
1862 permitted. Built-in conversions are permitted.
c73964b2
MS		 1863 LOOKUP_DESTRUCTOR means explicit call to destructor.
1864 LOOKUP_NO_TEMP_BIND means temporaries will not be bound to references. */
8d08fdba
MS		 1865
1866#define LOOKUP_PROTECT (1)
1867#define LOOKUP_COMPLAIN (2)
1868#define LOOKUP_NORMAL (3)
4ac14744 1869/* #define LOOKUP_UNUSED (4) */
8d08fdba
MS		 1870#define LOOKUP_NONVIRTUAL (8)
1871#define LOOKUP_GLOBAL (16)
1872#define LOOKUP_HAS_IN_CHARGE (32)
1873#define LOOKUP_SPECULATIVELY (64)
db5ae43f 1874#define LOOKUP_ONLYCONVERTING (128)
9a3b49ac 1875#define DIRECT_BIND (256)
8d08fdba
MS		 1876#define LOOKUP_NO_CONVERSION (512)
1877#define LOOKUP_DESTRUCTOR (512)
c73964b2 1878#define LOOKUP_NO_TEMP_BIND (1024)
8d08fdba 1879
a4443a08
MS		 1880/* These flags are used by the conversion code.
1881 CONV_IMPLICIT : Perform implicit conversions (standard and user-defined).
1882 CONV_STATIC : Perform the explicit conversions for static_cast.
1883 CONV_CONST : Perform the explicit conversions for const_cast.
1884 CONV_REINTERPRET: Perform the explicit conversions for reinterpret_cast.
6060a796 1885 CONV_PRIVATE : Perform upcasts to private bases.
8ccc31eb
MS		 1886 CONV_FORCE_TEMP : Require a new temporary when converting to the same
1887 aggregate type. */
a4443a08
MS		 1888
1889#define CONV_IMPLICIT 1
1890#define CONV_STATIC 2
1891#define CONV_CONST 4
1892#define CONV_REINTERPRET 8
1893#define CONV_PRIVATE 16
faf5394a 1894/* #define CONV_NONCONVERTING 32 */
8ccc31eb
MS		 1895#define CONV_FORCE_TEMP 64
1896#define CONV_STATIC_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_FORCE_TEMP)
a4443a08
MS		 1897#define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
1898 | CONV_REINTERPRET)
1899#define CONV_C_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \
8ccc31eb 1900 | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP)
a4443a08 1901
b7484fbe
MS		 1902/* Used by build_expr_type_conversion to indicate which types are
1903 acceptable as arguments to the expression under consideration. */
1904
1905#define WANT_INT 1 /* integer types, including bool */
1906#define WANT_FLOAT 2 /* floating point types */
1907#define WANT_ENUM 4 /* enumerated types */
1908#define WANT_POINTER 8 /* pointer types */
1909#define WANT_NULL 16 /* null pointer constant */
1910
1911#define WANT_ARITH (WANT_INT | WANT_FLOAT)
1912
8d08fdba
MS		 1913/* Anatomy of a DECL_FRIENDLIST (which is a TREE_LIST):
1914 purpose = friend name (IDENTIFIER_NODE);
1915 value = TREE_LIST of FUNCTION_DECLS;
1916 chain, type = EMPTY; */
1917#define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST))
1918#define FRIEND_DECLS(LIST) (TREE_VALUE (LIST))
1919
1920/* These macros are for accessing the fields of TEMPLATE...PARM nodes. */
5566b478
MS		 1921#define TEMPLATE_TYPE_IDX(NODE) TREE_INT_CST_LOW (TYPE_FIELDS (NODE))
1922#define TEMPLATE_TYPE_LEVEL(NODE) TREE_INT_CST_HIGH (TYPE_FIELDS (NODE))
1923#define TEMPLATE_TYPE_SET_INFO(NODE,I,L) \
1924 (TYPE_FIELDS (NODE) = build_int_2 (I, L))
1925#define TEMPLATE_CONST_IDX(NODE) (TREE_INT_CST_LOW(NODE))
1926#define TEMPLATE_CONST_LEVEL(NODE) (TREE_INT_CST_HIGH(NODE))
1927#define TEMPLATE_CONST_SET_INFO(NODE,I,L) \
1928 (TEMPLATE_CONST_IDX (NODE) = I, TEMPLATE_CONST_LEVEL (NODE) = L)
8d08fdba 1929
51c184be 1930/* in lex.c */
8d08fdba
MS		 1931/* Indexed by TREE_CODE, these tables give C-looking names to
1932 operators represented by TREE_CODES. For example,
1933 opname_tab[(int) MINUS_EXPR] == "-". */
1934extern char **opname_tab, **assignop_tab;
1935\f
51c184be 1936/* in call.c */
faf5394a 1937extern struct candidate *ansi_c_filler;
824b9a4c 1938extern int get_arglist_len_in_bytes PROTO((tree));
8d08fdba
MS		 1939
1940extern int rank_for_overload PROTO((struct candidate *, struct candidate *));
1941extern void compute_conversion_costs PROTO((tree, tree, struct candidate *, int));
8d08fdba 1942extern tree build_vfield_ref PROTO((tree, tree));
8d08fdba
MS		 1943extern tree resolve_scope_to_name PROTO((tree, tree));
1944extern tree build_scoped_method_call PROTO((tree, tree, tree, tree));
824b9a4c
MS		 1945extern tree build_addr_func PROTO((tree));
1946extern tree build_call PROTO((tree, tree, tree));
8d08fdba
MS		 1947extern tree build_method_call PROTO((tree, tree, tree, tree, int));
1948extern tree build_overload_call_real PROTO((tree, tree, int, struct candidate *, int));
ce122a86 1949extern tree build_overload_call PROTO((tree, tree, int));
824b9a4c
MS		 1950extern int null_ptr_cst_p PROTO((tree));
1951extern tree type_decays_to PROTO((tree));
faf5394a 1952extern tree build_user_type_conversion PROTO((tree, tree, int));
9babbf20 1953extern tree build_new_function_call PROTO((tree, tree));
c73964b2 1954extern tree build_new_op PROTO((enum tree_code, int, tree, tree, tree));
da4768fe
JM		 1955extern tree build_op_new_call PROTO((enum tree_code, tree, tree, int));
1956extern tree build_op_delete_call PROTO((enum tree_code, tree, tree, int));
824b9a4c
MS		 1957extern int can_convert PROTO((tree, tree));
1958extern int can_convert_arg PROTO((tree, tree, tree));
8d08fdba 1959
51c184be 1960/* in class.c */
8d08fdba 1961extern tree build_vbase_path PROTO((enum tree_code, tree, tree, tree, int));
6b5fbb55 1962extern tree build_vtbl_ref PROTO((tree, tree));
8d08fdba
MS		 1963extern tree build_vfn_ref PROTO((tree *, tree, tree));
1964extern void add_method PROTO((tree, tree *, tree));
51c184be 1965extern tree get_vfield_offset PROTO((tree));
8d08fdba 1966extern void duplicate_tag_error PROTO((tree));
2ee887f2 1967extern tree finish_struct PROTO((tree, tree, tree, int));
6467930b 1968extern tree finish_struct_1 PROTO((tree, int));
5566b478 1969extern tree finish_struct_methods PROTO((tree, tree, int));
8d08fdba
MS		 1970extern int resolves_to_fixed_type_p PROTO((tree, int *));
1971extern void init_class_processing PROTO((void));
1972extern void pushclass PROTO((tree, int));
1973extern void popclass PROTO((int));
1974extern void push_nested_class PROTO((tree, int));
1975extern void pop_nested_class PROTO((int));
1976extern void push_lang_context PROTO((tree));
1977extern void pop_lang_context PROTO((void));
8d08fdba
MS		 1978extern tree instantiate_type PROTO((tree, tree, int));
1979extern void print_class_statistics PROTO((void));
1980extern void maybe_push_cache_obstack PROTO((void));
f30432d7 1981extern unsigned HOST_WIDE_INT skip_rtti_stuff PROTO((tree *));
c91a56d2 1982extern tree build_self_reference PROTO((void));
49c249e1 1983extern void warn_hidden PROTO((tree));
8d08fdba 1984
51c184be 1985/* in cvt.c */
a4443a08 1986extern tree convert_to_reference PROTO((tree, tree, int, int, tree));
8d08fdba
MS		 1987extern tree convert_from_reference PROTO((tree));
1988extern tree convert_to_aggr PROTO((tree, tree, char **, int));
8d08fdba 1989extern tree convert_pointer_to_real PROTO((tree, tree));
824b9a4c 1990extern tree convert_pointer_to PROTO((tree, tree));
37c46b43
MS		 1991extern tree ocp_convert PROTO((tree, tree, int, int));
1992extern tree cp_convert PROTO((tree, tree));
824b9a4c 1993extern tree convert PROTO((tree, tree));
6060a796 1994extern tree convert_force PROTO((tree, tree, int));
8d08fdba 1995extern tree build_type_conversion PROTO((enum tree_code, tree, tree, int));
b7484fbe 1996extern tree build_expr_type_conversion PROTO((int, tree, int));
8d08fdba 1997extern int build_default_binary_type_conversion PROTO((enum tree_code, tree *, tree *));
39211cd5 1998extern tree type_promotes_to PROTO((tree));
8d08fdba 1999
51c184be 2000/* decl.c */
824b9a4c 2001/* resume_binding_level */
8d08fdba 2002extern int global_bindings_p PROTO((void));
a9aedbc2 2003extern int toplevel_bindings_p PROTO((void));
8d08fdba
MS		 2004extern void keep_next_level PROTO((void));
2005extern int kept_level_p PROTO((void));
2006extern void declare_parm_level PROTO((void));
8d08fdba
MS		 2007extern void declare_pseudo_global_level PROTO((void));
2008extern int pseudo_global_level_p PROTO((void));
824b9a4c 2009extern void set_class_shadows PROTO((tree));
8d08fdba 2010extern void pushlevel PROTO((int));
824b9a4c 2011extern void note_level_for_for PROTO((void));
8d08fdba
MS		 2012extern void pushlevel_temporary PROTO((int));
2013extern tree poplevel PROTO((int, int, int));
49c249e1 2014extern void resume_level PROTO((struct binding_level *));
8d08fdba
MS		 2015extern void delete_block PROTO((tree));
2016extern void insert_block PROTO((tree));
2017extern void add_block_current_level PROTO((tree));
2018extern void set_block PROTO((tree));
2019extern void pushlevel_class PROTO((void));
700f8a87 2020extern tree poplevel_class PROTO((int));
8d08fdba 2021extern void print_binding_stack PROTO((void));
49c249e1 2022extern void print_binding_level PROTO((struct binding_level *));
824b9a4c
MS		 2023extern void push_namespace PROTO((tree));
2024extern void pop_namespace PROTO((void));
2025extern void maybe_push_to_top_level PROTO((int));
8d08fdba
MS		 2026extern void push_to_top_level PROTO((void));
2027extern void pop_from_top_level PROTO((void));
2028extern void set_identifier_type_value PROTO((tree, tree));
8926095f 2029extern void pop_everything PROTO((void));
8d08fdba
MS		 2030extern void pushtag PROTO((tree, tree, int));
2031extern tree make_anon_name PROTO((void));
2032extern void clear_anon_tags PROTO((void));
824b9a4c
MS		 2033extern int decls_match PROTO((tree, tree));
2034extern int duplicate_decls PROTO((tree, tree));
8d08fdba
MS		 2035extern tree pushdecl PROTO((tree));
2036extern tree pushdecl_top_level PROTO((tree));
8d08fdba 2037extern tree pushdecl_class_level PROTO((tree));
bd6dd845 2038#if 0
5566b478 2039extern void pushdecl_nonclass_level PROTO((tree));
bd6dd845 2040#endif
824b9a4c 2041extern void push_class_level_binding PROTO((tree, tree));
8d08fdba 2042extern int overloaded_globals_p PROTO((tree));
8d08fdba
MS		 2043extern tree implicitly_declare PROTO((tree));
2044extern tree lookup_label PROTO((tree));
2045extern tree shadow_label PROTO((tree));
2046extern tree define_label PROTO((char *, int, tree));
824b9a4c
MS		 2047extern void push_switch PROTO((void));
2048extern void pop_switch PROTO((void));
8d08fdba
MS		 2049extern void define_case_label PROTO((tree));
2050extern tree getdecls PROTO((void));
2051extern tree gettags PROTO((void));
bd6dd845 2052#if 0
8d08fdba 2053extern void set_current_level_tags_transparency PROTO((int));
bd6dd845 2054#endif
a9aedbc2 2055extern tree lookup_namespace_name PROTO((tree, tree));
824b9a4c
MS		 2056extern tree make_typename_type PROTO((tree, tree));
2057extern tree lookup_name_nonclass PROTO((tree));
2058extern tree lookup_name PROTO((tree, int));
8d08fdba 2059extern tree lookup_name_current_level PROTO((tree));
824b9a4c 2060extern tree auto_function PROTO((tree, tree, enum built_in_function));
8d08fdba 2061extern void init_decl_processing PROTO((void));
5566b478 2062extern int init_type_desc PROTO((void));
49c249e1
JM		 2063extern tree define_function
2064 PROTO((char *, tree, enum built_in_function,
2065 void (*) (tree), char *));
8d08fdba 2066extern void shadow_tag PROTO((tree));
8d08fdba 2067extern tree groktypename PROTO((tree));
c11b6f21 2068extern tree start_decl PROTO((tree, tree, int));
824b9a4c 2069extern void start_decl_1 PROTO((tree));
b3417a04 2070extern void cp_finish_decl PROTO((tree, tree, tree, int, int));
824b9a4c 2071extern void finish_decl PROTO((tree, tree, tree));
8d08fdba
MS		 2072extern void expand_static_init PROTO((tree, tree));
2073extern int complete_array_type PROTO((tree, tree, int));
2074extern tree build_ptrmemfunc_type PROTO((tree));
f30432d7 2075/* the grokdeclarator prototype is in decl.h */
8926095f 2076extern int parmlist_is_exprlist PROTO((tree));
824b9a4c
MS		 2077extern int copy_args_p PROTO((tree));
2078extern int grok_ctor_properties PROTO((tree, tree));
2079extern void grok_op_properties PROTO((tree, int, int));
8d08fdba 2080extern tree xref_tag PROTO((tree, tree, tree, int));
fc378698 2081extern tree xref_tag_from_type PROTO((tree, tree, int));
8ccc31eb 2082extern void xref_basetypes PROTO((tree, tree, tree, tree));
8d08fdba
MS		 2083extern tree start_enum PROTO((tree));
2084extern tree finish_enum PROTO((tree, tree));
2085extern tree build_enumerator PROTO((tree, tree));
2086extern tree grok_enum_decls PROTO((tree, tree));
c11b6f21 2087extern int start_function PROTO((tree, tree, tree, int));
824b9a4c 2088extern void store_after_parms PROTO((struct rtx_def *));
f30432d7 2089extern void expand_start_early_try_stmts PROTO((void));
824b9a4c 2090extern void store_parm_decls PROTO((void));
8d08fdba 2091extern void store_return_init PROTO((tree, tree));
db5ae43f 2092extern void finish_function PROTO((int, int, int));
c11b6f21 2093extern tree start_method PROTO((tree, tree));
8d08fdba
MS		 2094extern tree finish_method PROTO((tree));
2095extern void hack_incomplete_structures PROTO((tree));
c73964b2 2096extern tree maybe_build_cleanup_and_delete PROTO((tree));
824b9a4c 2097extern tree maybe_build_cleanup PROTO((tree));
8d08fdba
MS		 2098extern void cplus_expand_expr_stmt PROTO((tree));
2099extern void finish_stmt PROTO((void));
5566b478
MS		 2100extern int id_in_current_class PROTO((tree));
2101extern void push_cp_function_context PROTO((tree));
2102extern void pop_cp_function_context PROTO((tree));
824b9a4c 2103extern int in_function_p PROTO((void));
49c249e1
JM		 2104extern void replace_defarg PROTO((tree, tree));
2105extern void print_other_binding_stack PROTO((struct binding_level *));
2106extern tree strip_attrs PROTO((tree));
8d08fdba 2107
51c184be 2108/* in decl2.c */
6b5fbb55 2109extern int flag_assume_nonnull_objects;
8d08fdba
MS		 2110extern int lang_decode_option PROTO((char *));
2111extern tree grok_method_quals PROTO((tree, tree, tree));
824b9a4c
MS		 2112extern void warn_if_unknown_interface PROTO((tree));
2113extern tree grok_x_components PROTO((tree, tree));
8d08fdba
MS		 2114extern void grokclassfn PROTO((tree, tree, tree, enum overload_flags, tree));
2115extern tree grok_alignof PROTO((tree));
2116extern tree grok_array_decl PROTO((tree, tree));
2117extern tree delete_sanity PROTO((tree, tree, int, int));
5566b478 2118extern tree check_classfn PROTO((tree, tree));
98c1c668 2119extern void check_member_template PROTO((tree));
c11b6f21 2120extern tree grokfield PROTO((tree, tree, tree, tree, tree));
8d08fdba
MS		 2121extern tree grokbitfield PROTO((tree, tree, tree));
2122extern tree groktypefield PROTO((tree, tree));
51c184be 2123extern tree grokoptypename PROTO((tree, tree));
5566b478 2124extern int copy_assignment_arg_p PROTO((tree, int));
f6abb50a 2125extern void cplus_decl_attributes PROTO((tree, tree, tree));
8d08fdba
MS		 2126extern tree constructor_name_full PROTO((tree));
2127extern tree constructor_name PROTO((tree));
2128extern void setup_vtbl_ptr PROTO((void));
2129extern void mark_inline_for_output PROTO((tree));
2130extern void clear_temp_name PROTO((void));
2131extern tree get_temp_name PROTO((tree, int));
2132extern tree get_temp_regvar PROTO((tree, tree));
2133extern void finish_anon_union PROTO((tree));
2134extern tree finish_table PROTO((tree, tree, tree, int));
2135extern void finish_builtin_type PROTO((tree, char *, tree *, int, tree));
2136extern tree coerce_new_type PROTO((tree));
2137extern tree coerce_delete_type PROTO((tree));
824b9a4c 2138extern void comdat_linkage PROTO((tree));
5566b478 2139extern void import_export_vtable PROTO((tree, tree, int));
c73964b2 2140extern int finish_prevtable_vardecl PROTO((tree, tree));
49c249e1
JM		 2141extern int walk_vtables PROTO((void (*)(tree, tree),
2142 int (*)(tree, tree)));
2143extern void walk_sigtables PROTO((void (*)(tree, tree),
2144 void (*)(tree, tree)));
824b9a4c
MS		 2145extern void import_export_decl PROTO((tree));
2146extern tree build_cleanup PROTO((tree));
8d08fdba 2147extern void finish_file PROTO((void));
51c184be
MS		 2148extern tree reparse_absdcl_as_expr PROTO((tree, tree));
2149extern tree reparse_absdcl_as_casts PROTO((tree, tree));
5566b478 2150extern tree build_expr_from_tree PROTO((tree));
51c184be
MS		 2151extern tree reparse_decl_as_expr PROTO((tree, tree));
2152extern tree finish_decl_parsing PROTO((tree));
2986ae00 2153extern tree check_cp_case_value PROTO((tree));
824b9a4c
MS		 2154extern tree get_namespace_id PROTO((void));
2155extern tree current_namespace_id PROTO((tree));
2156extern void do_namespace_alias PROTO((tree, tree));
6b5fbb55 2157extern void do_toplevel_using_decl PROTO((tree));
a9aedbc2 2158extern tree do_class_using_decl PROTO((tree));
824b9a4c 2159extern void do_using_directive PROTO((tree));
f30432d7 2160extern void check_default_args PROTO((tree));
5566b478 2161extern void mark_used PROTO((tree));
49c249e1 2162extern tree handle_class_head PROTO((tree, tree, tree));
8d08fdba 2163
824b9a4c
MS		 2164/* in errfn.c */
2165extern void cp_error ();
2166extern void cp_error_at ();
2167extern void cp_warning ();
2168extern void cp_warning_at ();
2169extern void cp_pedwarn ();
2170extern void cp_pedwarn_at ();
2171extern void cp_compiler_error ();
2172extern void cp_sprintf ();
2173
2174/* in error.c */
2175extern void init_error PROTO((void));
2176extern char *fndecl_as_string PROTO((tree, int));
2177extern char *type_as_string PROTO((tree, int));
2178extern char *args_as_string PROTO((tree, int));
2179extern char *decl_as_string PROTO((tree, int));
2180extern char *expr_as_string PROTO((tree, int));
2181extern char *code_as_string PROTO((enum tree_code, int));
2182extern char *language_as_string PROTO((enum languages, int));
2183extern char *parm_as_string PROTO((int, int));
2184extern char *op_as_string PROTO((enum tree_code, int));
2185extern char *assop_as_string PROTO((enum tree_code, int));
2186extern char *cv_as_string PROTO((tree, int));
2ba25f50 2187extern char *lang_decl_name PROTO((tree, int));
49c249e1
JM		 2188extern char *cp_file_of PROTO((tree));
2189extern int cp_line_of PROTO((tree));
824b9a4c 2190
51c184be 2191/* in except.c */
8d08fdba 2192extern void init_exception_processing PROTO((void));
824b9a4c
MS		 2193extern void expand_start_catch_block PROTO((tree, tree));
2194extern void expand_end_catch_block PROTO((void));
f30432d7
MS		 2195extern void expand_builtin_throw PROTO((void));
2196extern void expand_start_eh_spec PROTO((void));
824b9a4c 2197extern void expand_exception_blocks PROTO((void));
72b7eeff 2198extern tree start_anon_func PROTO((void));
824b9a4c
MS		 2199extern void end_anon_func PROTO((void));
2200extern void expand_throw PROTO((tree));
2201extern tree build_throw PROTO((tree));
8d08fdba 2202
51c184be 2203/* in expr.c */
8d08fdba
MS		 2204extern void init_cplus_expand PROTO((void));
2205extern void fixup_result_decl PROTO((tree, struct rtx_def *));
824b9a4c
MS		 2206extern int extract_init PROTO((tree, tree));
2207extern void do_case PROTO((tree, tree));
8d08fdba 2208
bd6dd845
MS		 2209/* friend.c */
2210extern int is_friend PROTO((tree, tree));
2211extern void make_friend_class PROTO((tree, tree));
2212extern tree do_friend PROTO((tree, tree, tree, tree, enum overload_flags, tree, int));
2213
51c184be 2214/* in init.c */
824b9a4c
MS		 2215extern void init_init_processing PROTO((void));
2216extern void expand_direct_vtbls_init PROTO((tree, tree, int, int, tree));
8d08fdba
MS		 2217extern void emit_base_init PROTO((tree, int));
2218extern void check_base_init PROTO((tree));
8d08fdba
MS		 2219extern void do_member_init PROTO((tree, tree, tree));
2220extern void expand_member_init PROTO((tree, tree, tree));
6060a796 2221extern void expand_aggr_init PROTO((tree, tree, int, int));
8d08fdba 2222extern int is_aggr_typedef PROTO((tree, int));
5566b478 2223extern int is_aggr_type PROTO((tree, int));
8d08fdba
MS		 2224extern tree get_aggr_from_typedef PROTO((tree, int));
2225extern tree get_type_value PROTO((tree));
2226extern tree build_member_call PROTO((tree, tree, tree));
2227extern tree build_offset_ref PROTO((tree, tree));
8d08fdba
MS		 2228extern tree resolve_offset_ref PROTO((tree));
2229extern tree decl_constant_value PROTO((tree));
8d08fdba
MS		 2230extern tree build_new PROTO((tree, tree, tree, int));
2231extern tree expand_vec_init PROTO((tree, tree, tree, tree, int));
2232extern tree build_x_delete PROTO((tree, tree, int, tree));
2233extern tree build_delete PROTO((tree, tree, tree, int, int));
2234extern tree build_vbase_delete PROTO((tree, tree));
5566b478 2235extern tree build_vec_delete PROTO((tree, tree, tree, tree, int));
8d08fdba 2236
51c184be 2237/* in input.c */
8d08fdba 2238
51c184be 2239/* in lex.c */
8d08fdba
MS		 2240extern tree make_pointer_declarator PROTO((tree, tree));
2241extern tree make_reference_declarator PROTO((tree, tree));
c11b6f21
MS		 2242extern tree make_call_declarator PROTO((tree, tree, tree, tree));
2243extern void set_quals_and_spec PROTO((tree, tree, tree));
8d08fdba
MS		 2244extern char *operator_name_string PROTO((tree));
2245extern void lang_init PROTO((void));
2246extern void lang_finish PROTO((void));
2247extern void init_filename_times PROTO((void));
bd6dd845 2248#if 0
8d08fdba 2249extern void reinit_lang_specific PROTO((void));
bd6dd845 2250#endif
8d08fdba
MS		 2251extern void init_lex PROTO((void));
2252extern void reinit_parse_for_function PROTO((void));
2253extern int *init_parse PROTO((void));
2254extern void print_parse_statistics PROTO((void));
2255extern void extract_interface_info PROTO((void));
8d08fdba
MS		 2256extern void do_pending_inlines PROTO((void));
2257extern void process_next_inline PROTO((tree));
49c249e1
JM		 2258extern struct pending_input *save_pending_input PROTO((void));
2259extern void restore_pending_input PROTO((struct pending_input *));
8d08fdba
MS		 2260extern void yyungetc PROTO((int, int));
2261extern void reinit_parse_for_method PROTO((int, tree));
bd6dd845 2262extern void reinit_parse_for_block PROTO((int, struct obstack *));
f376e137 2263extern tree cons_up_default_function PROTO((tree, tree, int));
8d08fdba
MS		 2264extern void check_for_missing_semicolon PROTO((tree));
2265extern void note_got_semicolon PROTO((tree));
2266extern void note_list_got_semicolon PROTO((tree));
824b9a4c 2267extern void do_pending_lang_change PROTO((void));
8d08fdba
MS		 2268extern int identifier_type PROTO((tree));
2269extern void see_typename PROTO((void));
5566b478
MS		 2270extern tree do_identifier PROTO((tree, int));
2271extern tree do_scoped_id PROTO((tree, int));
8d08fdba
MS		 2272extern tree identifier_typedecl_value PROTO((tree));
2273extern int real_yylex PROTO((void));
824b9a4c 2274extern int is_rid PROTO((tree));
8d08fdba
MS		 2275extern tree build_lang_decl PROTO((enum tree_code, tree, tree));
2276extern tree build_lang_field_decl PROTO((enum tree_code, tree, tree));
2277extern void copy_lang_decl PROTO((tree));
2278extern tree make_lang_type PROTO((enum tree_code));
8d08fdba
MS		 2279extern void dump_time_statistics PROTO((void));
2280/* extern void compiler_error PROTO((char *, HOST_WIDE_INT, HOST_WIDE_INT)); */
8d08fdba 2281extern void yyerror PROTO((char *));
49c249e1
JM		 2282extern void clear_inline_text_obstack PROTO((void));
2283extern void maybe_snarf_defarg PROTO((void));
2284extern tree snarf_defarg PROTO((void));
2285extern void add_defarg_fn PROTO((tree));
2286extern void do_pending_defargs PROTO((void));
2287extern int identifier_type PROTO((tree));
9f617717 2288extern void yyhook PROTO((int));
8d08fdba 2289
51c184be 2290/* in method.c */
8d08fdba 2291extern void init_method PROTO((void));
8d08fdba 2292extern void do_inline_function_hair PROTO((tree, tree));
da20811c 2293extern void report_type_mismatch PROTO((struct candidate *, tree, char *));
8d08fdba 2294extern char *build_overload_name PROTO((tree, int, int));
f376e137 2295extern tree build_static_name PROTO((tree, tree));
8d08fdba 2296extern tree build_decl_overload PROTO((tree, tree, int));
386b8a85 2297extern tree build_template_decl_overload PROTO((tree, tree, tree, tree, tree, int));
8d08fdba 2298extern tree build_typename_overload PROTO((tree));
6b5fbb55 2299extern tree build_overload_with_type PROTO((tree, tree));
8d08fdba 2300extern tree build_opfncall PROTO((enum tree_code, int, tree, tree, tree));
5566b478 2301extern tree hack_identifier PROTO((tree, tree));
6b5fbb55 2302extern tree make_thunk PROTO((tree, int));
824b9a4c 2303extern void emit_thunk PROTO((tree));
5566b478 2304extern void synthesize_method PROTO((tree));
49c249e1 2305extern tree get_id_2 PROTO((char *, tree));
8d08fdba 2306
51c184be 2307/* in pt.c */
98c1c668
JM		 2308extern tree tsubst PROTO ((tree, tree, int, tree));
2309extern tree tsubst_expr PROTO ((tree, tree, int, tree));
2310extern tree tsubst_copy PROTO ((tree, tree, int, tree));
5566b478 2311extern tree tsubst_chain PROTO((tree, tree));
98c1c668
JM		 2312extern void begin_member_template_processing PROTO((tree));
2313extern void end_member_template_processing PROTO((void));
8d08fdba 2314extern void begin_template_parm_list PROTO((void));
386b8a85
JM		 2315extern void begin_specialization PROTO((void));
2316extern void reset_specialization PROTO((void));
2317extern void end_specialization PROTO((void));
2318extern tree determine_explicit_specialization PROTO((tree, tree, tree *, int, int));
2319extern int check_explicit_specialization PROTO((tree, tree, int, int));
8d08fdba
MS		 2320extern tree process_template_parm PROTO((tree, tree));
2321extern tree end_template_parm_list PROTO((tree));
5566b478 2322extern void end_template_decl PROTO((void));
9a3b49ac 2323extern tree current_template_args PROTO((void));
6b5fbb55 2324extern void push_template_decl PROTO((tree));
8d08fdba 2325extern tree lookup_template_class PROTO((tree, tree, tree));
386b8a85 2326extern tree lookup_template_function PROTO((tree, tree));
8d08fdba 2327extern int uses_template_parms PROTO((tree));
5566b478 2328extern tree instantiate_class_template PROTO((tree));
98c1c668 2329extern tree instantiate_template PROTO((tree, tree));
6b5fbb55 2330extern void overload_template_name PROTO((tree));
386b8a85
JM		 2331extern int fn_type_unification PROTO((tree, tree, tree, tree, tree, int));
2332extern int type_unification PROTO((tree, tree *, tree, tree, tree, int *, int, int));
8d08fdba 2333struct tinst_level *tinst_for_decl PROTO((void));
5566b478 2334extern void mark_decl_instantiated PROTO((tree, int));
bd6dd845 2335extern int more_specialized PROTO((tree, tree));
5566b478 2336extern void mark_class_instantiated PROTO((tree, int));
6633d636 2337extern void do_decl_instantiation PROTO((tree, tree, tree));
f0e01782 2338extern void do_type_instantiation PROTO((tree, tree));
5566b478 2339extern tree instantiate_decl PROTO((tree));
5566b478
MS		 2340extern tree lookup_nested_type_by_name PROTO((tree, tree));
2341extern tree do_poplevel PROTO((void));
98c1c668 2342extern tree get_bindings PROTO((tree, tree));
824b9a4c
MS		 2343/* CONT ... */
2344extern void add_tree PROTO((tree));
2345extern void add_maybe_template PROTO((tree, tree));
49c249e1
JM		 2346extern void pop_tinst_level PROTO((void));
2347extern tree most_specialized PROTO((tree, tree));
2348extern tree most_specialized_class PROTO((tree, tree));
2349extern int more_specialized_class PROTO((tree, tree));
2350extern void do_pushlevel PROTO((void));
98c1c668 2351extern int is_member_template PROTO((tree));
92eca640 2352extern int processing_specialization;
824b9a4c
MS		 2353
2354/* in repo.c */
2355extern void repo_template_used PROTO((tree));
2356extern void repo_template_instantiated PROTO((tree, int));
2357extern void init_repo PROTO((char*));
2358extern void finish_repo PROTO((void));
2359
2360/* in rtti.c */
2361extern void init_rtti_processing PROTO((void));
2362extern tree get_tinfo_fn_dynamic PROTO((tree));
2363extern tree build_typeid PROTO((tree));
2364extern tree build_x_typeid PROTO((tree));
2365extern tree get_tinfo_fn PROTO((tree));
2366extern tree get_typeid PROTO((tree));
2367extern tree build_dynamic_cast PROTO((tree, tree));
2368extern void synthesize_tinfo_fn PROTO((tree));
8d08fdba 2369
51c184be 2370/* in search.c */
8d08fdba
MS		 2371extern void push_memoized_context PROTO((tree, int));
2372extern void pop_memoized_context PROTO((int));
bd6dd845 2373extern tree get_vbase PROTO((tree, tree));
8d08fdba
MS		 2374extern tree get_binfo PROTO((tree, tree, int));
2375extern int get_base_distance PROTO((tree, tree, int, tree *));
be99da77 2376extern tree compute_access PROTO((tree, tree));
8d08fdba
MS		 2377extern tree lookup_field PROTO((tree, tree, int, int));
2378extern tree lookup_nested_field PROTO((tree, int));
2379extern tree lookup_fnfields PROTO((tree, tree, int));
a28e3c7f 2380extern tree lookup_nested_tag PROTO((tree, tree));
7177d104 2381extern tree get_matching_virtual PROTO((tree, tree, int));
8d08fdba
MS		 2382extern tree get_abstract_virtuals PROTO((tree));
2383extern tree get_baselinks PROTO((tree, tree, tree));
2384extern tree next_baselink PROTO((tree));
2385extern tree init_vbase_pointers PROTO((tree, tree));
9e9ff709 2386extern void expand_indirect_vtbls_init PROTO((tree, tree, tree));
8d08fdba
MS		 2387extern void clear_search_slots PROTO((tree));
2388extern tree get_vbase_types PROTO((tree));
2389extern void build_mi_matrix PROTO((tree));
2390extern void free_mi_matrix PROTO((void));
2391extern void build_mi_virtuals PROTO((int, int));
2392extern void add_mi_virtuals PROTO((int, tree));
2393extern void report_ambiguous_mi_virtuals PROTO((int, tree));
2394extern void note_debug_info_needed PROTO((tree));
45537677 2395extern void push_class_decls PROTO((tree));
49c249e1 2396extern void pop_class_decls PROTO((void));
8d08fdba
MS		 2397extern void unuse_fields PROTO((tree));
2398extern void unmark_finished_struct PROTO((tree));
2399extern void print_search_statistics PROTO((void));
2400extern void init_search_processing PROTO((void));
2401extern void reinit_search_statistics PROTO((void));
2402extern tree current_scope PROTO((void));
e1cd6e56 2403extern tree lookup_conversions PROTO((tree));
c73964b2 2404extern tree get_template_base PROTO((tree, tree));
8d08fdba 2405
51c184be 2406/* in sig.c */
8d08fdba
MS		 2407extern tree build_signature_pointer_type PROTO((tree, int, int));
2408extern tree build_signature_reference_type PROTO((tree, int, int));
2409extern tree build_signature_pointer_constructor PROTO((tree, tree));
c11b6f21 2410extern tree build_signature_method_call PROTO((tree, tree));
8d08fdba 2411extern tree build_optr_ref PROTO((tree));
5566b478 2412extern void append_signature_fields PROTO((tree));
8d08fdba 2413
51c184be 2414/* in spew.c */
8d08fdba 2415extern void init_spew PROTO((void));
49c249e1 2416extern int peekyylex PROTO((void));
8d08fdba
MS		 2417extern int yylex PROTO((void));
2418extern tree arbitrate_lookup PROTO((tree, tree, tree));
2419
51c184be 2420/* in tree.c */
5566b478
MS		 2421extern int real_lvalue_p PROTO((tree));
2422extern tree build_min PVPROTO((enum tree_code, tree, ...));
2423extern tree build_min_nt PVPROTO((enum tree_code, ...));
2424extern tree min_tree_cons PROTO((tree, tree, tree));
8d08fdba
MS		 2425extern int lvalue_p PROTO((tree));
2426extern int lvalue_or_else PROTO((tree, char *));
5566b478 2427extern tree build_cplus_new PROTO((tree, tree));
8d08fdba
MS		 2428extern tree break_out_cleanups PROTO((tree));
2429extern tree break_out_calls PROTO((tree));
2430extern tree build_cplus_method_type PROTO((tree, tree, tree));
2431extern tree build_cplus_staticfn_type PROTO((tree, tree, tree));
2432extern tree build_cplus_array_type PROTO((tree, tree));
2433extern void propagate_binfo_offsets PROTO((tree, tree));
2434extern int layout_vbasetypes PROTO((tree, int));
2435extern tree layout_basetypes PROTO((tree, tree));
8d08fdba
MS		 2436extern tree hash_tree_cons PROTO((int, int, int, tree, tree, tree));
2437extern tree hash_tree_chain PROTO((tree, tree));
2438extern tree hash_chainon PROTO((tree, tree));
2439extern tree get_decl_list PROTO((tree));
8d08fdba 2440extern tree make_binfo PROTO((tree, tree, tree, tree, tree));
8d08fdba
MS		 2441extern tree binfo_value PROTO((tree, tree));
2442extern tree reverse_path PROTO((tree));
8d08fdba 2443extern int decl_list_length PROTO((tree));
8926095f 2444extern int count_functions PROTO((tree));
8d08fdba
MS		 2445extern int is_overloaded_fn PROTO((tree));
2446extern tree get_first_fn PROTO((tree));
2447extern tree fnaddr_from_vtable_entry PROTO((tree));
8d08fdba
MS		 2448extern tree function_arg_chain PROTO((tree));
2449extern int promotes_to_aggr_type PROTO((tree, enum tree_code));
2450extern int is_aggr_type_2 PROTO((tree, tree));
2ba25f50 2451extern char *lang_printable_name PROTO((tree, int));
f30432d7 2452extern tree build_exception_variant PROTO((tree, tree));
8d08fdba
MS		 2453extern tree copy_to_permanent PROTO((tree));
2454extern void print_lang_statistics PROTO((void));
49c249e1
JM		 2455extern void __eprintf
2456 PROTO((const char *, const char *, unsigned, const char *));
8d08fdba
MS		 2457extern tree array_type_nelts_total PROTO((tree));
2458extern tree array_type_nelts_top PROTO((tree));
878cd289 2459extern tree break_out_target_exprs PROTO((tree));
5566b478 2460extern tree get_type_decl PROTO((tree));
6b5fbb55 2461extern tree vec_binfo_member PROTO((tree, tree));
e76a2646 2462extern tree hack_decl_function_context PROTO((tree));
d11ad92e
MS		 2463extern tree lvalue_type PROTO((tree));
2464extern tree error_type PROTO((tree));
49c249e1
JM		 2465extern tree make_temp_vec PROTO((int));
2466extern int varargs_function_p PROTO((tree));
2467extern int really_overloaded_fn PROTO((tree));
2468extern int cp_tree_equal PROTO((tree, tree));
2469extern int can_free PROTO((struct obstack *, tree));
2470extern tree mapcar PROTO((tree, tree (*) (tree)));
2471extern void debug_binfo PROTO((tree));
e66d884e
JM		 2472#define scratchalloc expralloc
2473#define scratch_tree_cons expr_tree_cons
2474#define build_scratch_list build_expr_list
2475#define make_scratch_vec make_temp_vec
8d08fdba 2476
51c184be 2477/* in typeck.c */
8ccc31eb 2478extern tree condition_conversion PROTO((tree));
8d08fdba
MS		 2479extern tree target_type PROTO((tree));
2480extern tree require_complete_type PROTO((tree));
5566b478 2481extern tree complete_type PROTO((tree));
8d08fdba
MS		 2482extern int type_unknown_p PROTO((tree));
2483extern int fntype_p PROTO((tree));
2484extern tree require_instantiated_type PROTO((tree, tree, tree));
2485extern tree commonparms PROTO((tree, tree));
2486extern tree common_type PROTO((tree, tree));
5566b478 2487extern int compexcepttypes PROTO((tree, tree));
8d08fdba
MS		 2488extern int comptypes PROTO((tree, tree, int));
2489extern int comp_target_types PROTO((tree, tree, int));
8d08fdba
MS		 2490extern int compparms PROTO((tree, tree, int));
2491extern int comp_target_types PROTO((tree, tree, int));
a28e3c7f 2492extern int self_promoting_args_p PROTO((tree));
8d08fdba
MS		 2493extern tree unsigned_type PROTO((tree));
2494extern tree signed_type PROTO((tree));
2495extern tree signed_or_unsigned_type PROTO((int, tree));
5566b478 2496extern tree expr_sizeof PROTO((tree));
8d08fdba
MS		 2497extern tree c_sizeof PROTO((tree));
2498extern tree c_sizeof_nowarn PROTO((tree));
2499extern tree c_alignof PROTO((tree));
6b5fbb55 2500extern tree inline_conversion PROTO((tree));
f30432d7 2501extern tree decay_conversion PROTO((tree));
8d08fdba
MS		 2502extern tree default_conversion PROTO((tree));
2503extern tree build_object_ref PROTO((tree, tree, tree));
2504extern tree build_component_ref_1 PROTO((tree, tree, int));
2505extern tree build_component_ref PROTO((tree, tree, tree, int));
5156628f 2506extern tree build_x_component_ref PROTO((tree, tree, tree, int));
8d08fdba
MS		 2507extern tree build_x_indirect_ref PROTO((tree, char *));
2508extern tree build_indirect_ref PROTO((tree, char *));
8d08fdba
MS		 2509extern tree build_array_ref PROTO((tree, tree));
2510extern tree build_x_function_call PROTO((tree, tree, tree));
824b9a4c 2511extern tree get_member_function_from_ptrfunc PROTO((tree *, tree));
8d08fdba
MS		 2512extern tree build_function_call_real PROTO((tree, tree, int, int));
2513extern tree build_function_call PROTO((tree, tree));
2514extern tree build_function_call_maybe PROTO((tree, tree));
2515extern tree convert_arguments PROTO((tree, tree, tree, tree, int));
2516extern tree build_x_binary_op PROTO((enum tree_code, tree, tree));
2517extern tree build_binary_op PROTO((enum tree_code, tree, tree, int));
2518extern tree build_binary_op_nodefault PROTO((enum tree_code, tree, tree, enum tree_code));
2519extern tree build_component_addr PROTO((tree, tree, char *));
2520extern tree build_x_unary_op PROTO((enum tree_code, tree));
2521extern tree build_unary_op PROTO((enum tree_code, tree, int));
2522extern tree unary_complex_lvalue PROTO((enum tree_code, tree));
2523extern int mark_addressable PROTO((tree));
2524extern tree build_x_conditional_expr PROTO((tree, tree, tree));
2525extern tree build_conditional_expr PROTO((tree, tree, tree));
2526extern tree build_x_compound_expr PROTO((tree));
2527extern tree build_compound_expr PROTO((tree));
2986ae00
MS		 2528extern tree build_static_cast PROTO((tree, tree));
2529extern tree build_reinterpret_cast PROTO((tree, tree));
2530extern tree build_const_cast PROTO((tree, tree));
faf5394a 2531extern tree build_c_cast PROTO((tree, tree));
5566b478 2532extern tree build_x_modify_expr PROTO((tree, enum tree_code, tree));
8d08fdba
MS		 2533extern tree build_modify_expr PROTO((tree, enum tree_code, tree));
2534extern int language_lvalue_valid PROTO((tree));
2535extern void warn_for_assignment PROTO((char *, char *, char *, tree, int, int));
2536extern tree convert_for_initialization PROTO((tree, tree, tree, int, char *, tree, int));
2537extern void c_expand_asm_operands PROTO((tree, tree, tree, tree, int, char *, int));
2538extern void c_expand_return PROTO((tree));
2539extern tree c_expand_start_case PROTO((tree));
bd6dd845 2540extern int comp_ptr_ttypes PROTO((tree, tree));
d2e5ee5c 2541extern int ptr_reasonably_similar PROTO((tree, tree));
8d08fdba
MS		 2542extern tree build_ptrmemfunc PROTO((tree, tree, int));
2543
51c184be 2544/* in typeck2.c */
8d08fdba
MS		 2545extern tree error_not_base_type PROTO((tree, tree));
2546extern tree binfo_or_else PROTO((tree, tree));
8d08fdba
MS		 2547extern void readonly_error PROTO((tree, char *, int));
2548extern void abstract_virtuals_error PROTO((tree, tree));
5566b478 2549extern void signature_error PROTO((tree, tree));
8d08fdba
MS		 2550extern void incomplete_type_error PROTO((tree, tree));
2551extern void my_friendly_abort PROTO((int));
2552extern void my_friendly_assert PROTO((int, int));
2553extern tree store_init_value PROTO((tree, tree));
2554extern tree digest_init PROTO((tree, tree, tree *));
2555extern tree build_scoped_ref PROTO((tree, tree));
2556extern tree build_x_arrow PROTO((tree));
2557extern tree build_m_component_ref PROTO((tree, tree));
2558extern tree build_functional_cast PROTO((tree, tree));
2559extern char *enum_name_string PROTO((tree, tree));
2560extern void report_case_error PROTO((int, tree, tree, tree));
49c249e1
JM		 2561extern void check_for_new_type PROTO((char *,flagged_type_tree));
2562extern tree initializer_constant_valid_p PROTO((tree, tree));
8d08fdba 2563
51c184be 2564/* in xref.c */
8d08fdba
MS		 2565extern void GNU_xref_begin PROTO((char *));
2566extern void GNU_xref_end PROTO((int));
2567extern void GNU_xref_file PROTO((char *));
2568extern void GNU_xref_start_scope PROTO((HOST_WIDE_INT));
5566b478 2569extern void GNU_xref_end_scope PROTO((HOST_WIDE_INT, HOST_WIDE_INT, int, int));
00595019 2570extern void GNU_xref_ref PROTO((tree, char *));
8d08fdba
MS		 2571extern void GNU_xref_decl PROTO((tree, tree));
2572extern void GNU_xref_call PROTO((tree, char *));
2573extern void GNU_xref_function PROTO((tree, tree));
2574extern void GNU_xref_assign PROTO((tree));
2575extern void GNU_xref_hier PROTO((char *, char *, int, int, int));
2576extern void GNU_xref_member PROTO((tree, tree));
2577
2578/* -- end of C++ */
2579
2580#endif /* not _CP_TREE_H */
GNU Compiler Collection
This page took 0.575448 seconds and 5 git commands to generate.