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