]>
Commit | Line | Data |
---|---|---|
8d08fdba | 1 | /* Definitions for C++ parsing and type checking. |
06ceef4e RK |
2 | Copyright (C) 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000 |
3 | Free Software Foundation, Inc. | |
4 | Contributed by Michael Tiemann (tiemann@cygnus.com) | |
8d08fdba MS |
5 | |
6 | This file is part of GNU CC. | |
7 | ||
8 | GNU CC is free software; you can redistribute it and/or modify | |
9 | it under the terms of the GNU General Public License as published by | |
10 | the Free Software Foundation; either version 2, or (at your option) | |
11 | any later version. | |
12 | ||
13 | GNU CC is distributed in the hope that it will be useful, | |
14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | GNU General Public License for more details. | |
17 | ||
18 | You should have received a copy of the GNU General Public License | |
19 | along with GNU CC; see the file COPYING. If not, write to | |
e9fa0c7c RK |
20 | the Free Software Foundation, 59 Temple Place - Suite 330, |
21 | Boston, MA 02111-1307, USA. */ | |
8d08fdba | 22 | |
7f4edbcb | 23 | #include "c-common.h" |
99dccabc | 24 | #include "function.h" |
46e8c075 | 25 | #include "splay-tree.h" |
9cd64686 | 26 | #include "varray.h" |
7f4edbcb | 27 | |
8d08fdba MS |
28 | #ifndef _CP_TREE_H |
29 | #define _CP_TREE_H | |
30 | ||
cfdd0551 | 31 | /* Usage of TREE_LANG_FLAG_?: |
280f9385 | 32 | 0: BINFO_MARKED (BINFO nodes). |
cfdd0551 PB |
33 | COMPOUND_STMT_NO_SCOPE (in COMPOUND_STMT). |
34 | NEW_EXPR_USE_GLOBAL (in NEW_EXPR). | |
35 | DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR). | |
36 | LOOKUP_EXPR_GLOBAL (in LOOKUP_EXPR). | |
37 | TREE_NEGATED_INT (in INTEGER_CST). | |
b26caacd | 38 | TREE_INDIRECT_USING (in NAMESPACE_DECL). |
72c4a2a6 | 39 | IDENTIFIER_MARKED (used by search routines). |
f181d4ae | 40 | LOCAL_BINDING_P (in CPLUS_BINDING) |
27b8d0cd | 41 | ICS_USER_FLAG (in _CONV) |
f1dedc31 | 42 | CLEANUP_P (in TRY_BLOCK) |
e1376b00 | 43 | AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR) |
59026e79 | 44 | SCOPE_BEGIN_P (in SCOPE_STMT) |
46e8c075 | 45 | CTOR_BEGIN_P (in CTOR_STMT) |
4bb0968f | 46 | 1: IDENTIFIER_VIRTUAL_P. |
cfdd0551 | 47 | TI_PENDING_TEMPLATE_FLAG. |
cfdd0551 PB |
48 | TEMPLATE_PARMS_FOR_INLINE. |
49 | DELETE_EXPR_USE_VEC (in DELETE_EXPR). | |
50 | (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out). | |
4c6b7393 | 51 | TYPE_BASE_CONVS_MAY_REQUIRE_CODE_P (in _TYPE). |
b5434ee0 | 52 | C_DECLARED_LABEL_FLAG (in LABEL_DECL) |
8f032717 | 53 | INHERITED_VALUE_BINDING_P (in CPLUS_BINDING) |
4bb0968f | 54 | BASELINK_P (in TREE_LIST) |
27b8d0cd | 55 | ICS_ELLIPSIS_FLAG (in _CONV) |
a7e4cfa0 | 56 | STMT_IS_FULL_EXPR_P (in _STMT) |
cfdd0551 | 57 | 2: IDENTIFIER_OPNAME_P. |
4c6b7393 | 58 | TYPE_POLYMORHPIC_P (in _TYPE) |
27b8d0cd | 59 | ICS_THIS_FLAG (in _CONV) |
a7e4cfa0 MM |
60 | STMT_LINENO_FOR_FN_P (in _STMT) |
61 | BINDING_HAS_LEVEL_P (in CPLUS_BINDING) | |
cfdd0551 PB |
62 | 3: TYPE_USES_VIRTUAL_BASECLASSES (in a class TYPE). |
63 | BINFO_VTABLE_PATH_MARKED. | |
0ec57017 | 64 | BINFO_PUSHDECLS_MARKED. |
cfdd0551 | 65 | (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out). |
27b8d0cd | 66 | ICS_BAD_FLAG (in _CONV) |
62409b39 | 67 | FN_TRY_BLOCK_P (in TRY_BLOCK) |
d9b2d9da | 68 | SCOPE_NO_CLEANUPS_P (in SCOPE_STMT) |
298d6f60 | 69 | IDENTIFIER_CTOR_OR_DTOR_P (in IDENTIFIER_NODE) |
cfdd0551 PB |
70 | 4: BINFO_NEW_VTABLE_MARKED. |
71 | TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR, | |
72 | or FIELD_DECL). | |
27b8d0cd | 73 | NEED_TEMPORARY_P (in REF_BIND, BASE_CONV) |
8f471b0d | 74 | SCOPE_PARTIAL_P (in SCOPE_STMT) |
174eceea MM |
75 | 5: BINFO_PRIMARY_MARKED_P (in BINFO) |
76 | 6: BINFO_VBASE_PRIMARY_P (in BINFO) | |
cfdd0551 PB |
77 | |
78 | Usage of TYPE_LANG_FLAG_?: | |
79 | 0: C_TYPE_FIELDS_READONLY (in RECORD_TYPE or UNION_TYPE). | |
80 | 1: TYPE_HAS_CONSTRUCTOR. | |
81 | 2: TYPE_HAS_DESTRUCTOR. | |
ea419909 | 82 | 3: TYPE_FOR_JAVA. |
834c6dff | 83 | 4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR |
cfdd0551 | 84 | 5: IS_AGGR_TYPE. |
ea419909 | 85 | 6: TYPE_BUILT_IN. |
cfdd0551 PB |
86 | |
87 | Usage of DECL_LANG_FLAG_?: | |
88 | 0: DECL_ERROR_REPORTED (in VAR_DECL). | |
50714e79 | 89 | DECL_TEMPLATE_PARM_P (in CONST_DECL, TYPE_DECL, or TEMPLATE_DECL) |
cd9f6678 | 90 | DECL_LOCAL_FUNCTION_P (in FUNCTION_DECL) |
cfdd0551 | 91 | 1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL). |
fbf1c34b | 92 | DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL) |
cfdd0551 | 93 | 2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL). |
9188c363 | 94 | DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL) |
cfdd0551 PB |
95 | 3: DECL_IN_AGGR_P. |
96 | 4: DECL_MAYBE_TEMPLATE. | |
97 | 5: DECL_INTERFACE_KNOWN. | |
98 | 6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL). | |
99 | 7: DECL_DEAD_FOR_LOCAL (in VAR_DECL). | |
7ddedda4 MM |
100 | |
101 | Usage of language-independent fields in a language-dependent manner: | |
102 | ||
103 | TYPE_ALIAS_SET | |
104 | This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so | |
105 | forth as a substitute for the mark bits provided in `lang_type'. | |
106 | At present, only the six low-order bits are used. | |
107 | ||
108 | TYPE_BINFO | |
109 | For an ENUMERAL_TYPE, this is ENUM_TEMPLATE_INFO. | |
110 | For a TYPENAME_TYPE, this is TYPENAME_TYPE_FULLNAME. | |
111 | For a TEMPLATE_TEMPLATE_PARM, this is | |
112 | TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO. | |
0aafb128 | 113 | |
9df2c88c | 114 | BINFO_VIRTUALS |
5e19c053 | 115 | For a binfo, this is a TREE_LIST. The BV_DELTA of each node |
83f2ccf4 | 116 | gives the amount by which to adjust the `this' pointer when |
174eceea MM |
117 | calling the function. If the method is an overriden version of a |
118 | base class method, then it is assumed that, prior to adjustment, | |
119 | the this pointer points to an object of the base class. | |
120 | ||
5e19c053 | 121 | The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable |
c0bbf652 MM |
122 | index of the vcall offset for this entry. |
123 | ||
5e19c053 | 124 | The BV_FN is the declaration for the virtual function itself. |
c0bbf652 | 125 | When CLASSTYPE_COM_INTERFACE_P does not hold, the first entry |
5e19c053 MM |
126 | does not have a BV_FN; it is just an offset. |
127 | ||
128 | The BV_OVERRIDING_BASE is the binfo for the final overrider for | |
129 | this function. (This binfo's BINFO_TYPE will always be the same | |
130 | as the DECL_CLASS_CONTEXT for the function.) | |
0fa5e05c | 131 | |
c35cce41 MM |
132 | BINFO_VTABLE |
133 | Sometimes this is a VAR_DECL. Under the new ABI, it is instead | |
134 | an expression with POINTER_TYPE pointing that gives the value | |
135 | to which the vptr should be initialized. Use get_vtbl_decl_for_binfo | |
136 | to extract the VAR_DECL for the complete vtable; that macro works | |
137 | in both ABIs. | |
138 | ||
0fa5e05c | 139 | DECL_ARGUMENTS |
051e6fd7 MM |
140 | For a VAR_DECL this is DECL_ANON_UNION_ELEMS. |
141 | ||
142 | DECL_VINDEX | |
143 | This field is NULL for a non-virtual function. For a virtual | |
144 | function, it is eventually set to an INTEGER_CST indicating the | |
145 | index in the vtable at which this function can be found. When | |
146 | a virtual function is declared, but before it is known what | |
147 | function is overriden, this field is the error_mark_node. | |
148 | ||
149 | Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is | |
150 | the virtual function this one overrides, and whose TREE_CHAIN is | |
151 | the old DECL_VINDEX. */ | |
cfdd0551 | 152 | |
da8a66fc ML |
153 | /* Language-specific tree checkers. */ |
154 | ||
f4524c9e | 155 | #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007) |
da8a66fc ML |
156 | |
157 | #define VAR_OR_FUNCTION_DECL_CHECK(NODE) \ | |
158 | ({ const tree __t = NODE; \ | |
159 | enum tree_code __c = TREE_CODE(__t); \ | |
160 | if (__c != VAR_DECL && __c != FUNCTION_DECL) \ | |
161 | tree_check_failed (__t, VAR_DECL, __FILE__, \ | |
162 | __LINE__, __PRETTY_FUNCTION__); \ | |
163 | __t; }) | |
164 | ||
07c88314 MM |
165 | #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) \ |
166 | ({ const tree __t = NODE; \ | |
167 | enum tree_code __c = TREE_CODE(__t); \ | |
168 | if (__c != VAR_DECL \ | |
169 | && __c != FUNCTION_DECL \ | |
170 | && __c != PARM_DECL) \ | |
171 | tree_check_failed (__t, VAR_DECL, __FILE__, \ | |
172 | __LINE__, __PRETTY_FUNCTION__); \ | |
173 | __t; }) | |
174 | ||
7c355bca ML |
175 | #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) \ |
176 | ({ const tree __t = NODE; \ | |
177 | enum tree_code __c = TREE_CODE(__t); \ | |
178 | if (__c != VAR_DECL \ | |
179 | && __c != FUNCTION_DECL \ | |
180 | && __c != TYPE_DECL \ | |
181 | && __c != TEMPLATE_DECL) \ | |
182 | tree_check_failed (__t, VAR_DECL, __FILE__, \ | |
183 | __LINE__, __PRETTY_FUNCTION__); \ | |
184 | __t; }) | |
185 | ||
da8a66fc ML |
186 | #define RECORD_OR_UNION_TYPE_CHECK(NODE) \ |
187 | ({ const tree __t = NODE; \ | |
188 | enum tree_code __c = TREE_CODE(__t); \ | |
189 | if (__c != RECORD_TYPE && __c != UNION_TYPE) \ | |
190 | tree_check_failed (__t, RECORD_TYPE, __FILE__, \ | |
191 | __LINE__, __PRETTY_FUNCTION__); \ | |
192 | __t; }) | |
193 | ||
f4524c9e | 194 | #else /* not ENABLE_TREE_CHECKING, or not gcc */ |
da8a66fc ML |
195 | |
196 | #define VAR_OR_FUNCTION_DECL_CHECK(NODE) NODE | |
07c88314 | 197 | #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) NODE |
7c355bca | 198 | #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) NODE |
da8a66fc ML |
199 | #define RECORD_OR_UNION_TYPE_CHECK(NODE) NODE |
200 | ||
201 | #endif | |
bbd15aac MM |
202 | \f |
203 | /* ABI control. */ | |
204 | ||
205 | /* Nonzero to enable experimental ABI changes. */ | |
206 | ||
207 | extern int flag_new_abi; | |
208 | ||
209 | /* Nonzero to use __cxa_atexit, rather than atexit, to register | |
210 | destructors for local statics and global objects. */ | |
211 | ||
212 | extern int flag_use_cxa_atexit; | |
213 | ||
214 | /* Nonzero to not ignore namespace std. */ | |
da8a66fc | 215 | |
bbd15aac MM |
216 | extern int flag_honor_std; |
217 | ||
218 | /* Nonzero means generate 'rtti' that give run-time type information. */ | |
219 | ||
220 | extern int flag_rtti; | |
221 | ||
4e7512c9 MM |
222 | /* Nonzero if we want to support huge (> 2^(sizeof(short)*8-1) bytes) |
223 | objects. */ | |
224 | ||
225 | extern int flag_huge_objects; | |
226 | ||
bbd15aac MM |
227 | /* Nonzero if virtual base class offsets are stored in the virtual |
228 | function table. Zero if, instead, a pointer to the virtual base is | |
229 | stored in the object itself. */ | |
230 | #define vbase_offsets_in_vtable_p() (flag_new_abi) | |
231 | ||
1a588ad7 MM |
232 | /* Nonzero if displacements to the `this' pointer to use when calling |
233 | virtual functions in a virtual base class are present in the | |
234 | vtable. */ | |
235 | #define vcall_offsets_in_vtable_p() (flag_new_abi) | |
236 | ||
bbd15aac MM |
237 | /* Nonzero if a derived class that needs a vptr should always get one, |
238 | even if a non-primary base class already has one. For example, | |
239 | given: | |
240 | ||
241 | struct S { int i; virtual void f(); }; | |
242 | struct T : virtual public S {}; | |
243 | ||
244 | one could either reuse the vptr in `S' for `T', or create a new | |
245 | vptr for `T'. If this flag is nonzero we choose the latter | |
246 | alternative; otherwise, we choose the former. */ | |
247 | #define vptrs_present_everywhere_p() (flag_new_abi) | |
248 | ||
051e6fd7 MM |
249 | /* Nonzero if the vtable for a derived class should contain the |
250 | virtual functions from the primary base and all virtual functions | |
251 | present in the class itself. Zero if, instead, it should contain | |
252 | only those virtual functions from the primary base together with | |
253 | the functions declared in the derived class (but not in any base | |
254 | class). */ | |
255 | #define all_overridden_vfuns_in_vtables_p() (flag_new_abi) | |
256 | ||
7267d692 NS |
257 | /* Nonzero if we use access type_info objects directly, and use the |
258 | cross-vendor layout for them. Zero if we use an accessor function | |
259 | to get the type_info object address. */ | |
808c61c8 | 260 | #define new_abi_rtti_p() (flag_new_abi) |
7267d692 | 261 | |
8d7a5379 MM |
262 | /* Nonzero if primary and secondary vtables are combined into a single |
263 | vtable. */ | |
264 | #define merge_primary_and_secondary_vtables_p() (flag_new_abi) | |
265 | ||
bbd15aac | 266 | \f |
8d08fdba MS |
267 | /* Language-dependent contents of an identifier. */ |
268 | ||
269 | struct lang_identifier | |
270 | { | |
271 | struct tree_identifier ignore; | |
f181d4ae MM |
272 | tree namespace_bindings; |
273 | tree bindings; | |
8d08fdba MS |
274 | tree class_value; |
275 | tree class_template_info; | |
276 | struct lang_id2 *x; | |
277 | }; | |
278 | ||
da8a66fc ML |
279 | #define LANG_IDENTIFIER_CAST(NODE) \ |
280 | ((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE)) | |
281 | ||
8d08fdba MS |
282 | struct lang_id2 |
283 | { | |
284 | tree label_value, implicit_decl; | |
9e0781b5 | 285 | tree error_locus; |
8d08fdba MS |
286 | }; |
287 | ||
46b02c6d MS |
288 | typedef struct |
289 | { | |
290 | tree t; | |
291 | int new_type_flag; | |
70adf8a9 | 292 | tree lookups; |
46b02c6d MS |
293 | } flagged_type_tree; |
294 | ||
f84b4be9 JM |
295 | typedef struct |
296 | { | |
297 | char common[sizeof (struct tree_common)]; | |
f84b4be9 JM |
298 | HOST_WIDE_INT index; |
299 | HOST_WIDE_INT level; | |
300 | HOST_WIDE_INT orig_level; | |
301 | tree decl; | |
302 | } template_parm_index; | |
303 | ||
61a127b3 MM |
304 | typedef struct ptrmem_cst |
305 | { | |
306 | char common[sizeof (struct tree_common)]; | |
87e3dbc9 MM |
307 | /* This isn't used, but the middle-end expects all constants to have |
308 | this field. */ | |
309 | struct rtx_def *rtl; | |
61a127b3 MM |
310 | tree member; |
311 | }* ptrmem_cst_t; | |
312 | ||
f181d4ae MM |
313 | /* Nonzero if this binding is for a local scope, as opposed to a class |
314 | or namespace scope. */ | |
315 | #define LOCAL_BINDING_P(NODE) TREE_LANG_FLAG_0(NODE) | |
316 | ||
8f032717 MM |
317 | /* Nonzero if BINDING_VALUE is from a base class of the class which is |
318 | currently being defined. */ | |
319 | #define INHERITED_VALUE_BINDING_P(NODE) TREE_LANG_FLAG_1(NODE) | |
320 | ||
f181d4ae MM |
321 | /* For a binding between a name and an entity at a non-local scope, |
322 | defines the scope where the binding is declared. (Either a class | |
323 | _TYPE node, or a NAMESPACE_DECL.) This macro should be used only | |
324 | for namespace-level bindings; on the IDENTIFIER_BINDING list | |
325 | BINDING_LEVEL is used instead. */ | |
da8a66fc | 326 | #define BINDING_SCOPE(NODE) (((struct tree_binding*)CPLUS_BINDING_CHECK (NODE))->scope.scope) |
f181d4ae | 327 | |
87e3dbc9 MM |
328 | /* Nonzero if NODE has BINDING_LEVEL, rather than BINDING_SCOPE. */ |
329 | #define BINDING_HAS_LEVEL_P(NODE) TREE_LANG_FLAG_2 ((NODE)) | |
330 | ||
2c73f9f5 ML |
331 | /* This is the declaration bound to the name. Possible values: |
332 | variable, overloaded function, namespace, template, enumerator. */ | |
da8a66fc | 333 | #define BINDING_VALUE(NODE) (((struct tree_binding*)CPLUS_BINDING_CHECK (NODE))->value) |
f181d4ae | 334 | |
2c73f9f5 ML |
335 | /* If name is bound to a type, this is the type (struct, union, enum). */ |
336 | #define BINDING_TYPE(NODE) TREE_TYPE(NODE) | |
f181d4ae | 337 | |
30394414 | 338 | #define IDENTIFIER_GLOBAL_VALUE(NODE) \ |
2c73f9f5 ML |
339 | namespace_binding (NODE, global_namespace) |
340 | #define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \ | |
341 | set_namespace_binding (NODE, global_namespace, VAL) | |
30394414 | 342 | #define IDENTIFIER_NAMESPACE_VALUE(NODE) \ |
2c73f9f5 ML |
343 | namespace_binding (NODE, current_namespace) |
344 | #define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \ | |
345 | set_namespace_binding (NODE, current_namespace, VAL) | |
30394414 JM |
346 | |
347 | struct tree_binding | |
348 | { | |
349 | char common[sizeof (struct tree_common)]; | |
c7a932b1 JM |
350 | union { |
351 | tree scope; | |
352 | struct binding_level *level; | |
353 | } scope; | |
30394414 JM |
354 | tree value; |
355 | }; | |
356 | ||
2c73f9f5 | 357 | /* The overloaded FUNCTION_DECL. */ |
da8a66fc | 358 | #define OVL_FUNCTION(NODE) (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function) |
2c73f9f5 ML |
359 | #define OVL_CHAIN(NODE) TREE_CHAIN(NODE) |
360 | /* Polymorphic access to FUNCTION and CHAIN. */ | |
361 | #define OVL_CURRENT(NODE) \ | |
362 | ((TREE_CODE(NODE)==OVERLOAD) ? OVL_FUNCTION(NODE) : NODE) | |
363 | #define OVL_NEXT(NODE) \ | |
364 | ((TREE_CODE(NODE)==OVERLOAD) ? TREE_CHAIN(NODE) : NULL_TREE) | |
365 | /* If set, this was imported in a using declaration. | |
366 | This is not to confuse with being used somewhere, which | |
367 | is not important for this node. */ | |
368 | #define OVL_USED(NODE) TREE_USED(NODE) | |
369 | ||
370 | struct tree_overload | |
371 | { | |
372 | char common[sizeof (struct tree_common)]; | |
373 | tree function; | |
374 | }; | |
375 | ||
4bb0968f MM |
376 | /* A `baselink' is a TREE_LIST whose TREE_PURPOSE is a BINFO |
377 | indicating a particular base class, and whose TREE_VALUE is a | |
378 | (possibly overloaded) function from that base class. */ | |
379 | #define BASELINK_P(NODE) \ | |
3927874d | 380 | (TREE_CODE (NODE) == TREE_LIST && TREE_LANG_FLAG_1 (NODE)) |
4bb0968f | 381 | #define SET_BASELINK_P(NODE) \ |
3927874d | 382 | (TREE_LANG_FLAG_1 (NODE) = 1) |
4bb0968f | 383 | |
da8a66fc ML |
384 | #define WRAPPER_PTR(NODE) (((struct tree_wrapper*)WRAPPER_CHECK (NODE))->u.ptr) |
385 | #define WRAPPER_INT(NODE) (((struct tree_wrapper*)WRAPPER_CHECK (NODE))->u.i) | |
5ffe581d JM |
386 | |
387 | struct tree_wrapper | |
388 | { | |
389 | char common[sizeof (struct tree_common)]; | |
390 | union { | |
391 | void *ptr; | |
392 | int i; | |
393 | } u; | |
394 | }; | |
395 | ||
da8a66fc ML |
396 | #define SRCLOC_FILE(NODE) (((struct tree_srcloc*)SRCLOC_CHECK (NODE))->filename) |
397 | #define SRCLOC_LINE(NODE) (((struct tree_srcloc*)SRCLOC_CHECK (NODE))->linenum) | |
1139b3d8 JM |
398 | struct tree_srcloc |
399 | { | |
400 | char common[sizeof (struct tree_common)]; | |
401 | char *filename; | |
402 | int linenum; | |
403 | }; | |
404 | ||
8d08fdba MS |
405 | /* Macros for access to language-specific slots in an identifier. */ |
406 | ||
30394414 | 407 | #define IDENTIFIER_NAMESPACE_BINDINGS(NODE) \ |
da8a66fc | 408 | (LANG_IDENTIFIER_CAST (NODE)->namespace_bindings) |
8d08fdba | 409 | #define IDENTIFIER_TEMPLATE(NODE) \ |
da8a66fc | 410 | (LANG_IDENTIFIER_CAST (NODE)->class_template_info) |
8d08fdba | 411 | |
f181d4ae MM |
412 | /* The IDENTIFIER_BINDING is the innermost CPLUS_BINDING for the |
413 | identifier. It's TREE_CHAIN is the next outermost binding. Each | |
414 | BINDING_VALUE is a DECL for the associated declaration. Thus, | |
415 | name lookup consists simply of pulling off the node at the front | |
416 | of the list (modulo oddities for looking up the names of types, | |
417 | and such.) You can use BINDING_SCOPE or BINDING_LEVEL to | |
418 | determine the scope that bound the name. */ | |
419 | #define IDENTIFIER_BINDING(NODE) \ | |
da8a66fc | 420 | (LANG_IDENTIFIER_CAST (NODE)->bindings) |
f181d4ae MM |
421 | |
422 | /* The IDENTIFIER_VALUE is the value of the IDENTIFIER_BINDING, or | |
423 | NULL_TREE if there is no binding. */ | |
424 | #define IDENTIFIER_VALUE(NODE) \ | |
425 | (IDENTIFIER_BINDING (NODE) \ | |
426 | ? BINDING_VALUE (IDENTIFIER_BINDING (NODE)) \ | |
427 | : NULL_TREE) | |
428 | ||
8f032717 MM |
429 | /* If IDENTIFIER_CLASS_VALUE is set, then NODE is bound in the current |
430 | class, and IDENTIFIER_CLASS_VALUE is the value binding. This is | |
431 | just a pointer to the BINDING_VALUE of one of the bindings in the | |
432 | IDENTIFIER_BINDINGs list, so any time that this is non-NULL so is | |
f181d4ae MM |
433 | IDENTIFIER_BINDING. */ |
434 | #define IDENTIFIER_CLASS_VALUE(NODE) \ | |
da8a66fc | 435 | (LANG_IDENTIFIER_CAST (NODE)->class_value) |
f181d4ae MM |
436 | |
437 | /* The amount of time used by the file whose special "time identifier" | |
438 | is NODE, represented as an INTEGER_CST. See get_time_identifier. */ | |
439 | #define TIME_IDENTIFIER_TIME(NODE) IDENTIFIER_BINDING(NODE) | |
440 | ||
441 | /* For a "time identifier" this is a INTEGER_CST. The | |
442 | TREE_INT_CST_LOW is 1 if the corresponding file is "interface only". | |
443 | The TRE_INT_CST_HIGH is 1 if it is "interface unknown". */ | |
444 | #define TIME_IDENTIFIER_FILEINFO(NODE) IDENTIFIER_CLASS_VALUE (NODE) | |
445 | ||
2c73f9f5 ML |
446 | /* TREE_TYPE only indicates on local and class scope the current |
447 | type. For namespace scope, the presence of a type in any namespace | |
448 | is indicated with global_type_node, and the real type behind must | |
449 | be found through lookup. */ | |
450 | #define IDENTIFIER_TYPE_VALUE(NODE) (identifier_type_value(NODE)) | |
451 | #define REAL_IDENTIFIER_TYPE_VALUE(NODE) (TREE_TYPE (NODE)) | |
8d08fdba | 452 | #define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = TYPE) |
2c73f9f5 | 453 | #define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0) |
8d08fdba | 454 | |
da8a66fc ML |
455 | #define LANG_ID_FIELD(NAME,NODE) \ |
456 | (LANG_IDENTIFIER_CAST (NODE)->x \ | |
457 | ? LANG_IDENTIFIER_CAST (NODE)->x->NAME : 0) | |
458 | ||
459 | #define SET_LANG_ID(NODE,VALUE,NAME) \ | |
460 | (LANG_IDENTIFIER_CAST (NODE)->x == 0 \ | |
461 | ? LANG_IDENTIFIER_CAST (NODE)->x \ | |
462 | = (struct lang_id2 *)perm_calloc (1, sizeof (struct lang_id2)) : 0, \ | |
463 | LANG_IDENTIFIER_CAST (NODE)->x->NAME = (VALUE)) | |
8d08fdba MS |
464 | |
465 | #define IDENTIFIER_LABEL_VALUE(NODE) LANG_ID_FIELD(label_value, NODE) | |
466 | #define SET_IDENTIFIER_LABEL_VALUE(NODE,VALUE) \ | |
467 | SET_LANG_ID(NODE, VALUE, label_value) | |
468 | ||
469 | #define IDENTIFIER_IMPLICIT_DECL(NODE) LANG_ID_FIELD(implicit_decl, NODE) | |
470 | #define SET_IDENTIFIER_IMPLICIT_DECL(NODE,VALUE) \ | |
471 | SET_LANG_ID(NODE, VALUE, implicit_decl) | |
472 | ||
8d08fdba MS |
473 | #define IDENTIFIER_ERROR_LOCUS(NODE) LANG_ID_FIELD(error_locus, NODE) |
474 | #define SET_IDENTIFIER_ERROR_LOCUS(NODE,VALUE) \ | |
475 | SET_LANG_ID(NODE, VALUE, error_locus) | |
476 | ||
477 | ||
478 | #define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1(NODE) | |
479 | ||
f71f87f9 MM |
480 | /* Nonzero if this identifier is the prefix for a mangled C++ operator |
481 | name. */ | |
8d08fdba MS |
482 | #define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2(NODE) |
483 | ||
4c571114 MM |
484 | /* Nonzero if this identifier is the name of a type-conversion |
485 | operator. */ | |
486 | #define IDENTIFIER_TYPENAME_P(NODE) \ | |
487 | (! strncmp (IDENTIFIER_POINTER (NODE), \ | |
488 | OPERATOR_TYPENAME_FORMAT, \ | |
489 | strlen (OPERATOR_TYPENAME_FORMAT))) | |
8d08fdba | 490 | |
298d6f60 MM |
491 | /* Nonzero if this identifier is the name of a constructor or |
492 | destructor. */ | |
493 | #define IDENTIFIER_CTOR_OR_DTOR_P(NODE) \ | |
494 | TREE_LANG_FLAG_3 (NODE) | |
495 | ||
cab1f180 | 496 | /* Nonzero means reject anything that ISO standard C++ forbids. */ |
8d08fdba MS |
497 | extern int pedantic; |
498 | ||
499 | /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only. */ | |
500 | #define C_TYPE_FIELDS_READONLY(type) TYPE_LANG_FLAG_0 (type) | |
e1cd6e56 MS |
501 | |
502 | /* Record in each node resulting from a binary operator | |
503 | what operator was specified for it. */ | |
504 | #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp)) | |
505 | ||
506 | /* Store a value in that field. */ | |
507 | #define C_SET_EXP_ORIGINAL_CODE(exp, code) \ | |
508 | (TREE_COMPLEXITY (exp) = (int)(code)) | |
8d08fdba MS |
509 | \f |
510 | /* If non-zero, a VAR_DECL whose cleanup will cause a throw to the | |
511 | next exception handler. */ | |
512 | extern tree exception_throw_decl; | |
513 | ||
7f4edbcb BS |
514 | enum cp_tree_index |
515 | { | |
516 | CPTI_JAVA_BYTE_TYPE, | |
517 | CPTI_JAVA_SHORT_TYPE, | |
518 | CPTI_JAVA_INT_TYPE, | |
519 | CPTI_JAVA_LONG_TYPE, | |
520 | CPTI_JAVA_FLOAT_TYPE, | |
521 | CPTI_JAVA_DOUBLE_TYPE, | |
522 | CPTI_JAVA_CHAR_TYPE, | |
523 | CPTI_JAVA_BOOLEAN_TYPE, | |
524 | ||
525 | CPTI_VOID_ZERO, | |
526 | CPTI_WCHAR_DECL, | |
527 | CPTI_VTABLE_ENTRY_TYPE, | |
528 | CPTI_DELTA_TYPE, | |
c7e266a6 | 529 | CPTI_VTABLE_INDEX_TYPE, |
b3ab27f3 | 530 | CPTI_CLEANUP_TYPE, |
7f4edbcb | 531 | |
db1147b2 | 532 | CPTI_TI_DESC_TYPE, |
7f4edbcb | 533 | CPTI_BLTN_DESC_TYPE, |
7f4edbcb | 534 | CPTI_PTR_DESC_TYPE, |
db1147b2 | 535 | CPTI_ARY_DESC_TYPE, |
7f4edbcb | 536 | CPTI_FUNC_DESC_TYPE, |
db1147b2 NS |
537 | CPTI_ENUM_DESC_TYPE, |
538 | CPTI_CLASS_DESC_TYPE, | |
539 | CPTI_SI_CLASS_DESC_TYPE, | |
540 | CPTI_VMI_CLASS_DESC_TYPE, | |
7f4edbcb | 541 | CPTI_PTMD_DESC_TYPE, |
db1147b2 | 542 | CPTI_BASE_DESC_TYPE, |
7f4edbcb | 543 | |
7f4edbcb BS |
544 | CPTI_CLASS_TYPE, |
545 | CPTI_RECORD_TYPE, | |
546 | CPTI_UNION_TYPE, | |
547 | CPTI_ENUM_TYPE, | |
548 | CPTI_UNKNOWN_TYPE, | |
7f4edbcb BS |
549 | CPTI_VTBL_TYPE, |
550 | CPTI_VTBL_PTR_TYPE, | |
551 | CPTI_STD, | |
2854d3c6 | 552 | CPTI_ABI, |
7f4edbcb | 553 | CPTI_TYPE_INFO_TYPE, |
db1147b2 NS |
554 | CPTI_TINFO_DECL_ID, |
555 | CPTI_TINFO_DECL_TYPE, | |
556 | CPTI_TINFO_VAR_ID, | |
7f4edbcb BS |
557 | CPTI_ABORT_FNDECL, |
558 | CPTI_GLOBAL_DELETE_FNDECL, | |
559 | ||
9cd64686 MM |
560 | CPTI_ACCESS_DEFAULT, |
561 | CPTI_ACCESS_PUBLIC, | |
562 | CPTI_ACCESS_PROTECTED, | |
563 | CPTI_ACCESS_PRIVATE, | |
564 | CPTI_ACCESS_DEFAULT_VIRTUAL, | |
565 | CPTI_ACCESS_PUBLIC_VIRTUAL, | |
566 | CPTI_ACCESS_PROTECTED_VIRTUAL, | |
567 | CPTI_ACCESS_PRIVATE_VIRTUAL, | |
568 | ||
569 | CPTI_CTOR_IDENTIFIER, | |
9eb71d8c | 570 | CPTI_COMPLETE_CTOR_IDENTIFIER, |
d43829f9 MM |
571 | CPTI_BASE_CTOR_IDENTIFIER, |
572 | CPTI_DTOR_IDENTIFIER, | |
db9b2174 | 573 | CPTI_COMPLETE_DTOR_IDENTIFIER, |
d43829f9 MM |
574 | CPTI_BASE_DTOR_IDENTIFIER, |
575 | CPTI_DELETING_DTOR_IDENTIFIER, | |
9cd64686 MM |
576 | CPTI_DELTA2_IDENTIFIER, |
577 | CPTI_DELTA_IDENTIFIER, | |
9cd64686 MM |
578 | CPTI_IN_CHARGE_IDENTIFIER, |
579 | CPTI_INDEX_IDENTIFIER, | |
580 | CPTI_NELTS_IDENTIFIER, | |
581 | CPTI_THIS_IDENTIFIER, | |
582 | CPTI_PFN_IDENTIFIER, | |
583 | CPTI_PFN_OR_DELTA2_IDENTIFIER, | |
584 | CPTI_VPTR_IDENTIFIER, | |
298d6f60 | 585 | CPTI_PUSH_EXCEPTION_IDENTIFIER, |
9cd64686 MM |
586 | |
587 | CPTI_LANG_NAME_C, | |
588 | CPTI_LANG_NAME_CPLUSPLUS, | |
589 | CPTI_LANG_NAME_JAVA, | |
590 | ||
591 | CPTI_EMPTY_EXCEPT_SPEC, | |
592 | CPTI_NULL, | |
593 | CPTI_JCLASS, | |
594 | CPTI_MINUS_ONE, | |
595 | CPTI_TERMINATE, | |
f0105ed3 | 596 | CPTI_ATEXIT, |
db4283a0 | 597 | CPTI_DSO_HANDLE, |
059fa5e7 | 598 | CPTI_DCAST, |
9cd64686 | 599 | |
7f4edbcb BS |
600 | CPTI_MAX |
601 | }; | |
8d08fdba | 602 | |
7f4edbcb BS |
603 | extern tree cp_global_trees[CPTI_MAX]; |
604 | ||
605 | #define java_byte_type_node cp_global_trees[CPTI_JAVA_BYTE_TYPE] | |
606 | #define java_short_type_node cp_global_trees[CPTI_JAVA_SHORT_TYPE] | |
607 | #define java_int_type_node cp_global_trees[CPTI_JAVA_INT_TYPE] | |
608 | #define java_long_type_node cp_global_trees[CPTI_JAVA_LONG_TYPE] | |
609 | #define java_float_type_node cp_global_trees[CPTI_JAVA_FLOAT_TYPE] | |
610 | #define java_double_type_node cp_global_trees[CPTI_JAVA_DOUBLE_TYPE] | |
611 | #define java_char_type_node cp_global_trees[CPTI_JAVA_CHAR_TYPE] | |
612 | #define java_boolean_type_node cp_global_trees[CPTI_JAVA_BOOLEAN_TYPE] | |
613 | ||
614 | #define void_zero_node cp_global_trees[CPTI_VOID_ZERO] | |
615 | #define wchar_decl_node cp_global_trees[CPTI_WCHAR_DECL] | |
616 | #define vtable_entry_type cp_global_trees[CPTI_VTABLE_ENTRY_TYPE] | |
c7e266a6 MM |
617 | /* The type used to represent an offset by which to adjust the `this' |
618 | pointer in pointer-to-member types and, when not using vtable | |
619 | thunks, in vtables. */ | |
7f4edbcb | 620 | #define delta_type_node cp_global_trees[CPTI_DELTA_TYPE] |
c7e266a6 MM |
621 | /* The type used to represent an index into the vtable. */ |
622 | #define vtable_index_type cp_global_trees[CPTI_VTABLE_INDEX_TYPE] | |
db1147b2 NS |
623 | |
624 | #define ti_desc_type_node cp_global_trees[CPTI_TI_DESC_TYPE] | |
625 | #define bltn_desc_type_node cp_global_trees[CPTI_BLTN_DESC_TYPE] | |
626 | #define ptr_desc_type_node cp_global_trees[CPTI_PTR_DESC_TYPE] | |
db1147b2 NS |
627 | #define ary_desc_type_node cp_global_trees[CPTI_ARY_DESC_TYPE] |
628 | #define func_desc_type_node cp_global_trees[CPTI_FUNC_DESC_TYPE] | |
629 | #define enum_desc_type_node cp_global_trees[CPTI_ENUM_DESC_TYPE] | |
630 | #define class_desc_type_node cp_global_trees[CPTI_CLASS_DESC_TYPE] | |
631 | #define si_class_desc_type_node cp_global_trees[CPTI_SI_CLASS_DESC_TYPE] | |
632 | #define vmi_class_desc_type_node cp_global_trees[CPTI_VMI_CLASS_DESC_TYPE] | |
633 | #define ptmd_desc_type_node cp_global_trees[CPTI_PTMD_DESC_TYPE] | |
634 | #define base_desc_type_node cp_global_trees[CPTI_BASE_DESC_TYPE] | |
635 | ||
7f4edbcb BS |
636 | #define class_type_node cp_global_trees[CPTI_CLASS_TYPE] |
637 | #define record_type_node cp_global_trees[CPTI_RECORD_TYPE] | |
638 | #define union_type_node cp_global_trees[CPTI_UNION_TYPE] | |
639 | #define enum_type_node cp_global_trees[CPTI_ENUM_TYPE] | |
640 | #define unknown_type_node cp_global_trees[CPTI_UNKNOWN_TYPE] | |
7f4edbcb BS |
641 | #define vtbl_type_node cp_global_trees[CPTI_VTBL_TYPE] |
642 | #define vtbl_ptr_type_node cp_global_trees[CPTI_VTBL_PTR_TYPE] | |
643 | #define std_node cp_global_trees[CPTI_STD] | |
2854d3c6 | 644 | #define abi_node cp_global_trees[CPTI_ABI] |
7f4edbcb | 645 | #define type_info_type_node cp_global_trees[CPTI_TYPE_INFO_TYPE] |
db1147b2 NS |
646 | #define tinfo_decl_id cp_global_trees[CPTI_TINFO_DECL_ID] |
647 | #define tinfo_decl_type cp_global_trees[CPTI_TINFO_DECL_TYPE] | |
648 | #define tinfo_var_id cp_global_trees[CPTI_TINFO_VAR_ID] | |
7f4edbcb BS |
649 | #define abort_fndecl cp_global_trees[CPTI_ABORT_FNDECL] |
650 | #define global_delete_fndecl cp_global_trees[CPTI_GLOBAL_DELETE_FNDECL] | |
ea419909 | 651 | |
9cd64686 MM |
652 | /* Define the sets of attributes that member functions and baseclasses |
653 | can have. These are sensible combinations of {public,private,protected} | |
654 | cross {virtual,non-virtual}. */ | |
655 | ||
656 | #define access_default_node cp_global_trees[CPTI_ACCESS_DEFAULT] | |
657 | #define access_public_node cp_global_trees[CPTI_ACCESS_PUBLIC] | |
658 | #define access_protected_node cp_global_trees[CPTI_ACCESS_PROTECTED] | |
659 | #define access_private_node cp_global_trees[CPTI_ACCESS_PRIVATE] | |
660 | #define access_default_virtual_node cp_global_trees[CPTI_ACCESS_DEFAULT_VIRTUAL] | |
661 | #define access_public_virtual_node cp_global_trees[CPTI_ACCESS_PUBLIC_VIRTUAL] | |
662 | #define access_protected_virtual_node cp_global_trees[CPTI_ACCESS_PROTECTED_VIRTUAL] | |
663 | #define access_private_virtual_node cp_global_trees[CPTI_ACCESS_PRIVATE_VIRTUAL] | |
664 | ||
665 | /* We cache these tree nodes so as to call get_identifier less | |
666 | frequently. */ | |
667 | ||
9eb71d8c | 668 | /* The name of a constructor that takes an in-charge parameter to |
db9b2174 | 669 | decide whether or not to construct virtual base classes. */ |
9cd64686 | 670 | #define ctor_identifier cp_global_trees[CPTI_CTOR_IDENTIFIER] |
9eb71d8c MM |
671 | /* The name of a constructor that constructs virtual base classes. */ |
672 | #define complete_ctor_identifier cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER] | |
d43829f9 MM |
673 | /* The name of a constructor that does not construct virtual base classes. */ |
674 | #define base_ctor_identifier cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER] | |
db9b2174 MM |
675 | /* The name of a destructor that takes an in-charge parameter to |
676 | decide whether or not to destroy virtual base classes and whether | |
677 | or not to delete the object. */ | |
d43829f9 | 678 | #define dtor_identifier cp_global_trees[CPTI_DTOR_IDENTIFIER] |
db9b2174 MM |
679 | /* The name of a destructor that destroys virtual base classes. */ |
680 | #define complete_dtor_identifier cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER] | |
d43829f9 MM |
681 | /* The name of a destructor that does not destroy virtual base |
682 | classes. */ | |
683 | #define base_dtor_identifier cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER] | |
684 | /* The name of a destructor that destroys virtual base classes, and | |
685 | then deletes the entire object. */ | |
686 | #define deleting_dtor_identifier cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER] | |
687 | ||
9cd64686 MM |
688 | #define delta2_identifier cp_global_trees[CPTI_DELTA2_IDENTIFIER] |
689 | #define delta_identifier cp_global_trees[CPTI_DELTA_IDENTIFIER] | |
9cd64686 MM |
690 | #define in_charge_identifier cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER] |
691 | #define index_identifier cp_global_trees[CPTI_INDEX_IDENTIFIER] | |
692 | #define nelts_identifier cp_global_trees[CPTI_NELTS_IDENTIFIER] | |
693 | #define this_identifier cp_global_trees[CPTI_THIS_IDENTIFIER] | |
694 | #define pfn_identifier cp_global_trees[CPTI_PFN_IDENTIFIER] | |
695 | #define pfn_or_delta2_identifier cp_global_trees[CPTI_PFN_OR_DELTA2_IDENTIFIER] | |
696 | #define vptr_identifier cp_global_trees[CPTI_VPTR_IDENTIFIER] | |
298d6f60 MM |
697 | /* The name of the function to call to push an exception onto the |
698 | exception stack. */ | |
699 | #define cp_push_exception_identifier cp_global_trees[CPTI_PUSH_EXCEPTION_IDENTIFIER] | |
9cd64686 MM |
700 | |
701 | #define lang_name_c cp_global_trees[CPTI_LANG_NAME_C] | |
702 | #define lang_name_cplusplus cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS] | |
703 | #define lang_name_java cp_global_trees[CPTI_LANG_NAME_JAVA] | |
704 | ||
705 | /* Exception specifier used for throw(). */ | |
706 | #define empty_except_spec cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC] | |
707 | ||
708 | /* The node for `__null'. */ | |
709 | #define null_node cp_global_trees[CPTI_NULL] | |
710 | ||
711 | /* If non-NULL, a POINTER_TYPE equivalent to (java::lang::Class*). */ | |
712 | #define jclass_node cp_global_trees[CPTI_JCLASS] | |
713 | ||
714 | /* A node for `(int) -1'. */ | |
715 | #define minus_one_node cp_global_trees[CPTI_MINUS_ONE] | |
716 | ||
717 | /* The declaration for `std::terminate'. */ | |
718 | #define terminate_node cp_global_trees[CPTI_TERMINATE] | |
719 | ||
db4283a0 | 720 | /* A pointer to `std::atexit'. */ |
f0105ed3 MM |
721 | #define atexit_node cp_global_trees[CPTI_ATEXIT] |
722 | ||
db4283a0 MM |
723 | /* A pointer to `__dso_handle'. */ |
724 | #define dso_handle_node cp_global_trees[CPTI_DSO_HANDLE] | |
725 | ||
059fa5e7 NS |
726 | /* The declaration of the dynamic_cast runtime. */ |
727 | #define dynamic_cast_node cp_global_trees[CPTI_DCAST] | |
728 | ||
b3ab27f3 MM |
729 | /* The type of a destructor. */ |
730 | #define cleanup_type cp_global_trees[CPTI_CLEANUP_TYPE] | |
731 | ||
9cd64686 MM |
732 | /* Global state. */ |
733 | ||
6f80451c MM |
734 | struct stmt_tree { |
735 | tree x_last_stmt; | |
736 | tree x_last_expr_type; | |
737 | int stmts_are_full_exprs_p; | |
738 | }; | |
739 | ||
9cd64686 | 740 | struct saved_scope { |
9cd64686 MM |
741 | tree old_bindings; |
742 | tree old_namespace; | |
fc0e7bf5 MM |
743 | tree class_name; |
744 | tree class_type; | |
9cd64686 | 745 | tree access_specifier; |
a8f73d4b | 746 | tree function_decl; |
9cd64686 MM |
747 | varray_type lang_base; |
748 | tree *lang_stack; | |
749 | tree lang_name; | |
750 | tree x_function_parms; | |
751 | tree template_parms; | |
9cd64686 MM |
752 | tree x_previous_class_type; |
753 | tree x_previous_class_values; | |
6f80451c | 754 | tree x_saved_tree; |
70adf8a9 JM |
755 | tree incomplete; |
756 | tree lookups; | |
fc0e7bf5 MM |
757 | |
758 | HOST_WIDE_INT x_processing_template_decl; | |
9cd64686 MM |
759 | int x_processing_specialization; |
760 | int x_processing_explicit_instantiation; | |
a8f73d4b | 761 | int need_pop_function_context; |
fc0e7bf5 | 762 | |
6f80451c | 763 | struct stmt_tree x_stmt_tree; |
fc0e7bf5 MM |
764 | |
765 | struct binding_level *class_bindings; | |
a8f73d4b | 766 | struct binding_level *bindings; |
fc0e7bf5 MM |
767 | |
768 | struct saved_scope *prev; | |
9cd64686 MM |
769 | }; |
770 | ||
771 | /* The current open namespace. */ | |
772 | ||
773 | #define current_namespace scope_chain->old_namespace | |
774 | ||
775 | /* IDENTIFIER_NODE: name of current class */ | |
776 | ||
777 | #define current_class_name scope_chain->class_name | |
778 | ||
779 | /* _TYPE: the type of the current class */ | |
780 | ||
781 | #define current_class_type scope_chain->class_type | |
782 | ||
783 | /* When parsing a class definition, the access specifier most recently | |
784 | given by the user, or, if no access specifier was given, the | |
785 | default value appropriate for the kind of class (i.e., struct, | |
786 | class, or union). */ | |
787 | ||
788 | #define current_access_specifier scope_chain->access_specifier | |
789 | ||
790 | /* Pointer to the top of the language name stack. */ | |
791 | ||
792 | #define current_lang_stack scope_chain->lang_stack | |
793 | #define current_lang_base scope_chain->lang_base | |
794 | #define current_lang_name scope_chain->lang_name | |
795 | ||
796 | /* Parsing a function declarator leaves a list of parameter names | |
797 | or a chain or parameter decls here. */ | |
798 | ||
799 | #define current_function_parms scope_chain->x_function_parms | |
800 | #define current_template_parms scope_chain->template_parms | |
801 | ||
802 | #define processing_template_decl scope_chain->x_processing_template_decl | |
803 | #define processing_specialization scope_chain->x_processing_specialization | |
804 | #define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation | |
805 | ||
806 | /* _TYPE: the previous type that was a class */ | |
807 | ||
808 | #define previous_class_type scope_chain->x_previous_class_type | |
809 | ||
810 | /* This is a copy of the class_shadowed list of the previous class | |
811 | binding contour when at global scope. It's used to reset | |
812 | IDENTIFIER_CLASS_VALUEs when entering another class scope (i.e. a | |
813 | cache miss). */ | |
814 | ||
815 | #define previous_class_values scope_chain->x_previous_class_values | |
816 | ||
70adf8a9 JM |
817 | /* A list of the declarations with incomplete type at namespace scope. */ |
818 | ||
819 | #define namespace_scope_incomplete scope_chain->incomplete | |
820 | ||
821 | /* A list of private types mentioned, for deferred access checking. */ | |
822 | ||
823 | #define type_lookups scope_chain->lookups | |
824 | ||
9cd64686 MM |
825 | extern struct saved_scope *scope_chain; |
826 | ||
8012c983 MM |
827 | /* Global state pertinent to the current function. */ |
828 | ||
99dccabc | 829 | struct language_function |
8012c983 | 830 | { |
4519c0a8 MM |
831 | tree x_named_labels; |
832 | tree x_ctor_label; | |
833 | tree x_dtor_label; | |
834 | tree x_base_init_list; | |
835 | tree x_member_init_list; | |
4519c0a8 MM |
836 | tree x_current_class_ptr; |
837 | tree x_current_class_ref; | |
2c146a76 MM |
838 | tree x_eh_spec_try_block; |
839 | tree x_scope_stmt_stack; | |
840 | tree x_in_charge_parm; | |
4519c0a8 | 841 | |
9bfadf57 MM |
842 | tree *x_vcalls_possible_p; |
843 | ||
4519c0a8 | 844 | struct rtx_def *x_result_rtx; |
8012c983 MM |
845 | |
846 | int returns_value; | |
847 | int returns_null; | |
8012c983 MM |
848 | int parms_stored; |
849 | int temp_name_counter; | |
8012c983 | 850 | int in_function_try_handler; |
ed5511d9 | 851 | int x_expanding_p; |
24bef158 | 852 | int name_declared; |
9bfadf57 | 853 | int vtbls_set_up_p; |
8012c983 | 854 | |
6f80451c MM |
855 | struct stmt_tree x_stmt_tree; |
856 | ||
ed5511d9 | 857 | struct named_label_list *x_named_label_uses; |
a8f73d4b | 858 | struct binding_level *bindings; |
914653a2 MM |
859 | |
860 | const char *cannot_inline; | |
8012c983 MM |
861 | }; |
862 | ||
99dccabc | 863 | /* The current C++-specific per-function global variables. */ |
8012c983 | 864 | |
01d939e8 | 865 | #define cp_function_chain (cfun->language) |
8012c983 MM |
866 | |
867 | /* In a destructor, the point at which all derived class destroying | |
868 | has been done, just before any base class destroying will be done. */ | |
869 | ||
4519c0a8 | 870 | #define dtor_label cp_function_chain->x_dtor_label |
8012c983 MM |
871 | |
872 | /* In a constructor, the point at which we are ready to return | |
873 | the pointer to the initialized object. */ | |
874 | ||
4519c0a8 | 875 | #define ctor_label cp_function_chain->x_ctor_label |
8012c983 MM |
876 | |
877 | /* In C++, structures with well-defined constructors are initialized by | |
878 | those constructors, unasked. CURRENT_BASE_INIT_LIST | |
879 | holds a list of stmts for a BASE_INIT term in the grammar. | |
880 | This list has one element for each base class which must be | |
881 | initialized. The list elements are [basename, init], with | |
882 | type basetype. This allows the possibly anachronistic form | |
883 | (assuming d : a, b, c) "d (int a) : c(a+5), b (a-4), a (a+3)" | |
884 | where each successive term can be handed down the constructor | |
885 | line. Perhaps this was not intended. */ | |
886 | ||
4519c0a8 MM |
887 | #define current_base_init_list cp_function_chain->x_base_init_list |
888 | #define current_member_init_list cp_function_chain->x_member_init_list | |
8012c983 | 889 | |
8012c983 MM |
890 | /* When we're processing a member function, current_class_ptr is the |
891 | PARM_DECL for the `this' pointer. The current_class_ref is an | |
892 | expression for `*this'. */ | |
893 | ||
a8f73d4b | 894 | #define current_class_ptr \ |
01d939e8 | 895 | (cfun ? cp_function_chain->x_current_class_ptr : NULL_TREE) |
a8f73d4b | 896 | #define current_class_ref \ |
01d939e8 | 897 | (cfun ? cp_function_chain->x_current_class_ref : NULL_TREE) |
8012c983 | 898 | |
6f80451c MM |
899 | /* Information about the current statement tree. */ |
900 | ||
901 | #define current_stmt_tree \ | |
01d939e8 | 902 | (cfun \ |
6f80451c MM |
903 | ? &cp_function_chain->x_stmt_tree \ |
904 | : &scope_chain->x_stmt_tree) | |
905 | ||
906 | /* When building a statement-tree, this is the last statement added to | |
907 | the tree. */ | |
8012c983 | 908 | |
6f80451c | 909 | #define last_tree current_stmt_tree->x_last_stmt |
8012c983 MM |
910 | |
911 | /* The type of the last expression-statement we have seen. This is | |
912 | required because the type of a statement-expression is the type of | |
913 | the last expression statement. */ | |
914 | ||
6f80451c | 915 | #define last_expr_type current_stmt_tree->x_last_expr_type |
8d08fdba | 916 | |
2c146a76 MM |
917 | /* The TRY_BLOCK for the exception-specifiers for the current |
918 | function, if any. */ | |
919 | ||
920 | #define current_eh_spec_try_block cp_function_chain->x_eh_spec_try_block | |
921 | ||
922 | /* The stack of SCOPE_STMTs for the current function. */ | |
923 | ||
924 | #define current_scope_stmt_stack cp_function_chain->x_scope_stmt_stack | |
925 | ||
926 | /* The `__in_chrg' parameter for the current function. Only used for | |
927 | destructors. */ | |
928 | ||
929 | #define current_in_charge_parm cp_function_chain->x_in_charge_parm | |
930 | ||
9bfadf57 MM |
931 | /* In destructors, this is a pointer to a condition in an |
932 | if-statement. If the pointed-to value is boolean_true_node, then | |
933 | there may be virtual function calls in this destructor. */ | |
934 | ||
935 | #define current_vcalls_possible_p cp_function_chain->x_vcalls_possible_p | |
936 | ||
8012c983 MM |
937 | /* Set to 0 at beginning of a function definition, set to 1 if |
938 | a return statement that specifies a return value is seen. */ | |
939 | ||
940 | #define current_function_returns_value cp_function_chain->returns_value | |
941 | ||
942 | /* Set to 0 at beginning of a function definition, set to 1 if | |
943 | a return statement with no argument is seen. */ | |
944 | ||
945 | #define current_function_returns_null cp_function_chain->returns_null | |
946 | ||
947 | #define current_function_just_assigned_this \ | |
948 | cp_function_chain->just_assigned_this | |
949 | ||
950 | #define current_function_parms_stored \ | |
951 | cp_function_chain->parms_stored | |
952 | ||
f9817201 MM |
953 | /* One if we have already declared __FUNCTION__ (and related |
954 | variables) in the current function. Two if we are in the process | |
955 | of doing so. */ | |
24bef158 MM |
956 | |
957 | #define current_function_name_declared \ | |
958 | cp_function_chain->name_declared | |
959 | ||
9bfadf57 MM |
960 | /* Nonzero if we have already generated code to initialize virtual |
961 | function tables in this function. */ | |
962 | ||
963 | #define vtbls_set_up_p cp_function_chain->vtbls_set_up_p | |
964 | ||
8012c983 MM |
965 | /* Used to help generate temporary names which are unique within |
966 | a function. Reset to 0 by start_function. */ | |
967 | ||
968 | #define temp_name_counter cp_function_chain->temp_name_counter | |
969 | ||
8012c983 MM |
970 | /* Non-zero if we should generate RTL for functions that we process. |
971 | When this is zero, we just accumulate tree structure, without | |
972 | interacting with the back end. */ | |
973 | ||
ed5511d9 | 974 | #define expanding_p cp_function_chain->x_expanding_p |
8012c983 | 975 | |
b35d4555 MM |
976 | /* Non-zero if we are in the semantic analysis phase for the current |
977 | function. */ | |
978 | ||
6f80451c | 979 | #define doing_semantic_analysis_p() (!expanding_p) |
b35d4555 | 980 | |
8012c983 MM |
981 | /* Non-zero if we should treat statements as full expressions. In |
982 | particular, this variable is no-zero if at the end of a statement | |
983 | we should destroy any temporaries created during that statement. | |
984 | Similarly, if, at the end of a block, we should destroy any local | |
985 | variables in this block. Normally, this variable is non-zero, | |
986 | since those are the normal semantics of C++. | |
987 | ||
988 | However, in order to represent aggregate initialization code as | |
989 | tree structure, we use statement-expressions. The statements | |
990 | within the statement expression should not result in cleanups being | |
991 | run until the entire enclosing statement is complete. */ | |
992 | ||
6f80451c MM |
993 | #define stmts_are_full_exprs_p \ |
994 | current_stmt_tree->stmts_are_full_exprs_p | |
8012c983 MM |
995 | |
996 | #define in_function_try_handler cp_function_chain->in_function_try_handler | |
997 | ||
998 | extern tree current_function_return_value; | |
30394414 JM |
999 | extern tree global_namespace; |
1000 | ||
8d08fdba MS |
1001 | extern tree ridpointers[]; |
1002 | extern tree ansi_opname[]; | |
1003 | extern tree ansi_assopname[]; | |
1004 | ||
1005 | /* Nonzero means `$' can be in an identifier. */ | |
1006 | ||
1007 | extern int dollars_in_ident; | |
1008 | ||
1009 | /* Nonzero means allow type mismatches in conditional expressions; | |
1010 | just make their values `void'. */ | |
1011 | ||
1012 | extern int flag_cond_mismatch; | |
1013 | ||
1014 | /* Nonzero means don't recognize the keyword `asm'. */ | |
1015 | ||
1016 | extern int flag_no_asm; | |
1017 | ||
1018 | /* For cross referencing. */ | |
1019 | ||
1020 | extern int flag_gnu_xref; | |
1021 | ||
1022 | /* For environments where you can use GNU binutils (as, ld in particular). */ | |
1023 | ||
1024 | extern int flag_gnu_binutils; | |
1025 | ||
8d08fdba MS |
1026 | /* Nonzero means warn about implicit declarations. */ |
1027 | ||
1028 | extern int warn_implicit; | |
1029 | ||
795add94 VM |
1030 | /* Nonzero means warn about usage of long long when `-pedantic'. */ |
1031 | ||
1032 | extern int warn_long_long; | |
1033 | ||
8d08fdba MS |
1034 | /* Nonzero means warn when all ctors or dtors are private, and the class |
1035 | has no friends. */ | |
1036 | ||
1037 | extern int warn_ctor_dtor_privacy; | |
1038 | ||
1039 | /* Nonzero means warn about function definitions that default the return type | |
1040 | or that use a null return and have a return-type other than void. */ | |
1041 | ||
1042 | extern int warn_return_type; | |
1043 | ||
d9cf7c82 JM |
1044 | /* Nonzero means give string constants the type `const char *', as mandated |
1045 | by the standard. */ | |
1046 | ||
1047 | extern int flag_const_strings; | |
1048 | ||
79f5f47f BK |
1049 | /* If non-NULL, dump the tree structure for the entire translation |
1050 | unit to this file. */ | |
1051 | ||
1052 | extern char *flag_dump_translation_unit; | |
1053 | ||
d9cf7c82 JM |
1054 | /* Nonzero means warn about deprecated conversion from string constant to |
1055 | `char *'. */ | |
8d08fdba MS |
1056 | |
1057 | extern int warn_write_strings; | |
1058 | ||
1059 | /* Nonzero means warn about sizeof(function) or addition/subtraction | |
1060 | of function pointers. */ | |
1061 | ||
1062 | extern int warn_pointer_arith; | |
1063 | ||
8d08fdba MS |
1064 | /* Nonzero means warn about suggesting putting in ()'s. */ |
1065 | ||
1066 | extern int warn_parentheses; | |
1067 | ||
1068 | /* Nonzero means warn about multiple (redundant) decls for the same single | |
1069 | variable or function. */ | |
1070 | ||
1071 | extern int warn_redundant_decls; | |
1072 | ||
1073 | /* Warn if initializer is not completely bracketed. */ | |
1074 | ||
1075 | extern int warn_missing_braces; | |
1076 | ||
2ee887f2 MS |
1077 | /* Warn about comparison of signed and unsigned values. */ |
1078 | ||
1079 | extern int warn_sign_compare; | |
1080 | ||
1bdba2c0 DZ |
1081 | /* Warn about testing equality of floating point numbers. */ |
1082 | ||
1083 | extern int warn_float_equal; | |
1084 | ||
8d08fdba MS |
1085 | /* Warn about a subscript that has type char. */ |
1086 | ||
1087 | extern int warn_char_subscripts; | |
1088 | ||
1089 | /* Nonzero means warn about pointer casts that can drop a type qualifier | |
1090 | from the pointer target type. */ | |
1091 | ||
1092 | extern int warn_cast_qual; | |
1093 | ||
e92cc029 | 1094 | /* Warn about *printf or *scanf format/argument anomalies. */ |
8d08fdba MS |
1095 | |
1096 | extern int warn_format; | |
1097 | ||
1098 | /* Nonzero means warn about non virtual destructors in classes that have | |
e92cc029 | 1099 | virtual functions. */ |
8d08fdba MS |
1100 | |
1101 | extern int warn_nonvdtor; | |
1102 | ||
9a3b49ac MS |
1103 | /* Non-zero means warn when we convert a pointer to member function |
1104 | into a pointer to (void or function). */ | |
1105 | ||
1106 | extern int warn_pmf2ptr; | |
1107 | ||
eb448459 MS |
1108 | /* Nonzero means warn about violation of some Effective C++ style rules. */ |
1109 | ||
1110 | extern int warn_ecpp; | |
1111 | ||
da20811c JM |
1112 | /* Nonzero means warn where overload resolution chooses a promotion from |
1113 | unsigned to signed over a conversion to an unsigned of the same size. */ | |
1114 | ||
1115 | extern int warn_sign_promo; | |
1116 | ||
8d08fdba | 1117 | /* Non-zero means warn when a function is declared extern and later inline. */ |
eb448459 | 1118 | |
8d08fdba MS |
1119 | extern int warn_extern_inline; |
1120 | ||
0c4b14c4 JM |
1121 | /* Non-zero means warn when an old-style cast is used. */ |
1122 | ||
1123 | extern int warn_old_style_cast; | |
1124 | ||
3dbc07b6 MM |
1125 | /* Non-zero means warn when the compiler will reorder code. */ |
1126 | ||
1127 | extern int warn_reorder; | |
1128 | ||
8d08fdba MS |
1129 | /* Nonzero means to treat bitfields as unsigned unless they say `signed'. */ |
1130 | ||
1131 | extern int flag_signed_bitfields; | |
1132 | ||
38e01259 | 1133 | /* True for more efficient but incompatible (not fully tested) |
8926095f | 1134 | vtable implementation (using thunks). |
e92cc029 | 1135 | 0 is old behavior; 1 is new behavior. */ |
8926095f | 1136 | extern int flag_vtable_thunks; |
51c184be | 1137 | |
8d08fdba MS |
1138 | /* INTERFACE_ONLY nonzero means that we are in an "interface" |
1139 | section of the compiler. INTERFACE_UNKNOWN nonzero means | |
1140 | we cannot trust the value of INTERFACE_ONLY. If INTERFACE_UNKNOWN | |
1141 | is zero and INTERFACE_ONLY is zero, it means that we are responsible | |
1142 | for exporting definitions that others might need. */ | |
1143 | extern int interface_only, interface_unknown; | |
1144 | ||
1145 | /* Nonzero means we should attempt to elide constructors when possible. */ | |
1146 | ||
1147 | extern int flag_elide_constructors; | |
1148 | ||
cab1f180 ML |
1149 | /* Nonzero means enable obscure standard features and disable GNU |
1150 | extensions that might cause standard-compliant code to be | |
1151 | miscompiled. */ | |
39211cd5 MS |
1152 | |
1153 | extern int flag_ansi; | |
1154 | ||
8d08fdba MS |
1155 | /* Nonzero means that member functions defined in class scope are |
1156 | inline by default. */ | |
1157 | ||
1158 | extern int flag_default_inline; | |
386b8a85 JM |
1159 | |
1160 | /* The name-mangling scheme to use. Versions of gcc before 2.8 use | |
1161 | version 0. */ | |
1162 | extern int name_mangling_version; | |
1163 | ||
1164 | /* Nonzero means that guiding declarations are allowed. */ | |
1165 | extern int flag_guiding_decls; | |
1166 | ||
5096c664 JM |
1167 | /* Nonzero if wchar_t should be `unsigned short' instead of whatever it |
1168 | would normally be, for use with WINE. */ | |
1169 | extern int flag_short_wchar; | |
1170 | ||
5bd17905 AM |
1171 | /* Nonzero if squashed mangling is to be performed. |
1172 | This uses the B and K codes to reference previously seen class types | |
1173 | and class qualifiers. */ | |
1174 | extern int flag_do_squangling; | |
1175 | ||
2aaf816d JM |
1176 | /* Nonzero means generate separate instantiation control files and juggle |
1177 | them at link time. */ | |
1178 | extern int flag_use_repository; | |
1179 | ||
dc8263bc JM |
1180 | /* Nonzero if we want to issue diagnostics that the standard says are not |
1181 | required. */ | |
1182 | extern int flag_optional_diags; | |
a1dd0d36 | 1183 | |
830fcda8 JM |
1184 | /* Nonzero means do not consider empty argument prototype to mean function |
1185 | takes no arguments. */ | |
830fcda8 JM |
1186 | extern int flag_strict_prototype; |
1187 | ||
a1dd0d36 JM |
1188 | /* Nonzero means output .vtable_{entry,inherit} for use in doing vtable gc. */ |
1189 | extern int flag_vtable_gc; | |
2642b9bf JM |
1190 | |
1191 | /* Nonzero means make the default pedwarns warnings instead of errors. | |
1192 | The value of this flag is ignored if -pedantic is specified. */ | |
dfcafcb6 | 1193 | extern int flag_permissive; |
d6479fe7 | 1194 | |
1660cb3a JM |
1195 | /* Nonzero means to implement standard semantics for exception |
1196 | specifications, calling unexpected if an exception is thrown that | |
1197 | doesn't match the specification. Zero means to treat them as | |
1198 | assertions and optimize accordingly, but not check them. */ | |
1199 | extern int flag_enforce_eh_specs; | |
1200 | ||
d6479fe7 MM |
1201 | /* Nonzero if we want to obey access control semantics. */ |
1202 | ||
1203 | extern int flag_access_control; | |
1204 | ||
1b12a13e MM |
1205 | /* If this variable is defined to a non-NULL value, it will be called |
1206 | after the file has been completely parsed. The argument will be | |
1207 | the GLOBAL_NAMESPACE. */ | |
1208 | ||
158991b7 | 1209 | extern void (*back_end_hook) PARAMS ((tree)); |
1b12a13e | 1210 | |
8d08fdba MS |
1211 | \f |
1212 | /* C++ language-specific tree codes. */ | |
1213 | #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM, | |
1214 | enum cplus_tree_code { | |
1215 | __DUMMY = LAST_AND_UNUSED_TREE_CODE, | |
e92cc029 | 1216 | #include "cp-tree.def" |
8d08fdba MS |
1217 | LAST_CPLUS_TREE_CODE |
1218 | }; | |
1219 | #undef DEFTREECODE | |
1220 | ||
fcad5cf5 | 1221 | enum languages { lang_c, lang_cplusplus, lang_java }; |
8d08fdba MS |
1222 | |
1223 | /* Macros to make error reporting functions' lives easier. */ | |
1224 | #define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE))) | |
1225 | #define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE))) | |
1226 | #define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE))) | |
1227 | ||
1228 | #define TYPE_ASSEMBLER_NAME_STRING(NODE) (IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE)))) | |
1229 | #define TYPE_ASSEMBLER_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (DECL_ASSEMBLER_NAME (TYPE_NAME (NODE)))) | |
1230 | ||
a4443a08 | 1231 | /* The _DECL for this _TYPE. */ |
d2e5ee5c | 1232 | #define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE))) |
a4443a08 | 1233 | |
c92366fb | 1234 | /* Nonzero if T is a class (or struct or union) type. Also nonzero |
83233dca MM |
1235 | for template type parameters, typename types, and instantiated |
1236 | template template parameters. Despite its name, | |
b80c4d77 MM |
1237 | this macro has nothing to do with the definition of aggregate given |
1238 | in the standard. Think of this macro as MAYBE_CLASS_TYPE_P. */ | |
7ddedda4 | 1239 | #define IS_AGGR_TYPE(t) \ |
83233dca MM |
1240 | (TREE_CODE (t) == TEMPLATE_TYPE_PARM \ |
1241 | || TREE_CODE (t) == TYPENAME_TYPE \ | |
7ddedda4 | 1242 | || TREE_CODE (t) == TYPEOF_TYPE \ |
83233dca MM |
1243 | || (TREE_CODE (t) == TEMPLATE_TEMPLATE_PARM \ |
1244 | && TYPE_TEMPLATE_INFO (t)) \ | |
7ddedda4 MM |
1245 | || TYPE_LANG_FLAG_5 (t)) |
1246 | ||
1247 | /* Set IS_AGGR_TYPE for T to VAL. T must be a class, struct, or | |
1248 | union type. */ | |
1249 | #define SET_IS_AGGR_TYPE(T, VAL) \ | |
1250 | (TYPE_LANG_FLAG_5 (T) = (VAL)) | |
c92366fb | 1251 | |
b80c4d77 MM |
1252 | /* Nonzero if T is a class type. Zero for template type parameters, |
1253 | typename types, and so forth. */ | |
c92366fb | 1254 | #define CLASS_TYPE_P(t) \ |
7ddedda4 | 1255 | (IS_AGGR_TYPE_CODE (TREE_CODE (t)) && IS_AGGR_TYPE (t)) |
c92366fb | 1256 | |
5566b478 | 1257 | #define IS_AGGR_TYPE_CODE(t) (t == RECORD_TYPE || t == UNION_TYPE) |
8d08fdba MS |
1258 | #define IS_AGGR_TYPE_2(TYPE1,TYPE2) \ |
1259 | (TREE_CODE (TYPE1) == TREE_CODE (TYPE2) \ | |
829297e6 | 1260 | && IS_AGGR_TYPE (TYPE1) && IS_AGGR_TYPE (TYPE2)) |
6467930b MS |
1261 | #define IS_OVERLOAD_TYPE(t) \ |
1262 | (IS_AGGR_TYPE (t) || TREE_CODE (t) == ENUMERAL_TYPE) | |
8d08fdba MS |
1263 | |
1264 | /* In a *_TYPE, nonzero means a built-in type. */ | |
1265 | #define TYPE_BUILT_IN(NODE) TYPE_LANG_FLAG_6(NODE) | |
1266 | ||
ea419909 PB |
1267 | /* True if this a "Java" type, defined in 'extern "Java"'. */ |
1268 | #define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3(NODE) | |
1269 | ||
91063b51 MM |
1270 | /* The type qualifiers for this type, including the qualifiers on the |
1271 | elements for an array type. */ | |
1272 | #define CP_TYPE_QUALS(NODE) \ | |
1273 | ((TREE_CODE (NODE) != ARRAY_TYPE) \ | |
1274 | ? TYPE_QUALS (NODE) : cp_type_quals (NODE)) | |
1275 | ||
1276 | /* Nonzero if this type is const-qualified. */ | |
1277 | #define CP_TYPE_CONST_P(NODE) \ | |
174bcdb9 | 1278 | ((CP_TYPE_QUALS (NODE) & TYPE_QUAL_CONST) != 0) |
91063b51 MM |
1279 | |
1280 | /* Nonzero if this type is volatile-qualified. */ | |
1281 | #define CP_TYPE_VOLATILE_P(NODE) \ | |
174bcdb9 | 1282 | ((CP_TYPE_QUALS (NODE) & TYPE_QUAL_VOLATILE) != 0) |
91063b51 | 1283 | |
174bcdb9 | 1284 | /* Nonzero if this type is restrict-qualified. */ |
91063b51 | 1285 | #define CP_TYPE_RESTRICT_P(NODE) \ |
174bcdb9 | 1286 | ((CP_TYPE_QUALS (NODE) & TYPE_QUAL_RESTRICT) != 0) |
91063b51 MM |
1287 | |
1288 | /* Nonzero if this type is const-qualified, but not | |
1289 | volatile-qualified. Other qualifiers are ignored. This macro is | |
1290 | used to test whether or not it is OK to bind an rvalue to a | |
1291 | reference. */ | |
1292 | #define CP_TYPE_CONST_NON_VOLATILE_P(NODE) \ | |
1293 | ((CP_TYPE_QUALS (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE)) \ | |
1294 | == TYPE_QUAL_CONST) | |
1295 | ||
21474714 MS |
1296 | #define DELTA_FROM_VTABLE_ENTRY(ENTRY) \ |
1297 | (!flag_vtable_thunks ? \ | |
1298 | TREE_VALUE (CONSTRUCTOR_ELTS (ENTRY)) \ | |
1299 | : TREE_CODE (TREE_OPERAND ((ENTRY), 0)) != THUNK_DECL ? integer_zero_node \ | |
1300 | : build_int_2 (THUNK_DELTA (TREE_OPERAND ((ENTRY), 0)), 0)) | |
bd6dd845 | 1301 | |
8d08fdba MS |
1302 | /* Virtual function addresses can be gotten from a virtual function |
1303 | table entry using this macro. */ | |
1304 | #define FNADDR_FROM_VTABLE_ENTRY(ENTRY) \ | |
8926095f MS |
1305 | (!flag_vtable_thunks ? \ |
1306 | TREE_VALUE (TREE_CHAIN (TREE_CHAIN (CONSTRUCTOR_ELTS (ENTRY)))) \ | |
1307 | : TREE_CODE (TREE_OPERAND ((ENTRY), 0)) != THUNK_DECL ? (ENTRY) \ | |
1308 | : DECL_INITIAL (TREE_OPERAND ((ENTRY), 0))) | |
8d08fdba MS |
1309 | #define SET_FNADDR_FROM_VTABLE_ENTRY(ENTRY,VALUE) \ |
1310 | (TREE_VALUE (TREE_CHAIN (TREE_CHAIN (CONSTRUCTOR_ELTS (ENTRY)))) = (VALUE)) | |
8d08fdba MS |
1311 | #define FUNCTION_ARG_CHAIN(NODE) (TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE)))) |
1312 | #define PROMOTES_TO_AGGR_TYPE(NODE,CODE) \ | |
1313 | (((CODE) == TREE_CODE (NODE) \ | |
1314 | && IS_AGGR_TYPE (TREE_TYPE (NODE))) \ | |
1315 | || IS_AGGR_TYPE (NODE)) | |
1316 | ||
8d08fdba MS |
1317 | /* Nonzero iff TYPE is uniquely derived from PARENT. Under MI, PARENT can |
1318 | be an ambiguous base class of TYPE, and this macro will be false. */ | |
1319 | #define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 0, (tree *)0) >= 0) | |
1320 | #define ACCESSIBLY_DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, -1, (tree *)0) >= 0) | |
1321 | #define ACCESSIBLY_UNIQUELY_DERIVED_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 1, (tree *)0) >= 0) | |
a0a33927 | 1322 | #define DERIVED_FROM_P(PARENT, TYPE) (get_base_distance (PARENT, TYPE, 0, (tree *)0) != -1) |
8d08fdba | 1323 | \f |
7ddedda4 MM |
1324 | /* This structure provides additional information above and beyond |
1325 | what is provide in the ordinary tree_type. In the past, we used it | |
1326 | for the types of class types, template parameters types, typename | |
1327 | types, and so forth. However, there can be many (tens to hundreds | |
1328 | of thousands) of template parameter types in a compilation, and | |
1329 | there's no need for this additional information in that case. | |
1330 | Therefore, we now use this data structure only for class types. | |
1331 | ||
1332 | In the past, it was thought that there would be relatively few | |
1333 | class types. However, in the presence of heavy use of templates, | |
1334 | many (i.e., thousands) of classes can easily be generated. | |
1335 | Therefore, we should endeavor to keep the size of this structure to | |
1336 | a minimum. */ | |
8d08fdba MS |
1337 | struct lang_type |
1338 | { | |
8012c983 MM |
1339 | unsigned char align; |
1340 | ||
1341 | unsigned has_type_conversion : 1; | |
1342 | unsigned has_init_ref : 1; | |
1343 | unsigned has_default_ctor : 1; | |
1344 | unsigned uses_multiple_inheritance : 1; | |
1345 | unsigned const_needs_init : 1; | |
1346 | unsigned ref_needs_init : 1; | |
1347 | unsigned has_const_assign_ref : 1; | |
1348 | unsigned anon_aggr : 1; | |
1349 | ||
5b0cec3b MM |
1350 | unsigned has_mutable : 1; |
1351 | unsigned com_interface : 1; | |
1352 | unsigned non_pod_class : 1; | |
1353 | unsigned nearly_empty_p : 1; | |
8012c983 MM |
1354 | unsigned vtable_needs_writing : 1; |
1355 | unsigned has_assign_ref : 1; | |
834c6dff MM |
1356 | unsigned has_new : 1; |
1357 | unsigned has_array_new : 1; | |
8012c983 MM |
1358 | |
1359 | unsigned gets_delete : 2; | |
1360 | unsigned has_call_overloaded : 1; | |
1361 | unsigned has_array_ref_overloaded : 1; | |
1362 | unsigned has_arrow_overloaded : 1; | |
1363 | unsigned interface_only : 1; | |
1364 | unsigned interface_unknown : 1; | |
1365 | unsigned needs_virtual_reinit : 1; | |
1366 | ||
1367 | unsigned marks: 6; | |
1368 | unsigned vec_delete_takes_size : 1; | |
1369 | unsigned declared_class : 1; | |
1370 | ||
1371 | unsigned being_defined : 1; | |
1372 | unsigned redefined : 1; | |
1373 | unsigned debug_requested : 1; | |
1374 | unsigned use_template : 2; | |
1375 | unsigned got_semicolon : 1; | |
1376 | unsigned ptrmemfunc_flag : 1; | |
1377 | unsigned was_anonymous : 1; | |
1378 | ||
1379 | unsigned has_real_assign_ref : 1; | |
1380 | unsigned has_const_init_ref : 1; | |
1381 | unsigned has_complex_init_ref : 1; | |
1382 | unsigned has_complex_assign_ref : 1; | |
1383 | unsigned has_abstract_assign_ref : 1; | |
1384 | unsigned non_aggregate : 1; | |
1385 | unsigned is_partial_instantiation : 1; | |
8012c983 MM |
1386 | |
1387 | /* When adding a flag here, consider whether or not it ought to | |
1388 | apply to a template instance if it applies to the template. If | |
1389 | so, make sure to copy it in instantiate_class_template! */ | |
1390 | ||
5b0cec3b MM |
1391 | /* There are some bits left to fill out a 32-bit word. Keep track |
1392 | of this by updating the size of this bitfield whenever you add or | |
8012c983 | 1393 | remove a flag. */ |
5b0cec3b | 1394 | unsigned dummy : 9; |
c7f9c6f5 | 1395 | |
8d08fdba | 1396 | int vsize; |
8d08fdba MS |
1397 | int vfield_parent; |
1398 | ||
c35cce41 MM |
1399 | tree vfields; |
1400 | tree vbases; | |
1401 | tree tags; | |
1402 | tree search_slot; | |
1403 | tree size; | |
1404 | tree size_unit; | |
1405 | tree pure_virtuals; | |
1406 | tree friend_classes; | |
1407 | tree rtti; | |
1408 | tree methods; | |
1409 | tree template_info; | |
6a629cac | 1410 | tree befriending_classes; |
8d08fdba MS |
1411 | }; |
1412 | ||
a0a33927 MS |
1413 | /* Indicates whether or not (and how) a template was expanded for this class. |
1414 | 0=no information yet/non-template class | |
1415 | 1=implicit template instantiation | |
1416 | 2=explicit template specialization | |
1417 | 3=explicit template instantiation */ | |
8012c983 | 1418 | #define CLASSTYPE_USE_TEMPLATE(NODE) (TYPE_LANG_SPECIFIC(NODE)->use_template) |
8d08fdba MS |
1419 | |
1420 | /* Fields used for storing information before the class is defined. | |
1421 | After the class is defined, these fields hold other information. */ | |
1422 | ||
1423 | /* List of friends which were defined inline in this class definition. */ | |
1424 | #define CLASSTYPE_INLINE_FRIENDS(NODE) (TYPE_NONCOPIED_PARTS (NODE)) | |
1425 | ||
834c6dff | 1426 | /* Nonzero for _CLASSTYPE means that operator delete is defined. */ |
8012c983 | 1427 | #define TYPE_GETS_DELETE(NODE) (TYPE_LANG_SPECIFIC(NODE)->gets_delete) |
a28e3c7f MS |
1428 | #define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1) |
1429 | ||
1430 | /* Nonzero for _CLASSTYPE means that operator vec delete is defined and | |
1431 | takes the optional size_t argument. */ | |
1432 | #define TYPE_VEC_DELETE_TAKES_SIZE(NODE) \ | |
8012c983 | 1433 | (TYPE_LANG_SPECIFIC(NODE)->vec_delete_takes_size) |
834c6dff MM |
1434 | |
1435 | /* Nonzero if `new NODE[x]' should cause the allocation of extra | |
1436 | storage to indicate how many array elements are in use. The old | |
1437 | ABI had a bug in that we always allocate the extra storage if NODE | |
1438 | has a two-argument array operator delete. */ | |
1439 | #define TYPE_VEC_NEW_USES_COOKIE(NODE) \ | |
1440 | (TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE) \ | |
1441 | || (TYPE_LANG_SPECIFIC (NODE) \ | |
1442 | && TYPE_VEC_DELETE_TAKES_SIZE (NODE))) | |
8d08fdba | 1443 | |
8d08fdba MS |
1444 | /* Nonzero means that this _CLASSTYPE node defines ways of converting |
1445 | itself to other types. */ | |
8012c983 | 1446 | #define TYPE_HAS_CONVERSION(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_type_conversion) |
8d08fdba | 1447 | |
8d08fdba | 1448 | /* Nonzero means that this _CLASSTYPE node overloads operator=(X&). */ |
8012c983 MM |
1449 | #define TYPE_HAS_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_assign_ref) |
1450 | #define TYPE_HAS_CONST_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_const_assign_ref) | |
8d08fdba MS |
1451 | |
1452 | /* Nonzero means that this _CLASSTYPE node has an X(X&) constructor. */ | |
8012c983 MM |
1453 | #define TYPE_HAS_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_init_ref) |
1454 | #define TYPE_HAS_CONST_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_const_init_ref) | |
8d08fdba | 1455 | |
834c6dff MM |
1456 | /* Nonzero if this class defines an overloaded operator new. (An |
1457 | operator new [] doesn't count.) */ | |
1458 | #define TYPE_HAS_NEW_OPERATOR(NODE) \ | |
1459 | (TYPE_LANG_SPECIFIC (NODE)->has_new) | |
1460 | ||
1461 | /* Nonzero if this class defines an overloaded operator new[]. */ | |
1462 | #define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \ | |
1463 | (TYPE_LANG_SPECIFIC (NODE)->has_array_new) | |
1464 | ||
8d08fdba MS |
1465 | /* Nonzero means that this type is being defined. I.e., the left brace |
1466 | starting the definition of this type has been seen. */ | |
8012c983 | 1467 | #define TYPE_BEING_DEFINED(NODE) (TYPE_LANG_SPECIFIC(NODE)->being_defined) |
8d08fdba MS |
1468 | /* Nonzero means that this type has been redefined. In this case, if |
1469 | convenient, don't reprocess any methods that appear in its redefinition. */ | |
8012c983 | 1470 | #define TYPE_REDEFINED(NODE) (TYPE_LANG_SPECIFIC(NODE)->redefined) |
8d08fdba | 1471 | |
9e0781b5 | 1472 | /* The is the basetype that contains NODE's rtti. */ |
db5ae43f | 1473 | #define CLASSTYPE_RTTI(NODE) (TYPE_LANG_SPECIFIC(NODE)->rtti) |
8d08fdba MS |
1474 | |
1475 | /* Nonzero means that this _CLASSTYPE node overloads operator(). */ | |
8012c983 | 1476 | #define TYPE_OVERLOADS_CALL_EXPR(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_call_overloaded) |
8d08fdba MS |
1477 | |
1478 | /* Nonzero means that this _CLASSTYPE node overloads operator[]. */ | |
8012c983 | 1479 | #define TYPE_OVERLOADS_ARRAY_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_array_ref_overloaded) |
8d08fdba MS |
1480 | |
1481 | /* Nonzero means that this _CLASSTYPE node overloads operator->. */ | |
8012c983 | 1482 | #define TYPE_OVERLOADS_ARROW(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_arrow_overloaded) |
8d08fdba MS |
1483 | |
1484 | /* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses | |
1485 | multiple inheritance. If this is 0 for the root of a type | |
1486 | hierarchy, then we can use more efficient search techniques. */ | |
8012c983 | 1487 | #define TYPE_USES_MULTIPLE_INHERITANCE(NODE) (TYPE_LANG_SPECIFIC(NODE)->uses_multiple_inheritance) |
8d08fdba MS |
1488 | |
1489 | /* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses | |
1490 | virtual base classes. If this is 0 for the root of a type | |
1491 | hierarchy, then we can use more efficient search techniques. */ | |
1492 | #define TYPE_USES_VIRTUAL_BASECLASSES(NODE) (TREE_LANG_FLAG_3(NODE)) | |
1493 | ||
61a127b3 | 1494 | /* Vector member functions defined in this class. Each element is |
03017874 MM |
1495 | either a FUNCTION_DECL, a TEMPLATE_DECL, or an OVERLOAD. All |
1496 | functions with the same name end up in the same slot. The first | |
61a127b3 | 1497 | two elements are for constructors, and destructors, respectively. |
db9b2174 MM |
1498 | Any conversion operators are next, followed by ordinary member |
1499 | functions. There may be empty entries at the end of the vector. */ | |
72b7eeff | 1500 | #define CLASSTYPE_METHOD_VEC(NODE) (TYPE_LANG_SPECIFIC(NODE)->methods) |
8d08fdba | 1501 | |
db9b2174 MM |
1502 | /* The slot in the CLASSTYPE_METHOD_VEC where constructors go. */ |
1503 | #define CLASSTYPE_CONSTRUCTOR_SLOT 0 | |
1504 | ||
1505 | /* The slot in the CLASSTYPE_METHOD_VEC where destructors go. */ | |
1506 | #define CLASSTYPE_DESTRUCTOR_SLOT 1 | |
1507 | ||
1508 | /* The first slot in the CLASSTYPE_METHOD_VEC where conversion | |
1509 | operators can appear. */ | |
1510 | #define CLASSTYPE_FIRST_CONVERSION_SLOT 2 | |
1511 | ||
1512 | /* A FUNCTION_DECL or OVERLOAD for the constructors for NODE. These | |
1513 | are the constructors that take an in-charge parameter. */ | |
1514 | #define CLASSTYPE_CONSTRUCTORS(NODE) \ | |
1515 | (TREE_VEC_ELT (CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_CONSTRUCTOR_SLOT)) | |
1516 | ||
1517 | /* A FUNCTION_DECL for the destructor for NODE. These are te | |
1518 | destructors that take an in-charge parameter. */ | |
1519 | #define CLASSTYPE_DESTRUCTORS(NODE) \ | |
1520 | (TREE_VEC_ELT (CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_DESTRUCTOR_SLOT)) | |
e1cd6e56 | 1521 | |
8d08fdba | 1522 | /* Mark bits for depth-first and breath-first searches. */ |
7ddedda4 MM |
1523 | |
1524 | /* Get the value of the Nth mark bit. */ | |
ba793d6e | 1525 | #define CLASSTYPE_MARKED_N(NODE, N) \ |
8012c983 | 1526 | (((CLASS_TYPE_P (NODE) ? TYPE_LANG_SPECIFIC (NODE)->marks \ |
ba793d6e | 1527 | : ((unsigned) TYPE_ALIAS_SET (NODE))) & (1 << N)) != 0) |
7ddedda4 MM |
1528 | |
1529 | /* Set the Nth mark bit. */ | |
ba793d6e MM |
1530 | #define SET_CLASSTYPE_MARKED_N(NODE, N) \ |
1531 | (CLASS_TYPE_P (NODE) \ | |
1532 | ? (void) (TYPE_LANG_SPECIFIC (NODE)->marks |= (1 << (N))) \ | |
1533 | : (void) (TYPE_ALIAS_SET (NODE) |= (1 << (N)))) | |
7ddedda4 MM |
1534 | |
1535 | /* Clear the Nth mark bit. */ | |
ba793d6e MM |
1536 | #define CLEAR_CLASSTYPE_MARKED_N(NODE, N) \ |
1537 | (CLASS_TYPE_P (NODE) \ | |
1538 | ? (void) (TYPE_LANG_SPECIFIC (NODE)->marks &= ~(1 << (N))) \ | |
1539 | : (void) (TYPE_ALIAS_SET (NODE) &= ~(1 << (N)))) | |
7ddedda4 MM |
1540 | |
1541 | /* Get the value of the mark bits. */ | |
1542 | #define CLASSTYPE_MARKED(NODE) CLASSTYPE_MARKED_N(NODE, 0) | |
1543 | #define CLASSTYPE_MARKED2(NODE) CLASSTYPE_MARKED_N(NODE, 1) | |
1544 | #define CLASSTYPE_MARKED3(NODE) CLASSTYPE_MARKED_N(NODE, 2) | |
1545 | #define CLASSTYPE_MARKED4(NODE) CLASSTYPE_MARKED_N(NODE, 3) | |
1546 | #define CLASSTYPE_MARKED5(NODE) CLASSTYPE_MARKED_N(NODE, 4) | |
1547 | #define CLASSTYPE_MARKED6(NODE) CLASSTYPE_MARKED_N(NODE, 5) | |
1548 | ||
8d08fdba | 1549 | /* Macros to modify the above flags */ |
7ddedda4 MM |
1550 | #define SET_CLASSTYPE_MARKED(NODE) SET_CLASSTYPE_MARKED_N(NODE, 0) |
1551 | #define CLEAR_CLASSTYPE_MARKED(NODE) CLEAR_CLASSTYPE_MARKED_N(NODE, 0) | |
1552 | #define SET_CLASSTYPE_MARKED2(NODE) SET_CLASSTYPE_MARKED_N(NODE, 1) | |
1553 | #define CLEAR_CLASSTYPE_MARKED2(NODE) CLEAR_CLASSTYPE_MARKED_N(NODE, 1) | |
1554 | #define SET_CLASSTYPE_MARKED3(NODE) SET_CLASSTYPE_MARKED_N(NODE, 2) | |
1555 | #define CLEAR_CLASSTYPE_MARKED3(NODE) CLEAR_CLASSTYPE_MARKED_N(NODE, 2) | |
1556 | #define SET_CLASSTYPE_MARKED4(NODE) SET_CLASSTYPE_MARKED_N(NODE, 3) | |
1557 | #define CLEAR_CLASSTYPE_MARKED4(NODE) CLEAR_CLASSTYPE_MARKED_N(NODE, 3) | |
1558 | #define SET_CLASSTYPE_MARKED5(NODE) SET_CLASSTYPE_MARKED_N(NODE, 4) | |
1559 | #define CLEAR_CLASSTYPE_MARKED5(NODE) CLEAR_CLASSTYPE_MARKED_N(NODE, 4) | |
1560 | #define SET_CLASSTYPE_MARKED6(NODE) SET_CLASSTYPE_MARKED_N(NODE, 5) | |
1561 | #define CLEAR_CLASSTYPE_MARKED6(NODE) CLEAR_CLASSTYPE_MARKED_N(NODE, 5) | |
8d08fdba | 1562 | |
35acd3f2 MM |
1563 | /* A list of the nested tag-types (class, struct, union, or enum) |
1564 | found within this class. The TREE_PURPOSE of each node is the name | |
1565 | of the type; the TREE_VALUE is the type itself. This list includes | |
1566 | nested member class templates. */ | |
8d08fdba MS |
1567 | #define CLASSTYPE_TAGS(NODE) (TYPE_LANG_SPECIFIC(NODE)->tags) |
1568 | ||
3ef397c1 MM |
1569 | /* If this value is non-negative, it is the index (in the |
1570 | TYPE_BINFO_BASETYPES) for the base-class whose vtable pointer we | |
1571 | are reusing. For example, in D : B1, B2, PARENT would be 0, if D's | |
1572 | vtable came from B1, 1, if D's vtable came from B2. */ | |
8d08fdba MS |
1573 | #define CLASSTYPE_VFIELD_PARENT(NODE) (TYPE_LANG_SPECIFIC(NODE)->vfield_parent) |
1574 | ||
3ef397c1 MM |
1575 | /* Nonzero if NODE has a primary base class, i.e., a base class with |
1576 | which it shares the virtual fucntion table pointer. */ | |
1577 | #define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \ | |
1578 | (CLASSTYPE_VFIELD_PARENT (NODE) != -1) | |
1579 | ||
1580 | /* If non-NULL, this is the binfo for the primary base class, i.e., | |
1581 | the base class which contains the virtual function table pointer | |
1582 | for this class. */ | |
5e19c053 MM |
1583 | #define CLASSTYPE_PRIMARY_BINFO(NODE) \ |
1584 | (BINFO_PRIMARY_BINFO (TYPE_BINFO (NODE))) | |
1585 | ||
c35cce41 MM |
1586 | /* If non-NULL, this is the binfo for the primary base of BINFO. Note |
1587 | that in a complex hierarchy the resulting BINFO may not actually | |
1588 | *be* primary. In particular if the resulting BINFO is a virtual | |
1589 | base, and it occurs elsewhere in the hierarchy, then this | |
1590 | occurrence may not actually be a primary base in the complete | |
1591 | object. Check BINFO_PRIMARY_MARKED_P to be sure. */ | |
5e19c053 MM |
1592 | #define BINFO_PRIMARY_BINFO(NODE) \ |
1593 | (CLASSTYPE_HAS_PRIMARY_BASE_P (BINFO_TYPE (NODE)) \ | |
1594 | ? BINFO_BASETYPE (NODE, \ | |
1595 | CLASSTYPE_VFIELD_PARENT (BINFO_TYPE (NODE))) \ | |
3ef397c1 MM |
1596 | : NULL_TREE) |
1597 | ||
c35cce41 | 1598 | /* The number of virtual functions present in this class' virtual |
da3d4dfa | 1599 | function table. */ |
8d08fdba | 1600 | #define CLASSTYPE_VSIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->vsize) |
23381155 MM |
1601 | |
1602 | /* A chain of BINFOs for the direct and indirect virtual base classes | |
c35cce41 MM |
1603 | that this type uses in a post-order depth-first left-to-right |
1604 | order. (In other words, these bases appear in the order that they | |
1605 | should be initialized.) | |
1606 | ||
1607 | These BINFOs are distinct from those in the TYPE_BINFO hierarchy. | |
1608 | So, given: | |
4b3b5328 MM |
1609 | |
1610 | struct A {}; | |
1611 | struct B : public A {}; | |
1612 | struct C : virtual public B {}; | |
1613 | struct D : virtual public B {}; | |
1614 | struct E : public C, public D {}; | |
1615 | ||
1616 | there will be two copies of `A' and `B' in the TYPE_BINFO hierarchy | |
1617 | for `E'. On the CLASSTYPE_VBASECLASSES list, there will be just | |
9785e4b1 | 1618 | one copy of `B' (distinct from the other two) with its own copy of `A' |
4b3b5328 | 1619 | (also distinct from the copies in the TYPE_BINFO hierarchy.) */ |
8d08fdba | 1620 | #define CLASSTYPE_VBASECLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->vbases) |
23381155 | 1621 | |
3c9d6359 MM |
1622 | /* The BINFO (if any) for the virtual baseclass T of the class C from |
1623 | the CLASSTYPE_VBASECLASSES list. */ | |
23381155 MM |
1624 | #define BINFO_FOR_VBASE(T, C) \ |
1625 | (binfo_member (T, CLASSTYPE_VBASECLASSES (C))) | |
1626 | ||
3c9d6359 MM |
1627 | /* For a non-virtual BINFO, the BINFO itself; for a virtual BINFO, the |
1628 | BINFO_FOR_VBASE. C is the most derived class for the hierarchy | |
1629 | containing BINFO. */ | |
1630 | #define CANONICAL_BINFO(BINFO, C) \ | |
1631 | (TREE_VIA_VIRTUAL (BINFO) \ | |
1632 | ? BINFO_FOR_VBASE (BINFO_TYPE (BINFO), C) \ | |
1633 | : BINFO) | |
1634 | ||
23381155 | 1635 | /* Number of direct baseclasses of NODE. */ |
8d08fdba | 1636 | #define CLASSTYPE_N_BASECLASSES(NODE) \ |
99a6c6f4 | 1637 | (BINFO_N_BASETYPES (TYPE_BINFO (NODE))) |
8d08fdba | 1638 | |
8d08fdba MS |
1639 | /* Used for keeping search-specific information. Any search routine |
1640 | which uses this must define what exactly this slot is used for. */ | |
1641 | #define CLASSTYPE_SEARCH_SLOT(NODE) (TYPE_LANG_SPECIFIC(NODE)->search_slot) | |
1642 | ||
2d926395 MM |
1643 | /* These are the size and alignment of the type without its virtual |
1644 | base classes, for when we use this type as a base itself. */ | |
8d08fdba | 1645 | #define CLASSTYPE_SIZE(NODE) (TYPE_LANG_SPECIFIC(NODE)->size) |
06ceef4e | 1646 | #define CLASSTYPE_SIZE_UNIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->size_unit) |
8012c983 | 1647 | #define CLASSTYPE_ALIGN(NODE) (TYPE_LANG_SPECIFIC(NODE)->align) |
8d08fdba | 1648 | |
8d08fdba MS |
1649 | /* A cons list of virtual functions which cannot be inherited by |
1650 | derived classes. When deriving from this type, the derived | |
1651 | class must provide its own definition for each of these functions. */ | |
fee7654e | 1652 | #define CLASSTYPE_PURE_VIRTUALS(NODE) (TYPE_LANG_SPECIFIC(NODE)->pure_virtuals) |
8d08fdba MS |
1653 | |
1654 | /* Nonzero means that this aggr type has been `closed' by a semicolon. */ | |
8012c983 | 1655 | #define CLASSTYPE_GOT_SEMICOLON(NODE) (TYPE_LANG_SPECIFIC (NODE)->got_semicolon) |
8d08fdba MS |
1656 | |
1657 | /* Nonzero means that the main virtual function table pointer needs to be | |
1658 | set because base constructors have placed the wrong value there. | |
1659 | If this is zero, it means that they placed the right value there, | |
1660 | and there is no need to change it. */ | |
8012c983 | 1661 | #define CLASSTYPE_NEEDS_VIRTUAL_REINIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->needs_virtual_reinit) |
8d08fdba MS |
1662 | |
1663 | /* Nonzero means that if this type has virtual functions, that | |
1664 | the virtual function table will be written out. */ | |
8012c983 | 1665 | #define CLASSTYPE_VTABLE_NEEDS_WRITING(NODE) (TYPE_LANG_SPECIFIC(NODE)->vtable_needs_writing) |
8d08fdba | 1666 | |
8d08fdba | 1667 | /* Nonzero means that this type has an X() constructor. */ |
8012c983 | 1668 | #define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_default_ctor) |
8d08fdba | 1669 | |
a7a7710d | 1670 | /* Nonzero means that this type contains a mutable member */ |
8012c983 | 1671 | #define CLASSTYPE_HAS_MUTABLE(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_mutable) |
a7a7710d NS |
1672 | #define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE)) |
1673 | ||
52fb2769 | 1674 | /* Nonzero means that this class type is a non-POD class. */ |
8012c983 | 1675 | #define CLASSTYPE_NON_POD_P(NODE) (TYPE_LANG_SPECIFIC (NODE)->non_pod_class) |
52fb2769 | 1676 | |
f9c528ea MM |
1677 | /* Nonzero if this class is "nearly empty", i.e., contains only a |
1678 | virtual function table pointer. */ | |
1679 | #define CLASSTYPE_NEARLY_EMPTY_P(NODE) \ | |
1680 | (TYPE_LANG_SPECIFIC (NODE)->nearly_empty_p) | |
1681 | ||
aff08c18 JM |
1682 | /* Nonzero means that this type is meant for communication via COM. */ |
1683 | #define CLASSTYPE_COM_INTERFACE(NODE) \ | |
8012c983 | 1684 | (TYPE_LANG_SPECIFIC(NODE)->com_interface) |
aff08c18 | 1685 | |
6a629cac | 1686 | /* A list of class types of which this type is a friend. The |
ea4e080b MM |
1687 | TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the |
1688 | case of a template friend. */ | |
8d08fdba MS |
1689 | #define CLASSTYPE_FRIEND_CLASSES(NODE) (TYPE_LANG_SPECIFIC(NODE)->friend_classes) |
1690 | ||
6a629cac MM |
1691 | /* A list of the classes which grant friendship to this class. */ |
1692 | #define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \ | |
1693 | (TYPE_LANG_SPECIFIC (NODE)->befriending_classes) | |
1694 | ||
8d08fdba | 1695 | /* Say whether this node was declared as a "class" or a "struct". */ |
8012c983 | 1696 | #define CLASSTYPE_DECLARED_CLASS(NODE) (TYPE_LANG_SPECIFIC(NODE)->declared_class) |
8d08fdba MS |
1697 | |
1698 | /* Nonzero if this class has const members which have no specified initialization. */ | |
8012c983 | 1699 | #define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->const_needs_init) |
8d08fdba MS |
1700 | |
1701 | /* Nonzero if this class has ref members which have no specified initialization. */ | |
8012c983 | 1702 | #define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE) (TYPE_LANG_SPECIFIC(NODE)->ref_needs_init) |
8d08fdba MS |
1703 | |
1704 | /* Nonzero if this class is included from a header file which employs | |
1705 | `#pragma interface', and it is not included in its implementation file. */ | |
8012c983 | 1706 | #define CLASSTYPE_INTERFACE_ONLY(NODE) (TYPE_LANG_SPECIFIC(NODE)->interface_only) |
8d08fdba MS |
1707 | |
1708 | /* Same as above, but for classes whose purpose we do not know. */ | |
8012c983 MM |
1709 | #define CLASSTYPE_INTERFACE_UNKNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->interface_unknown) |
1710 | #define CLASSTYPE_INTERFACE_KNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->interface_unknown == 0) | |
1711 | #define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) (TYPE_LANG_SPECIFIC(NODE)->interface_unknown = !!(X)) | |
1712 | #define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->interface_unknown = 1) | |
1713 | #define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) (TYPE_LANG_SPECIFIC(NODE)->interface_unknown = 0) | |
8d08fdba MS |
1714 | |
1715 | /* Nonzero if a _DECL node requires us to output debug info for this class. */ | |
8012c983 | 1716 | #define CLASSTYPE_DEBUG_REQUESTED(NODE) (TYPE_LANG_SPECIFIC(NODE)->debug_requested) |
8d08fdba MS |
1717 | \f |
1718 | /* Additional macros for inheritance information. */ | |
1719 | ||
ca107ded MM |
1720 | /* The BINFO_INHERITANCE_CHAIN is used opposite to the description in |
1721 | gcc/tree.h. In particular if D is derived from B then the BINFO | |
1722 | for B (in D) will have a BINFO_INHERITANCE_CHAIN pointing to | |
1723 | D. In tree.h, this pointer is described as pointing in other | |
d6479fe7 MM |
1724 | direction. There is a different BINFO for each path to a virtual |
1725 | base; BINFOs for virtual bases are not shared. In addition, shared | |
1726 | versions of each of the virtual class BINFOs are stored in | |
1727 | CLASSTYPE_VBASECLASSES. | |
ca107ded | 1728 | |
d6479fe7 MM |
1729 | We use TREE_VIA_PROTECTED and TREE_VIA_PUBLIC, but private |
1730 | inheritance is indicated by the absence of the other two flags, not | |
c35cce41 | 1731 | by TREE_VIA_PRIVATE, which is unused. */ |
ca107ded | 1732 | |
8d08fdba MS |
1733 | /* Nonzero means marked by DFS or BFS search, including searches |
1734 | by `get_binfo' and `get_base_distance'. */ | |
1735 | #define BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED(BINFO_TYPE(NODE)):TREE_LANG_FLAG_0(NODE)) | |
1736 | /* Macros needed because of C compilers that don't allow conditional | |
1737 | expressions to be lvalues. Grr! */ | |
1738 | #define SET_BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_0(NODE)=1)) | |
1739 | #define CLEAR_BINFO_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_0(NODE)=0)) | |
1740 | ||
8d08fdba MS |
1741 | /* Nonzero means that this class is on a path leading to a new vtable. */ |
1742 | #define BINFO_VTABLE_PATH_MARKED(NODE) \ | |
1743 | (TREE_VIA_VIRTUAL(NODE)?CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):TREE_LANG_FLAG_3(NODE)) | |
1744 | #define SET_BINFO_VTABLE_PATH_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?SET_CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_3(NODE)=1)) | |
1745 | #define CLEAR_BINFO_VTABLE_PATH_MARKED(NODE) (TREE_VIA_VIRTUAL(NODE)?CLEAR_CLASSTYPE_MARKED3(BINFO_TYPE(NODE)):(TREE_LANG_FLAG_3(NODE)=0)) | |
1746 | ||
3c9d6359 MM |
1747 | /* Nonzero means B (a BINFO) needs a new vtable. B is part of the |
1748 | hierarchy dominated by C. */ | |
1749 | #define BINFO_NEW_VTABLE_MARKED(B, C) \ | |
1750 | (TREE_LANG_FLAG_4 (CANONICAL_BINFO (B, C))) | |
1751 | #define SET_BINFO_NEW_VTABLE_MARKED(B, C) \ | |
1752 | (BINFO_NEW_VTABLE_MARKED (B, C) = 1) | |
1753 | #define CLEAR_BINFO_NEW_VTABLE_MARKED(B, C) \ | |
1754 | (BINFO_NEW_VTABLE_MARKED (B, C) = 0) | |
8d08fdba | 1755 | |
0ec57017 JM |
1756 | /* Nonzero means this class has done dfs_pushdecls. */ |
1757 | #define BINFO_PUSHDECLS_MARKED(NODE) BINFO_VTABLE_PATH_MARKED (NODE) | |
1758 | #define SET_BINFO_PUSHDECLS_MARKED(NODE) SET_BINFO_VTABLE_PATH_MARKED (NODE) | |
1759 | #define CLEAR_BINFO_PUSHDECLS_MARKED(NODE) CLEAR_BINFO_VTABLE_PATH_MARKED (NODE) | |
72c4a2a6 | 1760 | |
174eceea MM |
1761 | /* Nonzero if this BINFO is a primary base class. |
1762 | ||
1763 | In the TYPE_BINFO hierarchy, this flag is never set for a base | |
1764 | class of a non-primary virtual base because the copies of a | |
1765 | non-primary virtual base that appear in the TYPE_BINFO hierarchy do | |
1766 | not really exist. Instead, it is the BINFOs in the | |
1767 | CLASSTYPE_VBASECLASSES list that are used. In other words, this | |
1768 | flag is only valid for paths (given by BINFO_INHERITANCE_CHAIN) | |
1769 | that really exist in the final object. | |
1770 | ||
1771 | For example, consider: | |
1772 | ||
1773 | struct A {}; | |
1774 | struct B : public A { }; | |
4e7512c9 | 1775 | struct C : virtual public B { void f(); int i; }; |
99a6c6f4 | 1776 | |
174eceea MM |
1777 | `A' is the primary base class for `B'. But, `B' is not a primary |
1778 | base class for `C'. So, in the copy of `A' that appears in the | |
1779 | TYPE_BINFO hierarcy for `C' does not have BINFO_PRIMARY_MARKED_P | |
1780 | set; the copy in the CLASSTYPE_VBASECLASSES list does have this | |
1781 | set. */ | |
1782 | #define BINFO_PRIMARY_MARKED_P(NODE) TREE_LANG_FLAG_5 (NODE) | |
99a6c6f4 | 1783 | |
174eceea MM |
1784 | /* Nonzero if the virtual baseclass with the type given by this BINFO |
1785 | is primary *somewhere* in the hierarchy. This flag is only set on | |
1786 | entries in the CLASSTYPE_VBASECLASSES list. */ | |
1787 | #define BINFO_VBASE_PRIMARY_P(NODE) TREE_LANG_FLAG_6 (NODE) | |
99a6c6f4 | 1788 | |
72c4a2a6 JM |
1789 | /* Used by various search routines. */ |
1790 | #define IDENTIFIER_MARKED(NODE) TREE_LANG_FLAG_0 (NODE) | |
8d08fdba MS |
1791 | \f |
1792 | /* Accessor macros for the vfield slots in structures. */ | |
1793 | ||
8026246f MM |
1794 | /* The virtual function pointer fields that this type contains. For a |
1795 | vfield defined just for this class, or from a primary base, the | |
1796 | TREE_PURPOSE is NULL. Otherwise, the TREE_PURPOSE is the BINFO for | |
1797 | the class containing the vfield. The TREE_VALUE is the class where | |
1798 | the vfield was first defined. */ | |
1799 | #define CLASSTYPE_VFIELDS(NODE) (TYPE_LANG_SPECIFIC(NODE)->vfields) | |
1800 | ||
8d08fdba MS |
1801 | /* Get the assoc info that caused this vfield to exist. */ |
1802 | #define VF_BINFO_VALUE(NODE) TREE_PURPOSE (NODE) | |
1803 | ||
1804 | /* Get that same information as a _TYPE. */ | |
1805 | #define VF_BASETYPE_VALUE(NODE) TREE_VALUE (NODE) | |
1806 | ||
1807 | /* Get the value of the top-most type dominating the non-`normal' vfields. */ | |
1808 | #define VF_DERIVED_VALUE(NODE) (VF_BINFO_VALUE (NODE) ? BINFO_TYPE (VF_BINFO_VALUE (NODE)) : NULL_TREE) | |
c0bbf652 MM |
1809 | |
1810 | /* The number of bytes by which to adjust the `this' pointer when | |
1811 | calling this virtual function. */ | |
5e19c053 | 1812 | #define BV_DELTA(NODE) (TREE_PURPOSE (NODE)) |
c0bbf652 MM |
1813 | |
1814 | /* If non-NULL, the vtable index at which to find the vcall offset | |
1815 | when calling this virtual function. */ | |
5e19c053 | 1816 | #define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE)) |
c0bbf652 MM |
1817 | |
1818 | /* The function to call. */ | |
5e19c053 MM |
1819 | #define BV_FN(NODE) (TREE_VALUE (NODE)) |
1820 | ||
1821 | /* The most derived class. */ | |
c0bbf652 | 1822 | |
8d08fdba MS |
1823 | \f |
1824 | /* Nonzero for TREE_LIST node means that this list of things | |
1825 | is a list of parameters, as opposed to a list of expressions. */ | |
1826 | #define TREE_PARMLIST(NODE) ((NODE)->common.unsigned_flag) /* overloaded! */ | |
1827 | ||
1828 | /* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that | |
193306f7 | 1829 | this type can raise. Each TREE_VALUE is a _TYPE. The TREE_VALUE |
66a6250f JM |
1830 | will be NULL_TREE to indicate a throw specification of `()', or |
1831 | no exceptions allowed. */ | |
8d08fdba | 1832 | #define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_NONCOPIED_PARTS (NODE) |
a9aedbc2 | 1833 | |
7f477e81 NS |
1834 | /* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'. */ |
1835 | #define TYPE_NOTHROW_P(NODE) \ | |
1836 | (TYPE_RAISES_EXCEPTIONS (NODE) \ | |
1837 | && TREE_VALUE (TYPE_RAISES_EXCEPTIONS (NODE)) == NULL_TREE) | |
1838 | ||
e92cc029 | 1839 | /* The binding level associated with the namespace. */ |
3ebc5c52 MM |
1840 | #define NAMESPACE_LEVEL(NODE) \ |
1841 | (DECL_LANG_SPECIFIC(NODE)->decl_flags.u.level) | |
8d08fdba | 1842 | \f |
6a629cac MM |
1843 | |
1844 | /* If a DECL has DECL_LANG_SPECIFIC, it is either a lang_decl_flags or | |
b0d06515 MM |
1845 | a lang_decl (which has lang_decl_flags as its initial prefix). |
1846 | This macro is nonzero for tree nodes whose DECL_LANG_SPECIFIC is | |
1847 | the full lang_decl, and not just lang_decl_flags. */ | |
1848 | #define CAN_HAVE_FULL_LANG_DECL_P(NODE) \ | |
1849 | (!(TREE_CODE ((NODE)) == VAR_DECL \ | |
1850 | || TREE_CODE ((NODE)) == CONST_DECL \ | |
1851 | || TREE_CODE ((NODE)) == FIELD_DECL \ | |
1852 | || TREE_CODE ((NODE)) == USING_DECL)) | |
6a629cac | 1853 | |
8d08fdba MS |
1854 | struct lang_decl_flags |
1855 | { | |
1856 | #ifdef ONLY_INT_FIELDS | |
1857 | int language : 8; | |
1858 | #else | |
1859 | enum languages language : 8; | |
1860 | #endif | |
1861 | ||
1862 | unsigned operator_attr : 1; | |
1863 | unsigned constructor_attr : 1; | |
0d9eb3ba | 1864 | unsigned destructor_attr : 1; |
8d08fdba MS |
1865 | unsigned friend_attr : 1; |
1866 | unsigned static_function : 1; | |
fee7654e | 1867 | unsigned pure_virtual : 1; |
454fa7a7 | 1868 | unsigned has_in_charge_parm_p : 1; |
0d9eb3ba | 1869 | unsigned pretty_function_p : 1; |
d60f72ae | 1870 | |
8d08fdba | 1871 | unsigned mutable_flag : 1; |
56e770bf | 1872 | unsigned deferred : 1; |
a0a33927 | 1873 | unsigned use_template : 2; |
db5ae43f | 1874 | unsigned nonconverting : 1; |
faae18ab MS |
1875 | unsigned declared_inline : 1; |
1876 | unsigned not_really_extern : 1; | |
cdcb673e | 1877 | unsigned needs_final_overrider : 1; |
d60f72ae | 1878 | |
162bc98d | 1879 | unsigned bitfield : 1; |
6ba89f8e | 1880 | unsigned defined_in_class : 1; |
59026e79 | 1881 | unsigned pending_inline_p : 1; |
af3b4e59 MM |
1882 | unsigned global_ctor_p : 1; |
1883 | unsigned global_dtor_p : 1; | |
0d9eb3ba | 1884 | unsigned dummy : 3; |
8d08fdba | 1885 | |
8d08fdba | 1886 | tree context; |
3ebc5c52 | 1887 | |
3ebc5c52 | 1888 | union { |
7c355bca ML |
1889 | /* In a FUNCTION_DECL, VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this |
1890 | is DECL_TEMPLATE_INFO. */ | |
3ebc5c52 MM |
1891 | tree template_info; |
1892 | ||
1893 | /* In a NAMESPACE_DECL, this is NAMESPACE_LEVEL. */ | |
1894 | struct binding_level *level; | |
1895 | } u; | |
af3b4e59 MM |
1896 | |
1897 | union { | |
1898 | /* This is DECL_ACCESS. */ | |
1899 | tree access; | |
1900 | ||
1901 | /* In a namespace-scope FUNCTION_DECL, this is | |
1902 | GLOBAL_INIT_PRIORITY. */ | |
1903 | int init_priority; | |
1904 | } u2; | |
8d08fdba MS |
1905 | }; |
1906 | ||
1907 | struct lang_decl | |
1908 | { | |
1909 | struct lang_decl_flags decl_flags; | |
1910 | ||
6a629cac | 1911 | tree befriending_classes; |
9188c363 MM |
1912 | |
1913 | /* In a FUNCTION_DECL, this is DECL_SAVED_TREE. */ | |
1914 | tree saved_tree; | |
1915 | ||
db9b2174 MM |
1916 | /* In a FUNCTION_DECL, this is DECL_CLONED_FUNCTION. */ |
1917 | tree cloned_function; | |
1918 | ||
f90cdf34 MT |
1919 | union |
1920 | { | |
1921 | tree sorted_fields; | |
1922 | struct pending_inline *pending_inline_info; | |
59026e79 | 1923 | struct language_function *saved_language_function; |
f90cdf34 | 1924 | } u; |
8d08fdba MS |
1925 | }; |
1926 | ||
1927 | /* Non-zero if NODE is a _DECL with TREE_READONLY set. */ | |
1928 | #define TREE_READONLY_DECL_P(NODE) \ | |
1929 | (TREE_READONLY (NODE) && TREE_CODE_CLASS (TREE_CODE (NODE)) == 'd') | |
1930 | ||
cffa8729 MS |
1931 | /* Non-zero iff DECL is memory-based. The DECL_RTL of |
1932 | certain const variables might be a CONST_INT, or a REG | |
1933 | in some cases. We cannot use `memory_operand' as a test | |
1934 | here because on most RISC machines, a variable's address | |
1935 | is not, by itself, a legitimate address. */ | |
1936 | #define DECL_IN_MEMORY_P(NODE) \ | |
1937 | (DECL_RTL (NODE) != NULL_RTX && GET_CODE (DECL_RTL (NODE)) == MEM) | |
1938 | ||
8d08fdba MS |
1939 | /* For FUNCTION_DECLs: return the language in which this decl |
1940 | was declared. */ | |
1941 | #define DECL_LANGUAGE(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.language) | |
1942 | ||
1943 | /* For FUNCTION_DECLs: nonzero means that this function is a constructor. */ | |
1944 | #define DECL_CONSTRUCTOR_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.constructor_attr) | |
aa45967f | 1945 | |
db9b2174 MM |
1946 | /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete |
1947 | object. */ | |
1948 | #define DECL_COMPLETE_CONSTRUCTOR_P(NODE) \ | |
1949 | (DECL_CONSTRUCTOR_P (NODE) \ | |
1950 | && DECL_NAME (NODE) == complete_ctor_identifier) | |
1951 | ||
1952 | /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base | |
1953 | object. */ | |
1954 | #define DECL_BASE_CONSTRUCTOR_P(NODE) \ | |
1955 | (DECL_CONSTRUCTOR_P (NODE) \ | |
1956 | && DECL_NAME (NODE) == base_ctor_identifier) | |
1957 | ||
1958 | /* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the | |
1959 | specialized in-charge constructor or the specialized not-in-charge | |
1960 | constructor. */ | |
1961 | #define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE) \ | |
1962 | (DECL_CONSTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE)) | |
1963 | ||
454fa7a7 MM |
1964 | /* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor. */ |
1965 | #define DECL_COPY_CONSTRUCTOR_P(NODE) \ | |
1966 | (DECL_CONSTRUCTOR_P (NODE) && copy_args_p (NODE)) | |
1967 | ||
aa45967f JM |
1968 | /* There ought to be a better way to find out whether or not something is |
1969 | a destructor. */ | |
1970 | #define DECL_DESTRUCTOR_P(NODE) \ | |
0d9eb3ba | 1971 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.destructor_attr) |
aa45967f | 1972 | |
db9b2174 MM |
1973 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the |
1974 | specialized in-charge constructor, in-charge deleting constructor, | |
1975 | or the the base destructor. */ | |
1976 | #define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE) \ | |
1977 | (DECL_DESTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE)) | |
1978 | ||
298d6f60 MM |
1979 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete |
1980 | object. */ | |
1981 | #define DECL_COMPLETE_DESTRUCTOR_P(NODE) \ | |
1982 | (DECL_DESTRUCTOR_P (NODE) \ | |
1983 | && DECL_NAME (NODE) == complete_dtor_identifier) | |
1984 | ||
1985 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base | |
1986 | object. */ | |
1987 | #define DECL_BASE_DESTRUCTOR_P(NODE) \ | |
1988 | (DECL_DESTRUCTOR_P (NODE) \ | |
1989 | && DECL_NAME (NODE) == base_dtor_identifier) | |
1990 | ||
1991 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete | |
1992 | object. */ | |
1993 | #define DECL_DELETING_DESTRUCTOR_P(NODE) \ | |
1994 | (DECL_DESTRUCTOR_P (NODE) \ | |
1995 | && DECL_NAME (NODE) == deleting_dtor_identifier) | |
1996 | ||
db9b2174 MM |
1997 | /* Nonzero if NODE (a FUNCTION_DECL) is a cloned constructor or |
1998 | destructor. */ | |
1999 | #define DECL_CLONED_FUNCTION_P(NODE) \ | |
2000 | (DECL_CLONED_FUNCTION (NODE) != NULL_TREE) | |
2001 | ||
2002 | /* If DECL_CLONED_FUNCTION_P holds, this is the function that was | |
2003 | cloned. */ | |
2004 | #define DECL_CLONED_FUNCTION(NODE) \ | |
2005 | (DECL_LANG_SPECIFIC (NODE)->cloned_function) | |
2006 | ||
f71f87f9 | 2007 | /* Non-zero if NODE is a user-defined conversion operator. */ |
aa45967f JM |
2008 | #define DECL_CONV_FN_P(NODE) \ |
2009 | (IDENTIFIER_TYPENAME_P (DECL_NAME (NODE)) && TREE_TYPE (DECL_NAME (NODE))) | |
711734a9 | 2010 | |
f71f87f9 MM |
2011 | /* Non-zero if NODE is an overloaded operator. */ |
2012 | #define DECL_OVERLOADED_OPERATOR_P(NODE) \ | |
2013 | (IDENTIFIER_OPNAME_P (DECL_NAME ((NODE)))) | |
2014 | ||
454fa7a7 MM |
2015 | /* For FUNCTION_DECLs: nonzero means that this function is a |
2016 | constructor or a destructor with an extra in-charge parameter to | |
2017 | control whether or not virtual bases are constructed. */ | |
2018 | #define DECL_HAS_IN_CHARGE_PARM_P(NODE) \ | |
2019 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_in_charge_parm_p) | |
8d08fdba | 2020 | |
db1147b2 NS |
2021 | /* Non-zero for a FUNCTION_DECL that declares a type-info function. |
2022 | This only happens in the old abi. */ | |
0aafb128 MM |
2023 | #define DECL_TINFO_FN_P(NODE) \ |
2024 | (TREE_CODE (NODE) == FUNCTION_DECL \ | |
2025 | && DECL_ARTIFICIAL (NODE) \ | |
2026 | && DECL_LANG_SPECIFIC(NODE)->decl_flags.mutable_flag) | |
2027 | ||
2028 | /* Mark NODE as a type-info function. */ | |
2029 | #define SET_DECL_TINFO_FN_P(NODE) \ | |
2030 | (DECL_LANG_SPECIFIC((NODE))->decl_flags.mutable_flag = 1) | |
2031 | ||
834c6dff MM |
2032 | /* Nonzero if NODE is an overloaded `operator delete[]' function. */ |
2033 | #define DECL_ARRAY_DELETE_OPERATOR_P(NODE) \ | |
2034 | (DECL_NAME (NODE) == ansi_opname[(int) VEC_DELETE_EXPR]) | |
2035 | ||
8d08fdba MS |
2036 | /* Nonzero for _DECL means that this decl appears in (or will appear |
2037 | in) as a member in a RECORD_TYPE or UNION_TYPE node. It is also for | |
2038 | detecting circularity in case members are multiply defined. In the | |
2039 | case of a VAR_DECL, it is also used to determine how program storage | |
2040 | should be allocated. */ | |
2041 | #define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3(NODE)) | |
2042 | ||
6ba89f8e MM |
2043 | /* Nonzero if the DECL was defined in the class definition itself, |
2044 | rather than outside the class. */ | |
2045 | #define DECL_DEFINED_IN_CLASS_P(DECL) \ | |
2046 | (DECL_LANG_SPECIFIC (DECL)->decl_flags.defined_in_class) | |
2047 | ||
8d08fdba MS |
2048 | /* Nonzero for FUNCTION_DECL means that this decl is just a |
2049 | friend declaration, and should not be added to the list of | |
2050 | member functions for this class. */ | |
2051 | #define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.friend_attr) | |
2052 | ||
6a629cac MM |
2053 | /* A TREE_LIST of the types which have befriended this FUNCTION_DECL. */ |
2054 | #define DECL_BEFRIENDING_CLASSES(NODE) \ | |
2055 | (DECL_LANG_SPECIFIC(NODE)->befriending_classes) | |
2056 | ||
8d08fdba MS |
2057 | /* Nonzero for FUNCTION_DECL means that this decl is a static |
2058 | member function. */ | |
2059 | #define DECL_STATIC_FUNCTION_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.static_function) | |
2060 | ||
700f8a87 MS |
2061 | /* Nonzero for a class member means that it is shared between all objects |
2062 | of that class. */ | |
2063 | #define SHARED_MEMBER_P(NODE) \ | |
2064 | (TREE_CODE (NODE) == VAR_DECL || TREE_CODE (NODE) == TYPE_DECL \ | |
2065 | || TREE_CODE (NODE) == CONST_DECL) | |
2066 | ||
8857f91e MM |
2067 | /* Nonzero for FUNCTION_DECL means that this decl is a non-static |
2068 | member function. */ | |
2069 | #define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \ | |
2070 | (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE) | |
2071 | ||
8926095f MS |
2072 | /* Nonzero for FUNCTION_DECL means that this decl is a member function |
2073 | (static or non-static). */ | |
2074 | #define DECL_FUNCTION_MEMBER_P(NODE) \ | |
8857f91e | 2075 | (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE)) |
8926095f | 2076 | |
8d08fdba MS |
2077 | /* Nonzero for FUNCTION_DECL means that this member function |
2078 | has `this' as const X *const. */ | |
0d9eb3ba MM |
2079 | #define DECL_CONST_MEMFUNC_P(NODE) \ |
2080 | (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) \ | |
2081 | && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE \ | |
2082 | (TYPE_ARG_TYPES (TREE_TYPE (NODE)))))) | |
8d08fdba | 2083 | |
d6479fe7 MM |
2084 | /* Nonzero for a DECL means that this member is a non-static member. */ |
2085 | #define DECL_NONSTATIC_MEMBER_P(NODE) \ | |
2086 | ((TREE_CODE (NODE) == FUNCTION_DECL \ | |
2087 | && DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)) \ | |
2088 | || TREE_CODE (NODE) == FIELD_DECL) | |
2089 | ||
8d08fdba MS |
2090 | /* Nonzero for _DECL means that this member object type |
2091 | is mutable. */ | |
2092 | #define DECL_MUTABLE_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.mutable_flag) | |
2093 | ||
db5ae43f MS |
2094 | /* Nonzero for _DECL means that this constructor is a non-converting |
2095 | constructor. */ | |
2096 | #define DECL_NONCONVERTING_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.nonconverting) | |
2097 | ||
fee7654e MM |
2098 | /* Nonzero for FUNCTION_DECL means that this member function is a pure |
2099 | virtual function. */ | |
2100 | #define DECL_PURE_VIRTUAL_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.pure_virtual) | |
8d08fdba | 2101 | |
cdcb673e MH |
2102 | /* Nonzero for FUNCTION_DECL means that this member function |
2103 | must be overridden by derived classes. */ | |
2104 | #define DECL_NEEDS_FINAL_OVERRIDER_P(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.needs_final_overrider) | |
2105 | ||
f9817201 MM |
2106 | /* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a |
2107 | template function. */ | |
2108 | #define DECL_PRETTY_FUNCTION_P(NODE) \ | |
2109 | (DECL_LANG_SPECIFIC(NODE)->decl_flags.pretty_function_p) | |
2110 | ||
8926095f | 2111 | /* The _TYPE context in which this _DECL appears. This field holds the |
4f1c5b7d MM |
2112 | class where a virtual function instance is actually defined. */ |
2113 | #define DECL_CLASS_CONTEXT(NODE) \ | |
2114 | (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE) | |
2115 | ||
2116 | /* For a non-member friend function, the class (if any) in which this | |
2117 | friend was defined. For example, given: | |
2118 | ||
2119 | struct S { friend void f (); }; | |
2120 | ||
2121 | the DECL_FRIEND_CONTEXT for `f' will be `S'. */ | |
2122 | #define DECL_FRIEND_CONTEXT(NODE) \ | |
2123 | ((DECL_FRIEND_P (NODE) && !DECL_FUNCTION_MEMBER_P (NODE)) \ | |
2124 | ? DECL_LANG_SPECIFIC (NODE)->decl_flags.context \ | |
2125 | : NULL_TREE) | |
2126 | ||
2127 | /* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT. */ | |
2128 | #define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \ | |
2129 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.context = (CONTEXT)) | |
cb0dbb9a JM |
2130 | |
2131 | /* NULL_TREE in DECL_CONTEXT represents the global namespace. */ | |
2132 | #define CP_DECL_CONTEXT(NODE) \ | |
2133 | (DECL_CONTEXT (NODE) ? DECL_CONTEXT (NODE) : global_namespace) | |
2134 | #define FROB_CONTEXT(NODE) ((NODE) == global_namespace ? NULL_TREE : (NODE)) | |
8d08fdba | 2135 | |
3927874d JM |
2136 | /* For a virtual function, the base where we find its vtable entry. |
2137 | For a non-virtual function, the base where it is defined. */ | |
4f1c5b7d MM |
2138 | #define DECL_VIRTUAL_CONTEXT(NODE) \ |
2139 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.context) | |
3927874d | 2140 | |
42c7b807 | 2141 | /* 1 iff NODE has namespace scope, including the global namespace. */ |
4f71f630 MM |
2142 | #define DECL_NAMESPACE_SCOPE_P(NODE) \ |
2143 | (!DECL_TEMPLATE_PARM_P (NODE) \ | |
2144 | && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL) | |
42c7b807 JM |
2145 | |
2146 | /* 1 iff NODE is a class member. */ | |
6eb3bb27 | 2147 | #define DECL_CLASS_SCOPE_P(NODE) \ |
4f1c5b7d | 2148 | (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE))) |
42c7b807 | 2149 | |
2642b9bf JM |
2150 | /* 1 iff NODE is function-local. */ |
2151 | #define DECL_FUNCTION_SCOPE_P(NODE) \ | |
2152 | (DECL_CONTEXT (NODE) \ | |
2153 | && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL) | |
2154 | ||
2c73f9f5 | 2155 | /* For a NAMESPACE_DECL: the list of using namespace directives |
30394414 | 2156 | The PURPOSE is the used namespace, the value is the namespace |
2c73f9f5 | 2157 | that is the common ancestor. */ |
da8a66fc | 2158 | #define DECL_NAMESPACE_USING(NODE) DECL_VINDEX (NAMESPACE_DECL_CHECK (NODE)) |
30394414 JM |
2159 | |
2160 | /* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users | |
2c73f9f5 | 2161 | of a namespace, to record the transitive closure of using namespace. */ |
da8a66fc | 2162 | #define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NAMESPACE_DECL_CHECK (NODE)) |
30394414 | 2163 | |
3e3f722c ML |
2164 | /* In a NAMESPACE_DECL, points to the original namespace if this is |
2165 | a namespace alias. */ | |
da8a66fc ML |
2166 | #define DECL_NAMESPACE_ALIAS(NODE) \ |
2167 | DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE)) | |
3e3f722c ML |
2168 | #define ORIGINAL_NAMESPACE(NODE) \ |
2169 | (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE)) | |
2170 | ||
0aafb128 MM |
2171 | /* In a non-local VAR_DECL with static storage duration, this is the |
2172 | initialization priority. If this value is zero, the NODE will be | |
2173 | initialized at the DEFAULT_INIT_PRIORITY. */ | |
9df2c88c | 2174 | #define DECL_INIT_PRIORITY(NODE) (VAR_DECL_CHECK (NODE)->decl.u2.i) |
0aafb128 | 2175 | |
9df2c88c | 2176 | /* In a TREE_LIST concatenating using directives, indicate indirect |
30394414 | 2177 | directives */ |
da8a66fc | 2178 | #define TREE_INDIRECT_USING(NODE) (TREE_LIST_CHECK (NODE)->common.lang_flag_0) |
8d08fdba | 2179 | |
d2ad151f | 2180 | /* In a VAR_DECL for a variable declared in a for statement, |
e92cc029 | 2181 | this is the shadowed (local) variable. */ |
17aec3eb | 2182 | #define DECL_SHADOWED_FOR_VAR(NODE) DECL_RESULT_FLD(VAR_DECL_CHECK (NODE)) |
d2ad151f | 2183 | |
59026e79 MM |
2184 | /* In a FUNCTION_DECL, this is nonzero if this function was defined in |
2185 | the class definition. We have saved away the text of the function, | |
2186 | but have not yet processed it. */ | |
2187 | #define DECL_PENDING_INLINE_P(NODE) \ | |
da8a66fc | 2188 | (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))->decl_flags.pending_inline_p) |
59026e79 MM |
2189 | |
2190 | /* If DECL_PENDING_INLINE_P holds, this is the saved text of the | |
2191 | function. */ | |
2192 | #define DECL_PENDING_INLINE_INFO(NODE) \ | |
2193 | (DECL_LANG_SPECIFIC(NODE)->u.pending_inline_info) | |
f90cdf34 MT |
2194 | |
2195 | /* For a TYPE_DECL: if this function has many fields, we'll sort them | |
2196 | and put them into a TREE_VEC. */ | |
da8a66fc ML |
2197 | #define DECL_SORTED_FIELDS(NODE) \ |
2198 | (DECL_LANG_SPECIFIC (TYPE_DECL_CHECK (NODE))->u.sorted_fields) | |
8d08fdba | 2199 | |
56e770bf MM |
2200 | /* True if on the deferred_fns (see decl2.c) list. */ |
2201 | #define DECL_DEFERRED_FN(DECL) \ | |
2202 | (DECL_LANG_SPECIFIC(DECL)->decl_flags.deferred) | |
8926095f | 2203 | |
7c355bca ML |
2204 | /* For a VAR_DECL, FUNCTION_DECL, TYPE_DECL or TEMPLATE_DECL: |
2205 | template-specific information. */ | |
3ebc5c52 | 2206 | #define DECL_TEMPLATE_INFO(NODE) \ |
7c355bca | 2207 | (DECL_LANG_SPECIFIC(VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK (NODE))->decl_flags.u.template_info) |
ed44da02 MM |
2208 | |
2209 | /* Template information for a RECORD_TYPE or UNION_TYPE. */ | |
da8a66fc ML |
2210 | #define CLASSTYPE_TEMPLATE_INFO(NODE) \ |
2211 | (TYPE_LANG_SPECIFIC(RECORD_OR_UNION_TYPE_CHECK (NODE))->template_info) | |
ed44da02 MM |
2212 | |
2213 | /* Template information for an ENUMERAL_TYPE. Although an enumeration may | |
2214 | not be a primary template, it may be declared within the scope of a | |
2215 | primary template and the enumeration constants may depend on | |
2216 | non-type template parameters. */ | |
da8a66fc | 2217 | #define ENUM_TEMPLATE_INFO(NODE) (TYPE_BINFO (ENUMERAL_TYPE_CHECK (NODE))) |
ed44da02 | 2218 | |
7ddedda4 MM |
2219 | /* Template information for a template template parameter. */ |
2220 | #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) (TYPE_BINFO (NODE)) | |
2221 | ||
ed44da02 | 2222 | /* Template information for an ENUMERAL_, RECORD_, or UNION_TYPE. */ |
7ddedda4 MM |
2223 | #define TYPE_TEMPLATE_INFO(NODE) \ |
2224 | (TREE_CODE (NODE) == ENUMERAL_TYPE \ | |
2225 | ? ENUM_TEMPLATE_INFO (NODE) : \ | |
2226 | (TREE_CODE (NODE) == TEMPLATE_TEMPLATE_PARM \ | |
2227 | ? TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (NODE) \ | |
2228 | : CLASSTYPE_TEMPLATE_INFO (NODE))) | |
ed44da02 MM |
2229 | |
2230 | /* Set the template information for an ENUMERAL_, RECORD_, or | |
2231 | UNION_TYPE to VAL. */ | |
2232 | #define SET_TYPE_TEMPLATE_INFO(NODE, VAL) \ | |
2233 | (TREE_CODE (NODE) == ENUMERAL_TYPE \ | |
2234 | ? (ENUM_TEMPLATE_INFO (NODE) = VAL) \ | |
2235 | : (CLASSTYPE_TEMPLATE_INFO (NODE) = VAL)) | |
2236 | ||
5566b478 MS |
2237 | #define TI_TEMPLATE(NODE) (TREE_PURPOSE (NODE)) |
2238 | #define TI_ARGS(NODE) (TREE_VALUE (NODE)) | |
824b9a4c | 2239 | #define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE) |
ed44da02 | 2240 | |
b5ac18ea MM |
2241 | /* We use TREE_VECs to hold template arguments. If there is only one |
2242 | level of template arguments, then the TREE_VEC contains the | |
2243 | arguments directly. If there is more than one level of template | |
2244 | arguments, then each entry in the TREE_VEC is itself a TREE_VEC, | |
2245 | containing the template arguments for a single level. The first | |
2246 | entry in the outer TREE_VEC is the outermost level of template | |
2247 | parameters; the last is the innermost. | |
2248 | ||
2249 | It is incorrect to ever form a template argument vector containing | |
2250 | only one level of arguments, but which is a TREE_VEC containing as | |
2251 | its only entry the TREE_VEC for that level. */ | |
2252 | ||
2253 | /* Non-zero if the template arguments is actually a vector of vectors, | |
2254 | rather than just a vector. */ | |
2255 | #define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE) \ | |
2256 | (NODE != NULL_TREE \ | |
2257 | && TREE_CODE (NODE) == TREE_VEC \ | |
2258 | && TREE_VEC_LENGTH (NODE) > 0 \ | |
2259 | && TREE_VEC_ELT (NODE, 0) != NULL_TREE \ | |
2260 | && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC) | |
2261 | ||
2262 | /* The depth of a template argument vector. When called directly by | |
2263 | the parser, we use a TREE_LIST rather than a TREE_VEC to represent | |
2264 | template arguments. In fact, we may even see NULL_TREE if there | |
2265 | are no template arguments. In both of those cases, there is only | |
2266 | one level of template arguments. */ | |
2267 | #define TMPL_ARGS_DEPTH(NODE) \ | |
2268 | (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE) : 1) | |
2269 | ||
2270 | /* The LEVELth level of the template ARGS. Note that template | |
2271 | parameter levels are indexed from 1, not from 0. */ | |
2272 | #define TMPL_ARGS_LEVEL(ARGS, LEVEL) \ | |
2273 | (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS) \ | |
2274 | ? TREE_VEC_ELT ((ARGS), (LEVEL) - 1) : ARGS) | |
2275 | ||
2276 | /* Set the LEVELth level of the template ARGS to VAL. This macro does | |
2277 | not work with single-level argument vectors. */ | |
2278 | #define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL) \ | |
2279 | (TREE_VEC_ELT ((ARGS), (LEVEL) - 1) = (VAL)) | |
2280 | ||
2281 | /* Accesses the IDXth parameter in the LEVELth level of the ARGS. */ | |
2282 | #define TMPL_ARG(ARGS, LEVEL, IDX) \ | |
2283 | (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX)) | |
2284 | ||
2285 | /* Set the IDXth element in the LEVELth level of ARGS to VAL. This | |
2286 | macro does not work with single-level argument vectors. */ | |
2287 | #define SET_TMPL_ARG(ARGS, LEVEL, IDX, VAL) \ | |
2288 | (TREE_VEC_ELT (TREE_VEC_ELT ((ARGS), (LEVEL) - 1), (IDX)) = (VAL)) | |
2289 | ||
2290 | /* Given a single level of template arguments in NODE, return the | |
2291 | number of arguments. */ | |
2292 | #define NUM_TMPL_ARGS(NODE) \ | |
2293 | ((NODE) == NULL_TREE ? 0 \ | |
2294 | : (TREE_CODE (NODE) == TREE_VEC \ | |
2295 | ? TREE_VEC_LENGTH (NODE) : list_length (NODE))) | |
2296 | ||
2297 | /* The number of levels of template parameters given by NODE. */ | |
2298 | #define TMPL_PARMS_DEPTH(NODE) \ | |
2299 | (TREE_INT_CST_HIGH (TREE_PURPOSE (NODE))) | |
2300 | ||
36a117a5 MM |
2301 | /* The TEMPLATE_DECL instantiated or specialized by NODE. This |
2302 | TEMPLATE_DECL will be the immediate parent, not the most general | |
2303 | template. For example, in: | |
2304 | ||
2305 | template <class T> struct S { template <class U> void f(U); } | |
2306 | ||
2307 | the FUNCTION_DECL for S<int>::f<double> will have, as its | |
2308 | DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'. | |
2309 | ||
2310 | As a special case, for a member friend template of a template | |
2311 | class, this value will not be a TEMPLATE_DECL, but rather a | |
672476cb MM |
2312 | LOOKUP_EXPR or IDENTIFIER_NODE indicating the name of the template |
2313 | and any explicit template arguments provided. For example, in: | |
36a117a5 MM |
2314 | |
2315 | template <class T> struct S { friend void f<int>(int, double); } | |
2316 | ||
2317 | the DECL_TI_TEMPLATE will be a LOOKUP_EXPR for `f' and the | |
2318 | DECL_TI_ARGS will be {int}. */ | |
5566b478 | 2319 | #define DECL_TI_TEMPLATE(NODE) TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE)) |
ed44da02 | 2320 | |
36a117a5 MM |
2321 | /* The template arguments used to obtain this decl from the most |
2322 | general form of DECL_TI_TEMPLATE. For the example given for | |
2323 | DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}. These | |
2324 | are always the full set of arguments required to instantiate this | |
2325 | declaration from the most general template specialized here. */ | |
5566b478 MS |
2326 | #define DECL_TI_ARGS(NODE) TI_ARGS (DECL_TEMPLATE_INFO (NODE)) |
2327 | #define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE)) | |
2328 | #define CLASSTYPE_TI_ARGS(NODE) TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE)) | |
ed44da02 MM |
2329 | #define ENUM_TI_TEMPLATE(NODE) \ |
2330 | TI_TEMPLATE (ENUM_TEMPLATE_INFO (NODE)) | |
2331 | #define ENUM_TI_ARGS(NODE) \ | |
2332 | TI_ARGS (ENUM_TEMPLATE_INFO (NODE)) | |
2333 | ||
2334 | /* Like DECL_TI_TEMPLATE, but for an ENUMERAL_, RECORD_, or UNION_TYPE. */ | |
2335 | #define TYPE_TI_TEMPLATE(NODE) \ | |
2336 | (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE))) | |
2337 | ||
59026e79 | 2338 | /* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE. */ |
ed44da02 MM |
2339 | #define TYPE_TI_ARGS(NODE) \ |
2340 | (TI_ARGS (TYPE_TEMPLATE_INFO (NODE))) | |
2341 | ||
98c1c668 | 2342 | #define INNERMOST_TEMPLATE_PARMS(NODE) TREE_VALUE(NODE) |
5566b478 | 2343 | |
6ba89f8e MM |
2344 | /* Nonzero if the NODE corresponds to the template parameters for a |
2345 | member template, whose inline definition is being processed after | |
2346 | the class definition is complete. */ | |
cae40af6 JM |
2347 | #define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE) |
2348 | ||
59026e79 MM |
2349 | /* In a FUNCTION_DECL, the saved representation of the body of the |
2350 | entire function. Usually a COMPOUND_STMT, but this may also be a | |
2351 | RETURN_INIT, CTOR_INITIALIZER, or TRY_BLOCK. */ | |
6eabb241 | 2352 | #define DECL_SAVED_TREE(NODE) \ |
da8a66fc | 2353 | (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))->saved_tree) |
3ebc5c52 | 2354 | |
59026e79 MM |
2355 | /* In a FUNCTION_DECL, the saved language-specific per-function data. */ |
2356 | #define DECL_SAVED_FUNCTION_DATA(NODE) \ | |
da8a66fc | 2357 | (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))->u.saved_language_function) |
59026e79 | 2358 | |
5566b478 MS |
2359 | #define COMPOUND_STMT_NO_SCOPE(NODE) TREE_LANG_FLAG_0 (NODE) |
2360 | #define NEW_EXPR_USE_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE) | |
2361 | #define DELETE_EXPR_USE_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE) | |
2362 | #define DELETE_EXPR_USE_VEC(NODE) TREE_LANG_FLAG_1 (NODE) | |
2363 | #define LOOKUP_EXPR_GLOBAL(NODE) TREE_LANG_FLAG_0 (NODE) | |
8d08fdba | 2364 | |
e1376b00 MM |
2365 | /* Nonzero if this AGGR_INIT_EXPR provides for initialization via a |
2366 | constructor call, rather than an ordinary function call. */ | |
da8a66fc ML |
2367 | #define AGGR_INIT_VIA_CTOR_P(NODE) \ |
2368 | TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE)) | |
e1376b00 | 2369 | |
a7e4cfa0 MM |
2370 | /* Nonzero if this statement should be considered a full-expression. */ |
2371 | #define STMT_IS_FULL_EXPR_P(NODE) TREE_LANG_FLAG_1 ((NODE)) | |
2372 | ||
6757edfe MM |
2373 | /* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a |
2374 | TEMPLATE_DECL. This macro determines whether or not a given class | |
2375 | type is really a template type, as opposed to an instantiation or | |
2376 | specialization of one. */ | |
2377 | #define CLASSTYPE_IS_TEMPLATE(NODE) \ | |
2378 | (CLASSTYPE_TEMPLATE_INFO (NODE) \ | |
2379 | && !CLASSTYPE_USE_TEMPLATE (NODE) \ | |
2380 | && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE))) | |
2381 | ||
45869a6c MM |
2382 | /* The name used by the user to name the typename type. Typically, |
2383 | this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the | |
2384 | corresponding TYPE_DECL. However, this may also be a | |
2385 | TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'. */ | |
7ddedda4 | 2386 | #define TYPENAME_TYPE_FULLNAME(NODE) TYPE_BINFO (NODE) |
ca40b399 | 2387 | |
f181d4ae MM |
2388 | /* Nonzero if NODE is an implicit typename. */ |
2389 | #define IMPLICIT_TYPENAME_P(NODE) \ | |
2390 | (TREE_CODE (NODE) == TYPENAME_TYPE && TREE_TYPE (NODE)) | |
2391 | ||
83233dca MM |
2392 | /* Nonzero if NODE is a TYPE_DECL that should not be visible because |
2393 | it is from a dependent base class. */ | |
2394 | #define IMPLICIT_TYPENAME_TYPE_DECL_P(NODE) \ | |
2395 | (TREE_CODE (NODE) == TYPE_DECL \ | |
2396 | && DECL_ARTIFICIAL (NODE) \ | |
2397 | && IMPLICIT_TYPENAME_P (TREE_TYPE (NODE))) | |
2398 | ||
cfdd0551 | 2399 | /* Nonzero in INTEGER_CST means that this int is negative by dint of |
8d08fdba | 2400 | using a twos-complement negated operand. */ |
da8a66fc | 2401 | #define TREE_NEGATED_INT(NODE) TREE_LANG_FLAG_0 (INTEGER_CST_CHECK (NODE)) |
8d08fdba | 2402 | |
4c6b7393 MM |
2403 | /* Nonzero in any kind of _TYPE where conversions to base-classes may |
2404 | involve pointer arithmetic. If this is zero, then converting to | |
2405 | a base-class never requires changing the value of the pointer. */ | |
2406 | #define TYPE_BASE_CONVS_MAY_REQUIRE_CODE_P(NODE) (TREE_LANG_FLAG_1 (NODE)) | |
8d08fdba | 2407 | |
4c6b7393 | 2408 | /* [class.virtual] |
8d08fdba | 2409 | |
4c6b7393 MM |
2410 | A class that declares or inherits a virtual function is called a |
2411 | polymorphic class. */ | |
2412 | #define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE)) | |
8d08fdba | 2413 | |
bbd15aac MM |
2414 | /* Nonzero if this class has a virtual function table pointer. */ |
2415 | #define TYPE_CONTAINS_VPTR_P(NODE) \ | |
2416 | (TYPE_POLYMORPHIC_P (NODE) \ | |
2417 | || (vbase_offsets_in_vtable_p () \ | |
2418 | && TYPE_USES_VIRTUAL_BASECLASSES (NODE))) | |
2419 | ||
d2ad151f PB |
2420 | extern int flag_new_for_scope; |
2421 | ||
2422 | /* This flag is true of a local VAR_DECL if it was declared in a for | |
e92cc029 | 2423 | statement, but we are no longer in the scope of the for. */ |
da8a66fc | 2424 | #define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE)) |
d2ad151f PB |
2425 | |
2426 | /* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL | |
2427 | if we already emitted a warning about using it. */ | |
da8a66fc | 2428 | #define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (VAR_DECL_CHECK (NODE)) |
d2ad151f | 2429 | |
cd9f6678 MM |
2430 | /* Nonzero if NODE is a FUNCTION_DECL (for a function with global |
2431 | scope) declared in a local scope. */ | |
2432 | #define DECL_LOCAL_FUNCTION_P(NODE) \ | |
2433 | DECL_LANG_FLAG_0 (FUNCTION_DECL_CHECK (NODE)) | |
2434 | ||
700f8a87 | 2435 | /* This _DECL represents a compiler-generated entity. */ |
863adfc0 | 2436 | #define SET_DECL_ARTIFICIAL(NODE) (DECL_ARTIFICIAL (NODE) = 1) |
8d08fdba MS |
2437 | |
2438 | /* Record whether a typedef for type `int' was actually `signed int'. */ | |
2439 | #define C_TYPEDEF_EXPLICITLY_SIGNED(exp) DECL_LANG_FLAG_1 ((exp)) | |
2440 | ||
162bc98d JM |
2441 | /* In a FIELD_DECL, nonzero if the decl was originally a bitfield. */ |
2442 | #define DECL_C_BIT_FIELD(NODE) \ | |
da8a66fc ML |
2443 | (DECL_LANG_SPECIFIC (FIELD_DECL_CHECK (NODE))\ |
2444 | && DECL_LANG_SPECIFIC (NODE)->decl_flags.bitfield) | |
162bc98d | 2445 | #define SET_DECL_C_BIT_FIELD(NODE) \ |
da8a66fc | 2446 | (DECL_LANG_SPECIFIC (FIELD_DECL_CHECK (NODE))->decl_flags.bitfield = 1) |
cd8ed629 MM |
2447 | #define CLEAR_DECL_C_BIT_FIELD(NODE) \ |
2448 | (DECL_LANG_SPECIFIC (FIELD_DECL_CHECK (NODE))->decl_flags.bitfield = 0) | |
162bc98d | 2449 | |
46e8c075 MM |
2450 | /* In a FUNCTION_DECL, nonzero if the function cannot be inlined. */ |
2451 | #define DECL_UNINLINABLE(NODE) \ | |
2452 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.bitfield) | |
2453 | ||
2986ae00 MS |
2454 | #define INTEGRAL_CODE_P(CODE) \ |
2455 | (CODE == INTEGER_TYPE || CODE == ENUMERAL_TYPE || CODE == BOOLEAN_TYPE) | |
a7a64a77 MM |
2456 | |
2457 | /* [basic.fundamental] | |
2458 | ||
2459 | Types bool, char, wchar_t, and the signed and unsigned integer types | |
2460 | are collectively called integral types. | |
2461 | ||
2462 | Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration | |
2463 | types as well, which is incorrect in C++. */ | |
2464 | #define CP_INTEGRAL_TYPE_P(TYPE) \ | |
2465 | (TREE_CODE ((TYPE)) == BOOLEAN_TYPE \ | |
2466 | || TREE_CODE ((TYPE)) == INTEGER_TYPE) | |
2467 | ||
2468 | /* [basic.fundamental] | |
2469 | ||
2470 | Integral and floating types are collectively called arithmetic | |
2471 | types. */ | |
2472 | #define ARITHMETIC_TYPE_P(TYPE) \ | |
2473 | (CP_INTEGRAL_TYPE_P (TYPE) || TREE_CODE (TYPE) == REAL_TYPE) | |
2986ae00 | 2474 | |
8d08fdba MS |
2475 | /* Mark which labels are explicitly declared. |
2476 | These may be shadowed, and may be referenced from nested functions. */ | |
2477 | #define C_DECLARED_LABEL_FLAG(label) TREE_LANG_FLAG_1 (label) | |
2478 | ||
8d08fdba MS |
2479 | /* Nonzero for _TYPE means that the _TYPE defines |
2480 | at least one constructor. */ | |
2481 | #define TYPE_HAS_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1(NODE)) | |
2482 | ||
2483 | /* When appearing in an INDIRECT_REF, it means that the tree structure | |
2484 | underneath is actually a call to a constructor. This is needed | |
2485 | when the constructor must initialize local storage (which can | |
2486 | be automatically destroyed), rather than allowing it to allocate | |
2487 | space from the heap. | |
2488 | ||
2489 | When appearing in a SAVE_EXPR, it means that underneath | |
2490 | is a call to a constructor. | |
2491 | ||
2492 | When appearing in a CONSTRUCTOR, it means that it was | |
2493 | a GNU C constructor expression. | |
2494 | ||
2495 | When appearing in a FIELD_DECL, it means that this field | |
2496 | has been duly initialized in its constructor. */ | |
2497 | #define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4(NODE)) | |
2498 | ||
8452b1d3 JM |
2499 | #define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \ |
2500 | && CONSTRUCTOR_ELTS (NODE) == NULL_TREE \ | |
2501 | && ! TREE_HAS_CONSTRUCTOR (NODE)) | |
a3203465 | 2502 | |
eb66be0e | 2503 | #if 0 |
8d08fdba MS |
2504 | /* Indicates that a NON_LVALUE_EXPR came from a C++ reference. |
2505 | Used to generate more helpful error message in case somebody | |
2506 | tries to take its address. */ | |
2507 | #define TREE_REFERENCE_EXPR(NODE) (TREE_LANG_FLAG_3(NODE)) | |
eb66be0e | 2508 | #endif |
8d08fdba MS |
2509 | |
2510 | /* Nonzero for _TYPE means that the _TYPE defines a destructor. */ | |
2511 | #define TYPE_HAS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_2(NODE)) | |
2512 | ||
f30432d7 MS |
2513 | /* Nonzero means that an object of this type can not be initialized using |
2514 | an initializer list. */ | |
2515 | #define CLASSTYPE_NON_AGGREGATE(NODE) \ | |
8012c983 | 2516 | (TYPE_LANG_SPECIFIC (NODE)->non_aggregate) |
f30432d7 MS |
2517 | #define TYPE_NON_AGGREGATE_CLASS(NODE) \ |
2518 | (IS_AGGR_TYPE (NODE) && CLASSTYPE_NON_AGGREGATE (NODE)) | |
2519 | ||
8d08fdba | 2520 | /* Nonzero if there is a user-defined X::op=(x&) for this class. */ |
8012c983 MM |
2521 | #define TYPE_HAS_REAL_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_real_assign_ref) |
2522 | #define TYPE_HAS_COMPLEX_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_complex_assign_ref) | |
2523 | #define TYPE_HAS_ABSTRACT_ASSIGN_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_abstract_assign_ref) | |
2524 | #define TYPE_HAS_COMPLEX_INIT_REF(NODE) (TYPE_LANG_SPECIFIC(NODE)->has_complex_init_ref) | |
8d08fdba | 2525 | |
834c6dff MM |
2526 | /* Nonzero if TYPE has a trivial destructor. From [class.dtor]: |
2527 | ||
2528 | A destructor is trivial if it is an implicitly declared | |
2529 | destructor and if: | |
2530 | ||
2531 | - all of the direct base classes of its class have trivial | |
2532 | destructors, | |
2533 | ||
2534 | - for all of the non-static data members of its class that are | |
2535 | of class type (or array thereof), each such class has a | |
2536 | trivial destructor. */ | |
2537 | #define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \ | |
2538 | (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE)) | |
2539 | ||
2540 | /* Nonzero for _TYPE node means that this type does not have a trivial | |
2541 | destructor. Therefore, destroying an object of this type will | |
2542 | involve a call to a destructor. This can apply to objects of | |
2543 | ARRAY_TYPE is the type of the elements needs a destructor. */ | |
2544 | #define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \ | |
2545 | (TYPE_LANG_FLAG_4(NODE)) | |
8d08fdba | 2546 | |
e8abc66f MS |
2547 | /* Nonzero for class type means that initialization of this type can use |
2548 | a bitwise copy. */ | |
2549 | #define TYPE_HAS_TRIVIAL_INIT_REF(NODE) \ | |
2550 | (TYPE_HAS_INIT_REF (NODE) && ! TYPE_HAS_COMPLEX_INIT_REF (NODE)) | |
2551 | ||
2552 | /* Nonzero for class type means that assignment of this type can use | |
2553 | a bitwise copy. */ | |
2554 | #define TYPE_HAS_TRIVIAL_ASSIGN_REF(NODE) \ | |
2555 | (TYPE_HAS_ASSIGN_REF (NODE) && ! TYPE_HAS_COMPLEX_ASSIGN_REF (NODE)) | |
2556 | ||
c11b6f21 MS |
2557 | #define TYPE_PTRMEM_P(NODE) \ |
2558 | (TREE_CODE (NODE) == POINTER_TYPE \ | |
2559 | && TREE_CODE (TREE_TYPE (NODE)) == OFFSET_TYPE) | |
2560 | #define TYPE_PTR_P(NODE) \ | |
2561 | (TREE_CODE (NODE) == POINTER_TYPE \ | |
2562 | && TREE_CODE (TREE_TYPE (NODE)) != OFFSET_TYPE) | |
2563 | #define TYPE_PTROB_P(NODE) \ | |
2564 | (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE \ | |
2565 | && TREE_CODE (TREE_TYPE (NODE)) != VOID_TYPE) | |
2566 | #define TYPE_PTROBV_P(NODE) \ | |
2567 | (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE) | |
2568 | #define TYPE_PTRFN_P(NODE) \ | |
2569 | (TREE_CODE (NODE) == POINTER_TYPE \ | |
2570 | && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE) | |
2571 | ||
8d08fdba | 2572 | /* Nonzero for _TYPE node means that this type is a pointer to member |
e92cc029 | 2573 | function type. */ |
83e9506e RH |
2574 | #define TYPE_PTRMEMFUNC_P(NODE) \ |
2575 | (TREE_CODE(NODE) == RECORD_TYPE \ | |
2576 | && TYPE_LANG_SPECIFIC(NODE) \ | |
2577 | && TYPE_PTRMEMFUNC_FLAG (NODE)) | |
2578 | ||
e08a8f45 | 2579 | #define TYPE_PTRMEMFUNC_FLAG(NODE) \ |
8012c983 | 2580 | (TYPE_LANG_SPECIFIC(NODE)->ptrmemfunc_flag) |
e08a8f45 MM |
2581 | |
2582 | /* A pointer-to-function member type looks like: | |
2583 | ||
2584 | struct { | |
2585 | short __delta; | |
2586 | short __index; | |
2587 | union { | |
2588 | P __pfn; | |
2589 | short __delta2; | |
2590 | } __pfn_or_delta2; | |
2591 | }; | |
2592 | ||
2593 | where P is a POINTER_TYPE to a METHOD_TYPE appropriate for the | |
2594 | pointer to member. The fields are used as follows: | |
2595 | ||
2596 | If __INDEX is -1, then the function to call is non-virtual, and | |
2597 | is located at the address given by __PFN. | |
2598 | ||
2599 | If __INDEX is zero, then this a NULL pointer-to-member. | |
2600 | ||
2601 | Otherwise, the function to call is virtual. Then, __DELTA2 gives | |
2602 | the offset from an instance of the object to the virtual function | |
2603 | table, and __INDEX - 1 is the index into the vtable to use to | |
2604 | find the function. | |
2605 | ||
2606 | The value to use for the THIS parameter is the address of the | |
2607 | object plus __DELTA. | |
2608 | ||
2609 | For example, given: | |
2610 | ||
2611 | struct B1 { | |
2612 | int i; | |
2613 | }; | |
2614 | ||
2615 | struct B2 { | |
2616 | double d; | |
2617 | void f(); | |
2618 | }; | |
2619 | ||
2620 | struct S : public B1, B2 {}; | |
2621 | ||
2622 | the pointer-to-member for `&S::f' looks like: | |
2623 | ||
2624 | { 4, -1, { &f__2B2 } }; | |
2625 | ||
2626 | The `4' means that given an `S*' you have to add 4 bytes to get to | |
2627 | the address of the `B2*'. Then, the -1 indicates that this is a | |
2628 | non-virtual function. Of course, `&f__2B2' is the name of that | |
2629 | function. | |
2630 | ||
adecb3f4 | 2631 | (Of course, the exact values may differ depending on the mangling |
c7e266a6 MM |
2632 | scheme, sizes of types, and such.). |
2633 | ||
2634 | Under the new ABI, we do: | |
2635 | ||
2636 | struct { | |
2637 | __P __pfn; | |
2638 | ptrdiff_t __delta; | |
2639 | }; | |
2640 | ||
2641 | (We don't need DELTA2, because the vtable is always the first thing | |
2642 | in the object.) If the function is virtual, then PFN is one plus | |
2643 | twice the index into the vtable; otherwise, it is just a pointer to | |
2644 | the function. */ | |
e08a8f45 | 2645 | |
8d08fdba MS |
2646 | /* Get the POINTER_TYPE to the METHOD_TYPE associated with this |
2647 | pointer to member function. TYPE_PTRMEMFUNC_P _must_ be true, | |
e92cc029 | 2648 | before using this macro. */ |
c7e266a6 MM |
2649 | #define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \ |
2650 | (flag_new_abi \ | |
2651 | ? (TREE_TYPE (TYPE_FIELDS (NODE))) \ | |
2652 | : (TREE_TYPE (TYPE_FIELDS (TREE_TYPE (TREE_CHAIN (TREE_CHAIN (TYPE_FIELDS (NODE)))))))) | |
ceab47eb MM |
2653 | |
2654 | /* Returns `A' for a type like `int (A::*)(double)' */ | |
2655 | #define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \ | |
2656 | TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE))) | |
2657 | ||
38e01259 | 2658 | /* These are use to manipulate the canonical RECORD_TYPE from the |
e92cc029 | 2659 | hashed POINTER_TYPE, and can only be used on the POINTER_TYPE. */ |
8d08fdba MS |
2660 | #define TYPE_GET_PTRMEMFUNC_TYPE(NODE) ((tree)TYPE_LANG_SPECIFIC(NODE)) |
2661 | #define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE) (TYPE_LANG_SPECIFIC(NODE) = ((struct lang_type *)(void*)(VALUE))) | |
e92cc029 | 2662 | /* These are to get the delta2 and pfn fields from a TYPE_PTRMEMFUNC_P. */ |
e08a8f45 MM |
2663 | #define DELTA2_FROM_PTRMEMFUNC(NODE) delta2_from_ptrmemfunc ((NODE)) |
2664 | #define PFN_FROM_PTRMEMFUNC(NODE) pfn_from_ptrmemfunc ((NODE)) | |
8d08fdba | 2665 | |
f71f87f9 MM |
2666 | /* For a pointer-to-member type of the form `T X::*', this is `X'. */ |
2667 | #define TYPE_PTRMEM_CLASS_TYPE(NODE) \ | |
2668 | (TYPE_PTRMEM_P ((NODE)) \ | |
2669 | ? TYPE_OFFSET_BASETYPE (TREE_TYPE ((NODE))) \ | |
2670 | : TYPE_PTRMEMFUNC_OBJECT_TYPE ((NODE))) | |
2671 | ||
2672 | /* For a pointer-to-member type of the form `T X::*', this is `T'. */ | |
2673 | #define TYPE_PTRMEM_POINTED_TO_TYPE(NODE) \ | |
2674 | (TYPE_PTRMEM_P ((NODE)) \ | |
2675 | ? TREE_TYPE (TREE_TYPE (NODE)) \ | |
2676 | : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE ((NODE)))) | |
2677 | ||
61a127b3 MM |
2678 | /* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for |
2679 | `X'. */ | |
f71f87f9 | 2680 | #define PTRMEM_CST_CLASS(NODE) \ |
da8a66fc | 2681 | TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE))) |
61a127b3 MM |
2682 | |
2683 | /* For a pointer-to-member constant `X::Y' this is the _DECL for | |
2684 | `Y'. */ | |
da8a66fc | 2685 | #define PTRMEM_CST_MEMBER(NODE) (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member) |
61a127b3 | 2686 | |
faae18ab | 2687 | /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was |
07c88314 MM |
2688 | specified in its declaration. This can also be set for an |
2689 | erroneously declared PARM_DECL. */ | |
da8a66fc | 2690 | #define DECL_THIS_EXTERN(NODE) \ |
07c88314 | 2691 | DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE)) |
8d08fdba | 2692 | |
faae18ab | 2693 | /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was |
07c88314 MM |
2694 | specified in its declaration. This can also be set for an |
2695 | erroneously declared PARM_DECL. */ | |
da8a66fc | 2696 | #define DECL_THIS_STATIC(NODE) \ |
07c88314 | 2697 | DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE)) |
faae18ab | 2698 | |
8d08fdba MS |
2699 | /* Nonzero in FUNCTION_DECL means it is really an operator. |
2700 | Just used to communicate formatting information to dbxout.c. */ | |
da8a66fc ML |
2701 | #define DECL_OPERATOR(NODE) \ |
2702 | (DECL_LANG_SPECIFIC(FUNCTION_DECL_CHECK (NODE))->decl_flags.operator_attr) | |
8d08fdba | 2703 | |
6bdb8141 JM |
2704 | /* Nonzero if TYPE is an anonymous union or struct type. We have to use a |
2705 | flag for this because "A union for which objects or pointers are | |
2706 | declared is not an anonymous union" [class.union]. */ | |
2707 | #define ANON_AGGR_TYPE_P(NODE) \ | |
8012c983 | 2708 | (CLASS_TYPE_P (NODE) && TYPE_LANG_SPECIFIC (NODE)->anon_aggr) |
6bdb8141 | 2709 | #define SET_ANON_AGGR_TYPE_P(NODE) \ |
8012c983 | 2710 | (TYPE_LANG_SPECIFIC (NODE)->anon_aggr = 1) |
67ffc812 | 2711 | |
1e30f9b4 MM |
2712 | /* Nonzero if TYPE is an anonymous union type. */ |
2713 | #define ANON_UNION_TYPE_P(NODE) \ | |
2714 | (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE)) | |
2715 | ||
0fa5e05c MM |
2716 | /* For a VAR_DECL that is an anonymous union, these are the various |
2717 | sub-variables that make up the anonymous union. */ | |
2718 | #define DECL_ANON_UNION_ELEMS(NODE) DECL_ARGUMENTS ((NODE)) | |
2719 | ||
8d08fdba MS |
2720 | #define UNKNOWN_TYPE LANG_TYPE |
2721 | ||
2722 | /* Define fields and accessors for nodes representing declared names. */ | |
2723 | ||
2724 | #if 0 | |
2725 | /* C++: A derived class may be able to directly use the virtual | |
2726 | function table of a base class. When it does so, it may | |
2727 | still have a decl node used to access the virtual function | |
2728 | table (so that variables of this type can initialize their | |
2729 | virtual function table pointers by name). When such thievery | |
2730 | is committed, know exactly which base class's virtual function | |
2731 | table is the one being stolen. This effectively computes the | |
2732 | transitive closure. */ | |
2733 | #define DECL_VPARENT(NODE) ((NODE)->decl.arguments) | |
2734 | #endif | |
2735 | ||
8012c983 | 2736 | #define TYPE_WAS_ANONYMOUS(NODE) (TYPE_LANG_SPECIFIC (NODE)->was_anonymous) |
8d08fdba MS |
2737 | |
2738 | /* C++: all of these are overloaded! These apply only to TYPE_DECLs. */ | |
f84b4be9 JM |
2739 | |
2740 | /* The format of each node in the DECL_FRIENDLIST is as follows: | |
2741 | ||
2742 | The TREE_PURPOSE will be the name of a function, i.e., an | |
2743 | IDENTIFIER_NODE. The TREE_VALUE will be itself a TREE_LIST, the | |
2744 | list of functions with that name which are friends. The | |
2745 | TREE_PURPOSE of each node in this sublist will be error_mark_node, | |
2746 | if the function was declared a friend individually, in which case | |
2747 | the TREE_VALUE will be the function_decl. If, however, all | |
2748 | functions with a given name in a class were declared to be friends, | |
2749 | the TREE_PUROSE will be the class type, and the TREE_VALUE will be | |
2750 | NULL_TREE. */ | |
8d08fdba | 2751 | #define DECL_FRIENDLIST(NODE) (DECL_INITIAL (NODE)) |
6a629cac MM |
2752 | #define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST)) |
2753 | #define FRIEND_DECLS(LIST) (TREE_VALUE (LIST)) | |
8d08fdba | 2754 | |
2036a15c MM |
2755 | /* The DECL_ACCESS, if non-NULL, is a TREE_LIST. The TREE_PURPOSE of |
2756 | each node is a type; the TREE_VALUE is the access granted for this | |
2757 | DECL in that type. The DECL_ACCESS is set by access declarations. | |
2758 | For example, if a member that would normally be public in a | |
2759 | derived class is made protected, then the derived class and the | |
2760 | protected_access_node will appear in the DECL_ACCESS for the node. */ | |
af3b4e59 MM |
2761 | #define DECL_ACCESS(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.u2.access) |
2762 | ||
2763 | /* Nonzero if the FUNCTION_DECL is a global constructor. */ | |
2764 | #define DECL_GLOBAL_CTOR_P(NODE) \ | |
2765 | (DECL_LANG_SPECIFIC ((NODE))->decl_flags.global_ctor_p) | |
2766 | ||
2767 | /* Nonzero if the FUNCTION_DECL is a global destructor. */ | |
2768 | #define DECL_GLOBAL_DTOR_P(NODE) \ | |
2769 | (DECL_LANG_SPECIFIC ((NODE))->decl_flags.global_dtor_p) | |
2770 | ||
2771 | /* If DECL_GLOBAL_CTOR_P or DECL_GLOBAL_DTOR_P holds, this macro | |
2772 | returns the initialization priority for the function. Constructors | |
2773 | with lower numbers should be run first. Destructors should be run | |
2774 | in the reverse order of constructors. */ | |
2775 | #define GLOBAL_INIT_PRIORITY(NODE) \ | |
2776 | (DECL_LANG_SPECIFIC ((NODE))->decl_flags.u2.init_priority) | |
8d08fdba | 2777 | |
8d08fdba | 2778 | /* Accessor macros for C++ template decl nodes. */ |
f84b4be9 JM |
2779 | |
2780 | /* The DECL_TEMPLATE_PARMS are a list. The TREE_PURPOSE of each node | |
36a117a5 MM |
2781 | is a INT_CST whose TREE_INT_CST_HIGH indicates the level of the |
2782 | template parameters, with 1 being the outermost set of template | |
2783 | parameters. The TREE_VALUE is a vector, whose elements are the | |
2784 | template parameters at each level. Each element in the vector is a | |
2785 | TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a | |
2786 | non-type parameter), or a TYPE_DECL (if the parameter is a type | |
2787 | parameter). The TREE_PURPOSE is the default value, if any. The | |
2788 | TEMPLATE_PARM_INDEX for the parameter is avilable as the | |
2789 | DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a | |
2790 | TYPE_DECL). */ | |
8d08fdba | 2791 | #define DECL_TEMPLATE_PARMS(NODE) DECL_ARGUMENTS(NODE) |
98c1c668 JM |
2792 | #define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \ |
2793 | INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE)) | |
2794 | #define DECL_NTPARMS(NODE) \ | |
2795 | TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE)) | |
8d08fdba | 2796 | /* For function, method, class-data templates. */ |
17aec3eb | 2797 | #define DECL_TEMPLATE_RESULT(NODE) DECL_RESULT_FLD(NODE) |
36a117a5 MM |
2798 | /* For a static member variable template, the |
2799 | DECL_TEMPLATE_INSTANTIATIONS list contains the explicitly and | |
2800 | implicitly generated instantiations of the variable. There are no | |
2801 | partial instantiations of static member variables, so all of these | |
2802 | will be full instantiations. | |
2803 | ||
2804 | For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds | |
2805 | all instantiations and specializations of the class type, including | |
2806 | partial instantiations and partial specializations. | |
2807 | ||
2808 | In both cases, the TREE_PURPOSE of each node contains the arguments | |
2809 | used; the TREE_VALUE contains the generated variable. The template | |
2810 | arguments are always complete. For example, given: | |
2811 | ||
2812 | template <class T> struct S1 { | |
2813 | template <class U> struct S2 {}; | |
2814 | template <class U> struct S2<U*> {}; | |
2815 | }; | |
2816 | ||
2817 | the record for the partial specialization will contain, as its | |
2818 | argument list, { {T}, {U*} }, and will be on the | |
2819 | DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template | |
2820 | <class U> struct S1<T>::S2'. | |
2821 | ||
2822 | This list is not used for function templates. */ | |
8d08fdba | 2823 | #define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX(NODE) |
36a117a5 MM |
2824 | /* For a function template, the DECL_TEMPLATE_SPECIALIZATIONS lists |
2825 | contains all instantiations and specializations of the function, | |
2826 | including partial instantiations. For a partial instantiation | |
2827 | which is a specialization, this list holds only full | |
2828 | specializations of the template that are instantiations of the | |
2829 | partial instantiation. For example, given: | |
2830 | ||
2831 | template <class T> struct S { | |
2832 | template <class U> void f(U); | |
2833 | template <> void f(T); | |
2834 | }; | |
2835 | ||
2836 | the `S<int>::f<int>(int)' function will appear on the | |
2837 | DECL_TEMPLATE_SPECIALIZATIONS list for both `template <class T> | |
2838 | template <class U> void S<T>::f(U)' and `template <class T> void | |
2839 | S<int>::f(T)'. In the latter case, however, it will have only the | |
2840 | innermost set of arguments (T, in this case). The DECL_TI_TEMPLATE | |
2841 | for the function declaration will point at the specialization, not | |
2842 | the fully general template. | |
2843 | ||
2844 | For a class template, this list contains the partial | |
2845 | specializations of this template. (Full specializations are not | |
2846 | recorded on this list.) The TREE_PURPOSE holds the innermost | |
2847 | arguments used in the partial specialization (e.g., for `template | |
2848 | <class T> struct S<T*, int>' this will be `T*'.) The TREE_VALUE | |
2849 | holds the innermost template parameters for the specialization | |
2850 | (e.g., `T' in the example above.) The TREE_TYPE is the _TYPE node | |
2851 | for the partial specialization. | |
2852 | ||
2853 | This list is not used for static variable templates. */ | |
2854 | #define DECL_TEMPLATE_SPECIALIZATIONS(NODE) DECL_SIZE(NODE) | |
5566b478 | 2855 | |
50714e79 | 2856 | /* Nonzero for a DECL which is actually a template parameter. */ |
cd9f6678 MM |
2857 | #define DECL_TEMPLATE_PARM_P(NODE) \ |
2858 | (DECL_LANG_FLAG_0 (NODE) \ | |
2859 | && (TREE_CODE (NODE) == CONST_DECL \ | |
2860 | || TREE_CODE (NODE) == TYPE_DECL \ | |
2861 | || TREE_CODE (NODE) == TEMPLATE_DECL)) | |
2862 | ||
2863 | /* Mark NODE as a template parameter. */ | |
2864 | #define SET_DECL_TEMPLATE_PARM_P(NODE) \ | |
2865 | (DECL_LANG_FLAG_0 (NODE) = 1) | |
50714e79 | 2866 | |
cd9f6678 | 2867 | /* Nonzero if NODE is a template template parameter. */ |
73b0fce8 | 2868 | #define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \ |
50714e79 | 2869 | (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE)) |
73b0fce8 | 2870 | |
5566b478 MS |
2871 | #define DECL_FUNCTION_TEMPLATE_P(NODE) \ |
2872 | (TREE_CODE (NODE) == TEMPLATE_DECL \ | |
2873 | && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL) | |
2874 | ||
6757edfe MM |
2875 | /* Nonzero for a DECL that represents a template class. */ |
2876 | #define DECL_CLASS_TEMPLATE_P(NODE) \ | |
2877 | (TREE_CODE (NODE) == TEMPLATE_DECL \ | |
2878 | && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL \ | |
2879 | && !DECL_TEMPLATE_TEMPLATE_PARM_P (NODE)) | |
2880 | ||
35acd3f2 MM |
2881 | /* Nonzero if NODE which declares a type. */ |
2882 | #define DECL_DECLARES_TYPE_P(NODE) \ | |
2883 | (TREE_CODE (NODE) == TYPE_DECL || DECL_CLASS_TEMPLATE_P (NODE)) | |
2884 | ||
9188c363 MM |
2885 | /* Nonzero if NODE is the typedef implicitly generated for a type when |
2886 | the type is declared. (In C++, `struct S {};' is roughly equivalent | |
2887 | to `struct S {}; typedef struct S S;' in C. This macro will hold | |
2888 | for the typedef indicated in this example. Note that in C++, there | |
2889 | is a second implicit typedef for each class, in the scope of `S' | |
99a6c6f4 | 2890 | itself, so that you can say `S::S'. This macro does *not* hold for |
9188c363 MM |
2891 | those typedefs. */ |
2892 | #define DECL_IMPLICIT_TYPEDEF_P(NODE) \ | |
2893 | (TREE_CODE ((NODE)) == TYPE_DECL && DECL_LANG_FLAG_2 ((NODE))) | |
2894 | #define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \ | |
2895 | (DECL_LANG_FLAG_2 ((NODE)) = 1) | |
2896 | ||
93cdc044 JM |
2897 | /* A `primary' template is one that has its own template header. A |
2898 | member function of a class template is a template, but not primary. | |
6757edfe MM |
2899 | A member template is primary. Friend templates are primary, too. */ |
2900 | ||
2901 | /* Returns the primary template corresponding to these parameters. */ | |
2902 | #define DECL_PRIMARY_TEMPLATE(NODE) \ | |
2903 | (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE))) | |
2904 | ||
2905 | /* Returns non-zero if NODE is a primary template. */ | |
2906 | #define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == NODE) | |
5566b478 MS |
2907 | |
2908 | #define CLASSTYPE_TEMPLATE_LEVEL(NODE) \ | |
2909 | (TREE_INT_CST_HIGH (TREE_PURPOSE (CLASSTYPE_TI_TEMPLATE (NODE)))) | |
8d08fdba | 2910 | |
a0a33927 MS |
2911 | /* Indicates whether or not (and how) a template was expanded for this |
2912 | FUNCTION_DECL or VAR_DECL. | |
2913 | 0=normal declaration, e.g. int min (int, int); | |
2914 | 1=implicit template instantiation | |
2915 | 2=explicit template specialization, e.g. int min<int> (int, int); | |
e92cc029 | 2916 | 3=explicit template instantiation, e.g. template int min<int> (int, int); */ |
a0a33927 MS |
2917 | #define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC(NODE)->decl_flags.use_template) |
2918 | ||
2919 | #define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1) | |
2920 | #define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \ | |
2921 | (CLASSTYPE_USE_TEMPLATE (NODE) & 1) | |
2922 | ||
2923 | #define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2) | |
2924 | #define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2) | |
370af2d5 | 2925 | #define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \ |
a0a33927 | 2926 | (CLASSTYPE_USE_TEMPLATE (NODE) == 2) |
370af2d5 | 2927 | #define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \ |
a0a33927 MS |
2928 | (CLASSTYPE_USE_TEMPLATE (NODE) = 2) |
2929 | ||
2930 | #define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1) | |
2931 | #define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1) | |
2932 | #define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \ | |
2933 | (CLASSTYPE_USE_TEMPLATE(NODE) == 1) | |
2934 | #define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \ | |
2935 | (CLASSTYPE_USE_TEMPLATE(NODE) = 1) | |
2936 | ||
2937 | #define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3) | |
2938 | #define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3) | |
2939 | #define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \ | |
2940 | (CLASSTYPE_USE_TEMPLATE(NODE) == 3) | |
2941 | #define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \ | |
2942 | (CLASSTYPE_USE_TEMPLATE(NODE) = 3) | |
7177d104 | 2943 | |
61289ca3 MM |
2944 | /* Non-zero if DECL is a friend function which is an instantiation |
2945 | from the point of view of the compiler, but not from the point of | |
2946 | view of the language. For example given: | |
2947 | template <class T> struct S { friend void f(T) {}; }; | |
2948 | the declaration of `void f(int)' generated when S<int> is | |
2949 | instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be | |
2950 | a DECL_FRIEND_PSUEDO_TEMPLATE_INSTANTIATION. */ | |
2951 | #define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \ | |
2952 | (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL)) | |
2953 | ||
4c571114 MM |
2954 | /* Non-zero if TYPE is a partial instantiation of a template class, |
2955 | i.e., an instantiation whose instantiation arguments involve | |
2956 | template types. */ | |
2957 | #define PARTIAL_INSTANTIATION_P(TYPE) \ | |
8012c983 | 2958 | (TYPE_LANG_SPECIFIC (TYPE)->is_partial_instantiation) |
4c571114 | 2959 | |
39c01e4c MM |
2960 | /* Non-zero iff we are currently processing a declaration for an |
2961 | entity with its own template parameter list, and which is not a | |
2962 | full specialization. */ | |
2963 | #define PROCESSING_REAL_TEMPLATE_DECL_P() \ | |
2964 | (processing_template_decl > template_class_depth (current_class_type)) | |
2965 | ||
73aad9b9 JM |
2966 | /* This function may be a guiding decl for a template. */ |
2967 | #define DECL_MAYBE_TEMPLATE(NODE) DECL_LANG_FLAG_4 (NODE) | |
fbf1c34b MM |
2968 | |
2969 | /* Nonzero if this VAR_DECL or FUNCTION_DECL has already been | |
2970 | instantiated, i.e. its definition has been generated from the | |
2971 | pattern given in the the template. */ | |
da8a66fc ML |
2972 | #define DECL_TEMPLATE_INSTANTIATED(NODE) \ |
2973 | DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE)) | |
fbf1c34b | 2974 | |
db5ae43f | 2975 | /* We know what we're doing with this decl now. */ |
e3417fcd | 2976 | #define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE) |
db5ae43f | 2977 | |
faae18ab MS |
2978 | /* This function was declared inline. This flag controls the linkage |
2979 | semantics of 'inline'; whether or not the function is inlined is | |
2980 | controlled by DECL_INLINE. */ | |
2981 | #define DECL_THIS_INLINE(NODE) \ | |
2982 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.declared_inline) | |
2983 | ||
2984 | /* DECL_EXTERNAL must be set on a decl until the decl is actually emitted, | |
2985 | so that assemble_external will work properly. So we have this flag to | |
2986 | tell us whether the decl is really not external. */ | |
2987 | #define DECL_NOT_REALLY_EXTERN(NODE) \ | |
2988 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.not_really_extern) | |
db5ae43f | 2989 | |
6b5fbb55 MS |
2990 | #define DECL_REALLY_EXTERN(NODE) \ |
2991 | (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE)) | |
2992 | ||
c0bbf652 MM |
2993 | /* An integer indicating how many bytes should be subtracted from the |
2994 | `this' pointer when this function is called. */ | |
9df2c88c | 2995 | #define THUNK_DELTA(DECL) (DECL_CHECK (DECL)->decl.u1.i) |
8926095f | 2996 | |
c0bbf652 MM |
2997 | /* An integer indicating how many bytes should be subtracted from the |
2998 | vtable for the `this' pointer to find the vcall offset. (The vptr | |
27d26ee7 | 2999 | is always located at offset zero from the f `this' pointer.) If |
c0bbf652 | 3000 | zero, then there is no vcall offset. */ |
9df2c88c | 3001 | #define THUNK_VCALL_OFFSET(DECL) (DECL_CHECK (DECL)->decl.u2.i) |
c0bbf652 | 3002 | |
84df082b MM |
3003 | /* DECL_NEEDED_P holds of a declaration when we need to emit its |
3004 | definition. This is true when the back-end tells us that | |
3005 | the symbol has been referenced in the generated code. If, however, | |
3006 | we are not generating code, then it is also true when a symbol has | |
27d26ee7 MM |
3007 | just been used somewhere, even if it's not really needed. We need |
3008 | anything that isn't comdat, but we don't know for sure whether or | |
3009 | not something is comdat until end-of-file. */ | |
7c913d33 | 3010 | #define DECL_NEEDED_P(DECL) \ |
27d26ee7 | 3011 | ((at_eof && !DECL_COMDAT (DECL)) \ |
7c913d33 | 3012 | || (TREE_SYMBOL_REFERENCED (DECL_ASSEMBLER_NAME ((DECL)))) \ |
10f82b95 | 3013 | || (flag_syntax_only && TREE_USED ((DECL)))) |
8d08fdba | 3014 | |
42976354 | 3015 | /* An un-parsed default argument looks like an identifier. */ |
da8a66fc ML |
3016 | #define DEFARG_LENGTH(NODE) (DEFAULT_ARG_CHECK(NODE)->identifier.length) |
3017 | #define DEFARG_POINTER(NODE) (DEFAULT_ARG_CHECK(NODE)->identifier.pointer) | |
42976354 | 3018 | |
ad321293 MM |
3019 | /* These macros provide convenient access to the various _STMT nodes |
3020 | created when parsing template declarations. */ | |
da8a66fc ML |
3021 | #define IF_COND(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 0) |
3022 | #define THEN_CLAUSE(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 1) | |
3023 | #define ELSE_CLAUSE(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 2) | |
3024 | #define WHILE_COND(NODE) TREE_OPERAND (WHILE_STMT_CHECK (NODE), 0) | |
3025 | #define WHILE_BODY(NODE) TREE_OPERAND (WHILE_STMT_CHECK (NODE), 1) | |
3026 | #define DO_COND(NODE) TREE_OPERAND (DO_STMT_CHECK (NODE), 0) | |
3027 | #define DO_BODY(NODE) TREE_OPERAND (DO_STMT_CHECK (NODE), 1) | |
3028 | #define RETURN_EXPR(NODE) TREE_OPERAND (RETURN_STMT_CHECK (NODE), 0) | |
3029 | #define EXPR_STMT_EXPR(NODE) TREE_OPERAND (EXPR_STMT_CHECK (NODE), 0) | |
3030 | #define FOR_INIT_STMT(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 0) | |
3031 | #define FOR_COND(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 1) | |
3032 | #define FOR_EXPR(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 2) | |
3033 | #define FOR_BODY(NODE) TREE_OPERAND (FOR_STMT_CHECK (NODE), 3) | |
3034 | #define SWITCH_COND(NODE) TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 0) | |
3035 | #define SWITCH_BODY(NODE) TREE_OPERAND (SWITCH_STMT_CHECK (NODE), 1) | |
3036 | #define CASE_LOW(NODE) TREE_OPERAND (CASE_LABEL_CHECK (NODE), 0) | |
3037 | #define CASE_HIGH(NODE) TREE_OPERAND (CASE_LABEL_CHECK (NODE), 1) | |
3038 | #define GOTO_DESTINATION(NODE) TREE_OPERAND (GOTO_STMT_CHECK (NODE), 0) | |
3039 | #define TRY_STMTS(NODE) TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0) | |
3040 | #define TRY_HANDLERS(NODE) TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1) | |
3041 | #define CLEANUP_P(NODE) TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE)) | |
62409b39 | 3042 | /* Nonzero if this try block is a function try block. */ |
da8a66fc ML |
3043 | #define FN_TRY_BLOCK_P(NODE) TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE)) |
3044 | #define HANDLER_PARMS(NODE) TREE_OPERAND (HANDLER_CHECK (NODE), 0) | |
3045 | #define HANDLER_BODY(NODE) TREE_OPERAND (HANDLER_CHECK (NODE), 1) | |
3046 | #define COMPOUND_BODY(NODE) TREE_OPERAND (COMPOUND_STMT_CHECK (NODE), 0) | |
3047 | #define ASM_CV_QUAL(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 0) | |
3048 | #define ASM_STRING(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 1) | |
3049 | #define ASM_OUTPUTS(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 2) | |
3050 | #define ASM_INPUTS(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 3) | |
3051 | #define ASM_CLOBBERS(NODE) TREE_OPERAND (ASM_STMT_CHECK (NODE), 4) | |
3052 | #define DECL_STMT_DECL(NODE) TREE_OPERAND (DECL_STMT_CHECK (NODE), 0) | |
3053 | #define STMT_EXPR_STMT(NODE) TREE_OPERAND (STMT_EXPR_CHECK (NODE), 0) | |
3054 | #define SUBOBJECT_CLEANUP(NODE) TREE_OPERAND (SUBOBJECT_CHECK (NODE), 0) | |
3055 | #define CLEANUP_DECL(NODE) TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0) | |
3056 | #define CLEANUP_EXPR(NODE) TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1) | |
3057 | #define START_CATCH_TYPE(NODE) TREE_TYPE (START_CATCH_STMT_CHECK (NODE)) | |
3058 | #define LABEL_STMT_LABEL(NODE) TREE_OPERAND (LABEL_STMT_CHECK (NODE), 0) | |
ad321293 | 3059 | |
59026e79 MM |
3060 | /* Nonzero if this SCOPE_STMT is for the beginning of a scope. */ |
3061 | #define SCOPE_BEGIN_P(NODE) \ | |
da8a66fc | 3062 | (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE))) |
59026e79 MM |
3063 | |
3064 | /* Nonzero if this SCOPE_STMT is for the end of a scope. */ | |
3065 | #define SCOPE_END_P(NODE) \ | |
da8a66fc | 3066 | (!SCOPE_BEGIN_P (SCOPE_STMT_CHECK (NODE))) |
59026e79 | 3067 | |
d9b2d9da MM |
3068 | /* The BLOCK containing the declarations contained in this scope. */ |
3069 | #define SCOPE_STMT_BLOCK(NODE) \ | |
3070 | (TREE_OPERAND (SCOPE_STMT_CHECK (NODE), 0)) | |
3071 | ||
46e8c075 MM |
3072 | /* Nonzero if this CTOR_STMT is for the beginning of a constructor. */ |
3073 | #define CTOR_BEGIN_P(NODE) \ | |
3074 | (TREE_LANG_FLAG_0 (CTOR_STMT_CHECK (NODE))) | |
3075 | ||
3076 | /* Nonzero if this CTOR_STMT is for the end of a constructor. */ | |
3077 | #define CTOR_END_P(NODE) \ | |
3078 | (!CTOR_BEGIN_P (NODE)) | |
3079 | ||
59026e79 MM |
3080 | /* Nonzero for a SCOPE_STMT if there were no variables in this scope. */ |
3081 | #define SCOPE_NULLIFIED_P(NODE) \ | |
d9b2d9da MM |
3082 | (SCOPE_STMT_BLOCK ((NODE)) == NULL_TREE) |
3083 | ||
3084 | /* Nonzero for a SCOPE_STMT which represents a lexical scope, but | |
3085 | which should be treated as non-existant from the point of view of | |
3086 | running cleanup actions. */ | |
3087 | #define SCOPE_NO_CLEANUPS_P(NODE) \ | |
da8a66fc | 3088 | (TREE_LANG_FLAG_3 (SCOPE_STMT_CHECK (NODE))) |
59026e79 | 3089 | |
8f471b0d MM |
3090 | /* Nonzero for a SCOPE_STMT if this statement is for a partial scope. |
3091 | For example, in: | |
3092 | ||
3093 | S s; | |
3094 | l: | |
3095 | S s2; | |
3096 | goto l; | |
3097 | ||
3098 | there is (implicitly) a new scope after `l', even though there are | |
3099 | no curly braces. In particular, when we hit the goto, we must | |
3100 | destroy s2 and then re-construct it. For the implicit scope, | |
3101 | SCOPE_PARTIAL_P will be set. */ | |
3102 | #define SCOPE_PARTIAL_P(NODE) \ | |
3103 | (TREE_LANG_FLAG_4 (SCOPE_STMT_CHECK (NODE))) | |
3104 | ||
f71f87f9 MM |
3105 | /* Nonzero for an ASM_STMT if the assembly statement is volatile. */ |
3106 | #define ASM_VOLATILE_P(NODE) \ | |
da8a66fc | 3107 | (ASM_CV_QUAL (ASM_STMT_CHECK (NODE)) != NULL_TREE) |
f71f87f9 | 3108 | |
a7e4cfa0 MM |
3109 | /* The line-number at which a statement began. But if |
3110 | STMT_LINENO_FOR_FN_P does holds, then this macro gives the | |
3111 | line number for the end of the current function instead. */ | |
f71f87f9 MM |
3112 | #define STMT_LINENO(NODE) \ |
3113 | (TREE_COMPLEXITY ((NODE))) | |
3114 | ||
a7e4cfa0 MM |
3115 | /* If non-zero, the STMT_LINENO for NODE is the line at which the |
3116 | function ended. */ | |
3117 | #define STMT_LINENO_FOR_FN_P(NODE) \ | |
3118 | (TREE_LANG_FLAG_2 ((NODE))) | |
3119 | ||
43f887f9 MM |
3120 | /* The parameters for a call-declarator. */ |
3121 | #define CALL_DECLARATOR_PARMS(NODE) \ | |
3122 | (TREE_PURPOSE (TREE_OPERAND ((NODE), 1))) | |
3123 | ||
3124 | /* The cv-qualifiers for a call-declarator. */ | |
3125 | #define CALL_DECLARATOR_QUALS(NODE) \ | |
3126 | (TREE_VALUE (TREE_OPERAND ((NODE), 1))) | |
3127 | ||
3128 | /* The exception-specification for a call-declarator. */ | |
3129 | #define CALL_DECLARATOR_EXCEPTION_SPEC(NODE) \ | |
3130 | (TREE_TYPE ((NODE))) | |
3131 | ||
8d08fdba | 3132 | /* An enumeration of the kind of tags that C++ accepts. */ |
6eabb241 | 3133 | enum tag_types { record_type, class_type, union_type, enum_type }; |
8d08fdba | 3134 | |
27b8d0cd MM |
3135 | /* The various kinds of lvalues we distinguish. */ |
3136 | typedef enum cp_lvalue_kind { | |
3137 | clk_none = 0, /* Things that are not an lvalue. */ | |
3138 | clk_ordinary = 1, /* An ordinary lvalue. */ | |
3139 | clk_class = 2, /* An rvalue of class-type. */ | |
3140 | clk_bitfield = 4, /* An lvalue for a bit-field. */ | |
3141 | } cp_lvalue_kind; | |
3142 | ||
74b846e0 MM |
3143 | /* The kinds of scopes we recognize. */ |
3144 | typedef enum scope_kind { | |
3145 | sk_template_parms, /* A scope for template parameters. */ | |
3146 | sk_template_spec /* A scope corresponding to a template | |
3147 | specialization. There is never anything in | |
3148 | this scope. */ | |
3149 | } scope_kind; | |
3150 | ||
3151 | /* Various kinds of template specialization, instantiation, etc. */ | |
3152 | typedef enum tmpl_spec_kind { | |
3153 | tsk_none, /* Not a template at all. */ | |
3154 | tsk_invalid_member_spec, /* An explicit member template | |
3155 | specialization, but the enclosing | |
3156 | classes have not all been explicitly | |
3157 | specialized. */ | |
3158 | tsk_invalid_expl_inst, /* An explicit instantiation containing | |
3159 | template parameter lists. */ | |
3160 | tsk_excessive_parms, /* A template declaration with too many | |
3161 | template parameter lists. */ | |
3162 | tsk_insufficient_parms, /* A template declaration with too few | |
3163 | parameter lists. */ | |
3164 | tsk_template, /* A template declaration. */ | |
3165 | tsk_expl_spec, /* An explicit specialization. */ | |
3166 | tsk_expl_inst /* An explicit instantiation. */ | |
3167 | } tmpl_spec_kind; | |
3168 | ||
c35cce41 MM |
3169 | /* The various kinds of access. BINFO_ACCESS depends on these being |
3170 | two bit quantities. The numerical values are important; they are | |
3171 | used to initialize RTTI data structures, so chaning them changes | |
3172 | the ABI. */ | |
3173 | typedef enum access_kind { | |
3174 | ak_none = 0, /* Inaccessible. */ | |
3175 | ak_public = 1, /* Accessible, as a `public' thing. */ | |
3176 | ak_protected = 2, /* Accessible, as a `protected' thing. */ | |
3177 | ak_private = 3 /* Accessible, as a `private' thing. */ | |
3178 | } access_kind; | |
3179 | ||
3dbc07b6 MM |
3180 | typedef enum special_function_kind { |
3181 | sfk_none, /* Not a special function. */ | |
3182 | sfk_constructor, /* A constructor. */ | |
9eb71d8c MM |
3183 | sfk_copy_constructor, /* A copy constructor. */ |
3184 | sfk_assignment_operator, /* An assignment operator. */ | |
3dbc07b6 MM |
3185 | sfk_destructor, /* A destructor. */ |
3186 | sfk_conversion /* A conversion operator. */ | |
3187 | } special_function_kind; | |
3188 | ||
8d08fdba MS |
3189 | /* Zero means prototype weakly, as in ANSI C (no args means nothing). |
3190 | Each language context defines how this variable should be set. */ | |
3191 | extern int strict_prototype; | |
3192 | extern int strict_prototypes_lang_c, strict_prototypes_lang_cplusplus; | |
3193 | ||
3194 | /* Non-zero means that if a label exists, and no other identifier | |
3195 | applies, use the value of the label. */ | |
3196 | extern int flag_labels_ok; | |
3197 | ||
d2c192ad JM |
3198 | /* Nonzero means allow Microsoft extensions without a pedwarn. */ |
3199 | extern int flag_ms_extensions; | |
3200 | ||
8d08fdba MS |
3201 | /* Non-zero means to collect statistics which might be expensive |
3202 | and to print them when we are done. */ | |
3203 | extern int flag_detailed_statistics; | |
3204 | ||
3205 | /* Non-zero means warn in function declared in derived class has the | |
3206 | same name as a virtual in the base class, but fails to match the | |
3207 | type signature of any virtual function in the base class. */ | |
3208 | extern int warn_overloaded_virtual; | |
3209 | ||
dc8263bc JM |
3210 | /* Nonzero means warn about use of multicharacter literals. */ |
3211 | extern int warn_multichar; | |
3212 | ||
9018ce4d BK |
3213 | /* Non-zero means warn if a non-templatized friend function is |
3214 | declared in a templatized class. This behavior is warned about with | |
3215 | flag_guiding_decls in do_friend. */ | |
3216 | extern int warn_nontemplate_friend; | |
3217 | ||
8d08fdba | 3218 | /* in c-common.c */ |
158991b7 KG |
3219 | extern void declare_function_name PARAMS ((void)); |
3220 | extern void decl_attributes PARAMS ((tree, tree, tree)); | |
3221 | extern void init_function_format_info PARAMS ((void)); | |
3222 | extern void record_function_format PARAMS ((tree, tree, int, int, int)); | |
3223 | extern void check_function_format PARAMS ((tree, tree, tree)); | |
8d08fdba MS |
3224 | /* Print an error message for invalid operands to arith operation CODE. |
3225 | NOP_EXPR is used as a special case (see truthvalue_conversion). */ | |
158991b7 KG |
3226 | extern void binary_op_error PARAMS ((enum tree_code)); |
3227 | extern tree canonical_type_variant PARAMS ((tree)); | |
3228 | extern void c_expand_expr_stmt PARAMS ((tree)); | |
8d08fdba | 3229 | /* Validate the expression after `case' and apply default promotions. */ |
158991b7 | 3230 | extern tree check_case_value PARAMS ((tree)); |
8d08fdba | 3231 | /* Concatenate a list of STRING_CST nodes into one STRING_CST. */ |
158991b7 KG |
3232 | extern tree combine_strings PARAMS ((tree)); |
3233 | extern void constant_expression_warning PARAMS ((tree)); | |
3234 | extern tree convert_and_check PARAMS ((tree, tree)); | |
3235 | extern void overflow_warning PARAMS ((tree)); | |
3236 | extern void unsigned_conversion_warning PARAMS ((tree, tree)); | |
3237 | extern void c_apply_type_quals_to_decl PARAMS ((int, tree)); | |
665f2503 | 3238 | extern unsigned int min_precision PARAMS ((tree, int)); |
61a127b3 | 3239 | |
8d08fdba | 3240 | /* Read the rest of the current #-directive line. */ |
d4dfe7d6 | 3241 | #if USE_CPPLIB |
158991b7 | 3242 | extern char *get_directive_line PARAMS ((void)); |
d4dfe7d6 DB |
3243 | #define GET_DIRECTIVE_LINE() get_directive_line () |
3244 | #else | |
158991b7 | 3245 | extern char *get_directive_line PARAMS ((FILE *)); |
d4dfe7d6 DB |
3246 | #define GET_DIRECTIVE_LINE() get_directive_line (finput) |
3247 | #endif | |
8d08fdba MS |
3248 | /* Subroutine of build_binary_op, used for comparison operations. |
3249 | See if the operands have both been converted from subword integer types | |
3250 | and, if so, perhaps change them both back to their original type. */ | |
158991b7 | 3251 | extern tree shorten_compare PARAMS ((tree *, tree *, tree *, enum tree_code *)); |
8d08fdba | 3252 | /* Prepare expr to be an argument of a TRUTH_NOT_EXPR, |
e92cc029 | 3253 | or validate its data type for an `if' or `while' statement or ?..: exp. */ |
158991b7 KG |
3254 | extern tree truthvalue_conversion PARAMS ((tree)); |
3255 | extern tree type_for_mode PARAMS ((enum machine_mode, int)); | |
3256 | extern tree type_for_size PARAMS ((unsigned, int)); | |
3257 | extern int c_get_alias_set PARAMS ((tree)); | |
8d08fdba | 3258 | |
51c184be | 3259 | /* in decl{2}.c */ |
8d08fdba MS |
3260 | /* A node that is a list (length 1) of error_mark_nodes. */ |
3261 | extern tree error_mark_list; | |
3262 | ||
9cd64686 MM |
3263 | /* A list of virtual function tables we must make sure to write out. */ |
3264 | extern tree pending_vtables; | |
3265 | ||
700f8a87 | 3266 | /* Node for "pointer to (virtual) function". |
e92cc029 | 3267 | This may be distinct from ptr_type_node so gdb can distinguish them. */ |
700f8a87 MS |
3268 | #define vfunc_ptr_type_node \ |
3269 | (flag_vtable_thunks ? vtable_entry_type : ptr_type_node) | |
3270 | ||
8d08fdba | 3271 | |
8d08fdba MS |
3272 | /* For building calls to `delete'. */ |
3273 | extern tree integer_two_node, integer_three_node; | |
3274 | ||
0c8feefe MM |
3275 | extern tree anonymous_namespace_name; |
3276 | ||
51c184be | 3277 | /* in pt.c */ |
5566b478 | 3278 | |
830bfa74 MM |
3279 | /* These values are used for the `STRICT' parameter to type_unfication and |
3280 | fn_type_unification. Their meanings are described with the | |
3281 | documentation for fn_type_unification. */ | |
3282 | ||
3283 | typedef enum unification_kind_t { | |
3284 | DEDUCE_CALL, | |
3285 | DEDUCE_CONV, | |
3286 | DEDUCE_EXACT | |
3287 | } unification_kind_t; | |
3288 | ||
8d08fdba MS |
3289 | /* The template currently being instantiated, and where the instantiation |
3290 | was triggered. */ | |
3291 | struct tinst_level | |
3292 | { | |
5566b478 | 3293 | tree decl; |
8d08fdba MS |
3294 | int line; |
3295 | char *file; | |
3296 | struct tinst_level *next; | |
3297 | }; | |
3298 | ||
158991b7 | 3299 | extern void maybe_print_template_context PARAMS ((void)); |
bcb80729 | 3300 | |
51c184be | 3301 | /* in class.c */ |
61a127b3 | 3302 | |
b4c4a9ec | 3303 | extern int current_class_depth; |
8d08fdba | 3304 | |
8d08fdba MS |
3305 | /* Points to the name of that function. May not be the DECL_NAME |
3306 | of CURRENT_FUNCTION_DECL due to overloading */ | |
3307 | extern tree original_function_name; | |
8d08fdba MS |
3308 | \f |
3309 | /* Here's where we control how name mangling takes place. */ | |
3310 | ||
3311 | #define OPERATOR_ASSIGN_FORMAT "__a%s" | |
3312 | #define OPERATOR_FORMAT "__%s" | |
3313 | #define OPERATOR_TYPENAME_FORMAT "__op" | |
8d08fdba MS |
3314 | |
3315 | /* Cannot use '$' up front, because this confuses gdb | |
3316 | (names beginning with '$' are gdb-local identifiers). | |
3317 | ||
3318 | Note that all forms in which the '$' is significant are long enough | |
3319 | for direct indexing (meaning that if we know there is a '$' | |
3320 | at a particular location, we can index into the string at | |
3321 | any other location that provides distinguishing characters). */ | |
3322 | ||
3323 | /* Define NO_DOLLAR_IN_LABEL in your favorite tm file if your assembler | |
3324 | doesn't allow '$' in symbol names. */ | |
3325 | #ifndef NO_DOLLAR_IN_LABEL | |
3326 | ||
3327 | #define JOINER '$' | |
3328 | ||
3329 | #define VPTR_NAME "$v" | |
3330 | #define THROW_NAME "$eh_throw" | |
3331 | #define DESTRUCTOR_DECL_PREFIX "_$_" | |
3332 | #define AUTO_VTABLE_NAME "__vtbl$me__" | |
3333 | #define AUTO_TEMP_NAME "_$tmp_" | |
3334 | #define AUTO_TEMP_FORMAT "_$tmp_%d" | |
3335 | #define VTABLE_BASE "$vb" | |
486837a7 | 3336 | #define VTABLE_NAME_PREFIX (flag_vtable_thunks ? "__vt_" : "_vt$") |
8d08fdba MS |
3337 | #define VFIELD_BASE "$vf" |
3338 | #define VFIELD_NAME "_vptr$" | |
3339 | #define VFIELD_NAME_FORMAT "_vptr$%s" | |
3340 | #define VBASE_NAME "_vb$" | |
3341 | #define VBASE_NAME_FORMAT "_vb$%s" | |
3342 | #define STATIC_NAME_FORMAT "_%s$%s" | |
3343 | #define ANON_AGGRNAME_FORMAT "$_%d" | |
3344 | ||
3345 | #else /* NO_DOLLAR_IN_LABEL */ | |
3346 | ||
3347 | #ifndef NO_DOT_IN_LABEL | |
3348 | ||
3349 | #define JOINER '.' | |
3350 | ||
3351 | #define VPTR_NAME ".v" | |
3352 | #define THROW_NAME ".eh_throw" | |
3353 | #define DESTRUCTOR_DECL_PREFIX "_._" | |
3354 | #define AUTO_VTABLE_NAME "__vtbl.me__" | |
3355 | #define AUTO_TEMP_NAME "_.tmp_" | |
3356 | #define AUTO_TEMP_FORMAT "_.tmp_%d" | |
3357 | #define VTABLE_BASE ".vb" | |
486837a7 | 3358 | #define VTABLE_NAME_PREFIX (flag_vtable_thunks ? "__vt_" : "_vt.") |
8d08fdba MS |
3359 | #define VFIELD_BASE ".vf" |
3360 | #define VFIELD_NAME "_vptr." | |
3361 | #define VFIELD_NAME_FORMAT "_vptr.%s" | |
3362 | #define VBASE_NAME "_vb." | |
3363 | #define VBASE_NAME_FORMAT "_vb.%s" | |
3364 | #define STATIC_NAME_FORMAT "_%s.%s" | |
3365 | ||
3366 | #define ANON_AGGRNAME_FORMAT "._%d" | |
3367 | ||
3368 | #else /* NO_DOT_IN_LABEL */ | |
3369 | ||
3370 | #define VPTR_NAME "__vptr" | |
3371 | #define VPTR_NAME_P(ID_NODE) \ | |
3372 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VPTR_NAME, sizeof (VPTR_NAME) - 1)) | |
3373 | #define THROW_NAME "__eh_throw" | |
3374 | #define DESTRUCTOR_DECL_PREFIX "__destr_" | |
3375 | #define DESTRUCTOR_NAME_P(ID_NODE) \ | |
3376 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), DESTRUCTOR_DECL_PREFIX, \ | |
3377 | sizeof (DESTRUCTOR_DECL_PREFIX) - 1)) | |
3378 | #define IN_CHARGE_NAME "__in_chrg" | |
3379 | #define AUTO_VTABLE_NAME "__vtbl_me__" | |
3380 | #define AUTO_TEMP_NAME "__tmp_" | |
3381 | #define TEMP_NAME_P(ID_NODE) \ | |
3382 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \ | |
3383 | sizeof (AUTO_TEMP_NAME) - 1)) | |
3384 | #define AUTO_TEMP_FORMAT "__tmp_%d" | |
3385 | #define VTABLE_BASE "__vtb" | |
3386 | #define VTABLE_NAME "__vt_" | |
486837a7 | 3387 | #define VTABLE_NAME_PREFIX (flag_vtable_thunks ? "__vt_" : "_vt_") |
8d08fdba MS |
3388 | #define VTABLE_NAME_P(ID_NODE) \ |
3389 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \ | |
3390 | sizeof (VTABLE_NAME) - 1)) | |
3391 | #define VFIELD_BASE "__vfb" | |
3392 | #define VFIELD_NAME "__vptr_" | |
3393 | #define VFIELD_NAME_P(ID_NODE) \ | |
3394 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \ | |
3395 | sizeof (VFIELD_NAME) - 1)) | |
3396 | #define VFIELD_NAME_FORMAT "_vptr_%s" | |
3397 | #define VBASE_NAME "__vb_" | |
3398 | #define VBASE_NAME_P(ID_NODE) \ | |
3399 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VBASE_NAME, \ | |
3400 | sizeof (VBASE_NAME) - 1)) | |
3401 | #define VBASE_NAME_FORMAT "__vb_%s" | |
3402 | #define STATIC_NAME_FORMAT "__static_%s_%s" | |
3403 | ||
3404 | #define ANON_AGGRNAME_PREFIX "__anon_" | |
3405 | #define ANON_AGGRNAME_P(ID_NODE) \ | |
3406 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \ | |
3407 | sizeof (ANON_AGGRNAME_PREFIX) - 1)) | |
3408 | #define ANON_AGGRNAME_FORMAT "__anon_%d" | |
3409 | #define ANON_PARMNAME_FORMAT "__%d" | |
3410 | #define ANON_PARMNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \ | |
3411 | && IDENTIFIER_POINTER (ID_NODE)[1] == '_' \ | |
3412 | && IDENTIFIER_POINTER (ID_NODE)[2] <= '9') | |
3413 | ||
3414 | #endif /* NO_DOT_IN_LABEL */ | |
3415 | #endif /* NO_DOLLAR_IN_LABEL */ | |
3416 | ||
3417 | #define THIS_NAME "this" | |
3418 | #define DESTRUCTOR_NAME_FORMAT "~%s" | |
3419 | #define FILE_FUNCTION_PREFIX_LEN 9 | |
fc378698 MS |
3420 | #define CTOR_NAME "__ct" |
3421 | #define DTOR_NAME "__dt" | |
8d08fdba MS |
3422 | |
3423 | #define IN_CHARGE_NAME "__in_chrg" | |
3424 | ||
3425 | #define VTBL_PTR_TYPE "__vtbl_ptr_type" | |
3426 | #define VTABLE_DELTA_NAME "__delta" | |
3427 | #define VTABLE_INDEX_NAME "__index" | |
3428 | #define VTABLE_PFN_NAME "__pfn" | |
3429 | #define VTABLE_DELTA2_NAME "__delta2" | |
3430 | ||
8d08fdba MS |
3431 | #define EXCEPTION_CLEANUP_NAME "exception cleanup" |
3432 | ||
3433 | #define THIS_NAME_P(ID_NODE) (strcmp(IDENTIFIER_POINTER (ID_NODE), "this") == 0) | |
3434 | ||
3435 | #if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) | |
3436 | ||
3437 | #define VPTR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \ | |
3438 | && IDENTIFIER_POINTER (ID_NODE)[1] == 'v') | |
3439 | #define DESTRUCTOR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == JOINER \ | |
3440 | && IDENTIFIER_POINTER (ID_NODE)[2] == '_') | |
3441 | ||
3442 | #define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \ | |
3443 | && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \ | |
3444 | && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER) | |
3445 | ||
3446 | #define VBASE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \ | |
3447 | && IDENTIFIER_POINTER (ID_NODE)[2] == 'b' \ | |
3448 | && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER) | |
3449 | ||
3450 | #define TEMP_NAME_P(ID_NODE) (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1)) | |
3451 | #define VFIELD_NAME_P(ID_NODE) (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1)) | |
3452 | ||
3453 | /* For anonymous aggregate types, we need some sort of name to | |
3454 | hold on to. In practice, this should not appear, but it should | |
3455 | not be harmful if it does. */ | |
3456 | #define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \ | |
3457 | && IDENTIFIER_POINTER (ID_NODE)[1] == '_') | |
3458 | #define ANON_PARMNAME_FORMAT "_%d" | |
3459 | #define ANON_PARMNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == '_' \ | |
3460 | && IDENTIFIER_POINTER (ID_NODE)[1] <= '9') | |
3461 | #endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */ | |
35680744 | 3462 | |
c8298f61 | 3463 | /* Store the vbase pointer field name for type TYPE into pointer BUF. */ |
d8e178a0 KG |
3464 | #define FORMAT_VBASE_NAME(BUF,TYPE) do { \ |
3465 | char *wbuf = (char *) alloca (TYPE_ASSEMBLER_NAME_LENGTH (TYPE) \ | |
c8298f61 | 3466 | + sizeof (VBASE_NAME) + 1); \ |
d8e178a0 KG |
3467 | sprintf (wbuf, VBASE_NAME_FORMAT, TYPE_ASSEMBLER_NAME_STRING (TYPE)); \ |
3468 | (BUF) = wbuf; \ | |
c8298f61 MH |
3469 | } while (0) |
3470 | ||
35680744 MM |
3471 | /* Returns non-zero iff ID_NODE is an IDENTIFIER_NODE whose name is |
3472 | `main'. */ | |
3473 | #define MAIN_NAME_P(ID_NODE) \ | |
3474 | (strcmp (IDENTIFIER_POINTER (ID_NODE), "main") == 0) | |
3475 | ||
3476 | /* Returns non-zero iff NODE is a declaration for the global function | |
3477 | `main'. */ | |
3478 | #define DECL_MAIN_P(NODE) \ | |
3479 | (TREE_CODE (NODE) == FUNCTION_DECL \ | |
0f8766b8 | 3480 | && DECL_LANGUAGE (NODE) == lang_c \ |
35680744 MM |
3481 | && DECL_NAME (NODE) != NULL_TREE \ |
3482 | && MAIN_NAME_P (DECL_NAME (NODE))) | |
3483 | ||
8d08fdba | 3484 | \f |
8d08fdba MS |
3485 | /* Things for handling inline functions. */ |
3486 | ||
3487 | struct pending_inline | |
3488 | { | |
3489 | struct pending_inline *next; /* pointer to next in chain */ | |
3490 | int lineno; /* line number we got the text from */ | |
3491 | char *filename; /* name of file we were processing */ | |
3492 | tree fndecl; /* FUNCTION_DECL that brought us here */ | |
3493 | int token; /* token we were scanning */ | |
3494 | int token_value; /* value of token we were scanning (YYSTYPE) */ | |
3495 | ||
3496 | char *buf; /* pointer to character stream */ | |
3497 | int len; /* length of stream */ | |
8d08fdba MS |
3498 | unsigned int can_free : 1; /* free this after we're done with it? */ |
3499 | unsigned int deja_vu : 1; /* set iff we don't want to see it again. */ | |
3500 | unsigned int interface : 2; /* 0=interface 1=unknown 2=implementation */ | |
3501 | }; | |
3502 | ||
51c184be | 3503 | /* in method.c */ |
8d08fdba MS |
3504 | extern struct pending_inline *pending_inlines; |
3505 | ||
9bfadf57 | 3506 | /* Negative values means we know `this' to be of static type. */ |
8d08fdba MS |
3507 | |
3508 | extern int flag_this_is_variable; | |
3509 | ||
a0a33927 MS |
3510 | /* Nonzero means do emit exported implementations of functions even if |
3511 | they can be inlined. */ | |
3512 | ||
3513 | extern int flag_implement_inlines; | |
3514 | ||
8d08fdba MS |
3515 | /* Nonzero means templates obey #pragma interface and implementation. */ |
3516 | ||
3517 | extern int flag_external_templates; | |
3518 | ||
3519 | /* Nonzero means templates are emitted where they are instantiated. */ | |
3520 | ||
3521 | extern int flag_alt_external_templates; | |
3522 | ||
ddd5a7c1 | 3523 | /* Nonzero means implicit template instantiations are emitted. */ |
a0a33927 MS |
3524 | |
3525 | extern int flag_implicit_templates; | |
3526 | ||
72b7eeff MS |
3527 | /* Nonzero if we want to emit defined symbols with common-like linkage as |
3528 | weak symbols where possible, in order to conform to C++ semantics. | |
3529 | Otherwise, emit them as local symbols. */ | |
3530 | ||
3531 | extern int flag_weak; | |
3532 | ||
46e8c075 MM |
3533 | /* Nonzero if we should expand functions calls inline at the tree |
3534 | level, rather than at the RTL level. */ | |
3535 | ||
3536 | extern int flag_inline_trees; | |
3537 | ||
5566b478 MS |
3538 | /* Nonzero if we're done parsing and into end-of-file activities. */ |
3539 | ||
3540 | extern int at_eof; | |
3541 | ||
8d08fdba MS |
3542 | enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, OP_FLAG, TYPENAME_FLAG }; |
3543 | ||
8d08fdba MS |
3544 | /* Some macros for char-based bitfields. */ |
3545 | #define B_SET(a,x) (a[x>>3] |= (1 << (x&7))) | |
3546 | #define B_CLR(a,x) (a[x>>3] &= ~(1 << (x&7))) | |
3547 | #define B_TST(a,x) (a[x>>3] & (1 << (x&7))) | |
3548 | ||
3549 | /* These are uses as bits in flags passed to build_method_call | |
3550 | to control its error reporting behavior. | |
3551 | ||
3552 | LOOKUP_PROTECT means flag access violations. | |
3553 | LOOKUP_COMPLAIN mean complain if no suitable member function | |
3554 | matching the arguments is found. | |
3555 | LOOKUP_NORMAL is just a combination of these two. | |
8d08fdba MS |
3556 | LOOKUP_NONVIRTUAL means make a direct call to the member function found |
3557 | LOOKUP_GLOBAL means search through the space of overloaded functions, | |
3558 | as well as the space of member functions. | |
6060a796 | 3559 | LOOKUP_ONLYCONVERTING means that non-conversion constructors are not tried. |
9a3b49ac MS |
3560 | DIRECT_BIND means that if a temporary is created, it should be created so |
3561 | that it lives as long as the current variable bindings; otherwise it | |
3562 | only lives until the end of the complete-expression. | |
878cd289 MS |
3563 | LOOKUP_SPECULATIVELY means return NULL_TREE if we cannot find what we are |
3564 | after. Note, LOOKUP_COMPLAIN is checked and error messages printed | |
3565 | before LOOKUP_SPECULATIVELY is checked. | |
8d08fdba MS |
3566 | LOOKUP_NO_CONVERSION means that user-defined conversions are not |
3567 | permitted. Built-in conversions are permitted. | |
c73964b2 | 3568 | LOOKUP_DESTRUCTOR means explicit call to destructor. |
52c11ef6 JM |
3569 | LOOKUP_NO_TEMP_BIND means temporaries will not be bound to references. |
3570 | ||
3571 | These are used in global lookup to support elaborated types and | |
3572 | qualifiers. | |
3573 | ||
3574 | LOOKUP_PREFER_TYPES means not to accept objects, and possibly namespaces. | |
3575 | LOOKUP_PREFER_NAMESPACES means not to accept objects, and possibly types. | |
3576 | LOOKUP_PREFER_BOTH means class-or-namespace-name. | |
3577 | LOOKUP_TEMPLATES_EXPECTED means that class templates also count | |
3578 | as types. */ | |
8d08fdba MS |
3579 | |
3580 | #define LOOKUP_PROTECT (1) | |
3581 | #define LOOKUP_COMPLAIN (2) | |
3582 | #define LOOKUP_NORMAL (3) | |
8d08fdba MS |
3583 | #define LOOKUP_NONVIRTUAL (8) |
3584 | #define LOOKUP_GLOBAL (16) | |
8d08fdba | 3585 | #define LOOKUP_SPECULATIVELY (64) |
db5ae43f | 3586 | #define LOOKUP_ONLYCONVERTING (128) |
9a3b49ac | 3587 | #define DIRECT_BIND (256) |
8d08fdba MS |
3588 | #define LOOKUP_NO_CONVERSION (512) |
3589 | #define LOOKUP_DESTRUCTOR (512) | |
c73964b2 | 3590 | #define LOOKUP_NO_TEMP_BIND (1024) |
52c11ef6 JM |
3591 | #define LOOKUP_PREFER_TYPES (2048) |
3592 | #define LOOKUP_PREFER_NAMESPACES (4096) | |
3593 | #define LOOKUP_PREFER_BOTH (6144) | |
3594 | #define LOOKUP_TEMPLATES_EXPECTED (8192) | |
3595 | ||
3596 | #define LOOKUP_NAMESPACES_ONLY(f) \ | |
3597 | (((f) & LOOKUP_PREFER_NAMESPACES) && !((f) & LOOKUP_PREFER_TYPES)) | |
3598 | #define LOOKUP_TYPES_ONLY(f) \ | |
3599 | (!((f) & LOOKUP_PREFER_NAMESPACES) && ((f) & LOOKUP_PREFER_TYPES)) | |
3600 | #define LOOKUP_QUALIFIERS_ONLY(f) ((f) & LOOKUP_PREFER_BOTH) | |
3601 | ||
8d08fdba | 3602 | |
a4443a08 MS |
3603 | /* These flags are used by the conversion code. |
3604 | CONV_IMPLICIT : Perform implicit conversions (standard and user-defined). | |
3605 | CONV_STATIC : Perform the explicit conversions for static_cast. | |
3606 | CONV_CONST : Perform the explicit conversions for const_cast. | |
3607 | CONV_REINTERPRET: Perform the explicit conversions for reinterpret_cast. | |
6060a796 | 3608 | CONV_PRIVATE : Perform upcasts to private bases. |
8ccc31eb MS |
3609 | CONV_FORCE_TEMP : Require a new temporary when converting to the same |
3610 | aggregate type. */ | |
a4443a08 MS |
3611 | |
3612 | #define CONV_IMPLICIT 1 | |
3613 | #define CONV_STATIC 2 | |
3614 | #define CONV_CONST 4 | |
3615 | #define CONV_REINTERPRET 8 | |
3616 | #define CONV_PRIVATE 16 | |
faf5394a | 3617 | /* #define CONV_NONCONVERTING 32 */ |
8ccc31eb MS |
3618 | #define CONV_FORCE_TEMP 64 |
3619 | #define CONV_STATIC_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_FORCE_TEMP) | |
a4443a08 MS |
3620 | #define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \ |
3621 | | CONV_REINTERPRET) | |
3622 | #define CONV_C_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \ | |
8ccc31eb | 3623 | | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP) |
a4443a08 | 3624 | |
b7484fbe MS |
3625 | /* Used by build_expr_type_conversion to indicate which types are |
3626 | acceptable as arguments to the expression under consideration. */ | |
3627 | ||
3628 | #define WANT_INT 1 /* integer types, including bool */ | |
3629 | #define WANT_FLOAT 2 /* floating point types */ | |
3630 | #define WANT_ENUM 4 /* enumerated types */ | |
3631 | #define WANT_POINTER 8 /* pointer types */ | |
3632 | #define WANT_NULL 16 /* null pointer constant */ | |
b7484fbe MS |
3633 | #define WANT_ARITH (WANT_INT | WANT_FLOAT) |
3634 | ||
3bfdc719 MM |
3635 | /* Used with comptypes, and related functions, to guide type |
3636 | comparison. */ | |
3637 | ||
3638 | #define COMPARE_STRICT 0 /* Just check if the types are the | |
3639 | same. */ | |
3640 | #define COMPARE_BASE 1 /* Check to see if the second type is | |
3641 | derived from the first, or if both | |
3642 | are pointers (or references) and | |
3643 | the types pointed to by the second | |
3644 | type is derived from the pointed to | |
3645 | by the first. */ | |
3646 | #define COMPARE_RELAXED 2 /* Like COMPARE_DERIVED, but in | |
3647 | reverse. Also treat enmeration | |
3648 | types as the same as integer types | |
3649 | of the same width. */ | |
3650 | #define COMPARE_REDECLARATION 4 /* The comparsion is being done when | |
3651 | another declaration of an existing | |
3652 | entity is seen. */ | |
940ff223 JM |
3653 | #define COMPARE_NO_ATTRIBUTES 8 /* The comparison should ignore |
3654 | extra-linguistic type attributes. */ | |
3bfdc719 | 3655 | |
7bdbfa05 MM |
3656 | /* Used with push_overloaded_decl. */ |
3657 | #define PUSH_GLOBAL 0 /* Push the DECL into namespace scope, | |
3658 | regardless of the current scope. */ | |
3659 | #define PUSH_LOCAL 1 /* Push the DECL into the current | |
3660 | scope. */ | |
3661 | #define PUSH_USING 2 /* We are pushing this DECL as the | |
3662 | result of a using declaration. */ | |
3663 | ||
a8f73d4b | 3664 | /* Used with start function. */ |
b35d4555 | 3665 | #define SF_DEFAULT 0 /* No flags. */ |
a8f73d4b MM |
3666 | #define SF_PRE_PARSED 1 /* The function declaration has |
3667 | already been parsed. */ | |
3668 | #define SF_INCLASS_INLINE 2 /* The function is an inline, defined | |
3669 | in the class body. */ | |
3670 | #define SF_EXPAND 4 /* Generate RTL for this function. */ | |
3671 | ||
3bfdc719 MM |
3672 | /* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual |
3673 | sense of `same'. */ | |
3674 | #define same_type_p(type1, type2) \ | |
3675 | comptypes ((type1), (type2), COMPARE_STRICT) | |
3676 | ||
3677 | /* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2 | |
3678 | is derived from TYPE1, or if TYPE2 is a pointer (reference) to a | |
3679 | class derived from the type pointed to (referred to) by TYPE1. */ | |
3680 | #define same_or_base_type_p(type1, type2) \ | |
3681 | comptypes ((type1), (type2), COMPARE_BASE) | |
3682 | ||
f84b4be9 | 3683 | /* These macros are used to access a TEMPLATE_PARM_INDEX. */ |
da8a66fc ML |
3684 | #define TEMPLATE_PARM_INDEX_CAST(NODE) \ |
3685 | ((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE)) | |
3686 | #define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index) | |
3687 | #define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level) | |
f84b4be9 | 3688 | #define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE)) |
da8a66fc ML |
3689 | #define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level) |
3690 | #define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl) | |
f84b4be9 | 3691 | |
73b0fce8 KL |
3692 | /* These macros are for accessing the fields of TEMPLATE_TYPE_PARM |
3693 | and TEMPLATE_TEMPLATE_PARM nodes. */ | |
f84b4be9 JM |
3694 | #define TEMPLATE_TYPE_PARM_INDEX(NODE) (TYPE_FIELDS (NODE)) |
3695 | #define TEMPLATE_TYPE_IDX(NODE) \ | |
3696 | (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3697 | #define TEMPLATE_TYPE_LEVEL(NODE) \ | |
3698 | (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3699 | #define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \ | |
3700 | (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3701 | #define TEMPLATE_TYPE_DECL(NODE) \ | |
3702 | (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
8d08fdba | 3703 | |
9e93bc9d NS |
3704 | /* Control stringification of trees (types, decls & exprs). |
3705 | Bit or them together. */ | |
3706 | enum tree_string_flags | |
3707 | { | |
3708 | TS_PLAIN, /* nothing special */ | |
3709 | TS_CHASE_TYPEDEFS = 1 << 0, /* look through typedefs */ | |
3710 | TS_DECORATE = 1 << 1, /* decorate things */ | |
3711 | TS_FUNC_NORETURN = 1 << 2, /* inhibit function return type */ | |
3712 | TS_FUNC_THROW = 1 << 3, /* show throw spec */ | |
3713 | TS_PARM_DEFAULTS = 1 << 4, /* show parm defaults */ | |
3714 | TS_EXPR_PARENS = 1 << 5, /* enclose in parens */ | |
3715 | TS_AGGR_TAGS = 1 << 6, /* show struct tags */ | |
3716 | TS_DECL_TYPE = 1 << 7, /* show decl's type */ | |
3717 | TS_FUNC_SCOPE = 1 << 8, /* show function scope */ | |
3718 | TS_PEDANTIC_NAME = 1 << 9, /* pedantically name things */ | |
3719 | TS_TEMPLATE_PREFIX= 1 << 10, /* show template <parms> prefix */ | |
3720 | ||
3721 | /* Internal use flags */ | |
3722 | TS_TEMPLATE_PARM = 1 << 11, /* decl is really a non-type template parm */ | |
3723 | TS_TEMPLATE_PLAIN = 1 << 12, /* don't decorate primary template_name */ | |
3724 | ||
3725 | TS_NEXT_BIT = 13 /* next available bit */ | |
3726 | }; | |
3727 | ||
51c184be | 3728 | /* in lex.c */ |
8d08fdba MS |
3729 | /* Indexed by TREE_CODE, these tables give C-looking names to |
3730 | operators represented by TREE_CODES. For example, | |
3731 | opname_tab[(int) MINUS_EXPR] == "-". */ | |
9c0758dd | 3732 | extern const char **opname_tab, **assignop_tab; |
8d08fdba | 3733 | \f |
51c184be | 3734 | /* in call.c */ |
158991b7 KG |
3735 | extern int check_dtor_name PARAMS ((tree, tree)); |
3736 | extern int get_arglist_len_in_bytes PARAMS ((tree)); | |
3737 | ||
3738 | extern tree build_vfield_ref PARAMS ((tree, tree)); | |
3739 | extern tree resolve_scope_to_name PARAMS ((tree, tree)); | |
3740 | extern tree build_scoped_method_call PARAMS ((tree, tree, tree, tree)); | |
3741 | extern tree build_addr_func PARAMS ((tree)); | |
0c11ada6 | 3742 | extern tree build_call PARAMS ((tree, tree)); |
158991b7 KG |
3743 | extern tree build_method_call PARAMS ((tree, tree, tree, tree, int)); |
3744 | extern int null_ptr_cst_p PARAMS ((tree)); | |
3745 | extern tree type_decays_to PARAMS ((tree)); | |
3746 | extern tree build_user_type_conversion PARAMS ((tree, tree, int)); | |
3747 | extern tree build_new_function_call PARAMS ((tree, tree)); | |
3748 | extern tree build_new_op PARAMS ((enum tree_code, int, tree, tree, tree)); | |
158991b7 KG |
3749 | extern tree build_op_delete_call PARAMS ((enum tree_code, tree, tree, int, tree)); |
3750 | extern int can_convert PARAMS ((tree, tree)); | |
3751 | extern int can_convert_arg PARAMS ((tree, tree, tree)); | |
3752 | extern int enforce_access PARAMS ((tree, tree)); | |
c3f08228 | 3753 | extern tree convert_default_arg PARAMS ((tree, tree, tree, int)); |
158991b7 KG |
3754 | extern tree convert_arg_to_ellipsis PARAMS ((tree)); |
3755 | extern tree build_x_va_arg PARAMS ((tree, tree)); | |
3756 | extern tree convert_type_from_ellipsis PARAMS ((tree)); | |
3757 | extern int is_properly_derived_from PARAMS ((tree, tree)); | |
3758 | extern tree initialize_reference PARAMS ((tree, tree)); | |
3759 | extern tree strip_top_quals PARAMS ((tree)); | |
3760 | extern tree perform_implicit_conversion PARAMS ((tree, tree)); | |
8d08fdba | 3761 | |
51c184be | 3762 | /* in class.c */ |
158991b7 KG |
3763 | extern tree build_vbase_path PARAMS ((enum tree_code, tree, tree, tree, int)); |
3764 | extern tree build_vtbl_ref PARAMS ((tree, tree)); | |
3765 | extern tree build_vfn_ref PARAMS ((tree *, tree, tree)); | |
3766 | extern tree get_vtable_decl PARAMS ((tree, int)); | |
3767 | extern void add_method PARAMS ((tree, tree *, tree)); | |
3768 | extern int currently_open_class PARAMS ((tree)); | |
70adf8a9 | 3769 | extern tree currently_open_derived_class PARAMS ((tree)); |
158991b7 KG |
3770 | extern tree get_vfield_offset PARAMS ((tree)); |
3771 | extern void duplicate_tag_error PARAMS ((tree)); | |
3772 | extern tree finish_struct PARAMS ((tree, tree)); | |
3773 | extern void finish_struct_1 PARAMS ((tree)); | |
3774 | extern int resolves_to_fixed_type_p PARAMS ((tree, int *)); | |
3775 | extern void init_class_processing PARAMS ((void)); | |
3776 | extern int is_empty_class PARAMS ((tree)); | |
3777 | extern void pushclass PARAMS ((tree, int)); | |
3778 | extern void popclass PARAMS ((void)); | |
3779 | extern void push_nested_class PARAMS ((tree, int)); | |
3780 | extern void pop_nested_class PARAMS ((void)); | |
3781 | extern void push_lang_context PARAMS ((tree)); | |
3782 | extern void pop_lang_context PARAMS ((void)); | |
3783 | extern tree instantiate_type PARAMS ((tree, tree, int)); | |
3784 | extern void print_class_statistics PARAMS ((void)); | |
da3d4dfa | 3785 | extern int first_vfun_index PARAMS ((tree)); |
158991b7 KG |
3786 | extern void build_self_reference PARAMS ((void)); |
3787 | extern void warn_hidden PARAMS ((tree)); | |
3788 | extern tree get_enclosing_class PARAMS ((tree)); | |
3789 | int is_base_of_enclosing_class PARAMS ((tree, tree)); | |
3790 | extern void unreverse_member_declarations PARAMS ((tree)); | |
3791 | extern void invalidate_class_lookup_cache PARAMS ((void)); | |
3792 | extern void maybe_note_name_used_in_class PARAMS ((tree, tree)); | |
3793 | extern void note_name_declared_in_class PARAMS ((tree, tree)); | |
298d6f60 MM |
3794 | extern tree get_vtbl_decl_for_binfo PARAMS ((tree)); |
3795 | extern tree in_charge_arg_for_name PARAMS ((tree)); | |
8d08fdba | 3796 | |
51c184be | 3797 | /* in cvt.c */ |
158991b7 KG |
3798 | extern tree convert_to_reference PARAMS ((tree, tree, int, int, tree)); |
3799 | extern tree convert_from_reference PARAMS ((tree)); | |
3800 | extern tree convert_pointer_to_real PARAMS ((tree, tree)); | |
3801 | extern tree convert_pointer_to PARAMS ((tree, tree)); | |
3802 | extern tree ocp_convert PARAMS ((tree, tree, int, int)); | |
3803 | extern tree cp_convert PARAMS ((tree, tree)); | |
3804 | extern tree convert_to_void PARAMS ((tree, const char */*implicit context*/)); | |
3805 | extern tree convert PARAMS ((tree, tree)); | |
3806 | extern tree convert_force PARAMS ((tree, tree, int)); | |
3807 | extern tree build_type_conversion PARAMS ((tree, tree, int)); | |
3808 | extern tree build_expr_type_conversion PARAMS ((int, tree, int)); | |
3809 | extern tree type_promotes_to PARAMS ((tree)); | |
3810 | extern tree perform_qualification_conversions PARAMS ((tree, tree)); | |
db9b2174 | 3811 | extern void clone_function_decl PARAMS ((tree, int)); |
8d08fdba | 3812 | |
51c184be | 3813 | /* decl.c */ |
824b9a4c | 3814 | /* resume_binding_level */ |
158991b7 KG |
3815 | extern void set_identifier_local_value PARAMS ((tree, tree)); |
3816 | extern int global_bindings_p PARAMS ((void)); | |
3817 | extern int toplevel_bindings_p PARAMS ((void)); | |
3818 | extern int namespace_bindings_p PARAMS ((void)); | |
3819 | extern void keep_next_level PARAMS ((int)); | |
3820 | extern int kept_level_p PARAMS ((void)); | |
74b846e0 | 3821 | extern int template_parm_scope_p PARAMS ((void)); |
158991b7 | 3822 | extern void set_class_shadows PARAMS ((tree)); |
74b846e0 MM |
3823 | extern void begin_scope PARAMS ((scope_kind)); |
3824 | extern void finish_scope PARAMS ((void)); | |
158991b7 KG |
3825 | extern void note_level_for_for PARAMS ((void)); |
3826 | extern void resume_level PARAMS ((struct binding_level *)); | |
3827 | extern void delete_block PARAMS ((tree)); | |
3828 | extern void insert_block PARAMS ((tree)); | |
3829 | extern void add_block_current_level PARAMS ((tree)); | |
3830 | extern void set_block PARAMS ((tree)); | |
3831 | extern void pushlevel_class PARAMS ((void)); | |
3832 | extern void poplevel_class PARAMS ((void)); | |
3833 | extern void print_binding_stack PARAMS ((void)); | |
3834 | extern void print_binding_level PARAMS ((struct binding_level *)); | |
3835 | extern void push_namespace PARAMS ((tree)); | |
3836 | extern void pop_namespace PARAMS ((void)); | |
3837 | extern void push_nested_namespace PARAMS ((tree)); | |
3838 | extern void pop_nested_namespace PARAMS ((tree)); | |
3839 | extern void maybe_push_to_top_level PARAMS ((int)); | |
3840 | extern void push_to_top_level PARAMS ((void)); | |
3841 | extern void pop_from_top_level PARAMS ((void)); | |
3842 | extern tree identifier_type_value PARAMS ((tree)); | |
3843 | extern void set_identifier_type_value PARAMS ((tree, tree)); | |
3844 | extern void pop_everything PARAMS ((void)); | |
3845 | extern void pushtag PARAMS ((tree, tree, int)); | |
3846 | extern tree make_anon_name PARAMS ((void)); | |
3847 | extern void clear_anon_tags PARAMS ((void)); | |
3848 | extern int decls_match PARAMS ((tree, tree)); | |
3849 | extern int duplicate_decls PARAMS ((tree, tree)); | |
3850 | extern tree pushdecl PARAMS ((tree)); | |
3851 | extern tree pushdecl_top_level PARAMS ((tree)); | |
3852 | extern void pushdecl_class_level PARAMS ((tree)); | |
bd6dd845 | 3853 | #if 0 |
158991b7 | 3854 | extern void pushdecl_nonclass_level PARAMS ((tree)); |
bd6dd845 | 3855 | #endif |
158991b7 KG |
3856 | extern tree pushdecl_namespace_level PARAMS ((tree)); |
3857 | extern tree push_using_decl PARAMS ((tree, tree)); | |
3858 | extern tree push_using_directive PARAMS ((tree)); | |
3859 | extern void push_class_level_binding PARAMS ((tree, tree)); | |
3860 | extern tree implicitly_declare PARAMS ((tree)); | |
3861 | extern tree lookup_label PARAMS ((tree)); | |
3862 | extern tree declare_local_label PARAMS ((tree)); | |
3863 | extern tree define_label PARAMS ((char *, int, tree)); | |
3864 | extern void push_switch PARAMS ((void)); | |
3865 | extern void pop_switch PARAMS ((void)); | |
3866 | extern void define_case_label PARAMS ((void)); | |
3867 | extern tree getdecls PARAMS ((void)); | |
3868 | extern tree gettags PARAMS ((void)); | |
bd6dd845 | 3869 | #if 0 |
158991b7 | 3870 | extern void set_current_level_tags_transparency PARAMS ((int)); |
bd6dd845 | 3871 | #endif |
158991b7 KG |
3872 | extern tree binding_for_name PARAMS ((tree, tree)); |
3873 | extern tree namespace_binding PARAMS ((tree, tree)); | |
3874 | extern void set_namespace_binding PARAMS ((tree, tree, tree)); | |
3875 | extern tree lookup_namespace_name PARAMS ((tree, tree)); | |
3876 | extern tree build_typename_type PARAMS ((tree, tree, tree, tree)); | |
3877 | extern tree make_typename_type PARAMS ((tree, tree, int)); | |
3878 | extern tree lookup_name_nonclass PARAMS ((tree)); | |
3879 | extern tree lookup_function_nonclass PARAMS ((tree, tree)); | |
3880 | extern tree lookup_name PARAMS ((tree, int)); | |
3881 | extern tree lookup_name_current_level PARAMS ((tree)); | |
3882 | extern tree lookup_type_current_level PARAMS ((tree)); | |
3883 | extern tree lookup_name_namespace_only PARAMS ((tree)); | |
3884 | extern void begin_only_namespace_names PARAMS ((void)); | |
3885 | extern void end_only_namespace_names PARAMS ((void)); | |
3886 | extern tree namespace_ancestor PARAMS ((tree, tree)); | |
3887 | extern tree unqualified_namespace_lookup PARAMS ((tree, int, tree *)); | |
3888 | extern int lookup_using_namespace PARAMS ((tree, tree, tree, tree, int, tree *)); | |
3889 | extern int qualified_lookup_using_namespace PARAMS ((tree, tree, tree, int)); | |
0c11ada6 JM |
3890 | extern tree build_library_fn PARAMS ((tree, tree)); |
3891 | extern tree build_cp_library_fn PARAMS ((tree, tree)); | |
3892 | extern tree build_library_fn_ptr PARAMS ((const char *, tree)); | |
3893 | extern tree build_cp_library_fn_ptr PARAMS ((const char *, tree)); | |
3894 | extern tree push_library_fn PARAMS ((tree, tree)); | |
3895 | extern tree push_cp_library_fn PARAMS ((tree, tree)); | |
3896 | extern tree push_void_library_fn PARAMS ((tree, tree)); | |
3897 | extern tree push_throw_library_fn PARAMS ((tree, tree)); | |
158991b7 KG |
3898 | extern void init_decl_processing PARAMS ((void)); |
3899 | extern int init_type_desc PARAMS ((void)); | |
158991b7 KG |
3900 | extern tree check_tag_decl PARAMS ((tree)); |
3901 | extern void shadow_tag PARAMS ((tree)); | |
3902 | extern tree groktypename PARAMS ((tree)); | |
3903 | extern tree start_decl PARAMS ((tree, tree, int, tree, tree)); | |
3904 | extern void start_decl_1 PARAMS ((tree)); | |
3905 | extern void cp_finish_decl PARAMS ((tree, tree, tree, int)); | |
3906 | extern void finish_decl PARAMS ((tree, tree, tree)); | |
3907 | extern void maybe_inject_for_scope_var PARAMS ((tree)); | |
3908 | extern void initialize_local_var PARAMS ((tree, tree, int)); | |
3909 | extern void expand_static_init PARAMS ((tree, tree)); | |
3910 | extern tree start_handler_parms PARAMS ((tree, tree)); | |
3911 | extern int complete_array_type PARAMS ((tree, tree, int)); | |
3912 | extern tree build_ptrmemfunc_type PARAMS ((tree)); | |
f30432d7 | 3913 | /* the grokdeclarator prototype is in decl.h */ |
158991b7 KG |
3914 | extern int parmlist_is_exprlist PARAMS ((tree)); |
3915 | extern int copy_args_p PARAMS ((tree)); | |
3916 | extern int grok_ctor_properties PARAMS ((tree, tree)); | |
3917 | extern void grok_op_properties PARAMS ((tree, int, int)); | |
3918 | extern tree xref_tag PARAMS ((tree, tree, int)); | |
3919 | extern tree xref_tag_from_type PARAMS ((tree, tree, int)); | |
3920 | extern void xref_basetypes PARAMS ((tree, tree, tree, tree)); | |
3921 | extern tree start_enum PARAMS ((tree)); | |
3922 | extern tree finish_enum PARAMS ((tree)); | |
3923 | extern void build_enumerator PARAMS ((tree, tree, tree)); | |
3924 | extern int start_function PARAMS ((tree, tree, tree, int)); | |
3925 | extern void expand_start_early_try_stmts PARAMS ((void)); | |
3926 | extern void store_parm_decls PARAMS ((void)); | |
3927 | extern void store_return_init PARAMS ((tree)); | |
0acf7199 | 3928 | extern tree finish_function PARAMS ((int)); |
158991b7 KG |
3929 | extern tree start_method PARAMS ((tree, tree, tree)); |
3930 | extern tree finish_method PARAMS ((tree)); | |
3931 | extern void hack_incomplete_structures PARAMS ((tree)); | |
158991b7 KG |
3932 | extern tree maybe_build_cleanup PARAMS ((tree)); |
3933 | extern void cplus_expand_expr_stmt PARAMS ((tree)); | |
3934 | extern void finish_stmt PARAMS ((void)); | |
158991b7 KG |
3935 | extern void replace_defarg PARAMS ((tree, tree)); |
3936 | extern void print_other_binding_stack PARAMS ((struct binding_level *)); | |
3afb32a4 | 3937 | extern void revert_static_member_fn PARAMS ((tree)); |
158991b7 KG |
3938 | extern void fixup_anonymous_aggr PARAMS ((tree)); |
3939 | extern int check_static_variable_definition PARAMS ((tree, tree)); | |
3940 | extern tree compute_array_index_type PARAMS ((tree, tree)); | |
3941 | extern void push_local_binding PARAMS ((tree, tree, int)); | |
3942 | extern int push_class_binding PARAMS ((tree, tree)); | |
3943 | extern tree check_default_argument PARAMS ((tree, tree)); | |
3944 | extern tree push_overloaded_decl PARAMS ((tree, int)); | |
3945 | extern void clear_identifier_class_values PARAMS ((void)); | |
3946 | extern void storetags PARAMS ((tree)); | |
3947 | extern int vtable_decl_p PARAMS ((tree, void *)); | |
3948 | extern int vtype_decl_p PARAMS ((tree, void *)); | |
3949 | extern int sigtable_decl_p PARAMS ((tree, void *)); | |
3950 | typedef int (*walk_globals_pred) PARAMS ((tree, void *)); | |
3951 | typedef int (*walk_globals_fn) PARAMS ((tree *, void *)); | |
3952 | extern int walk_globals PARAMS ((walk_globals_pred, | |
0aafb128 MM |
3953 | walk_globals_fn, |
3954 | void *)); | |
158991b7 KG |
3955 | typedef int (*walk_namespaces_fn) PARAMS ((tree, void *)); |
3956 | extern int walk_namespaces PARAMS ((walk_namespaces_fn, | |
0aafb128 | 3957 | void *)); |
158991b7 KG |
3958 | extern int wrapup_globals_for_namespace PARAMS ((tree, void *)); |
3959 | extern tree cp_namespace_decls PARAMS ((tree)); | |
3960 | extern tree create_implicit_typedef PARAMS ((tree, tree)); | |
3961 | extern tree maybe_push_decl PARAMS ((tree)); | |
3962 | extern void emit_local_var PARAMS ((tree)); | |
3963 | extern tree build_target_expr_with_type PARAMS ((tree, tree)); | |
3964 | extern void make_rtl_for_local_static PARAMS ((tree)); | |
3965 | extern int local_variable_p PARAMS ((tree)); | |
3966 | extern int nonstatic_local_decl_p PARAMS ((tree)); | |
3967 | extern tree declare_global_var PARAMS ((tree, tree)); | |
3968 | extern void register_dtor_fn PARAMS ((tree)); | |
74b846e0 | 3969 | extern tmpl_spec_kind current_tmpl_spec_kind PARAMS ((int)); |
8d08fdba | 3970 | |
51c184be | 3971 | /* in decl2.c */ |
158991b7 KG |
3972 | extern void init_decl2 PARAMS ((void)); |
3973 | extern int check_java_method PARAMS ((tree)); | |
3974 | extern int lang_decode_option PARAMS ((int, char **)); | |
3975 | extern int grok_method_quals PARAMS ((tree, tree, tree)); | |
3976 | extern void warn_if_unknown_interface PARAMS ((tree)); | |
3977 | extern void grok_x_components PARAMS ((tree)); | |
3978 | extern void maybe_retrofit_in_chrg PARAMS ((tree)); | |
3979 | extern void maybe_make_one_only PARAMS ((tree)); | |
3980 | extern void grokclassfn PARAMS ((tree, tree, enum overload_flags, tree)); | |
3981 | extern tree grok_alignof PARAMS ((tree)); | |
3982 | extern tree grok_array_decl PARAMS ((tree, tree)); | |
3983 | extern tree delete_sanity PARAMS ((tree, tree, int, int)); | |
3984 | extern tree check_classfn PARAMS ((tree, tree)); | |
3985 | extern void check_member_template PARAMS ((tree)); | |
3986 | extern tree grokfield PARAMS ((tree, tree, tree, tree, tree)); | |
3987 | extern tree grokbitfield PARAMS ((tree, tree, tree)); | |
3988 | extern tree groktypefield PARAMS ((tree, tree)); | |
3989 | extern tree grokoptypename PARAMS ((tree, tree)); | |
3990 | extern int copy_assignment_arg_p PARAMS ((tree, int)); | |
3991 | extern void cplus_decl_attributes PARAMS ((tree, tree, tree)); | |
3992 | extern tree constructor_name_full PARAMS ((tree)); | |
3993 | extern tree constructor_name PARAMS ((tree)); | |
3994 | extern void setup_vtbl_ptr PARAMS ((void)); | |
56e770bf | 3995 | extern void defer_fn PARAMS ((tree)); |
158991b7 KG |
3996 | extern tree get_temp_name PARAMS ((tree, int)); |
3997 | extern void finish_anon_union PARAMS ((tree)); | |
3998 | extern tree finish_table PARAMS ((tree, tree, tree, int)); | |
3999 | extern void finish_builtin_type PARAMS ((tree, const char *, | |
d8e178a0 | 4000 | tree *, int, tree)); |
158991b7 KG |
4001 | extern tree coerce_new_type PARAMS ((tree)); |
4002 | extern tree coerce_delete_type PARAMS ((tree)); | |
4003 | extern void comdat_linkage PARAMS ((tree)); | |
158991b7 KG |
4004 | extern void import_export_vtable PARAMS ((tree, tree, int)); |
4005 | extern void import_export_decl PARAMS ((tree)); | |
4006 | extern tree build_cleanup PARAMS ((tree)); | |
4007 | extern void finish_file PARAMS ((void)); | |
4008 | extern tree reparse_absdcl_as_expr PARAMS ((tree, tree)); | |
4009 | extern tree reparse_absdcl_as_casts PARAMS ((tree, tree)); | |
4010 | extern tree build_expr_from_tree PARAMS ((tree)); | |
4011 | extern tree reparse_decl_as_expr PARAMS ((tree, tree)); | |
4012 | extern tree finish_decl_parsing PARAMS ((tree)); | |
4013 | extern tree check_cp_case_value PARAMS ((tree)); | |
4014 | extern void set_decl_namespace PARAMS ((tree, tree, int)); | |
4015 | extern tree current_decl_namespace PARAMS ((void)); | |
4016 | extern void push_decl_namespace PARAMS ((tree)); | |
4017 | extern void pop_decl_namespace PARAMS ((void)); | |
4018 | extern void push_scope PARAMS ((tree)); | |
4019 | extern void pop_scope PARAMS ((tree)); | |
4020 | extern void do_namespace_alias PARAMS ((tree, tree)); | |
4021 | extern void do_toplevel_using_decl PARAMS ((tree)); | |
4022 | extern void do_local_using_decl PARAMS ((tree)); | |
4023 | extern tree do_class_using_decl PARAMS ((tree)); | |
4024 | extern void do_using_directive PARAMS ((tree)); | |
4025 | extern void check_default_args PARAMS ((tree)); | |
4026 | extern void mark_used PARAMS ((tree)); | |
4027 | extern tree handle_class_head PARAMS ((tree, tree, tree)); | |
4028 | extern tree lookup_arg_dependent PARAMS ((tree, tree, tree)); | |
4029 | extern void finish_static_data_member_decl PARAMS ((tree, tree, tree, int)); | |
8d08fdba | 4030 | |
fc6af6e3 | 4031 | /* in parse.y */ |
158991b7 | 4032 | extern void cp_parse_init PARAMS ((void)); |
fc6af6e3 | 4033 | |
824b9a4c | 4034 | /* in errfn.c */ |
d8e178a0 | 4035 | /* The cp_* functions aren't suitable for ATTRIBUTE_PRINTF. */ |
158991b7 KG |
4036 | extern void cp_error PARAMS ((const char *, ...)); |
4037 | extern void cp_error_at PARAMS ((const char *, ...)); | |
4038 | extern void cp_warning PARAMS ((const char *, ...)); | |
4039 | extern void cp_warning_at PARAMS ((const char *, ...)); | |
4040 | extern void cp_pedwarn PARAMS ((const char *, ...)); | |
4041 | extern void cp_pedwarn_at PARAMS ((const char *, ...)); | |
4042 | extern void cp_compiler_error PARAMS ((const char *, ...)); | |
4043 | extern void cp_sprintf PARAMS ((const char *, ...)); | |
4044 | extern void cp_deprecated PARAMS ((const char*)); | |
824b9a4c MS |
4045 | |
4046 | /* in error.c */ | |
158991b7 KG |
4047 | extern void init_error PARAMS ((void)); |
4048 | extern const char *type_as_string PARAMS ((tree, enum tree_string_flags)); | |
4049 | extern const char *decl_as_string PARAMS ((tree, enum tree_string_flags)); | |
4050 | extern const char *expr_as_string PARAMS ((tree, enum tree_string_flags)); | |
4051 | extern const char *context_as_string PARAMS ((tree, enum tree_string_flags)); | |
4052 | extern const char *lang_decl_name PARAMS ((tree, int)); | |
4053 | extern const char *cp_file_of PARAMS ((tree)); | |
4054 | extern int cp_line_of PARAMS ((tree)); | |
824b9a4c | 4055 | |
51c184be | 4056 | /* in except.c */ |
158991b7 KG |
4057 | extern void init_exception_processing PARAMS ((void)); |
4058 | extern tree expand_start_catch_block PARAMS ((tree)); | |
4059 | extern void expand_end_catch_block PARAMS ((tree)); | |
4060 | extern void expand_builtin_throw PARAMS ((void)); | |
4061 | extern tree expand_start_eh_spec PARAMS ((void)); | |
4062 | extern void expand_end_eh_spec PARAMS ((tree, tree)); | |
4063 | extern void expand_exception_blocks PARAMS ((void)); | |
4064 | extern tree build_throw PARAMS ((tree)); | |
4065 | extern void mark_all_runtime_matches PARAMS ((void)); | |
1660cb3a | 4066 | extern int nothrow_libfn_p PARAMS ((tree)); |
8d08fdba | 4067 | |
51c184be | 4068 | /* in expr.c */ |
158991b7 KG |
4069 | extern void init_cplus_expand PARAMS ((void)); |
4070 | extern void fixup_result_decl PARAMS ((tree, struct rtx_def *)); | |
4071 | extern int extract_init PARAMS ((tree, tree)); | |
4072 | extern void do_case PARAMS ((tree, tree)); | |
4073 | extern tree cplus_expand_constant PARAMS ((tree)); | |
8d08fdba | 4074 | |
bd6dd845 | 4075 | /* friend.c */ |
158991b7 KG |
4076 | extern int is_friend PARAMS ((tree, tree)); |
4077 | extern void make_friend_class PARAMS ((tree, tree)); | |
4078 | extern void add_friend PARAMS ((tree, tree)); | |
158991b7 | 4079 | extern tree do_friend PARAMS ((tree, tree, tree, tree, tree, enum overload_flags, tree, int)); |
bd6dd845 | 4080 | |
51c184be | 4081 | /* in init.c */ |
158991b7 | 4082 | extern void init_init_processing PARAMS ((void)); |
3dbc07b6 | 4083 | extern void emit_base_init PARAMS ((tree)); |
158991b7 KG |
4084 | extern void expand_member_init PARAMS ((tree, tree, tree)); |
4085 | extern tree build_aggr_init PARAMS ((tree, tree, int)); | |
158991b7 KG |
4086 | extern int is_aggr_type PARAMS ((tree, int)); |
4087 | extern tree get_aggr_from_typedef PARAMS ((tree, int)); | |
4088 | extern tree get_type_value PARAMS ((tree)); | |
4089 | extern tree build_member_call PARAMS ((tree, tree, tree)); | |
4090 | extern tree build_offset_ref PARAMS ((tree, tree)); | |
4091 | extern tree resolve_offset_ref PARAMS ((tree)); | |
4092 | extern tree decl_constant_value PARAMS ((tree)); | |
4093 | extern tree build_new PARAMS ((tree, tree, tree, int)); | |
158991b7 KG |
4094 | extern tree build_vec_init PARAMS ((tree, tree, tree, tree, int)); |
4095 | extern tree build_x_delete PARAMS ((tree, int, tree)); | |
4096 | extern tree build_delete PARAMS ((tree, tree, tree, int, int)); | |
4097 | extern tree build_vbase_delete PARAMS ((tree, tree)); | |
4098 | extern tree build_vec_delete PARAMS ((tree, tree, tree, int)); | |
4099 | extern tree create_temporary_var PARAMS ((tree)); | |
4100 | extern void begin_init_stmts PARAMS ((tree *, tree *)); | |
4101 | extern tree finish_init_stmts PARAMS ((tree, tree)); | |
4102 | extern void initialize_vtbl_ptrs PARAMS ((tree, tree)); | |
e97f22c9 | 4103 | extern tree build_java_class_ref PARAMS ((tree)); |
8d08fdba | 4104 | |
51c184be | 4105 | /* in input.c */ |
8d08fdba | 4106 | |
51c184be | 4107 | /* in lex.c */ |
158991b7 KG |
4108 | extern char *file_name_nondirectory PARAMS ((const char *)); |
4109 | extern tree make_pointer_declarator PARAMS ((tree, tree)); | |
4110 | extern tree make_reference_declarator PARAMS ((tree, tree)); | |
4111 | extern tree make_call_declarator PARAMS ((tree, tree, tree, tree)); | |
4112 | extern void set_quals_and_spec PARAMS ((tree, tree, tree)); | |
4113 | extern const char *operator_name_string PARAMS ((tree)); | |
4114 | extern void lang_init PARAMS ((void)); | |
4115 | extern void lang_finish PARAMS ((void)); | |
bd6dd845 | 4116 | #if 0 |
158991b7 | 4117 | extern void reinit_lang_specific PARAMS ((void)); |
bd6dd845 | 4118 | #endif |
158991b7 KG |
4119 | extern void reinit_parse_for_function PARAMS ((void)); |
4120 | extern void print_parse_statistics PARAMS ((void)); | |
4121 | extern void extract_interface_info PARAMS ((void)); | |
4122 | extern void do_pending_inlines PARAMS ((void)); | |
4123 | extern void process_next_inline PARAMS ((struct pending_inline *)); | |
4124 | extern struct pending_input *save_pending_input PARAMS ((void)); | |
4125 | extern void restore_pending_input PARAMS ((struct pending_input *)); | |
4126 | extern void yyungetc PARAMS ((int, int)); | |
4127 | extern void reinit_parse_for_method PARAMS ((int, tree)); | |
4128 | extern void reinit_parse_for_block PARAMS ((int, struct obstack *)); | |
158991b7 KG |
4129 | extern void check_for_missing_semicolon PARAMS ((tree)); |
4130 | extern void note_got_semicolon PARAMS ((tree)); | |
4131 | extern void note_list_got_semicolon PARAMS ((tree)); | |
4132 | extern void do_pending_lang_change PARAMS ((void)); | |
4133 | extern int identifier_type PARAMS ((tree)); | |
4134 | extern void see_typename PARAMS ((void)); | |
4135 | extern tree do_identifier PARAMS ((tree, int, tree)); | |
4136 | extern tree do_scoped_id PARAMS ((tree, int)); | |
4137 | extern tree identifier_typedecl_value PARAMS ((tree)); | |
4138 | extern int real_yylex PARAMS ((void)); | |
4139 | extern int is_rid PARAMS ((tree)); | |
4140 | extern tree build_lang_decl PARAMS ((enum tree_code, tree, tree)); | |
4141 | extern void retrofit_lang_decl PARAMS ((tree)); | |
0acf7199 | 4142 | extern tree copy_decl PARAMS ((tree)); |
158991b7 KG |
4143 | extern void copy_lang_decl PARAMS ((tree)); |
4144 | extern tree cp_make_lang_type PARAMS ((enum tree_code)); | |
4145 | extern tree make_aggr_type PARAMS ((enum tree_code)); | |
4146 | extern void dump_time_statistics PARAMS ((void)); | |
4147 | extern void compiler_error PARAMS ((const char *, ...)) | |
d8e178a0 | 4148 | ATTRIBUTE_PRINTF_1; |
158991b7 KG |
4149 | extern void yyerror PARAMS ((const char *)); |
4150 | extern void clear_inline_text_obstack PARAMS ((void)); | |
4151 | extern void maybe_snarf_defarg PARAMS ((void)); | |
4152 | extern tree snarf_defarg PARAMS ((void)); | |
4153 | extern void add_defarg_fn PARAMS ((tree)); | |
4154 | extern void do_pending_defargs PARAMS ((void)); | |
4155 | extern int identifier_type PARAMS ((tree)); | |
4156 | extern void yyhook PARAMS ((int)); | |
4157 | extern int cp_type_qual_from_rid PARAMS ((tree)); | |
8d08fdba | 4158 | |
51c184be | 4159 | /* in method.c */ |
158991b7 KG |
4160 | extern void init_method PARAMS ((void)); |
4161 | extern char *build_overload_name PARAMS ((tree, int, int)); | |
4162 | extern tree build_static_name PARAMS ((tree, tree)); | |
4163 | extern tree build_decl_overload PARAMS ((tree, tree, int)); | |
4164 | extern tree build_decl_overload_real PARAMS ((tree, tree, tree, tree, | |
36a117a5 | 4165 | tree, int)); |
158991b7 KG |
4166 | extern void set_mangled_name_for_decl PARAMS ((tree)); |
4167 | extern tree build_typename_overload PARAMS ((tree)); | |
4168 | extern tree build_overload_with_type PARAMS ((tree, tree)); | |
4169 | extern tree build_destructor_name PARAMS ((tree)); | |
4170 | extern tree build_opfncall PARAMS ((enum tree_code, int, tree, tree, tree)); | |
4171 | extern tree hack_identifier PARAMS ((tree, tree)); | |
02e59efb | 4172 | extern tree make_thunk PARAMS ((tree, int, int)); |
158991b7 KG |
4173 | extern void emit_thunk PARAMS ((tree)); |
4174 | extern void synthesize_method PARAMS ((tree)); | |
4175 | extern tree get_id_2 PARAMS ((const char *, tree)); | |
9eb71d8c | 4176 | extern tree implicitly_declare_fn PARAMS ((special_function_kind, tree, int)); |
8d08fdba | 4177 | |
46e8c075 | 4178 | /* In optimize.c */ |
158991b7 KG |
4179 | extern void optimize_function PARAMS ((tree)); |
4180 | extern int calls_setjmp_p PARAMS ((tree)); | |
db9b2174 | 4181 | extern int maybe_clone_body PARAMS ((tree)); |
46e8c075 | 4182 | |
51c184be | 4183 | /* in pt.c */ |
158991b7 KG |
4184 | extern void init_pt PARAMS ((void)); |
4185 | extern void check_template_shadow PARAMS ((tree)); | |
4186 | extern tree innermost_args PARAMS ((tree)); | |
4187 | extern tree tsubst PARAMS ((tree, tree, int, tree)); | |
4188 | extern tree tsubst_expr PARAMS ((tree, tree, int, tree)); | |
4189 | extern tree tsubst_copy PARAMS ((tree, tree, int, tree)); | |
4190 | extern void maybe_begin_member_template_processing PARAMS ((tree)); | |
4191 | extern void maybe_end_member_template_processing PARAMS ((void)); | |
4192 | extern tree finish_member_template_decl PARAMS ((tree)); | |
4193 | extern void begin_template_parm_list PARAMS ((void)); | |
4194 | extern void begin_specialization PARAMS ((void)); | |
4195 | extern void reset_specialization PARAMS ((void)); | |
4196 | extern void end_specialization PARAMS ((void)); | |
4197 | extern void begin_explicit_instantiation PARAMS ((void)); | |
4198 | extern void end_explicit_instantiation PARAMS ((void)); | |
4199 | extern tree check_explicit_specialization PARAMS ((tree, tree, int, int)); | |
4200 | extern tree process_template_parm PARAMS ((tree, tree)); | |
4201 | extern tree end_template_parm_list PARAMS ((tree)); | |
4202 | extern void end_template_decl PARAMS ((void)); | |
4203 | extern tree current_template_args PARAMS ((void)); | |
4204 | extern tree push_template_decl PARAMS ((tree)); | |
4205 | extern tree push_template_decl_real PARAMS ((tree, int)); | |
4206 | extern void redeclare_class_template PARAMS ((tree, tree)); | |
4207 | extern tree lookup_template_class PARAMS ((tree, tree, tree, tree, int)); | |
4208 | extern tree lookup_template_function PARAMS ((tree, tree)); | |
4209 | extern int uses_template_parms PARAMS ((tree)); | |
4210 | extern tree instantiate_class_template PARAMS ((tree)); | |
4211 | extern tree instantiate_template PARAMS ((tree, tree)); | |
4212 | extern void overload_template_name PARAMS ((tree)); | |
4213 | extern int fn_type_unification PARAMS ((tree, tree, tree, tree, tree, unification_kind_t)); | |
4214 | struct tinst_level *tinst_for_decl PARAMS ((void)); | |
4215 | extern void mark_decl_instantiated PARAMS ((tree, int)); | |
4216 | extern int more_specialized PARAMS ((tree, tree, tree)); | |
4217 | extern void mark_class_instantiated PARAMS ((tree, int)); | |
4218 | extern void do_decl_instantiation PARAMS ((tree, tree, tree)); | |
4219 | extern void do_type_instantiation PARAMS ((tree, tree)); | |
16d53b64 | 4220 | extern tree instantiate_decl PARAMS ((tree, int)); |
158991b7 KG |
4221 | extern tree get_bindings PARAMS ((tree, tree, tree)); |
4222 | extern void add_tree PARAMS ((tree)); | |
4223 | extern void add_maybe_template PARAMS ((tree, tree)); | |
4224 | extern void pop_tinst_level PARAMS ((void)); | |
4225 | extern int more_specialized_class PARAMS ((tree, tree)); | |
4226 | extern int is_member_template PARAMS ((tree)); | |
4227 | extern int template_parms_equal PARAMS ((tree, tree)); | |
4228 | extern int comp_template_parms PARAMS ((tree, tree)); | |
4229 | extern int template_class_depth PARAMS ((tree)); | |
4230 | extern int is_specialization_of PARAMS ((tree, tree)); | |
4231 | extern int comp_template_args PARAMS ((tree, tree)); | |
4232 | extern void maybe_process_partial_specialization PARAMS ((tree)); | |
4233 | extern void maybe_check_template_type PARAMS ((tree)); | |
4234 | extern tree most_specialized_instantiation PARAMS ((tree, tree)); | |
4235 | extern void print_candidates PARAMS ((tree)); | |
4236 | extern int instantiate_pending_templates PARAMS ((void)); | |
4237 | extern tree tsubst_default_argument PARAMS ((tree, tree, tree)); | |
4238 | extern tree most_general_template PARAMS ((tree)); | |
6757edfe | 4239 | |
67ffc812 | 4240 | extern int processing_template_parmlist; |
824b9a4c MS |
4241 | |
4242 | /* in repo.c */ | |
158991b7 KG |
4243 | extern void repo_template_used PARAMS ((tree)); |
4244 | extern void repo_template_instantiated PARAMS ((tree, int)); | |
4245 | extern void init_repo PARAMS ((const char *)); | |
4246 | extern void finish_repo PARAMS ((void)); | |
824b9a4c MS |
4247 | |
4248 | /* in rtti.c */ | |
7267d692 NS |
4249 | extern void init_rtti_processing PARAMS((void)); |
4250 | extern tree build_typeid PARAMS((tree)); | |
4251 | extern tree get_tinfo_decl PARAMS((tree)); | |
4252 | extern tree get_typeid PARAMS((tree)); | |
4253 | extern tree get_typeid_1 PARAMS((tree)); | |
4254 | extern tree build_dynamic_cast PARAMS((tree, tree)); | |
4255 | extern void synthesize_tinfo_fn PARAMS((tree)); | |
4256 | extern void emit_support_tinfos PARAMS((void)); | |
4257 | extern int tinfo_decl_p PARAMS((tree, void *)); | |
4258 | extern int emit_tinfo_decl PARAMS((tree *, void *)); | |
8d08fdba | 4259 | |
51c184be | 4260 | /* in search.c */ |
158991b7 KG |
4261 | extern int types_overlap_p PARAMS ((tree, tree)); |
4262 | extern tree get_vbase PARAMS ((tree, tree)); | |
4263 | extern tree get_binfo PARAMS ((tree, tree, int)); | |
4264 | extern int get_base_distance PARAMS ((tree, tree, int, tree *)); | |
4265 | extern tree get_dynamic_cast_base_type PARAMS ((tree, tree)); | |
70adf8a9 | 4266 | extern void type_access_control PARAMS ((tree, tree)); |
158991b7 KG |
4267 | extern int accessible_p PARAMS ((tree, tree)); |
4268 | extern tree lookup_field PARAMS ((tree, tree, int, int)); | |
4269 | extern int lookup_fnfields_1 PARAMS ((tree, tree)); | |
4270 | extern tree lookup_fnfields PARAMS ((tree, tree, int)); | |
4271 | extern tree lookup_member PARAMS ((tree, tree, int, int)); | |
4272 | extern tree lookup_nested_tag PARAMS ((tree, tree)); | |
4273 | extern tree get_matching_virtual PARAMS ((tree, tree, int)); | |
4274 | extern void get_pure_virtuals PARAMS ((tree)); | |
4275 | extern tree init_vbase_pointers PARAMS ((tree, tree)); | |
4276 | extern void expand_indirect_vtbls_init PARAMS ((tree, tree)); | |
4277 | extern void clear_search_slots PARAMS ((tree)); | |
4278 | extern void get_vbase_types PARAMS ((tree)); | |
4279 | extern void maybe_suppress_debug_info PARAMS ((tree)); | |
4280 | extern void note_debug_info_needed PARAMS ((tree)); | |
4281 | extern void push_class_decls PARAMS ((tree)); | |
4282 | extern void pop_class_decls PARAMS ((void)); | |
4283 | extern void unuse_fields PARAMS ((tree)); | |
4284 | extern void print_search_statistics PARAMS ((void)); | |
4285 | extern void init_search_processing PARAMS ((void)); | |
4286 | extern void reinit_search_statistics PARAMS ((void)); | |
4287 | extern tree current_scope PARAMS ((void)); | |
4288 | extern int at_function_scope_p PARAMS ((void)); | |
4289 | extern tree lookup_conversions PARAMS ((tree)); | |
4290 | extern tree binfo_for_vtable PARAMS ((tree)); | |
4291 | extern int binfo_from_vbase PARAMS ((tree)); | |
4292 | extern tree dfs_walk PARAMS ((tree, | |
d6479fe7 MM |
4293 | tree (*)(tree, void *), |
4294 | tree (*) (tree, void *), | |
4295 | void *)); | |
158991b7 | 4296 | extern tree dfs_walk_real PARAMS ((tree, |
bbd15aac MM |
4297 | tree (*) (tree, void *), |
4298 | tree (*) (tree, void *), | |
4299 | tree (*) (tree, void *), | |
4300 | void *)); | |
158991b7 | 4301 | extern tree dfs_unmark PARAMS ((tree, void *)); |
158991b7 KG |
4302 | extern tree dfs_vtable_path_unmark PARAMS ((tree, void *)); |
4303 | extern tree markedp PARAMS ((tree, void *)); | |
4304 | extern tree unmarkedp PARAMS ((tree, void *)); | |
4305 | extern tree dfs_skip_nonprimary_vbases_unmarkedp PARAMS ((tree, void *)); | |
4306 | extern tree dfs_skip_nonprimary_vbases_markedp PARAMS ((tree, void *)); | |
4307 | extern tree dfs_unmarked_real_bases_queue_p PARAMS ((tree, void *)); | |
4308 | extern tree dfs_marked_real_bases_queue_p PARAMS ((tree, void *)); | |
158991b7 | 4309 | extern tree dfs_skip_vbases PARAMS ((tree, void *)); |
da3d4dfa MM |
4310 | extern tree marked_vtable_pathp PARAMS ((tree, void *)); |
4311 | extern tree unmarked_vtable_pathp PARAMS ((tree, void *)); | |
158991b7 KG |
4312 | extern tree convert_pointer_to_vbase PARAMS ((tree, tree)); |
4313 | extern tree find_vbase_instance PARAMS ((tree, tree)); | |
8d08fdba | 4314 | |
ad321293 | 4315 | /* in semantics.c */ |
158991b7 KG |
4316 | extern void finish_expr_stmt PARAMS ((tree)); |
4317 | extern tree begin_if_stmt PARAMS ((void)); | |
4318 | extern void finish_if_stmt_cond PARAMS ((tree, tree)); | |
4319 | extern tree finish_then_clause PARAMS ((tree)); | |
4320 | extern void begin_else_clause PARAMS ((void)); | |
4321 | extern void finish_else_clause PARAMS ((tree)); | |
4322 | extern void finish_if_stmt PARAMS ((void)); | |
4323 | extern tree begin_while_stmt PARAMS ((void)); | |
4324 | extern void finish_while_stmt_cond PARAMS ((tree, tree)); | |
4325 | extern void finish_while_stmt PARAMS ((tree)); | |
4326 | extern tree begin_do_stmt PARAMS ((void)); | |
4327 | extern void finish_do_body PARAMS ((tree)); | |
4328 | extern void finish_do_stmt PARAMS ((tree, tree)); | |
4329 | extern void finish_return_stmt PARAMS ((tree)); | |
4330 | extern tree begin_for_stmt PARAMS ((void)); | |
4331 | extern void finish_for_init_stmt PARAMS ((tree)); | |
4332 | extern void finish_for_cond PARAMS ((tree, tree)); | |
4333 | extern void finish_for_expr PARAMS ((tree, tree)); | |
4334 | extern void finish_for_stmt PARAMS ((tree, tree)); | |
4335 | extern void finish_break_stmt PARAMS ((void)); | |
4336 | extern void finish_continue_stmt PARAMS ((void)); | |
4337 | extern tree begin_switch_stmt PARAMS ((void)); | |
4338 | extern void finish_switch_cond PARAMS ((tree, tree)); | |
4339 | extern void finish_switch_stmt PARAMS ((tree, tree)); | |
4340 | extern void finish_case_label PARAMS ((tree, tree)); | |
4341 | extern void finish_goto_stmt PARAMS ((tree)); | |
4342 | extern tree begin_try_block PARAMS ((void)); | |
4343 | extern void finish_try_block PARAMS ((tree)); | |
4344 | extern void finish_handler_sequence PARAMS ((tree)); | |
4345 | extern tree begin_function_try_block PARAMS ((void)); | |
4346 | extern void finish_function_try_block PARAMS ((tree)); | |
4347 | extern void finish_function_handler_sequence PARAMS ((tree)); | |
4348 | extern void finish_cleanup_try_block PARAMS ((tree)); | |
4349 | extern tree begin_handler PARAMS ((void)); | |
4350 | extern tree finish_handler_parms PARAMS ((tree, tree)); | |
4351 | extern void begin_catch_block PARAMS ((tree)); | |
4352 | extern void finish_handler PARAMS ((tree, tree)); | |
4353 | extern void finish_cleanup PARAMS ((tree, tree)); | |
4354 | extern tree begin_compound_stmt PARAMS ((int)); | |
4355 | extern tree finish_compound_stmt PARAMS ((int, tree)); | |
4356 | extern void finish_asm_stmt PARAMS ((tree, tree, tree, tree, tree)); | |
4357 | extern void finish_label_stmt PARAMS ((tree)); | |
4358 | extern void finish_label_decl PARAMS ((tree)); | |
4359 | extern void finish_subobject PARAMS ((tree)); | |
4360 | extern tree finish_parenthesized_expr PARAMS ((tree)); | |
4361 | extern tree begin_stmt_expr PARAMS ((void)); | |
4362 | extern tree finish_stmt_expr PARAMS ((tree)); | |
4363 | extern tree finish_call_expr PARAMS ((tree, tree, int)); | |
4364 | extern tree finish_increment_expr PARAMS ((tree, enum tree_code)); | |
4365 | extern tree finish_this_expr PARAMS ((void)); | |
4366 | extern tree finish_object_call_expr PARAMS ((tree, tree, tree)); | |
4367 | extern tree finish_qualified_object_call_expr PARAMS ((tree, tree, tree)); | |
4368 | extern tree finish_pseudo_destructor_call_expr PARAMS ((tree, tree, tree)); | |
4369 | extern tree finish_qualified_call_expr PARAMS ((tree, tree)); | |
4370 | extern tree finish_label_address_expr PARAMS ((tree)); | |
4371 | extern tree finish_unary_op_expr PARAMS ((enum tree_code, tree)); | |
4372 | extern tree finish_id_expr PARAMS ((tree)); | |
1f51a992 JM |
4373 | extern void save_type_access_control PARAMS ((tree)); |
4374 | extern void decl_type_access_control PARAMS ((tree)); | |
4375 | extern int begin_function_definition PARAMS ((tree, tree)); | |
158991b7 KG |
4376 | extern tree begin_constructor_declarator PARAMS ((tree, tree)); |
4377 | extern tree finish_declarator PARAMS ((tree, tree, tree, tree, int)); | |
4378 | extern void finish_translation_unit PARAMS ((void)); | |
4379 | extern tree finish_template_type_parm PARAMS ((tree, tree)); | |
4380 | extern tree finish_template_template_parm PARAMS ((tree, tree)); | |
4381 | extern tree finish_parmlist PARAMS ((tree, int)); | |
4382 | extern tree begin_class_definition PARAMS ((tree)); | |
4383 | extern tree finish_class_definition PARAMS ((tree, tree, int, int)); | |
4384 | extern void finish_default_args PARAMS ((void)); | |
4385 | extern void begin_inline_definitions PARAMS ((void)); | |
4386 | extern void finish_inline_definitions PARAMS ((void)); | |
4387 | extern tree finish_member_class_template PARAMS ((tree)); | |
4388 | extern void finish_template_decl PARAMS ((tree)); | |
4389 | extern tree finish_template_type PARAMS ((tree, tree, int)); | |
4390 | extern void enter_scope_of PARAMS ((tree)); | |
4391 | extern tree finish_base_specifier PARAMS ((tree, tree)); | |
4392 | extern void finish_member_declaration PARAMS ((tree)); | |
4393 | extern void check_multiple_declarators PARAMS ((void)); | |
4394 | extern tree finish_typeof PARAMS ((tree)); | |
4395 | extern void add_decl_stmt PARAMS ((tree)); | |
4396 | extern void finish_decl_cleanup PARAMS ((tree, tree)); | |
4397 | extern void finish_named_return_value PARAMS ((tree, tree)); | |
4398 | extern tree expand_stmt PARAMS ((tree)); | |
4399 | extern void expand_body PARAMS ((tree)); | |
4400 | extern void begin_stmt_tree PARAMS ((tree *)); | |
4401 | extern void finish_stmt_tree PARAMS ((tree *)); | |
4402 | extern void prep_stmt PARAMS ((tree)); | |
4403 | extern tree add_scope_stmt PARAMS ((int, int)); | |
4404 | extern void do_pushlevel PARAMS ((void)); | |
4405 | extern tree do_poplevel PARAMS ((void)); | |
558475f0 MM |
4406 | /* Non-zero if we are presently building a statement tree, rather |
4407 | than expanding each statement as we encounter it. */ | |
6f80451c | 4408 | #define building_stmt_tree() (last_tree != NULL_TREE) |
b4c4a9ec | 4409 | |
51c184be | 4410 | /* in spew.c */ |
158991b7 KG |
4411 | extern void init_spew PARAMS ((void)); |
4412 | extern int peekyylex PARAMS ((void)); | |
4413 | extern int yylex PARAMS ((void)); | |
4414 | extern tree arbitrate_lookup PARAMS ((tree, tree, tree)); | |
8d08fdba | 4415 | |
51c184be | 4416 | /* in tree.c */ |
158991b7 KG |
4417 | extern void init_tree PARAMS ((void)); |
4418 | extern int pod_type_p PARAMS ((tree)); | |
4419 | extern void unshare_base_binfos PARAMS ((tree)); | |
4420 | extern int member_p PARAMS ((tree)); | |
4421 | extern cp_lvalue_kind real_lvalue_p PARAMS ((tree)); | |
4422 | extern tree build_min PARAMS ((enum tree_code, tree, ...)); | |
4423 | extern tree build_min_nt PARAMS ((enum tree_code, ...)); | |
4424 | extern int lvalue_p PARAMS ((tree)); | |
4425 | extern int lvalue_or_else PARAMS ((tree, const char *)); | |
4426 | extern tree build_cplus_new PARAMS ((tree, tree)); | |
4427 | extern tree get_target_expr PARAMS ((tree)); | |
4428 | extern tree break_out_cleanups PARAMS ((tree)); | |
4429 | extern tree break_out_calls PARAMS ((tree)); | |
4430 | extern tree build_cplus_method_type PARAMS ((tree, tree, tree)); | |
4431 | extern tree build_cplus_staticfn_type PARAMS ((tree, tree, tree)); | |
4432 | extern tree build_cplus_array_type PARAMS ((tree, tree)); | |
4433 | extern tree hash_tree_cons PARAMS ((tree, tree, tree)); | |
4434 | extern tree hash_tree_chain PARAMS ((tree, tree)); | |
4435 | extern tree hash_chainon PARAMS ((tree, tree)); | |
4436 | extern tree make_binfo PARAMS ((tree, tree, tree, tree)); | |
4437 | extern tree binfo_value PARAMS ((tree, tree)); | |
4438 | extern tree reverse_path PARAMS ((tree)); | |
4439 | extern int count_functions PARAMS ((tree)); | |
4440 | extern int is_overloaded_fn PARAMS ((tree)); | |
4441 | extern tree get_first_fn PARAMS ((tree)); | |
4442 | extern int bound_pmf_p PARAMS ((tree)); | |
4443 | extern tree ovl_cons PARAMS ((tree, tree)); | |
4444 | extern int ovl_member PARAMS ((tree, tree)); | |
4445 | extern tree build_overload PARAMS ((tree, tree)); | |
4446 | extern tree fnaddr_from_vtable_entry PARAMS ((tree)); | |
4447 | extern tree function_arg_chain PARAMS ((tree)); | |
4448 | extern int promotes_to_aggr_type PARAMS ((tree, enum tree_code)); | |
4449 | extern int is_aggr_type_2 PARAMS ((tree, tree)); | |
4450 | extern const char *lang_printable_name PARAMS ((tree, int)); | |
4451 | extern tree build_exception_variant PARAMS ((tree, tree)); | |
4452 | extern tree copy_template_template_parm PARAMS ((tree)); | |
4453 | extern void print_lang_statistics PARAMS ((void)); | |
4454 | extern tree array_type_nelts_total PARAMS ((tree)); | |
4455 | extern tree array_type_nelts_top PARAMS ((tree)); | |
4456 | extern tree break_out_target_exprs PARAMS ((tree)); | |
4457 | extern tree get_type_decl PARAMS ((tree)); | |
4458 | extern tree vec_binfo_member PARAMS ((tree, tree)); | |
158991b7 KG |
4459 | extern tree decl_namespace_context PARAMS ((tree)); |
4460 | extern tree lvalue_type PARAMS ((tree)); | |
4461 | extern tree error_type PARAMS ((tree)); | |
4462 | extern tree build_ptr_wrapper PARAMS ((void *)); | |
4463 | extern tree build_expr_ptr_wrapper PARAMS ((void *)); | |
4464 | extern tree build_int_wrapper PARAMS ((int)); | |
4465 | extern tree build_srcloc_here PARAMS ((void)); | |
4466 | extern int varargs_function_p PARAMS ((tree)); | |
4467 | extern int really_overloaded_fn PARAMS ((tree)); | |
4468 | extern int cp_tree_equal PARAMS ((tree, tree)); | |
4469 | extern int can_free PARAMS ((struct obstack *, tree)); | |
4470 | extern tree no_linkage_check PARAMS ((tree)); | |
4471 | extern void debug_binfo PARAMS ((tree)); | |
4472 | extern tree build_dummy_object PARAMS ((tree)); | |
4473 | extern tree maybe_dummy_object PARAMS ((tree, tree *)); | |
4474 | extern int is_dummy_object PARAMS ((tree)); | |
4475 | typedef tree (*walk_tree_fn) PARAMS ((tree *, int *, void *)); | |
4476 | extern tree walk_tree PARAMS ((tree *, walk_tree_fn, void *)); | |
4477 | extern tree copy_tree_r PARAMS ((tree *, int *, void *)); | |
4478 | extern int cp_valid_lang_attribute PARAMS ((tree, tree, tree, tree)); | |
4479 | extern tree make_ptrmem_cst PARAMS ((tree, tree)); | |
4480 | extern tree cp_build_qualified_type_real PARAMS ((tree, int, int)); | |
4481 | extern void remap_save_expr PARAMS ((tree *, splay_tree, tree, int *)); | |
adecb3f4 MM |
4482 | #define cp_build_qualified_type(TYPE, QUALS) \ |
4483 | cp_build_qualified_type_real ((TYPE), (QUALS), /*complain=*/1) | |
158991b7 | 4484 | extern tree build_shared_int_cst PARAMS ((int)); |
51632249 | 4485 | |
51c184be | 4486 | /* in typeck.c */ |
158991b7 KG |
4487 | extern int string_conv_p PARAMS ((tree, tree, int)); |
4488 | extern tree condition_conversion PARAMS ((tree)); | |
4489 | extern tree target_type PARAMS ((tree)); | |
4490 | extern tree require_complete_type PARAMS ((tree)); | |
4491 | extern tree complete_type PARAMS ((tree)); | |
4492 | extern tree complete_type_or_else PARAMS ((tree, tree)); | |
4493 | extern int type_unknown_p PARAMS ((tree)); | |
158991b7 KG |
4494 | extern tree commonparms PARAMS ((tree, tree)); |
4495 | extern tree original_type PARAMS ((tree)); | |
4496 | extern tree common_type PARAMS ((tree, tree)); | |
4497 | extern int comp_except_specs PARAMS ((tree, tree, int)); | |
4498 | extern int comptypes PARAMS ((tree, tree, int)); | |
4499 | extern int comp_target_types PARAMS ((tree, tree, int)); | |
4500 | extern int compparms PARAMS ((tree, tree)); | |
4501 | extern int comp_target_types PARAMS ((tree, tree, int)); | |
4502 | extern int comp_cv_qualification PARAMS ((tree, tree)); | |
4503 | extern int comp_cv_qual_signature PARAMS ((tree, tree)); | |
4504 | extern tree unsigned_type PARAMS ((tree)); | |
4505 | extern tree signed_type PARAMS ((tree)); | |
4506 | extern tree signed_or_unsigned_type PARAMS ((int, tree)); | |
4507 | extern tree expr_sizeof PARAMS ((tree)); | |
4508 | extern tree c_sizeof PARAMS ((tree)); | |
4509 | extern tree c_sizeof_nowarn PARAMS ((tree)); | |
4510 | extern tree c_alignof PARAMS ((tree)); | |
4511 | extern tree inline_conversion PARAMS ((tree)); | |
4512 | extern tree decay_conversion PARAMS ((tree)); | |
4513 | extern tree default_conversion PARAMS ((tree)); | |
4514 | extern tree build_object_ref PARAMS ((tree, tree, tree)); | |
4515 | extern tree build_component_ref_1 PARAMS ((tree, tree, int)); | |
4516 | extern tree build_component_ref PARAMS ((tree, tree, tree, int)); | |
4517 | extern tree build_x_component_ref PARAMS ((tree, tree, tree, int)); | |
4518 | extern tree build_x_indirect_ref PARAMS ((tree, const char *)); | |
4519 | extern tree build_indirect_ref PARAMS ((tree, const char *)); | |
4520 | extern tree build_array_ref PARAMS ((tree, tree)); | |
4521 | extern tree build_x_function_call PARAMS ((tree, tree, tree)); | |
4522 | extern tree get_member_function_from_ptrfunc PARAMS ((tree *, tree)); | |
4523 | extern tree build_function_call_real PARAMS ((tree, tree, int, int)); | |
4524 | extern tree build_function_call PARAMS ((tree, tree)); | |
4525 | extern tree build_function_call_maybe PARAMS ((tree, tree)); | |
4526 | extern tree convert_arguments PARAMS ((tree, tree, tree, int)); | |
4527 | extern tree build_x_binary_op PARAMS ((enum tree_code, tree, tree)); | |
4528 | extern tree build_binary_op PARAMS ((enum tree_code, tree, tree)); | |
158991b7 KG |
4529 | extern tree build_x_unary_op PARAMS ((enum tree_code, tree)); |
4530 | extern tree build_unary_op PARAMS ((enum tree_code, tree, int)); | |
4531 | extern tree unary_complex_lvalue PARAMS ((enum tree_code, tree)); | |
4532 | extern int mark_addressable PARAMS ((tree)); | |
4533 | extern tree build_x_conditional_expr PARAMS ((tree, tree, tree)); | |
4534 | extern tree build_conditional_expr PARAMS ((tree, tree, tree)); | |
4535 | extern tree build_x_compound_expr PARAMS ((tree)); | |
4536 | extern tree build_compound_expr PARAMS ((tree)); | |
4537 | extern tree build_static_cast PARAMS ((tree, tree)); | |
4538 | extern tree build_reinterpret_cast PARAMS ((tree, tree)); | |
4539 | extern tree build_const_cast PARAMS ((tree, tree)); | |
4540 | extern tree build_c_cast PARAMS ((tree, tree)); | |
4541 | extern tree build_x_modify_expr PARAMS ((tree, enum tree_code, tree)); | |
4542 | extern tree build_modify_expr PARAMS ((tree, enum tree_code, tree)); | |
c3f08228 | 4543 | extern tree dubious_conversion_warnings PARAMS ((tree, tree, const char *, tree, int)); |
158991b7 KG |
4544 | extern tree convert_for_initialization PARAMS ((tree, tree, tree, int, const char *, tree, int)); |
4545 | extern void c_expand_asm_operands PARAMS ((tree, tree, tree, tree, int, char *, int)); | |
4546 | extern void c_expand_return PARAMS ((tree)); | |
4547 | extern tree c_expand_start_case PARAMS ((tree)); | |
4548 | extern int comp_ptr_ttypes PARAMS ((tree, tree)); | |
4549 | extern int ptr_reasonably_similar PARAMS ((tree, tree)); | |
4550 | extern tree build_ptrmemfunc PARAMS ((tree, tree, int)); | |
4551 | extern tree strip_array_types PARAMS ((tree)); | |
4552 | extern int cp_type_quals PARAMS ((tree)); | |
4553 | extern int cp_has_mutable_p PARAMS ((tree)); | |
4554 | extern int at_least_as_qualified_p PARAMS ((tree, tree)); | |
4555 | extern int more_qualified_p PARAMS ((tree, tree)); | |
4556 | extern tree build_ptrmemfunc1 PARAMS ((tree, tree, tree, tree, tree)); | |
4557 | extern void expand_ptrmemfunc_cst PARAMS ((tree, tree *, tree *, tree *, tree *)); | |
4558 | extern tree delta2_from_ptrmemfunc PARAMS ((tree)); | |
4559 | extern tree pfn_from_ptrmemfunc PARAMS ((tree)); | |
4560 | extern tree type_after_usual_arithmetic_conversions PARAMS ((tree, tree)); | |
4561 | extern tree composite_pointer_type PARAMS ((tree, tree, tree, tree, | |
9c0758dd | 4562 | const char*)); |
158991b7 | 4563 | extern tree check_return_expr PARAMS ((tree)); |
8d08fdba | 4564 | |
51c184be | 4565 | /* in typeck2.c */ |
158991b7 KG |
4566 | extern tree error_not_base_type PARAMS ((tree, tree)); |
4567 | extern tree binfo_or_else PARAMS ((tree, tree)); | |
4568 | extern void readonly_error PARAMS ((tree, const char *, int)); | |
4569 | extern int abstract_virtuals_error PARAMS ((tree, tree)); | |
4570 | extern void incomplete_type_error PARAMS ((tree, tree)); | |
4571 | extern void my_friendly_abort PARAMS ((int)) | |
b370501f | 4572 | ATTRIBUTE_NORETURN; |
158991b7 KG |
4573 | extern void my_friendly_assert PARAMS ((int, int)); |
4574 | extern tree store_init_value PARAMS ((tree, tree)); | |
4575 | extern tree digest_init PARAMS ((tree, tree, tree *)); | |
4576 | extern tree build_scoped_ref PARAMS ((tree, tree)); | |
4577 | extern tree build_x_arrow PARAMS ((tree)); | |
4578 | extern tree build_m_component_ref PARAMS ((tree, tree)); | |
4579 | extern tree build_functional_cast PARAMS ((tree, tree)); | |
4580 | extern char *enum_name_string PARAMS ((tree, tree)); | |
4581 | extern void report_case_error PARAMS ((int, tree, tree, tree)); | |
4582 | extern void check_for_new_type PARAMS ((const char *, flagged_type_tree)); | |
4583 | extern tree add_exception_specifier PARAMS ((tree, tree, int)); | |
8d08fdba | 4584 | |
51c184be | 4585 | /* in xref.c */ |
158991b7 KG |
4586 | extern void GNU_xref_begin PARAMS ((const char *)); |
4587 | extern void GNU_xref_end PARAMS ((int)); | |
4588 | extern void GNU_xref_file PARAMS ((const char *)); | |
4589 | extern void GNU_xref_start_scope PARAMS ((HOST_WIDE_INT)); | |
4590 | extern void GNU_xref_end_scope PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT, int, int)); | |
4591 | extern void GNU_xref_ref PARAMS ((tree, const char *)); | |
4592 | extern void GNU_xref_decl PARAMS ((tree, tree)); | |
4593 | extern void GNU_xref_call PARAMS ((tree, const char *)); | |
4594 | extern void GNU_xref_function PARAMS ((tree, tree)); | |
4595 | extern void GNU_xref_assign PARAMS ((tree)); | |
4596 | extern void GNU_xref_hier PARAMS ((tree, tree, int, int, int)); | |
4597 | extern void GNU_xref_member PARAMS ((tree, tree)); | |
8d08fdba | 4598 | |
f71f87f9 | 4599 | /* in dump.c */ |
158991b7 | 4600 | extern void dump_node_to_file PARAMS ((tree, const char *)); |
f71f87f9 | 4601 | |
8d08fdba MS |
4602 | /* -- end of C++ */ |
4603 | ||
4604 | #endif /* not _CP_TREE_H */ |