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