]>
Commit | Line | Data |
---|---|---|
1 | /* Definitions for C++ parsing and type checking. | |
2 | Copyright (C) 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, | |
3 | 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc. | |
4 | Contributed by Michael Tiemann (tiemann@cygnus.com) | |
5 | ||
6 | This file is part of GCC. | |
7 | ||
8 | GCC 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 | GCC 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 GCC; see the file COPYING. If not, write to | |
20 | the Free Software Foundation, 59 Temple Place - Suite 330, | |
21 | Boston, MA 02111-1307, USA. */ | |
22 | ||
23 | #ifndef GCC_CP_TREE_H | |
24 | #define GCC_CP_TREE_H | |
25 | ||
26 | #include "ggc.h" | |
27 | #include "function.h" | |
28 | #include "hashtab.h" | |
29 | #include "splay-tree.h" | |
30 | #include "vec.h" | |
31 | #include "varray.h" | |
32 | #include "c-common.h" | |
33 | #include "name-lookup.h" | |
34 | struct diagnostic_context; | |
35 | ||
36 | /* Usage of TREE_LANG_FLAG_?: | |
37 | 0: IDENTIFIER_MARKED (IDENTIFIER_NODEs) | |
38 | NEW_EXPR_USE_GLOBAL (in NEW_EXPR). | |
39 | DELETE_EXPR_USE_GLOBAL (in DELETE_EXPR). | |
40 | COMPOUND_EXPR_OVERLOADED (in COMPOUND_EXPR). | |
41 | TREE_INDIRECT_USING (in NAMESPACE_DECL). | |
42 | ICS_USER_FLAG (in _CONV) | |
43 | CLEANUP_P (in TRY_BLOCK) | |
44 | AGGR_INIT_VIA_CTOR_P (in AGGR_INIT_EXPR) | |
45 | PTRMEM_OK_P (in ADDR_EXPR, OFFSET_REF) | |
46 | DECL_PRETTY_FUNCTION_P (in VAR_DECL) | |
47 | KOENIG_LOOKUP_P (in CALL_EXPR) | |
48 | STATEMENT_LIST_NO_SCOPE (in STATEMENT_LIST). | |
49 | EXPR_STMT_STMT_EXPR_RESULT (in EXPR_STMT) | |
50 | BIND_EXPR_TRY_BLOCK (in BIND_EXPR) | |
51 | 1: IDENTIFIER_VIRTUAL_P. | |
52 | TI_PENDING_TEMPLATE_FLAG. | |
53 | TEMPLATE_PARMS_FOR_INLINE. | |
54 | DELETE_EXPR_USE_VEC (in DELETE_EXPR). | |
55 | (TREE_CALLS_NEW) (in _EXPR or _REF) (commented-out). | |
56 | TYPE_BASE_CONVS_MAY_REQUIRE_CODE_P (in _TYPE). | |
57 | ICS_ELLIPSIS_FLAG (in _CONV) | |
58 | DECL_INITIALIZED_P (in VAR_DECL) | |
59 | 2: IDENTIFIER_OPNAME_P. | |
60 | TYPE_POLYMORPHIC_P (in _TYPE) | |
61 | ICS_THIS_FLAG (in _CONV) | |
62 | DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (in VAR_DECL) | |
63 | STATEMENT_LIST_TRY_BLOCK (in STATEMENT_LIST) | |
64 | 3: TYPE_USES_VIRTUAL_BASECLASSES (in a class TYPE). | |
65 | (TREE_REFERENCE_EXPR) (in NON_LVALUE_EXPR) (commented-out). | |
66 | ICS_BAD_FLAG (in _CONV) | |
67 | FN_TRY_BLOCK_P (in TRY_BLOCK) | |
68 | IDENTIFIER_CTOR_OR_DTOR_P (in IDENTIFIER_NODE) | |
69 | BIND_EXPR_BODY_BLOCK (in BIND_EXPR) | |
70 | 4: TREE_HAS_CONSTRUCTOR (in INDIRECT_REF, SAVE_EXPR, CONSTRUCTOR, | |
71 | or FIELD_DECL). | |
72 | IDENTIFIER_TYPENAME_P (in IDENTIFIER_NODE) | |
73 | 5: C_IS_RESERVED_WORD (in IDENTIFIER_NODE) | |
74 | DECL_VTABLE_OR_VTT_P (in VAR_DECL) | |
75 | 6: For future expansion | |
76 | ||
77 | Usage of TYPE_LANG_FLAG_?: | |
78 | 0: TYPE_DEPENDENT_P | |
79 | 1: TYPE_HAS_CONSTRUCTOR. | |
80 | 2: TYPE_HAS_DESTRUCTOR. | |
81 | 3: TYPE_FOR_JAVA. | |
82 | 4: TYPE_HAS_NONTRIVIAL_DESTRUCTOR | |
83 | 5: IS_AGGR_TYPE. | |
84 | 6: TYPE_DEPENDENT_P_VALID | |
85 | ||
86 | Usage of DECL_LANG_FLAG_?: | |
87 | 0: DECL_ERROR_REPORTED (in VAR_DECL). | |
88 | DECL_TEMPLATE_PARM_P (in PARM_DECL, CONST_DECL, TYPE_DECL, or TEMPLATE_DECL) | |
89 | DECL_LOCAL_FUNCTION_P (in FUNCTION_DECL) | |
90 | DECL_MUTABLE_P (in FIELD_DECL) | |
91 | 1: C_TYPEDEF_EXPLICITLY_SIGNED (in TYPE_DECL). | |
92 | DECL_TEMPLATE_INSTANTIATED (in a VAR_DECL or a FUNCTION_DECL) | |
93 | 2: DECL_THIS_EXTERN (in VAR_DECL or FUNCTION_DECL). | |
94 | DECL_IMPLICIT_TYPEDEF_P (in a TYPE_DECL) | |
95 | 3: DECL_IN_AGGR_P. | |
96 | 4: DECL_C_BIT_FIELD (in a FIELD_DECL) | |
97 | DECL_VAR_MARKED_P (in a VAR_DECL) | |
98 | DECL_SELF_REFERENCE_P (in a TYPE_DECL) | |
99 | DECL_INVALID_OVERRIDER_P (in a FUNCTION_DECL) | |
100 | 5: DECL_INTERFACE_KNOWN. | |
101 | 6: DECL_THIS_STATIC (in VAR_DECL or FUNCTION_DECL). | |
102 | 7: DECL_DEAD_FOR_LOCAL (in VAR_DECL). | |
103 | DECL_THUNK_P (in a member FUNCTION_DECL) | |
104 | ||
105 | Usage of language-independent fields in a language-dependent manner: | |
106 | ||
107 | TYPE_ALIAS_SET | |
108 | This field is used by TYPENAME_TYPEs, TEMPLATE_TYPE_PARMs, and so | |
109 | forth as a substitute for the mark bits provided in `lang_type'. | |
110 | At present, only the six low-order bits are used. | |
111 | ||
112 | TYPE_LANG_SLOT_1 | |
113 | For an ENUMERAL_TYPE, this is ENUM_TEMPLATE_INFO. | |
114 | For a FUNCTION_TYPE or METHOD_TYPE, this is TYPE_RAISES_EXCEPTIONS | |
115 | ||
116 | BINFO_VIRTUALS | |
117 | For a binfo, this is a TREE_LIST. There is an entry for each | |
118 | virtual function declared either in BINFO or its direct and | |
119 | indirect primary bases. | |
120 | ||
121 | The BV_DELTA of each node gives the amount by which to adjust the | |
122 | `this' pointer when calling the function. If the method is an | |
123 | overridden version of a base class method, then it is assumed | |
124 | that, prior to adjustment, the this pointer points to an object | |
125 | of the base class. | |
126 | ||
127 | The BV_VCALL_INDEX of each node, if non-NULL, gives the vtable | |
128 | index of the vcall offset for this entry. | |
129 | ||
130 | The BV_FN is the declaration for the virtual function itself. | |
131 | ||
132 | BINFO_VTABLE | |
133 | This is an expression with POINTER_TYPE that gives the value | |
134 | to which the vptr should be initialized. Use get_vtbl_decl_for_binfo | |
135 | to extract the VAR_DECL for the complete vtable. | |
136 | ||
137 | DECL_ARGUMENTS | |
138 | For a VAR_DECL this is DECL_ANON_UNION_ELEMS. | |
139 | ||
140 | DECL_VINDEX | |
141 | This field is NULL for a non-virtual function. For a virtual | |
142 | function, it is eventually set to an INTEGER_CST indicating the | |
143 | index in the vtable at which this function can be found. When | |
144 | a virtual function is declared, but before it is known what | |
145 | function is overridden, this field is the error_mark_node. | |
146 | ||
147 | Temporarily, it may be set to a TREE_LIST whose TREE_VALUE is | |
148 | the virtual function this one overrides, and whose TREE_CHAIN is | |
149 | the old DECL_VINDEX. */ | |
150 | ||
151 | /* Language-specific tree checkers. */ | |
152 | ||
153 | #define VAR_OR_FUNCTION_DECL_CHECK(NODE) \ | |
154 | TREE_CHECK2(NODE,VAR_DECL,FUNCTION_DECL) | |
155 | ||
156 | #define VAR_FUNCTION_OR_PARM_DECL_CHECK(NODE) \ | |
157 | TREE_CHECK3(NODE,VAR_DECL,FUNCTION_DECL,PARM_DECL) | |
158 | ||
159 | #define VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK(NODE) \ | |
160 | TREE_CHECK4(NODE,VAR_DECL,FUNCTION_DECL,TYPE_DECL,TEMPLATE_DECL) | |
161 | ||
162 | #define BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK(NODE) \ | |
163 | TREE_CHECK(NODE,BOUND_TEMPLATE_TEMPLATE_PARM) | |
164 | ||
165 | \f | |
166 | /* Language-dependent contents of an identifier. */ | |
167 | ||
168 | struct lang_identifier GTY(()) | |
169 | { | |
170 | struct c_common_identifier c_common; | |
171 | cxx_binding *namespace_bindings; | |
172 | cxx_binding *bindings; | |
173 | tree class_template_info; | |
174 | tree label_value; | |
175 | }; | |
176 | ||
177 | /* In an IDENTIFIER_NODE, nonzero if this identifier is actually a | |
178 | keyword. C_RID_CODE (node) is then the RID_* value of the keyword, | |
179 | and C_RID_YYCODE is the token number wanted by Yacc. */ | |
180 | ||
181 | #define C_IS_RESERVED_WORD(ID) TREE_LANG_FLAG_5 (ID) | |
182 | ||
183 | #define LANG_IDENTIFIER_CAST(NODE) \ | |
184 | ((struct lang_identifier*)IDENTIFIER_NODE_CHECK (NODE)) | |
185 | ||
186 | typedef struct template_parm_index_s GTY(()) | |
187 | { | |
188 | struct tree_common common; | |
189 | HOST_WIDE_INT index; | |
190 | HOST_WIDE_INT level; | |
191 | HOST_WIDE_INT orig_level; | |
192 | tree decl; | |
193 | } template_parm_index; | |
194 | ||
195 | struct ptrmem_cst GTY(()) | |
196 | { | |
197 | struct tree_common common; | |
198 | /* This isn't used, but the middle-end expects all constants to have | |
199 | this field. */ | |
200 | rtx rtl; | |
201 | tree member; | |
202 | }; | |
203 | typedef struct ptrmem_cst * ptrmem_cst_t; | |
204 | ||
205 | #define IDENTIFIER_GLOBAL_VALUE(NODE) \ | |
206 | namespace_binding ((NODE), global_namespace) | |
207 | #define SET_IDENTIFIER_GLOBAL_VALUE(NODE, VAL) \ | |
208 | set_namespace_binding ((NODE), global_namespace, (VAL)) | |
209 | #define IDENTIFIER_NAMESPACE_VALUE(NODE) \ | |
210 | namespace_binding ((NODE), current_namespace) | |
211 | #define SET_IDENTIFIER_NAMESPACE_VALUE(NODE, VAL) \ | |
212 | set_namespace_binding ((NODE), current_namespace, (VAL)) | |
213 | ||
214 | #define CLEANUP_P(NODE) TREE_LANG_FLAG_0 (TRY_BLOCK_CHECK (NODE)) | |
215 | ||
216 | #define BIND_EXPR_TRY_BLOCK(NODE) \ | |
217 | TREE_LANG_FLAG_0 (BIND_EXPR_CHECK (NODE)) | |
218 | ||
219 | /* Used to mark the block around the member initializers and cleanups. */ | |
220 | #define BIND_EXPR_BODY_BLOCK(NODE) \ | |
221 | TREE_LANG_FLAG_3 (BIND_EXPR_CHECK (NODE)) | |
222 | ||
223 | #define STATEMENT_LIST_NO_SCOPE(NODE) \ | |
224 | TREE_LANG_FLAG_0 (STATEMENT_LIST_CHECK (NODE)) | |
225 | #define STATEMENT_LIST_TRY_BLOCK(NODE) \ | |
226 | TREE_LANG_FLAG_2 (STATEMENT_LIST_CHECK (NODE)) | |
227 | ||
228 | /* Marks the result of a statement expression. */ | |
229 | #define EXPR_STMT_STMT_EXPR_RESULT(NODE) \ | |
230 | TREE_LANG_FLAG_0 (EXPR_STMT_CHECK (NODE)) | |
231 | ||
232 | /* Returns nonzero iff TYPE1 and TYPE2 are the same type, in the usual | |
233 | sense of `same'. */ | |
234 | #define same_type_p(TYPE1, TYPE2) \ | |
235 | comptypes ((TYPE1), (TYPE2), COMPARE_STRICT) | |
236 | ||
237 | /* Returns nonzero iff TYPE1 and TYPE2 are the same type, ignoring | |
238 | top-level qualifiers. */ | |
239 | #define same_type_ignoring_top_level_qualifiers_p(TYPE1, TYPE2) \ | |
240 | same_type_p (TYPE_MAIN_VARIANT (TYPE1), TYPE_MAIN_VARIANT (TYPE2)) | |
241 | ||
242 | /* Nonzero if we are presently building a statement tree, rather | |
243 | than expanding each statement as we encounter it. */ | |
244 | #define building_stmt_tree() (cur_stmt_list != NULL_TREE) | |
245 | ||
246 | /* Returns nonzero iff NODE is a declaration for the global function | |
247 | `main'. */ | |
248 | #define DECL_MAIN_P(NODE) \ | |
249 | (DECL_EXTERN_C_FUNCTION_P (NODE) \ | |
250 | && DECL_NAME (NODE) != NULL_TREE \ | |
251 | && MAIN_NAME_P (DECL_NAME (NODE))) | |
252 | ||
253 | /* The overloaded FUNCTION_DECL. */ | |
254 | #define OVL_FUNCTION(NODE) \ | |
255 | (((struct tree_overload*)OVERLOAD_CHECK (NODE))->function) | |
256 | #define OVL_CHAIN(NODE) TREE_CHAIN (NODE) | |
257 | /* Polymorphic access to FUNCTION and CHAIN. */ | |
258 | #define OVL_CURRENT(NODE) \ | |
259 | ((TREE_CODE (NODE) == OVERLOAD) ? OVL_FUNCTION (NODE) : (NODE)) | |
260 | #define OVL_NEXT(NODE) \ | |
261 | ((TREE_CODE (NODE) == OVERLOAD) ? TREE_CHAIN (NODE) : NULL_TREE) | |
262 | /* If set, this was imported in a using declaration. | |
263 | This is not to confuse with being used somewhere, which | |
264 | is not important for this node. */ | |
265 | #define OVL_USED(NODE) TREE_USED (NODE) | |
266 | ||
267 | struct tree_overload GTY(()) | |
268 | { | |
269 | struct tree_common common; | |
270 | tree function; | |
271 | }; | |
272 | ||
273 | /* Returns true iff NODE is a BASELINK. */ | |
274 | #define BASELINK_P(NODE) \ | |
275 | (TREE_CODE (NODE) == BASELINK) | |
276 | /* The BINFO indicating the base from which the BASELINK_FUNCTIONS came. */ | |
277 | #define BASELINK_BINFO(NODE) \ | |
278 | (((struct tree_baselink*) BASELINK_CHECK (NODE))->binfo) | |
279 | /* The functions referred to by the BASELINK; either a FUNCTION_DECL, | |
280 | a TEMPLATE_DECL, an OVERLOAD, or a TEMPLATE_ID_EXPR. */ | |
281 | #define BASELINK_FUNCTIONS(NODE) \ | |
282 | (((struct tree_baselink*) BASELINK_CHECK (NODE))->functions) | |
283 | /* The BINFO in which the search for the functions indicated by this baselink | |
284 | began. This base is used to determine the accessibility of functions | |
285 | selected by overload resolution. */ | |
286 | #define BASELINK_ACCESS_BINFO(NODE) \ | |
287 | (((struct tree_baselink*) BASELINK_CHECK (NODE))->access_binfo) | |
288 | /* For a type-conversion operator, the BASELINK_OPTYPE indicates the type | |
289 | to which the conversion should occur. This value is important if | |
290 | the BASELINK_FUNCTIONS include a template conversion operator -- | |
291 | the BASELINK_OPTYPE can be used to determine what type the user | |
292 | requested. */ | |
293 | #define BASELINK_OPTYPE(NODE) \ | |
294 | (TREE_CHAIN (BASELINK_CHECK (NODE))) | |
295 | ||
296 | struct tree_baselink GTY(()) | |
297 | { | |
298 | struct tree_common common; | |
299 | tree binfo; | |
300 | tree functions; | |
301 | tree access_binfo; | |
302 | }; | |
303 | ||
304 | /* The different kinds of ids that we ecounter. */ | |
305 | ||
306 | typedef enum cp_id_kind | |
307 | { | |
308 | /* Not an id at all. */ | |
309 | CP_ID_KIND_NONE, | |
310 | /* An unqualified-id that is not a template-id. */ | |
311 | CP_ID_KIND_UNQUALIFIED, | |
312 | /* An unqualified-id that is a dependent name. */ | |
313 | CP_ID_KIND_UNQUALIFIED_DEPENDENT, | |
314 | /* An unqualified template-id. */ | |
315 | CP_ID_KIND_TEMPLATE_ID, | |
316 | /* A qualified-id. */ | |
317 | CP_ID_KIND_QUALIFIED | |
318 | } cp_id_kind; | |
319 | ||
320 | /* Macros for access to language-specific slots in an identifier. */ | |
321 | ||
322 | #define IDENTIFIER_NAMESPACE_BINDINGS(NODE) \ | |
323 | (LANG_IDENTIFIER_CAST (NODE)->namespace_bindings) | |
324 | #define IDENTIFIER_TEMPLATE(NODE) \ | |
325 | (LANG_IDENTIFIER_CAST (NODE)->class_template_info) | |
326 | ||
327 | /* The IDENTIFIER_BINDING is the innermost cxx_binding for the | |
328 | identifier. It's PREVIOUS is the next outermost binding. Each | |
329 | VALUE field is a DECL for the associated declaration. Thus, | |
330 | name lookup consists simply of pulling off the node at the front | |
331 | of the list (modulo oddities for looking up the names of types, | |
332 | and such.) You can use SCOPE field to determine the scope | |
333 | that bound the name. */ | |
334 | #define IDENTIFIER_BINDING(NODE) \ | |
335 | (LANG_IDENTIFIER_CAST (NODE)->bindings) | |
336 | ||
337 | /* TREE_TYPE only indicates on local and class scope the current | |
338 | type. For namespace scope, the presence of a type in any namespace | |
339 | is indicated with global_type_node, and the real type behind must | |
340 | be found through lookup. */ | |
341 | #define IDENTIFIER_TYPE_VALUE(NODE) identifier_type_value (NODE) | |
342 | #define REAL_IDENTIFIER_TYPE_VALUE(NODE) TREE_TYPE (NODE) | |
343 | #define SET_IDENTIFIER_TYPE_VALUE(NODE,TYPE) (TREE_TYPE (NODE) = (TYPE)) | |
344 | #define IDENTIFIER_HAS_TYPE_VALUE(NODE) (IDENTIFIER_TYPE_VALUE (NODE) ? 1 : 0) | |
345 | ||
346 | #define IDENTIFIER_LABEL_VALUE(NODE) \ | |
347 | (LANG_IDENTIFIER_CAST (NODE)->label_value) | |
348 | #define SET_IDENTIFIER_LABEL_VALUE(NODE, VALUE) \ | |
349 | IDENTIFIER_LABEL_VALUE (NODE) = (VALUE) | |
350 | ||
351 | /* Nonzero if this identifier is used as a virtual function name somewhere | |
352 | (optimizes searches). */ | |
353 | #define IDENTIFIER_VIRTUAL_P(NODE) TREE_LANG_FLAG_1 (NODE) | |
354 | ||
355 | /* Nonzero if this identifier is the prefix for a mangled C++ operator | |
356 | name. */ | |
357 | #define IDENTIFIER_OPNAME_P(NODE) TREE_LANG_FLAG_2 (NODE) | |
358 | ||
359 | /* Nonzero if this identifier is the name of a type-conversion | |
360 | operator. */ | |
361 | #define IDENTIFIER_TYPENAME_P(NODE) \ | |
362 | TREE_LANG_FLAG_4 (NODE) | |
363 | ||
364 | /* Nonzero if this identifier is the name of a constructor or | |
365 | destructor. */ | |
366 | #define IDENTIFIER_CTOR_OR_DTOR_P(NODE) \ | |
367 | TREE_LANG_FLAG_3 (NODE) | |
368 | ||
369 | /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only. */ | |
370 | #define C_TYPE_FIELDS_READONLY(TYPE) \ | |
371 | (LANG_TYPE_CLASS_CHECK (TYPE)->fields_readonly) | |
372 | ||
373 | /* The tokens stored in the default argument. */ | |
374 | ||
375 | #define DEFARG_TOKENS(NODE) \ | |
376 | (((struct tree_default_arg *)DEFAULT_ARG_CHECK (NODE))->tokens) | |
377 | ||
378 | struct tree_default_arg GTY (()) | |
379 | { | |
380 | struct tree_common common; | |
381 | struct cp_token_cache *tokens; | |
382 | }; | |
383 | ||
384 | enum cp_tree_node_structure_enum { | |
385 | TS_CP_GENERIC, | |
386 | TS_CP_IDENTIFIER, | |
387 | TS_CP_TPI, | |
388 | TS_CP_PTRMEM, | |
389 | TS_CP_BINDING, | |
390 | TS_CP_OVERLOAD, | |
391 | TS_CP_BASELINK, | |
392 | TS_CP_WRAPPER, | |
393 | TS_CP_DEFAULT_ARG, | |
394 | LAST_TS_CP_ENUM | |
395 | }; | |
396 | ||
397 | /* The resulting tree type. */ | |
398 | union lang_tree_node GTY((desc ("cp_tree_node_structure (&%h)"), | |
399 | chain_next ("(union lang_tree_node *)TREE_CHAIN (&%h.generic)"))) | |
400 | { | |
401 | union tree_node GTY ((tag ("TS_CP_GENERIC"), | |
402 | desc ("tree_node_structure (&%h)"))) generic; | |
403 | struct template_parm_index_s GTY ((tag ("TS_CP_TPI"))) tpi; | |
404 | struct ptrmem_cst GTY ((tag ("TS_CP_PTRMEM"))) ptrmem; | |
405 | struct tree_overload GTY ((tag ("TS_CP_OVERLOAD"))) overload; | |
406 | struct tree_baselink GTY ((tag ("TS_CP_BASELINK"))) baselink; | |
407 | struct tree_default_arg GTY ((tag ("TS_CP_DEFAULT_ARG"))) default_arg; | |
408 | struct lang_identifier GTY ((tag ("TS_CP_IDENTIFIER"))) identifier; | |
409 | }; | |
410 | ||
411 | \f | |
412 | enum cp_tree_index | |
413 | { | |
414 | CPTI_JAVA_BYTE_TYPE, | |
415 | CPTI_JAVA_SHORT_TYPE, | |
416 | CPTI_JAVA_INT_TYPE, | |
417 | CPTI_JAVA_LONG_TYPE, | |
418 | CPTI_JAVA_FLOAT_TYPE, | |
419 | CPTI_JAVA_DOUBLE_TYPE, | |
420 | CPTI_JAVA_CHAR_TYPE, | |
421 | CPTI_JAVA_BOOLEAN_TYPE, | |
422 | ||
423 | CPTI_WCHAR_DECL, | |
424 | CPTI_VTABLE_ENTRY_TYPE, | |
425 | CPTI_DELTA_TYPE, | |
426 | CPTI_VTABLE_INDEX_TYPE, | |
427 | CPTI_CLEANUP_TYPE, | |
428 | CPTI_VTT_PARM_TYPE, | |
429 | ||
430 | CPTI_TI_DESC_TYPE, | |
431 | CPTI_BLTN_DESC_TYPE, | |
432 | CPTI_PTR_DESC_TYPE, | |
433 | CPTI_ARY_DESC_TYPE, | |
434 | CPTI_FUNC_DESC_TYPE, | |
435 | CPTI_ENUM_DESC_TYPE, | |
436 | CPTI_CLASS_DESC_TYPE, | |
437 | CPTI_SI_CLASS_DESC_TYPE, | |
438 | CPTI_VMI_CLASS_DESC_TYPE, | |
439 | CPTI_PTM_DESC_TYPE, | |
440 | CPTI_BASE_DESC_TYPE, | |
441 | ||
442 | CPTI_CLASS_TYPE, | |
443 | CPTI_UNKNOWN_TYPE, | |
444 | CPTI_VTBL_TYPE, | |
445 | CPTI_VTBL_PTR_TYPE, | |
446 | CPTI_STD, | |
447 | CPTI_ABI, | |
448 | CPTI_TYPE_INFO_TYPE, | |
449 | CPTI_TYPE_INFO_PTR_TYPE, | |
450 | CPTI_TYPE_INFO_REF_TYPE, | |
451 | CPTI_ABORT_FNDECL, | |
452 | CPTI_GLOBAL_DELETE_FNDECL, | |
453 | CPTI_AGGR_TAG, | |
454 | ||
455 | CPTI_CTOR_IDENTIFIER, | |
456 | CPTI_COMPLETE_CTOR_IDENTIFIER, | |
457 | CPTI_BASE_CTOR_IDENTIFIER, | |
458 | CPTI_DTOR_IDENTIFIER, | |
459 | CPTI_COMPLETE_DTOR_IDENTIFIER, | |
460 | CPTI_BASE_DTOR_IDENTIFIER, | |
461 | CPTI_DELETING_DTOR_IDENTIFIER, | |
462 | CPTI_DELTA_IDENTIFIER, | |
463 | CPTI_IN_CHARGE_IDENTIFIER, | |
464 | CPTI_VTT_PARM_IDENTIFIER, | |
465 | CPTI_NELTS_IDENTIFIER, | |
466 | CPTI_THIS_IDENTIFIER, | |
467 | CPTI_PFN_IDENTIFIER, | |
468 | CPTI_VPTR_IDENTIFIER, | |
469 | CPTI_STD_IDENTIFIER, | |
470 | ||
471 | CPTI_LANG_NAME_C, | |
472 | CPTI_LANG_NAME_CPLUSPLUS, | |
473 | CPTI_LANG_NAME_JAVA, | |
474 | ||
475 | CPTI_EMPTY_EXCEPT_SPEC, | |
476 | CPTI_NULL, | |
477 | CPTI_JCLASS, | |
478 | CPTI_TERMINATE, | |
479 | CPTI_CALL_UNEXPECTED, | |
480 | CPTI_ATEXIT, | |
481 | CPTI_DSO_HANDLE, | |
482 | CPTI_DCAST, | |
483 | ||
484 | CPTI_KEYED_CLASSES, | |
485 | ||
486 | CPTI_MAX | |
487 | }; | |
488 | ||
489 | extern GTY(()) tree cp_global_trees[CPTI_MAX]; | |
490 | ||
491 | #define java_byte_type_node cp_global_trees[CPTI_JAVA_BYTE_TYPE] | |
492 | #define java_short_type_node cp_global_trees[CPTI_JAVA_SHORT_TYPE] | |
493 | #define java_int_type_node cp_global_trees[CPTI_JAVA_INT_TYPE] | |
494 | #define java_long_type_node cp_global_trees[CPTI_JAVA_LONG_TYPE] | |
495 | #define java_float_type_node cp_global_trees[CPTI_JAVA_FLOAT_TYPE] | |
496 | #define java_double_type_node cp_global_trees[CPTI_JAVA_DOUBLE_TYPE] | |
497 | #define java_char_type_node cp_global_trees[CPTI_JAVA_CHAR_TYPE] | |
498 | #define java_boolean_type_node cp_global_trees[CPTI_JAVA_BOOLEAN_TYPE] | |
499 | ||
500 | #define wchar_decl_node cp_global_trees[CPTI_WCHAR_DECL] | |
501 | #define vtable_entry_type cp_global_trees[CPTI_VTABLE_ENTRY_TYPE] | |
502 | /* The type used to represent an offset by which to adjust the `this' | |
503 | pointer in pointer-to-member types. */ | |
504 | #define delta_type_node cp_global_trees[CPTI_DELTA_TYPE] | |
505 | /* The type used to represent an index into the vtable. */ | |
506 | #define vtable_index_type cp_global_trees[CPTI_VTABLE_INDEX_TYPE] | |
507 | ||
508 | #define ti_desc_type_node cp_global_trees[CPTI_TI_DESC_TYPE] | |
509 | #define bltn_desc_type_node cp_global_trees[CPTI_BLTN_DESC_TYPE] | |
510 | #define ptr_desc_type_node cp_global_trees[CPTI_PTR_DESC_TYPE] | |
511 | #define ary_desc_type_node cp_global_trees[CPTI_ARY_DESC_TYPE] | |
512 | #define func_desc_type_node cp_global_trees[CPTI_FUNC_DESC_TYPE] | |
513 | #define enum_desc_type_node cp_global_trees[CPTI_ENUM_DESC_TYPE] | |
514 | #define class_desc_type_node cp_global_trees[CPTI_CLASS_DESC_TYPE] | |
515 | #define si_class_desc_type_node cp_global_trees[CPTI_SI_CLASS_DESC_TYPE] | |
516 | #define vmi_class_desc_type_node cp_global_trees[CPTI_VMI_CLASS_DESC_TYPE] | |
517 | #define ptm_desc_type_node cp_global_trees[CPTI_PTM_DESC_TYPE] | |
518 | #define base_desc_type_node cp_global_trees[CPTI_BASE_DESC_TYPE] | |
519 | ||
520 | #define class_type_node cp_global_trees[CPTI_CLASS_TYPE] | |
521 | #define unknown_type_node cp_global_trees[CPTI_UNKNOWN_TYPE] | |
522 | #define vtbl_type_node cp_global_trees[CPTI_VTBL_TYPE] | |
523 | #define vtbl_ptr_type_node cp_global_trees[CPTI_VTBL_PTR_TYPE] | |
524 | #define std_node cp_global_trees[CPTI_STD] | |
525 | #define abi_node cp_global_trees[CPTI_ABI] | |
526 | #define type_info_type_node cp_global_trees[CPTI_TYPE_INFO_TYPE] | |
527 | #define type_info_ptr_type cp_global_trees[CPTI_TYPE_INFO_PTR_TYPE] | |
528 | #define type_info_ref_type cp_global_trees[CPTI_TYPE_INFO_REF_TYPE] | |
529 | #define abort_fndecl cp_global_trees[CPTI_ABORT_FNDECL] | |
530 | #define global_delete_fndecl cp_global_trees[CPTI_GLOBAL_DELETE_FNDECL] | |
531 | #define current_aggr cp_global_trees[CPTI_AGGR_TAG] | |
532 | ||
533 | /* We cache these tree nodes so as to call get_identifier less | |
534 | frequently. */ | |
535 | ||
536 | /* The name of a constructor that takes an in-charge parameter to | |
537 | decide whether or not to construct virtual base classes. */ | |
538 | #define ctor_identifier cp_global_trees[CPTI_CTOR_IDENTIFIER] | |
539 | /* The name of a constructor that constructs virtual base classes. */ | |
540 | #define complete_ctor_identifier cp_global_trees[CPTI_COMPLETE_CTOR_IDENTIFIER] | |
541 | /* The name of a constructor that does not construct virtual base classes. */ | |
542 | #define base_ctor_identifier cp_global_trees[CPTI_BASE_CTOR_IDENTIFIER] | |
543 | /* The name of a destructor that takes an in-charge parameter to | |
544 | decide whether or not to destroy virtual base classes and whether | |
545 | or not to delete the object. */ | |
546 | #define dtor_identifier cp_global_trees[CPTI_DTOR_IDENTIFIER] | |
547 | /* The name of a destructor that destroys virtual base classes. */ | |
548 | #define complete_dtor_identifier cp_global_trees[CPTI_COMPLETE_DTOR_IDENTIFIER] | |
549 | /* The name of a destructor that does not destroy virtual base | |
550 | classes. */ | |
551 | #define base_dtor_identifier cp_global_trees[CPTI_BASE_DTOR_IDENTIFIER] | |
552 | /* The name of a destructor that destroys virtual base classes, and | |
553 | then deletes the entire object. */ | |
554 | #define deleting_dtor_identifier cp_global_trees[CPTI_DELETING_DTOR_IDENTIFIER] | |
555 | #define delta_identifier cp_global_trees[CPTI_DELTA_IDENTIFIER] | |
556 | #define in_charge_identifier cp_global_trees[CPTI_IN_CHARGE_IDENTIFIER] | |
557 | /* The name of the parameter that contains a pointer to the VTT to use | |
558 | for this subobject constructor or destructor. */ | |
559 | #define vtt_parm_identifier cp_global_trees[CPTI_VTT_PARM_IDENTIFIER] | |
560 | #define nelts_identifier cp_global_trees[CPTI_NELTS_IDENTIFIER] | |
561 | #define this_identifier cp_global_trees[CPTI_THIS_IDENTIFIER] | |
562 | #define pfn_identifier cp_global_trees[CPTI_PFN_IDENTIFIER] | |
563 | #define vptr_identifier cp_global_trees[CPTI_VPTR_IDENTIFIER] | |
564 | /* The name of the std namespace. */ | |
565 | #define std_identifier cp_global_trees[CPTI_STD_IDENTIFIER] | |
566 | #define lang_name_c cp_global_trees[CPTI_LANG_NAME_C] | |
567 | #define lang_name_cplusplus cp_global_trees[CPTI_LANG_NAME_CPLUSPLUS] | |
568 | #define lang_name_java cp_global_trees[CPTI_LANG_NAME_JAVA] | |
569 | ||
570 | /* Exception specifier used for throw(). */ | |
571 | #define empty_except_spec cp_global_trees[CPTI_EMPTY_EXCEPT_SPEC] | |
572 | ||
573 | /* The node for `__null'. */ | |
574 | #define null_node cp_global_trees[CPTI_NULL] | |
575 | ||
576 | /* If non-NULL, a POINTER_TYPE equivalent to (java::lang::Class*). */ | |
577 | #define jclass_node cp_global_trees[CPTI_JCLASS] | |
578 | ||
579 | /* The declaration for `std::terminate'. */ | |
580 | #define terminate_node cp_global_trees[CPTI_TERMINATE] | |
581 | ||
582 | /* The declaration for "__cxa_call_unexpected". */ | |
583 | #define call_unexpected_node cp_global_trees[CPTI_CALL_UNEXPECTED] | |
584 | ||
585 | /* A pointer to `std::atexit'. */ | |
586 | #define atexit_node cp_global_trees[CPTI_ATEXIT] | |
587 | ||
588 | /* A pointer to `__dso_handle'. */ | |
589 | #define dso_handle_node cp_global_trees[CPTI_DSO_HANDLE] | |
590 | ||
591 | /* The declaration of the dynamic_cast runtime. */ | |
592 | #define dynamic_cast_node cp_global_trees[CPTI_DCAST] | |
593 | ||
594 | /* The type of a destructor. */ | |
595 | #define cleanup_type cp_global_trees[CPTI_CLEANUP_TYPE] | |
596 | ||
597 | /* The type of the vtt parameter passed to subobject constructors and | |
598 | destructors. */ | |
599 | #define vtt_parm_type cp_global_trees[CPTI_VTT_PARM_TYPE] | |
600 | ||
601 | /* A TREE_LIST of the dynamic classes whose vtables may have to be | |
602 | emitted in this translation unit. */ | |
603 | ||
604 | #define keyed_classes cp_global_trees[CPTI_KEYED_CLASSES] | |
605 | ||
606 | /* Node to indicate default access. This must be distinct from the | |
607 | access nodes in tree.h. */ | |
608 | ||
609 | #define access_default_node null_node | |
610 | ||
611 | /* Global state. */ | |
612 | ||
613 | struct saved_scope GTY(()) | |
614 | { | |
615 | VEC(cxx_saved_binding) *old_bindings; | |
616 | tree old_namespace; | |
617 | tree decl_ns_list; | |
618 | tree class_name; | |
619 | tree class_type; | |
620 | tree access_specifier; | |
621 | tree function_decl; | |
622 | varray_type lang_base; | |
623 | tree lang_name; | |
624 | tree template_parms; | |
625 | struct cp_binding_level *x_previous_class_level; | |
626 | tree x_saved_tree; | |
627 | ||
628 | HOST_WIDE_INT x_processing_template_decl; | |
629 | int x_processing_specialization; | |
630 | bool x_processing_explicit_instantiation; | |
631 | int need_pop_function_context; | |
632 | ||
633 | struct stmt_tree_s x_stmt_tree; | |
634 | ||
635 | struct cp_binding_level *class_bindings; | |
636 | struct cp_binding_level *bindings; | |
637 | ||
638 | struct saved_scope *prev; | |
639 | }; | |
640 | ||
641 | /* The current open namespace. */ | |
642 | ||
643 | #define current_namespace scope_chain->old_namespace | |
644 | ||
645 | /* The stack for namespaces of current declarations. */ | |
646 | ||
647 | #define decl_namespace_list scope_chain->decl_ns_list | |
648 | ||
649 | /* IDENTIFIER_NODE: name of current class */ | |
650 | ||
651 | #define current_class_name scope_chain->class_name | |
652 | ||
653 | /* _TYPE: the type of the current class */ | |
654 | ||
655 | #define current_class_type scope_chain->class_type | |
656 | ||
657 | /* When parsing a class definition, the access specifier most recently | |
658 | given by the user, or, if no access specifier was given, the | |
659 | default value appropriate for the kind of class (i.e., struct, | |
660 | class, or union). */ | |
661 | ||
662 | #define current_access_specifier scope_chain->access_specifier | |
663 | ||
664 | /* Pointer to the top of the language name stack. */ | |
665 | ||
666 | #define current_lang_base scope_chain->lang_base | |
667 | #define current_lang_name scope_chain->lang_name | |
668 | ||
669 | /* Parsing a function declarator leaves a list of parameter names | |
670 | or a chain or parameter decls here. */ | |
671 | ||
672 | #define current_template_parms scope_chain->template_parms | |
673 | ||
674 | #define processing_template_decl scope_chain->x_processing_template_decl | |
675 | #define processing_specialization scope_chain->x_processing_specialization | |
676 | #define processing_explicit_instantiation scope_chain->x_processing_explicit_instantiation | |
677 | ||
678 | /* The cached class binding level, from the most recently exited | |
679 | class, or NULL if none. */ | |
680 | ||
681 | #define previous_class_level scope_chain->x_previous_class_level | |
682 | ||
683 | /* A list of private types mentioned, for deferred access checking. */ | |
684 | ||
685 | extern GTY(()) struct saved_scope *scope_chain; | |
686 | ||
687 | /* Global state pertinent to the current function. */ | |
688 | ||
689 | struct language_function GTY(()) | |
690 | { | |
691 | struct c_language_function base; | |
692 | ||
693 | tree x_dtor_label; | |
694 | tree x_current_class_ptr; | |
695 | tree x_current_class_ref; | |
696 | tree x_eh_spec_block; | |
697 | tree x_in_charge_parm; | |
698 | tree x_vtt_parm; | |
699 | tree x_return_value; | |
700 | ||
701 | int returns_value; | |
702 | int returns_null; | |
703 | int returns_abnormally; | |
704 | int in_function_try_handler; | |
705 | int in_base_initializer; | |
706 | ||
707 | /* True if this function can throw an exception. */ | |
708 | BOOL_BITFIELD can_throw : 1; | |
709 | ||
710 | struct named_label_use_list *x_named_label_uses; | |
711 | struct named_label_list *x_named_labels; | |
712 | struct cp_binding_level *bindings; | |
713 | varray_type x_local_names; | |
714 | }; | |
715 | ||
716 | /* The current C++-specific per-function global variables. */ | |
717 | ||
718 | #define cp_function_chain (cfun->language) | |
719 | ||
720 | /* In a destructor, the point at which all derived class destroying | |
721 | has been done, just before any base class destroying will be done. */ | |
722 | ||
723 | #define dtor_label cp_function_chain->x_dtor_label | |
724 | ||
725 | /* When we're processing a member function, current_class_ptr is the | |
726 | PARM_DECL for the `this' pointer. The current_class_ref is an | |
727 | expression for `*this'. */ | |
728 | ||
729 | #define current_class_ptr \ | |
730 | (cfun ? cp_function_chain->x_current_class_ptr : NULL_TREE) | |
731 | #define current_class_ref \ | |
732 | (cfun ? cp_function_chain->x_current_class_ref : NULL_TREE) | |
733 | ||
734 | /* The EH_SPEC_BLOCK for the exception-specifiers for the current | |
735 | function, if any. */ | |
736 | ||
737 | #define current_eh_spec_block cp_function_chain->x_eh_spec_block | |
738 | ||
739 | /* The `__in_chrg' parameter for the current function. Only used for | |
740 | constructors and destructors. */ | |
741 | ||
742 | #define current_in_charge_parm cp_function_chain->x_in_charge_parm | |
743 | ||
744 | /* The `__vtt_parm' parameter for the current function. Only used for | |
745 | constructors and destructors. */ | |
746 | ||
747 | #define current_vtt_parm cp_function_chain->x_vtt_parm | |
748 | ||
749 | /* Set to 0 at beginning of a function definition, set to 1 if | |
750 | a return statement that specifies a return value is seen. */ | |
751 | ||
752 | #define current_function_returns_value cp_function_chain->returns_value | |
753 | ||
754 | /* Set to 0 at beginning of a function definition, set to 1 if | |
755 | a return statement with no argument is seen. */ | |
756 | ||
757 | #define current_function_returns_null cp_function_chain->returns_null | |
758 | ||
759 | /* Set to 0 at beginning of a function definition, set to 1 if | |
760 | a call to a noreturn function is seen. */ | |
761 | ||
762 | #define current_function_returns_abnormally \ | |
763 | cp_function_chain->returns_abnormally | |
764 | ||
765 | /* Nonzero if we are processing a base initializer. Zero elsewhere. */ | |
766 | #define in_base_initializer cp_function_chain->in_base_initializer | |
767 | ||
768 | #define in_function_try_handler cp_function_chain->in_function_try_handler | |
769 | ||
770 | /* Expression always returned from function, or error_mark_node | |
771 | otherwise, for use by the automatic named return value optimization. */ | |
772 | ||
773 | #define current_function_return_value \ | |
774 | (cp_function_chain->x_return_value) | |
775 | ||
776 | /* True if NAME is the IDENTIFIER_NODE for an overloaded "operator | |
777 | new" or "operator delete". */ | |
778 | #define NEW_DELETE_OPNAME_P(NAME) \ | |
779 | ((NAME) == ansi_opname (NEW_EXPR) \ | |
780 | || (NAME) == ansi_opname (VEC_NEW_EXPR) \ | |
781 | || (NAME) == ansi_opname (DELETE_EXPR) \ | |
782 | || (NAME) == ansi_opname (VEC_DELETE_EXPR)) | |
783 | ||
784 | #define ansi_opname(CODE) \ | |
785 | (operator_name_info[(int) (CODE)].identifier) | |
786 | #define ansi_assopname(CODE) \ | |
787 | (assignment_operator_name_info[(int) (CODE)].identifier) | |
788 | ||
789 | /* True if NODE is an erroneous expression. */ | |
790 | ||
791 | #define error_operand_p(NODE) \ | |
792 | ((NODE) == error_mark_node \ | |
793 | || ((NODE) && TREE_TYPE ((NODE)) == error_mark_node)) | |
794 | ||
795 | /* INTERFACE_ONLY nonzero means that we are in an "interface" | |
796 | section of the compiler. INTERFACE_UNKNOWN nonzero means | |
797 | we cannot trust the value of INTERFACE_ONLY. If INTERFACE_UNKNOWN | |
798 | is zero and INTERFACE_ONLY is zero, it means that we are responsible | |
799 | for exporting definitions that others might need. */ | |
800 | extern int interface_only, interface_unknown; | |
801 | \f | |
802 | /* C++ language-specific tree codes. */ | |
803 | #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM, | |
804 | enum cplus_tree_code { | |
805 | CP_DUMMY_TREE_CODE = LAST_C_TREE_CODE, | |
806 | #include "cp-tree.def" | |
807 | LAST_CPLUS_TREE_CODE | |
808 | }; | |
809 | #undef DEFTREECODE | |
810 | ||
811 | #define cp_stmt_codes \ | |
812 | CTOR_INITIALIZER, TRY_BLOCK, HANDLER, \ | |
813 | EH_SPEC_BLOCK, USING_STMT, TAG_DEFN, \ | |
814 | IF_STMT, CLEANUP_STMT | |
815 | ||
816 | enum languages { lang_c, lang_cplusplus, lang_java }; | |
817 | ||
818 | /* Macros to make error reporting functions' lives easier. */ | |
819 | #define TYPE_IDENTIFIER(NODE) (DECL_NAME (TYPE_NAME (NODE))) | |
820 | #define TYPE_LINKAGE_IDENTIFIER(NODE) \ | |
821 | (TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (NODE))) | |
822 | #define TYPE_NAME_STRING(NODE) (IDENTIFIER_POINTER (TYPE_IDENTIFIER (NODE))) | |
823 | #define TYPE_NAME_LENGTH(NODE) (IDENTIFIER_LENGTH (TYPE_IDENTIFIER (NODE))) | |
824 | ||
825 | /* Nonzero if NODE has no name for linkage purposes. */ | |
826 | #define TYPE_ANONYMOUS_P(NODE) \ | |
827 | (TAGGED_TYPE_P (NODE) && ANON_AGGRNAME_P (TYPE_LINKAGE_IDENTIFIER (NODE))) | |
828 | ||
829 | /* The _DECL for this _TYPE. */ | |
830 | #define TYPE_MAIN_DECL(NODE) (TYPE_STUB_DECL (TYPE_MAIN_VARIANT (NODE))) | |
831 | ||
832 | /* Nonzero if T is a class (or struct or union) type. Also nonzero | |
833 | for template type parameters, typename types, and instantiated | |
834 | template template parameters. Despite its name, | |
835 | this macro has nothing to do with the definition of aggregate given | |
836 | in the standard. Think of this macro as MAYBE_CLASS_TYPE_P. */ | |
837 | #define IS_AGGR_TYPE(T) \ | |
838 | (TREE_CODE (T) == TEMPLATE_TYPE_PARM \ | |
839 | || TREE_CODE (T) == TYPENAME_TYPE \ | |
840 | || TREE_CODE (T) == TYPEOF_TYPE \ | |
841 | || TREE_CODE (T) == BOUND_TEMPLATE_TEMPLATE_PARM \ | |
842 | || TYPE_LANG_FLAG_5 (T)) | |
843 | ||
844 | /* Set IS_AGGR_TYPE for T to VAL. T must be a class, struct, or | |
845 | union type. */ | |
846 | #define SET_IS_AGGR_TYPE(T, VAL) \ | |
847 | (TYPE_LANG_FLAG_5 (T) = (VAL)) | |
848 | ||
849 | /* Nonzero if T is a class type. Zero for template type parameters, | |
850 | typename types, and so forth. */ | |
851 | #define CLASS_TYPE_P(T) \ | |
852 | (IS_AGGR_TYPE_CODE (TREE_CODE (T)) && IS_AGGR_TYPE (T)) | |
853 | ||
854 | #define IS_AGGR_TYPE_CODE(T) ((T) == RECORD_TYPE || (T) == UNION_TYPE) | |
855 | #define TAGGED_TYPE_P(T) \ | |
856 | (CLASS_TYPE_P (T) || TREE_CODE (T) == ENUMERAL_TYPE) | |
857 | #define IS_OVERLOAD_TYPE(T) TAGGED_TYPE_P (T) | |
858 | ||
859 | /* True if this a "Java" type, defined in 'extern "Java"'. */ | |
860 | #define TYPE_FOR_JAVA(NODE) TYPE_LANG_FLAG_3 (NODE) | |
861 | ||
862 | /* True if this type is dependent. This predicate is only valid if | |
863 | TYPE_DEPENDENT_P_VALID is true. */ | |
864 | #define TYPE_DEPENDENT_P(NODE) TYPE_LANG_FLAG_0 (NODE) | |
865 | ||
866 | /* True if dependent_type_p has been called for this type, with the | |
867 | result that TYPE_DEPENDENT_P is valid. */ | |
868 | #define TYPE_DEPENDENT_P_VALID(NODE) TYPE_LANG_FLAG_6(NODE) | |
869 | ||
870 | /* Nonzero if this type is const-qualified. */ | |
871 | #define CP_TYPE_CONST_P(NODE) \ | |
872 | ((cp_type_quals (NODE) & TYPE_QUAL_CONST) != 0) | |
873 | ||
874 | /* Nonzero if this type is volatile-qualified. */ | |
875 | #define CP_TYPE_VOLATILE_P(NODE) \ | |
876 | ((cp_type_quals (NODE) & TYPE_QUAL_VOLATILE) != 0) | |
877 | ||
878 | /* Nonzero if this type is restrict-qualified. */ | |
879 | #define CP_TYPE_RESTRICT_P(NODE) \ | |
880 | ((cp_type_quals (NODE) & TYPE_QUAL_RESTRICT) != 0) | |
881 | ||
882 | /* Nonzero if this type is const-qualified, but not | |
883 | volatile-qualified. Other qualifiers are ignored. This macro is | |
884 | used to test whether or not it is OK to bind an rvalue to a | |
885 | reference. */ | |
886 | #define CP_TYPE_CONST_NON_VOLATILE_P(NODE) \ | |
887 | ((cp_type_quals (NODE) & (TYPE_QUAL_CONST | TYPE_QUAL_VOLATILE)) \ | |
888 | == TYPE_QUAL_CONST) | |
889 | ||
890 | #define FUNCTION_ARG_CHAIN(NODE) \ | |
891 | TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (NODE))) | |
892 | ||
893 | /* Given a FUNCTION_DECL, returns the first TREE_LIST out of TYPE_ARG_TYPES | |
894 | which refers to a user-written parameter. */ | |
895 | #define FUNCTION_FIRST_USER_PARMTYPE(NODE) \ | |
896 | skip_artificial_parms_for ((NODE), TYPE_ARG_TYPES (TREE_TYPE (NODE))) | |
897 | ||
898 | /* Similarly, but for DECL_ARGUMENTS. */ | |
899 | #define FUNCTION_FIRST_USER_PARM(NODE) \ | |
900 | skip_artificial_parms_for ((NODE), DECL_ARGUMENTS (NODE)) | |
901 | ||
902 | #define PROMOTES_TO_AGGR_TYPE(NODE, CODE) \ | |
903 | (((CODE) == TREE_CODE (NODE) \ | |
904 | && IS_AGGR_TYPE (TREE_TYPE (NODE))) \ | |
905 | || IS_AGGR_TYPE (NODE)) | |
906 | ||
907 | /* Nonzero iff TYPE is derived from PARENT. Ignores accessibility and | |
908 | ambiguity issues. */ | |
909 | #define DERIVED_FROM_P(PARENT, TYPE) \ | |
910 | (lookup_base ((TYPE), (PARENT), ba_any, NULL) != NULL_TREE) | |
911 | /* Nonzero iff TYPE is uniquely derived from PARENT. Ignores | |
912 | accessibility. */ | |
913 | #define UNIQUELY_DERIVED_FROM_P(PARENT, TYPE) \ | |
914 | (lookup_base ((TYPE), (PARENT), ba_ignore | ba_quiet, NULL) != NULL_TREE) | |
915 | /* Nonzero iff TYPE is accessible in the current scope and uniquely | |
916 | derived from PARENT. */ | |
917 | #define ACCESSIBLY_UNIQUELY_DERIVED_P(PARENT, TYPE) \ | |
918 | (lookup_base ((TYPE), (PARENT), ba_check | ba_quiet, NULL) != NULL_TREE) | |
919 | /* Nonzero iff TYPE is publicly & uniquely derived from PARENT. */ | |
920 | #define PUBLICLY_UNIQUELY_DERIVED_P(PARENT, TYPE) \ | |
921 | (lookup_base ((TYPE), (PARENT), ba_not_special | ba_quiet, NULL) \ | |
922 | != NULL_TREE) | |
923 | \f | |
924 | /* This is a few header flags for 'struct lang_type'. Actually, | |
925 | all but the first are used only for lang_type_class; they | |
926 | are put in this structure to save space. */ | |
927 | struct lang_type_header GTY(()) | |
928 | { | |
929 | BOOL_BITFIELD is_lang_type_class : 1; | |
930 | ||
931 | BOOL_BITFIELD has_type_conversion : 1; | |
932 | BOOL_BITFIELD has_init_ref : 1; | |
933 | BOOL_BITFIELD has_default_ctor : 1; | |
934 | BOOL_BITFIELD uses_multiple_inheritance : 1; | |
935 | BOOL_BITFIELD const_needs_init : 1; | |
936 | BOOL_BITFIELD ref_needs_init : 1; | |
937 | BOOL_BITFIELD has_const_assign_ref : 1; | |
938 | }; | |
939 | ||
940 | /* This structure provides additional information above and beyond | |
941 | what is provide in the ordinary tree_type. In the past, we used it | |
942 | for the types of class types, template parameters types, typename | |
943 | types, and so forth. However, there can be many (tens to hundreds | |
944 | of thousands) of template parameter types in a compilation, and | |
945 | there's no need for this additional information in that case. | |
946 | Therefore, we now use this data structure only for class types. | |
947 | ||
948 | In the past, it was thought that there would be relatively few | |
949 | class types. However, in the presence of heavy use of templates, | |
950 | many (i.e., thousands) of classes can easily be generated. | |
951 | Therefore, we should endeavor to keep the size of this structure to | |
952 | a minimum. */ | |
953 | struct lang_type_class GTY(()) | |
954 | { | |
955 | struct lang_type_header h; | |
956 | ||
957 | unsigned char align; | |
958 | ||
959 | unsigned has_mutable : 1; | |
960 | unsigned com_interface : 1; | |
961 | unsigned non_pod_class : 1; | |
962 | unsigned nearly_empty_p : 1; | |
963 | unsigned user_align : 1; | |
964 | unsigned has_assign_ref : 1; | |
965 | unsigned has_new : 1; | |
966 | unsigned has_array_new : 1; | |
967 | ||
968 | unsigned gets_delete : 2; | |
969 | unsigned interface_only : 1; | |
970 | unsigned interface_unknown : 1; | |
971 | unsigned contains_empty_class_p : 1; | |
972 | unsigned anon_aggr : 1; | |
973 | unsigned non_zero_init : 1; | |
974 | unsigned empty_p : 1; | |
975 | ||
976 | unsigned marks: 6; | |
977 | unsigned vec_new_uses_cookie : 1; | |
978 | unsigned declared_class : 1; | |
979 | ||
980 | unsigned being_defined : 1; | |
981 | unsigned redefined : 1; | |
982 | unsigned debug_requested : 1; | |
983 | unsigned use_template : 2; | |
984 | unsigned fields_readonly : 1; | |
985 | unsigned ptrmemfunc_flag : 1; | |
986 | unsigned was_anonymous : 1; | |
987 | ||
988 | unsigned lazy_default_ctor : 1; | |
989 | unsigned lazy_copy_ctor : 1; | |
990 | unsigned lazy_assignment_op : 1; | |
991 | unsigned has_const_init_ref : 1; | |
992 | unsigned has_complex_init_ref : 1; | |
993 | unsigned has_complex_assign_ref : 1; | |
994 | unsigned non_aggregate : 1; | |
995 | unsigned java_interface : 1; | |
996 | ||
997 | /* When adding a flag here, consider whether or not it ought to | |
998 | apply to a template instance if it applies to the template. If | |
999 | so, make sure to copy it in instantiate_class_template! */ | |
1000 | ||
1001 | /* There are some bits left to fill out a 32-bit word. Keep track | |
1002 | of this by updating the size of this bitfield whenever you add or | |
1003 | remove a flag. */ | |
1004 | unsigned dummy : 8; | |
1005 | ||
1006 | tree primary_base; | |
1007 | tree vcall_indices; | |
1008 | tree vtables; | |
1009 | tree typeinfo_var; | |
1010 | VEC (tree) *vbases; | |
1011 | binding_table nested_udts; | |
1012 | tree as_base; | |
1013 | tree pure_virtuals; | |
1014 | tree friend_classes; | |
1015 | VEC (tree) * GTY((reorder ("resort_type_method_vec"))) methods; | |
1016 | tree key_method; | |
1017 | tree decl_list; | |
1018 | tree template_info; | |
1019 | tree befriending_classes; | |
1020 | }; | |
1021 | ||
1022 | struct lang_type_ptrmem GTY(()) | |
1023 | { | |
1024 | struct lang_type_header h; | |
1025 | tree record; | |
1026 | }; | |
1027 | ||
1028 | struct lang_type GTY(()) | |
1029 | { | |
1030 | union lang_type_u | |
1031 | { | |
1032 | struct lang_type_header GTY((skip (""))) h; | |
1033 | struct lang_type_class GTY((tag ("1"))) c; | |
1034 | struct lang_type_ptrmem GTY((tag ("0"))) ptrmem; | |
1035 | } GTY((desc ("%h.h.is_lang_type_class"))) u; | |
1036 | }; | |
1037 | ||
1038 | #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007) | |
1039 | ||
1040 | #define LANG_TYPE_CLASS_CHECK(NODE) __extension__ \ | |
1041 | ({ struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE); \ | |
1042 | if (! lt->u.h.is_lang_type_class) \ | |
1043 | lang_check_failed (__FILE__, __LINE__, __FUNCTION__); \ | |
1044 | <->u.c; }) | |
1045 | ||
1046 | #define LANG_TYPE_PTRMEM_CHECK(NODE) __extension__ \ | |
1047 | ({ struct lang_type *lt = TYPE_LANG_SPECIFIC (NODE); \ | |
1048 | if (lt->u.h.is_lang_type_class) \ | |
1049 | lang_check_failed (__FILE__, __LINE__, __FUNCTION__); \ | |
1050 | <->u.ptrmem; }) | |
1051 | ||
1052 | #else | |
1053 | ||
1054 | #define LANG_TYPE_CLASS_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.c) | |
1055 | #define LANG_TYPE_PTRMEM_CHECK(NODE) (&TYPE_LANG_SPECIFIC (NODE)->u.ptrmem) | |
1056 | ||
1057 | #endif /* ENABLE_TREE_CHECKING */ | |
1058 | ||
1059 | /* Indicates whether or not (and how) a template was expanded for this class. | |
1060 | 0=no information yet/non-template class | |
1061 | 1=implicit template instantiation | |
1062 | 2=explicit template specialization | |
1063 | 3=explicit template instantiation */ | |
1064 | #define CLASSTYPE_USE_TEMPLATE(NODE) \ | |
1065 | (LANG_TYPE_CLASS_CHECK (NODE)->use_template) | |
1066 | ||
1067 | /* Fields used for storing information before the class is defined. | |
1068 | After the class is defined, these fields hold other information. */ | |
1069 | ||
1070 | /* List of friends which were defined inline in this class definition. */ | |
1071 | #define CLASSTYPE_INLINE_FRIENDS(NODE) CLASSTYPE_PURE_VIRTUALS (NODE) | |
1072 | ||
1073 | /* Nonzero for _CLASSTYPE means that operator delete is defined. */ | |
1074 | #define TYPE_GETS_DELETE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->gets_delete) | |
1075 | #define TYPE_GETS_REG_DELETE(NODE) (TYPE_GETS_DELETE (NODE) & 1) | |
1076 | ||
1077 | /* Nonzero if `new NODE[x]' should cause the allocation of extra | |
1078 | storage to indicate how many array elements are in use. */ | |
1079 | #define TYPE_VEC_NEW_USES_COOKIE(NODE) \ | |
1080 | (CLASS_TYPE_P (NODE) \ | |
1081 | && LANG_TYPE_CLASS_CHECK (NODE)->vec_new_uses_cookie) | |
1082 | ||
1083 | /* Nonzero means that this _CLASSTYPE node defines ways of converting | |
1084 | itself to other types. */ | |
1085 | #define TYPE_HAS_CONVERSION(NODE) \ | |
1086 | (LANG_TYPE_CLASS_CHECK (NODE)->h.has_type_conversion) | |
1087 | ||
1088 | /* Nonzero means that NODE (a class type) has a default constructor -- | |
1089 | but that it has not yet been declared. */ | |
1090 | #define CLASSTYPE_LAZY_DEFAULT_CTOR(NODE) \ | |
1091 | (LANG_TYPE_CLASS_CHECK (NODE)->lazy_default_ctor) | |
1092 | ||
1093 | /* Nonzero means that NODE (a class type) has a copy constructor -- | |
1094 | but that it has not yet been declared. */ | |
1095 | #define CLASSTYPE_LAZY_COPY_CTOR(NODE) \ | |
1096 | (LANG_TYPE_CLASS_CHECK (NODE)->lazy_copy_ctor) | |
1097 | ||
1098 | /* Nonzero means that NODE (a class type) has an assignment operator | |
1099 | -- but that it has not yet been declared. */ | |
1100 | #define CLASSTYPE_LAZY_ASSIGNMENT_OP(NODE) \ | |
1101 | (LANG_TYPE_CLASS_CHECK (NODE)->lazy_assignment_op) | |
1102 | ||
1103 | /* Nonzero means that this _CLASSTYPE node overloads operator=(X&). */ | |
1104 | #define TYPE_HAS_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_assign_ref) | |
1105 | ||
1106 | /* True iff the class type NODE has an "operator =" whose parameter | |
1107 | has a parameter of type "const X&". */ | |
1108 | #define TYPE_HAS_CONST_ASSIGN_REF(NODE) \ | |
1109 | (LANG_TYPE_CLASS_CHECK (NODE)->h.has_const_assign_ref) | |
1110 | ||
1111 | /* Nonzero means that this _CLASSTYPE node has an X(X&) constructor. */ | |
1112 | #define TYPE_HAS_INIT_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->h.has_init_ref) | |
1113 | #define TYPE_HAS_CONST_INIT_REF(NODE) \ | |
1114 | (LANG_TYPE_CLASS_CHECK (NODE)->has_const_init_ref) | |
1115 | ||
1116 | /* Nonzero if this class defines an overloaded operator new. (An | |
1117 | operator new [] doesn't count.) */ | |
1118 | #define TYPE_HAS_NEW_OPERATOR(NODE) \ | |
1119 | (LANG_TYPE_CLASS_CHECK (NODE)->has_new) | |
1120 | ||
1121 | /* Nonzero if this class defines an overloaded operator new[]. */ | |
1122 | #define TYPE_HAS_ARRAY_NEW_OPERATOR(NODE) \ | |
1123 | (LANG_TYPE_CLASS_CHECK (NODE)->has_array_new) | |
1124 | ||
1125 | /* Nonzero means that this type is being defined. I.e., the left brace | |
1126 | starting the definition of this type has been seen. */ | |
1127 | #define TYPE_BEING_DEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->being_defined) | |
1128 | /* Nonzero means that this type has been redefined. In this case, if | |
1129 | convenient, don't reprocess any methods that appear in its redefinition. */ | |
1130 | #define TYPE_REDEFINED(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->redefined) | |
1131 | ||
1132 | /* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses | |
1133 | multiple inheritance. If this is 0 for the root of a type | |
1134 | hierarchy, then we can use more efficient search techniques. */ | |
1135 | #define TYPE_USES_MULTIPLE_INHERITANCE(NODE) \ | |
1136 | (LANG_TYPE_CLASS_CHECK (NODE)->h.uses_multiple_inheritance) | |
1137 | ||
1138 | /* Nonzero means that this _CLASSTYPE (or one of its ancestors) uses | |
1139 | virtual base classes. If this is 0 for the root of a type | |
1140 | hierarchy, then we can use more efficient search techniques. */ | |
1141 | #define TYPE_USES_VIRTUAL_BASECLASSES(NODE) (TREE_LANG_FLAG_3 (NODE)) | |
1142 | ||
1143 | /* The member function with which the vtable will be emitted: | |
1144 | the first noninline non-pure-virtual member function. NULL_TREE | |
1145 | if there is no key function or if this is a class template */ | |
1146 | #define CLASSTYPE_KEY_METHOD(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->key_method) | |
1147 | ||
1148 | /* Vector member functions defined in this class. Each element is | |
1149 | either a FUNCTION_DECL, a TEMPLATE_DECL, or an OVERLOAD. All | |
1150 | functions with the same name end up in the same slot. The first | |
1151 | two elements are for constructors, and destructors, respectively. | |
1152 | All template conversion operators to innermost template dependent | |
1153 | types are overloaded on the next slot, if they exist. Note, the | |
1154 | names for these functions will not all be the same. The | |
1155 | non-template conversion operators & templated conversions to | |
1156 | non-innermost template types are next, followed by ordinary member | |
1157 | functions. There may be empty entries at the end of the vector. | |
1158 | The conversion operators are unsorted. The ordinary member | |
1159 | functions are sorted, once the class is complete. */ | |
1160 | #define CLASSTYPE_METHOD_VEC(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->methods) | |
1161 | ||
1162 | /* For class templates, this is a TREE_LIST of all member data, | |
1163 | functions, types, and friends in the order of declaration. | |
1164 | The TREE_PURPOSE of each TREE_LIST is NULL_TREE for a friend, | |
1165 | and the RECORD_TYPE for the class template otherwise. */ | |
1166 | #define CLASSTYPE_DECL_LIST(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->decl_list) | |
1167 | ||
1168 | /* The slot in the CLASSTYPE_METHOD_VEC where constructors go. */ | |
1169 | #define CLASSTYPE_CONSTRUCTOR_SLOT 0 | |
1170 | ||
1171 | /* The slot in the CLASSTYPE_METHOD_VEC where destructors go. */ | |
1172 | #define CLASSTYPE_DESTRUCTOR_SLOT 1 | |
1173 | ||
1174 | /* The first slot in the CLASSTYPE_METHOD_VEC where conversion | |
1175 | operators can appear. */ | |
1176 | #define CLASSTYPE_FIRST_CONVERSION_SLOT 2 | |
1177 | ||
1178 | /* A FUNCTION_DECL or OVERLOAD for the constructors for NODE. These | |
1179 | are the constructors that take an in-charge parameter. */ | |
1180 | #define CLASSTYPE_CONSTRUCTORS(NODE) \ | |
1181 | (VEC_index (tree, CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_CONSTRUCTOR_SLOT)) | |
1182 | ||
1183 | /* A FUNCTION_DECL for the destructor for NODE. These are the | |
1184 | destructors that take an in-charge parameter. */ | |
1185 | #define CLASSTYPE_DESTRUCTORS(NODE) \ | |
1186 | (VEC_index (tree, CLASSTYPE_METHOD_VEC (NODE), CLASSTYPE_DESTRUCTOR_SLOT)) | |
1187 | ||
1188 | /* Mark bits for depth-first and breath-first searches. */ | |
1189 | ||
1190 | /* Get the value of the Nth mark bit. */ | |
1191 | #define CLASSTYPE_MARKED_N(NODE, N) \ | |
1192 | (((CLASS_TYPE_P (NODE) ? LANG_TYPE_CLASS_CHECK (NODE)->marks \ | |
1193 | : ((unsigned) TYPE_ALIAS_SET (NODE))) & (1 << (N))) != 0) | |
1194 | ||
1195 | /* Set the Nth mark bit. */ | |
1196 | #define SET_CLASSTYPE_MARKED_N(NODE, N) \ | |
1197 | (CLASS_TYPE_P (NODE) \ | |
1198 | ? (void) (LANG_TYPE_CLASS_CHECK (NODE)->marks |= (1 << (N))) \ | |
1199 | : (void) (TYPE_ALIAS_SET (NODE) |= (1 << (N)))) | |
1200 | ||
1201 | /* Clear the Nth mark bit. */ | |
1202 | #define CLEAR_CLASSTYPE_MARKED_N(NODE, N) \ | |
1203 | (CLASS_TYPE_P (NODE) \ | |
1204 | ? (void) (LANG_TYPE_CLASS_CHECK (NODE)->marks &= ~(1 << (N))) \ | |
1205 | : (void) (TYPE_ALIAS_SET (NODE) &= ~(1 << (N)))) | |
1206 | ||
1207 | /* Get the value of the mark bits. */ | |
1208 | #define CLASSTYPE_MARKED(NODE) CLASSTYPE_MARKED_N (NODE, 0) | |
1209 | #define CLASSTYPE_MARKED2(NODE) CLASSTYPE_MARKED_N (NODE, 1) | |
1210 | #define CLASSTYPE_MARKED3(NODE) CLASSTYPE_MARKED_N (NODE, 2) | |
1211 | #define CLASSTYPE_MARKED4(NODE) CLASSTYPE_MARKED_N (NODE, 3) | |
1212 | #define CLASSTYPE_MARKED5(NODE) CLASSTYPE_MARKED_N (NODE, 4) | |
1213 | #define CLASSTYPE_MARKED6(NODE) CLASSTYPE_MARKED_N (NODE, 5) | |
1214 | ||
1215 | /* Macros to modify the above flags */ | |
1216 | #define SET_CLASSTYPE_MARKED(NODE) SET_CLASSTYPE_MARKED_N (NODE, 0) | |
1217 | #define CLEAR_CLASSTYPE_MARKED(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 0) | |
1218 | #define SET_CLASSTYPE_MARKED2(NODE) SET_CLASSTYPE_MARKED_N (NODE, 1) | |
1219 | #define CLEAR_CLASSTYPE_MARKED2(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 1) | |
1220 | #define SET_CLASSTYPE_MARKED3(NODE) SET_CLASSTYPE_MARKED_N (NODE, 2) | |
1221 | #define CLEAR_CLASSTYPE_MARKED3(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 2) | |
1222 | #define SET_CLASSTYPE_MARKED4(NODE) SET_CLASSTYPE_MARKED_N (NODE, 3) | |
1223 | #define CLEAR_CLASSTYPE_MARKED4(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 3) | |
1224 | #define SET_CLASSTYPE_MARKED5(NODE) SET_CLASSTYPE_MARKED_N (NODE, 4) | |
1225 | #define CLEAR_CLASSTYPE_MARKED5(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 4) | |
1226 | #define SET_CLASSTYPE_MARKED6(NODE) SET_CLASSTYPE_MARKED_N (NODE, 5) | |
1227 | #define CLEAR_CLASSTYPE_MARKED6(NODE) CLEAR_CLASSTYPE_MARKED_N (NODE, 5) | |
1228 | ||
1229 | /* A dictionary of the nested user-defined-types (class-types, or enums) | |
1230 | found within this class. This table includes nested member class | |
1231 | templates. */ | |
1232 | #define CLASSTYPE_NESTED_UTDS(NODE) \ | |
1233 | (LANG_TYPE_CLASS_CHECK (NODE)->nested_udts) | |
1234 | ||
1235 | /* Nonzero if NODE has a primary base class, i.e., a base class with | |
1236 | which it shares the virtual function table pointer. */ | |
1237 | #define CLASSTYPE_HAS_PRIMARY_BASE_P(NODE) \ | |
1238 | (CLASSTYPE_PRIMARY_BINFO (NODE) != NULL_TREE) | |
1239 | ||
1240 | /* If non-NULL, this is the binfo for the primary base class, i.e., | |
1241 | the base class which contains the virtual function table pointer | |
1242 | for this class. */ | |
1243 | #define CLASSTYPE_PRIMARY_BINFO(NODE) \ | |
1244 | (LANG_TYPE_CLASS_CHECK (NODE)->primary_base) | |
1245 | ||
1246 | /* A vector of BINFOs for the direct and indirect virtual base classes | |
1247 | that this type uses in a post-order depth-first left-to-right | |
1248 | order. (In other words, these bases appear in the order that they | |
1249 | should be initialized.) */ | |
1250 | #define CLASSTYPE_VBASECLASSES(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->vbases) | |
1251 | ||
1252 | /* The type corresponding to NODE when NODE is used as a base class, | |
1253 | i.e., NODE without virtual base classes. */ | |
1254 | ||
1255 | #define CLASSTYPE_AS_BASE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->as_base) | |
1256 | ||
1257 | /* True iff NODE is the CLASSTYPE_AS_BASE version of some type. */ | |
1258 | ||
1259 | #define IS_FAKE_BASE_TYPE(NODE) \ | |
1260 | (TREE_CODE (NODE) == RECORD_TYPE \ | |
1261 | && TYPE_CONTEXT (NODE) && CLASS_TYPE_P (TYPE_CONTEXT (NODE)) \ | |
1262 | && CLASSTYPE_AS_BASE (TYPE_CONTEXT (NODE)) == (NODE)) | |
1263 | ||
1264 | /* These are the size and alignment of the type without its virtual | |
1265 | base classes, for when we use this type as a base itself. */ | |
1266 | #define CLASSTYPE_SIZE(NODE) TYPE_SIZE (CLASSTYPE_AS_BASE (NODE)) | |
1267 | #define CLASSTYPE_SIZE_UNIT(NODE) TYPE_SIZE_UNIT (CLASSTYPE_AS_BASE (NODE)) | |
1268 | #define CLASSTYPE_ALIGN(NODE) TYPE_ALIGN (CLASSTYPE_AS_BASE (NODE)) | |
1269 | #define CLASSTYPE_USER_ALIGN(NODE) TYPE_USER_ALIGN (CLASSTYPE_AS_BASE (NODE)) | |
1270 | ||
1271 | /* The alignment of NODE, without its virtual bases, in bytes. */ | |
1272 | #define CLASSTYPE_ALIGN_UNIT(NODE) \ | |
1273 | (CLASSTYPE_ALIGN (NODE) / BITS_PER_UNIT) | |
1274 | ||
1275 | /* True if this a Java interface type, declared with | |
1276 | '__attribute__ ((java_interface))'. */ | |
1277 | #define TYPE_JAVA_INTERFACE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->java_interface) | |
1278 | ||
1279 | /* A cons list of virtual functions which cannot be inherited by | |
1280 | derived classes. When deriving from this type, the derived | |
1281 | class must provide its own definition for each of these functions. */ | |
1282 | #define CLASSTYPE_PURE_VIRTUALS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->pure_virtuals) | |
1283 | ||
1284 | /* Nonzero means that this type has an X() constructor. */ | |
1285 | #define TYPE_HAS_DEFAULT_CONSTRUCTOR(NODE) \ | |
1286 | (LANG_TYPE_CLASS_CHECK (NODE)->h.has_default_ctor) | |
1287 | ||
1288 | /* Nonzero means that this type contains a mutable member. */ | |
1289 | #define CLASSTYPE_HAS_MUTABLE(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_mutable) | |
1290 | #define TYPE_HAS_MUTABLE_P(NODE) (cp_has_mutable_p (NODE)) | |
1291 | ||
1292 | /* Nonzero means that this class type is a non-POD class. */ | |
1293 | #define CLASSTYPE_NON_POD_P(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->non_pod_class) | |
1294 | ||
1295 | /* Nonzero means that this class contains pod types whose default | |
1296 | initialization is not a zero initialization (namely, pointers to | |
1297 | data members). */ | |
1298 | #define CLASSTYPE_NON_ZERO_INIT_P(NODE) \ | |
1299 | (LANG_TYPE_CLASS_CHECK (NODE)->non_zero_init) | |
1300 | ||
1301 | /* Nonzero if this class is "empty" in the sense of the C++ ABI. */ | |
1302 | #define CLASSTYPE_EMPTY_P(NODE) \ | |
1303 | (LANG_TYPE_CLASS_CHECK (NODE)->empty_p) | |
1304 | ||
1305 | /* Nonzero if this class is "nearly empty", i.e., contains only a | |
1306 | virtual function table pointer. */ | |
1307 | #define CLASSTYPE_NEARLY_EMPTY_P(NODE) \ | |
1308 | (LANG_TYPE_CLASS_CHECK (NODE)->nearly_empty_p) | |
1309 | ||
1310 | /* Nonzero if this class contains an empty subobject. */ | |
1311 | #define CLASSTYPE_CONTAINS_EMPTY_CLASS_P(NODE) \ | |
1312 | (LANG_TYPE_CLASS_CHECK (NODE)->contains_empty_class_p) | |
1313 | ||
1314 | /* A list of class types of which this type is a friend. The | |
1315 | TREE_VALUE is normally a TYPE, but will be a TEMPLATE_DECL in the | |
1316 | case of a template friend. */ | |
1317 | #define CLASSTYPE_FRIEND_CLASSES(NODE) \ | |
1318 | (LANG_TYPE_CLASS_CHECK (NODE)->friend_classes) | |
1319 | ||
1320 | /* A list of the classes which grant friendship to this class. */ | |
1321 | #define CLASSTYPE_BEFRIENDING_CLASSES(NODE) \ | |
1322 | (LANG_TYPE_CLASS_CHECK (NODE)->befriending_classes) | |
1323 | ||
1324 | /* Say whether this node was declared as a "class" or a "struct". */ | |
1325 | #define CLASSTYPE_DECLARED_CLASS(NODE) \ | |
1326 | (LANG_TYPE_CLASS_CHECK (NODE)->declared_class) | |
1327 | ||
1328 | /* Nonzero if this class has const members | |
1329 | which have no specified initialization. */ | |
1330 | #define CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE) \ | |
1331 | (TYPE_LANG_SPECIFIC (NODE) \ | |
1332 | ? LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init : 0) | |
1333 | #define SET_CLASSTYPE_READONLY_FIELDS_NEED_INIT(NODE, VALUE) \ | |
1334 | (LANG_TYPE_CLASS_CHECK (NODE)->h.const_needs_init = (VALUE)) | |
1335 | ||
1336 | /* Nonzero if this class has ref members | |
1337 | which have no specified initialization. */ | |
1338 | #define CLASSTYPE_REF_FIELDS_NEED_INIT(NODE) \ | |
1339 | (TYPE_LANG_SPECIFIC (NODE) \ | |
1340 | ? LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init : 0) | |
1341 | #define SET_CLASSTYPE_REF_FIELDS_NEED_INIT(NODE, VALUE) \ | |
1342 | (LANG_TYPE_CLASS_CHECK (NODE)->h.ref_needs_init = (VALUE)) | |
1343 | ||
1344 | /* Nonzero if this class is included from a header file which employs | |
1345 | `#pragma interface', and it is not included in its implementation file. */ | |
1346 | #define CLASSTYPE_INTERFACE_ONLY(NODE) \ | |
1347 | (LANG_TYPE_CLASS_CHECK (NODE)->interface_only) | |
1348 | ||
1349 | /* True if we have already determined whether or not vtables, VTTs, | |
1350 | typeinfo, and other similar per-class data should be emitted in | |
1351 | this translation unit. This flag does not indicate whether or not | |
1352 | these items should be emitted; it only indicates that we know one | |
1353 | way or the other. */ | |
1354 | #define CLASSTYPE_INTERFACE_KNOWN(NODE) \ | |
1355 | (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown == 0) | |
1356 | /* The opposite of CLASSTYPE_INTERFACE_KNOWN. */ | |
1357 | #define CLASSTYPE_INTERFACE_UNKNOWN(NODE) \ | |
1358 | (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown) | |
1359 | ||
1360 | #define SET_CLASSTYPE_INTERFACE_UNKNOWN_X(NODE,X) \ | |
1361 | (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = !!(X)) | |
1362 | #define SET_CLASSTYPE_INTERFACE_UNKNOWN(NODE) \ | |
1363 | (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 1) | |
1364 | #define SET_CLASSTYPE_INTERFACE_KNOWN(NODE) \ | |
1365 | (LANG_TYPE_CLASS_CHECK (NODE)->interface_unknown = 0) | |
1366 | ||
1367 | /* Nonzero if a _DECL node requires us to output debug info for this class. */ | |
1368 | #define CLASSTYPE_DEBUG_REQUESTED(NODE) \ | |
1369 | (LANG_TYPE_CLASS_CHECK (NODE)->debug_requested) | |
1370 | \f | |
1371 | /* Additional macros for inheritance information. */ | |
1372 | ||
1373 | /* The BINFO_INHERITANCE_CHAIN is used opposite to the description in | |
1374 | gcc/tree.h. In particular if D is non-virtually derived from B | |
1375 | then the BINFO for B (in D) will have a BINFO_INHERITANCE_CHAIN | |
1376 | pointing to D. If D is virtually derived, its | |
1377 | BINFO_INHERITANCE_CHAIN will point to the most derived binfo. In | |
1378 | tree.h, this pointer is described as pointing in other | |
1379 | direction. The binfos of virtual bases are shared. */ | |
1380 | ||
1381 | /* Nonzero means that this class is on a path leading to a new vtable. */ | |
1382 | #define BINFO_VTABLE_PATH_MARKED(NODE) BINFO_FLAG_1 (NODE) | |
1383 | ||
1384 | /* Nonzero means B (a BINFO) has its own vtable. Any copies will not | |
1385 | have this flag set. */ | |
1386 | #define BINFO_NEW_VTABLE_MARKED(B) (BINFO_FLAG_2 (B)) | |
1387 | ||
1388 | /* Any subobject that needs a new vtable must have a vptr and must not | |
1389 | be a non-virtual primary base (since it would then use the vtable from a | |
1390 | derived class and never become non-primary.) */ | |
1391 | #define SET_BINFO_NEW_VTABLE_MARKED(B) \ | |
1392 | (BINFO_NEW_VTABLE_MARKED (B) = 1, \ | |
1393 | my_friendly_assert (!BINFO_PRIMARY_P (B) \ | |
1394 | || BINFO_VIRTUAL_P (B), 20000517), \ | |
1395 | my_friendly_assert (TYPE_VFIELD (BINFO_TYPE (B)), 20000517)) | |
1396 | ||
1397 | /* Nonzero if this BINFO is a primary base class. */ | |
1398 | ||
1399 | #define BINFO_PRIMARY_P(NODE) \ | |
1400 | (BINFO_PRIMARY_BASE_OF (NODE) != NULL_TREE) | |
1401 | ||
1402 | /* Nonzero if this binfo is for a dependent base - one that should not | |
1403 | be searched. */ | |
1404 | #define BINFO_DEPENDENT_BASE_P(NODE) BINFO_FLAG_3 (NODE) | |
1405 | ||
1406 | /* Nonzero if this binfo has lost its primary base binfo (because that | |
1407 | is a nearly-empty virtual base that has been taken by some other | |
1408 | base in the complete hierarchy. */ | |
1409 | #define BINFO_LOST_PRIMARY_P(NODE) BINFO_FLAG_4 (NODE) | |
1410 | ||
1411 | /* Nonzero if this binfo is an indirect primary base, i.e. a virtual | |
1412 | base that is a primary base of some of other class in the | |
1413 | hierarchy. */ | |
1414 | #define BINFO_INDIRECT_PRIMARY_P(NODE) BINFO_FLAG_5 (NODE) | |
1415 | ||
1416 | /* Used by various search routines. */ | |
1417 | #define IDENTIFIER_MARKED(NODE) TREE_LANG_FLAG_0 (NODE) | |
1418 | \f | |
1419 | /* A TREE_LIST of the vcall indices associated with the class NODE. | |
1420 | The TREE_PURPOSE of each node is a FUNCTION_DECL for a virtual | |
1421 | function. The TREE_VALUE is the index into the virtual table where | |
1422 | the vcall offset for that function is stored, when NODE is a | |
1423 | virtual base. */ | |
1424 | #define CLASSTYPE_VCALL_INDICES(NODE) \ | |
1425 | (LANG_TYPE_CLASS_CHECK (NODE)->vcall_indices) | |
1426 | ||
1427 | /* The various vtables for the class NODE. The primary vtable will be | |
1428 | first, followed by the construction vtables and VTT, if any. */ | |
1429 | #define CLASSTYPE_VTABLES(NODE) \ | |
1430 | (LANG_TYPE_CLASS_CHECK (NODE)->vtables) | |
1431 | ||
1432 | /* The std::type_info variable representing this class, or NULL if no | |
1433 | such variable has been created. This field is only set for the | |
1434 | TYPE_MAIN_VARIANT of the class. */ | |
1435 | #define CLASSTYPE_TYPEINFO_VAR(NODE) \ | |
1436 | (LANG_TYPE_CLASS_CHECK (NODE)->typeinfo_var) | |
1437 | ||
1438 | /* Accessor macros for the vfield slots in structures. */ | |
1439 | ||
1440 | /* Get the BINFO that introduced this vtable into the hierarchy (will | |
1441 | be NULL for those created at this level, or from a primary | |
1442 | hierarchy). */ | |
1443 | #define VF_BINFO_VALUE(NODE) TREE_PURPOSE (NODE) | |
1444 | ||
1445 | /* Get the TYPE that introduced this vtable into the hierarchy (always | |
1446 | non-NULL). */ | |
1447 | #define VF_BASETYPE_VALUE(NODE) TREE_VALUE (NODE) | |
1448 | ||
1449 | /* Accessor macros for the BINFO_VIRTUALS list. */ | |
1450 | ||
1451 | /* The number of bytes by which to adjust the `this' pointer when | |
1452 | calling this virtual function. Subtract this value from the this | |
1453 | pointer. Always non-NULL, might be constant zero though. */ | |
1454 | #define BV_DELTA(NODE) (TREE_PURPOSE (NODE)) | |
1455 | ||
1456 | /* If non-NULL, the vtable index at which to find the vcall offset | |
1457 | when calling this virtual function. Add the value at that vtable | |
1458 | index to the this pointer. */ | |
1459 | #define BV_VCALL_INDEX(NODE) (TREE_TYPE (NODE)) | |
1460 | ||
1461 | /* The function to call. */ | |
1462 | #define BV_FN(NODE) (TREE_VALUE (NODE)) | |
1463 | ||
1464 | \f | |
1465 | /* For FUNCTION_TYPE or METHOD_TYPE, a list of the exceptions that | |
1466 | this type can raise. Each TREE_VALUE is a _TYPE. The TREE_VALUE | |
1467 | will be NULL_TREE to indicate a throw specification of `()', or | |
1468 | no exceptions allowed. */ | |
1469 | #define TYPE_RAISES_EXCEPTIONS(NODE) TYPE_LANG_SLOT_1 (NODE) | |
1470 | ||
1471 | /* For FUNCTION_TYPE or METHOD_TYPE, return 1 iff it is declared `throw()'. */ | |
1472 | #define TYPE_NOTHROW_P(NODE) \ | |
1473 | (TYPE_RAISES_EXCEPTIONS (NODE) \ | |
1474 | && TREE_VALUE (TYPE_RAISES_EXCEPTIONS (NODE)) == NULL_TREE) | |
1475 | ||
1476 | /* The binding level associated with the namespace. */ | |
1477 | #define NAMESPACE_LEVEL(NODE) \ | |
1478 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.u.level) | |
1479 | \f | |
1480 | ||
1481 | /* If a DECL has DECL_LANG_SPECIFIC, it is either a lang_decl_flags or | |
1482 | a lang_decl (which has lang_decl_flags as its initial prefix). | |
1483 | This macro is nonzero for tree nodes whose DECL_LANG_SPECIFIC is | |
1484 | the full lang_decl, and not just lang_decl_flags. */ | |
1485 | #define CAN_HAVE_FULL_LANG_DECL_P(NODE) \ | |
1486 | (!(TREE_CODE (NODE) == VAR_DECL \ | |
1487 | || TREE_CODE (NODE) == CONST_DECL \ | |
1488 | || TREE_CODE (NODE) == FIELD_DECL \ | |
1489 | || TREE_CODE (NODE) == USING_DECL)) | |
1490 | ||
1491 | struct lang_decl_flags GTY(()) | |
1492 | { | |
1493 | ENUM_BITFIELD(languages) language : 8; | |
1494 | ||
1495 | unsigned operator_attr : 1; | |
1496 | unsigned constructor_attr : 1; | |
1497 | unsigned destructor_attr : 1; | |
1498 | unsigned friend_attr : 1; | |
1499 | unsigned static_function : 1; | |
1500 | unsigned pure_virtual : 1; | |
1501 | unsigned has_in_charge_parm_p : 1; | |
1502 | unsigned has_vtt_parm_p : 1; | |
1503 | ||
1504 | unsigned deferred : 1; | |
1505 | unsigned use_template : 2; | |
1506 | unsigned nonconverting : 1; | |
1507 | unsigned not_really_extern : 1; | |
1508 | unsigned needs_final_overrider : 1; | |
1509 | unsigned initialized_in_class : 1; | |
1510 | unsigned assignment_operator_p : 1; | |
1511 | ||
1512 | unsigned global_ctor_p : 1; | |
1513 | unsigned global_dtor_p : 1; | |
1514 | unsigned anticipated_p : 1; | |
1515 | unsigned template_conv_p : 1; | |
1516 | unsigned u1sel : 1; | |
1517 | unsigned u2sel : 1; | |
1518 | unsigned can_be_full : 1; | |
1519 | unsigned this_thunk_p : 1; | |
1520 | ||
1521 | union lang_decl_u { | |
1522 | /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is | |
1523 | THUNK_ALIAS. | |
1524 | In a FUNCTION_DECL for which DECL_THUNK_P does not hold, | |
1525 | VAR_DECL, TYPE_DECL, or TEMPLATE_DECL, this is | |
1526 | DECL_TEMPLATE_INFO. */ | |
1527 | tree GTY ((tag ("0"))) template_info; | |
1528 | ||
1529 | /* In a NAMESPACE_DECL, this is NAMESPACE_LEVEL. */ | |
1530 | struct cp_binding_level * GTY ((tag ("1"))) level; | |
1531 | } GTY ((desc ("%1.u1sel"))) u; | |
1532 | ||
1533 | union lang_decl_u2 { | |
1534 | /* In a FUNCTION_DECL for which DECL_THUNK_P holds, this is | |
1535 | THUNK_VIRTUAL_OFFSET. | |
1536 | Otherwise this is DECL_ACCESS. */ | |
1537 | tree GTY ((tag ("0"))) access; | |
1538 | ||
1539 | /* For VAR_DECL in function, this is DECL_DISCRIMINATOR. */ | |
1540 | int GTY ((tag ("1"))) discriminator; | |
1541 | } GTY ((desc ("%1.u2sel"))) u2; | |
1542 | }; | |
1543 | ||
1544 | /* sorted_fields is sorted based on a pointer, so we need to be able | |
1545 | to resort it if pointers get rearranged. */ | |
1546 | ||
1547 | struct lang_decl GTY(()) | |
1548 | { | |
1549 | struct lang_decl_flags decl_flags; | |
1550 | ||
1551 | union lang_decl_u4 | |
1552 | { | |
1553 | struct full_lang_decl | |
1554 | { | |
1555 | /* For a non-thunk function decl, this is a tree list of | |
1556 | friendly classes. For a thunk function decl, it is the | |
1557 | thunked to function decl. */ | |
1558 | tree befriending_classes; | |
1559 | ||
1560 | /* For a non-virtual FUNCTION_DECL, this is | |
1561 | DECL_FRIEND_CONTEXT. For a virtual FUNCTION_DECL for which | |
1562 | DECL_THIS_THUNK_P does not hold, this is DECL_THUNKS. Both | |
1563 | this pointer and result pointer adjusting thunks are | |
1564 | chained here. This pointer thunks to return pointer thunks | |
1565 | will be chained on the return pointer thunk. */ | |
1566 | tree context; | |
1567 | ||
1568 | /* In a FUNCTION_DECL, this is DECL_CLONED_FUNCTION. */ | |
1569 | tree cloned_function; | |
1570 | ||
1571 | /* In a FUNCTION_DECL for which THUNK_P holds, this is | |
1572 | THUNK_FIXED_OFFSET. */ | |
1573 | HOST_WIDE_INT fixed_offset; | |
1574 | ||
1575 | /* In an overloaded operator, this is the value of | |
1576 | DECL_OVERLOADED_OPERATOR_P. */ | |
1577 | enum tree_code operator_code; | |
1578 | ||
1579 | unsigned u3sel : 1; | |
1580 | unsigned pending_inline_p : 1; | |
1581 | ||
1582 | union lang_decl_u3 | |
1583 | { | |
1584 | struct sorted_fields_type * GTY ((tag ("0"), reorder ("resort_sorted_fields"))) | |
1585 | sorted_fields; | |
1586 | struct cp_token_cache * GTY ((tag ("2"))) pending_inline_info; | |
1587 | struct language_function * GTY ((tag ("1"))) | |
1588 | saved_language_function; | |
1589 | } GTY ((desc ("%1.u3sel + %1.pending_inline_p"))) u; | |
1590 | } GTY ((tag ("1"))) f; | |
1591 | } GTY ((desc ("%1.decl_flags.can_be_full"))) u; | |
1592 | }; | |
1593 | ||
1594 | #if defined ENABLE_TREE_CHECKING && (GCC_VERSION >= 2007) | |
1595 | ||
1596 | #define LANG_DECL_U2_CHECK(NODE, TF) __extension__ \ | |
1597 | ({ struct lang_decl *lt = DECL_LANG_SPECIFIC (NODE); \ | |
1598 | if (lt->decl_flags.u2sel != TF) \ | |
1599 | lang_check_failed (__FILE__, __LINE__, __FUNCTION__); \ | |
1600 | <->decl_flags.u2; }) | |
1601 | ||
1602 | #else | |
1603 | ||
1604 | #define LANG_DECL_U2_CHECK(NODE, TF) \ | |
1605 | (&DECL_LANG_SPECIFIC (NODE)->decl_flags.u2) | |
1606 | ||
1607 | #endif /* ENABLE_TREE_CHECKING */ | |
1608 | ||
1609 | /* DECL_NEEDED_P holds of a declaration when we need to emit its | |
1610 | definition. This is true when the back-end tells us that | |
1611 | the symbol has been referenced in the generated code. If, however, | |
1612 | we are not generating code, then it is also true when a symbol has | |
1613 | just been used somewhere, even if it's not really needed. We need | |
1614 | anything that isn't comdat, but we don't know for sure whether or | |
1615 | not something is comdat until end-of-file. */ | |
1616 | #define DECL_NEEDED_P(DECL) \ | |
1617 | ((at_eof && TREE_PUBLIC (DECL) && !DECL_COMDAT (DECL)) \ | |
1618 | || (DECL_ASSEMBLER_NAME_SET_P (DECL) \ | |
1619 | && TREE_SYMBOL_REFERENCED (DECL_ASSEMBLER_NAME (DECL))) \ | |
1620 | || (((flag_syntax_only || flag_unit_at_a_time) && TREE_USED (DECL)))) | |
1621 | ||
1622 | /* For a FUNCTION_DECL or a VAR_DECL, the language linkage for the | |
1623 | declaration. Some entities (like a member function in a local | |
1624 | class, or a local variable) do not have linkage at all, and this | |
1625 | macro should not be used in those cases. | |
1626 | ||
1627 | Implementation note: A FUNCTION_DECL without DECL_LANG_SPECIFIC was | |
1628 | created by language-independent code, and has C linkage. Most | |
1629 | VAR_DECLs have C++ linkage, and do not have DECL_LANG_SPECIFIC, but | |
1630 | we do create DECL_LANG_SPECIFIC for variables with non-C++ linkage. */ | |
1631 | #define DECL_LANGUAGE(NODE) \ | |
1632 | (DECL_LANG_SPECIFIC (NODE) \ | |
1633 | ? DECL_LANG_SPECIFIC (NODE)->decl_flags.language \ | |
1634 | : (TREE_CODE (NODE) == FUNCTION_DECL \ | |
1635 | ? lang_c : lang_cplusplus)) | |
1636 | ||
1637 | /* Set the language linkage for NODE to LANGUAGE. */ | |
1638 | #define SET_DECL_LANGUAGE(NODE, LANGUAGE) \ | |
1639 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.language = (LANGUAGE)) | |
1640 | ||
1641 | /* For FUNCTION_DECLs: nonzero means that this function is a constructor. */ | |
1642 | #define DECL_CONSTRUCTOR_P(NODE) \ | |
1643 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.constructor_attr) | |
1644 | ||
1645 | /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a complete | |
1646 | object. */ | |
1647 | #define DECL_COMPLETE_CONSTRUCTOR_P(NODE) \ | |
1648 | (DECL_CONSTRUCTOR_P (NODE) \ | |
1649 | && DECL_NAME (NODE) == complete_ctor_identifier) | |
1650 | ||
1651 | /* Nonzero if NODE (a FUNCTION_DECL) is a constructor for a base | |
1652 | object. */ | |
1653 | #define DECL_BASE_CONSTRUCTOR_P(NODE) \ | |
1654 | (DECL_CONSTRUCTOR_P (NODE) \ | |
1655 | && DECL_NAME (NODE) == base_ctor_identifier) | |
1656 | ||
1657 | /* Nonzero if NODE (a FUNCTION_DECL) is a constructor, but not either the | |
1658 | specialized in-charge constructor or the specialized not-in-charge | |
1659 | constructor. */ | |
1660 | #define DECL_MAYBE_IN_CHARGE_CONSTRUCTOR_P(NODE) \ | |
1661 | (DECL_CONSTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE)) | |
1662 | ||
1663 | /* Nonzero if NODE (a FUNCTION_DECL) is a copy constructor. */ | |
1664 | #define DECL_COPY_CONSTRUCTOR_P(NODE) \ | |
1665 | (DECL_CONSTRUCTOR_P (NODE) && copy_fn_p (NODE) > 0) | |
1666 | ||
1667 | /* Nonzero if NODE is a destructor. */ | |
1668 | #define DECL_DESTRUCTOR_P(NODE) \ | |
1669 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.destructor_attr) | |
1670 | ||
1671 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor, but not the | |
1672 | specialized in-charge constructor, in-charge deleting constructor, | |
1673 | or the the base destructor. */ | |
1674 | #define DECL_MAYBE_IN_CHARGE_DESTRUCTOR_P(NODE) \ | |
1675 | (DECL_DESTRUCTOR_P (NODE) && !DECL_CLONED_FUNCTION_P (NODE)) | |
1676 | ||
1677 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete | |
1678 | object. */ | |
1679 | #define DECL_COMPLETE_DESTRUCTOR_P(NODE) \ | |
1680 | (DECL_DESTRUCTOR_P (NODE) \ | |
1681 | && DECL_NAME (NODE) == complete_dtor_identifier) | |
1682 | ||
1683 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a base | |
1684 | object. */ | |
1685 | #define DECL_BASE_DESTRUCTOR_P(NODE) \ | |
1686 | (DECL_DESTRUCTOR_P (NODE) \ | |
1687 | && DECL_NAME (NODE) == base_dtor_identifier) | |
1688 | ||
1689 | /* Nonzero if NODE (a FUNCTION_DECL) is a destructor for a complete | |
1690 | object that deletes the object after it has been destroyed. */ | |
1691 | #define DECL_DELETING_DESTRUCTOR_P(NODE) \ | |
1692 | (DECL_DESTRUCTOR_P (NODE) \ | |
1693 | && DECL_NAME (NODE) == deleting_dtor_identifier) | |
1694 | ||
1695 | /* Nonzero if NODE (a FUNCTION_DECL) is a cloned constructor or | |
1696 | destructor. */ | |
1697 | #define DECL_CLONED_FUNCTION_P(NODE) \ | |
1698 | ((TREE_CODE (NODE) == FUNCTION_DECL \ | |
1699 | || TREE_CODE (NODE) == TEMPLATE_DECL) \ | |
1700 | && DECL_LANG_SPECIFIC (NODE) \ | |
1701 | && DECL_CLONED_FUNCTION (NODE) != NULL_TREE) | |
1702 | ||
1703 | /* If DECL_CLONED_FUNCTION_P holds, this is the function that was | |
1704 | cloned. */ | |
1705 | #define DECL_CLONED_FUNCTION(NODE) \ | |
1706 | (DECL_LANG_SPECIFIC (NODE)->u.f.cloned_function) | |
1707 | ||
1708 | /* Nonzero if NODE has DECL_DISCRIMINATOR and not DECL_ACCESS. */ | |
1709 | #define DECL_DISCRIMINATOR_P(NODE) \ | |
1710 | (TREE_CODE (NODE) == VAR_DECL \ | |
1711 | && DECL_FUNCTION_SCOPE_P (NODE)) | |
1712 | ||
1713 | /* Discriminator for name mangling. */ | |
1714 | #define DECL_DISCRIMINATOR(NODE) (LANG_DECL_U2_CHECK (NODE, 1)->discriminator) | |
1715 | ||
1716 | /* Nonzero if the VTT parm has been added to NODE. */ | |
1717 | #define DECL_HAS_VTT_PARM_P(NODE) \ | |
1718 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_vtt_parm_p) | |
1719 | ||
1720 | /* Nonzero if NODE is a FUNCTION_DECL for which a VTT parameter is | |
1721 | required. */ | |
1722 | #define DECL_NEEDS_VTT_PARM_P(NODE) \ | |
1723 | (TYPE_USES_VIRTUAL_BASECLASSES (DECL_CONTEXT (NODE)) \ | |
1724 | && (DECL_BASE_CONSTRUCTOR_P (NODE) \ | |
1725 | || DECL_BASE_DESTRUCTOR_P (NODE))) | |
1726 | ||
1727 | /* Nonzero if NODE is a user-defined conversion operator. */ | |
1728 | #define DECL_CONV_FN_P(NODE) \ | |
1729 | (DECL_NAME (NODE) && IDENTIFIER_TYPENAME_P (DECL_NAME (NODE))) | |
1730 | ||
1731 | /* If FN is a conversion operator, the type to which it converts. | |
1732 | Otherwise, NULL_TREE. */ | |
1733 | #define DECL_CONV_FN_TYPE(FN) \ | |
1734 | (DECL_CONV_FN_P (FN) ? TREE_TYPE (DECL_NAME (FN)) : NULL_TREE) | |
1735 | ||
1736 | /* Nonzero if NODE, which is a TEMPLATE_DECL, is a template | |
1737 | conversion operator to a type dependent on the innermost template | |
1738 | args. */ | |
1739 | #define DECL_TEMPLATE_CONV_FN_P(NODE) \ | |
1740 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.template_conv_p) | |
1741 | ||
1742 | /* Set the overloaded operator code for NODE to CODE. */ | |
1743 | #define SET_OVERLOADED_OPERATOR_CODE(NODE, CODE) \ | |
1744 | (DECL_LANG_SPECIFIC (NODE)->u.f.operator_code = (CODE)) | |
1745 | ||
1746 | /* If NODE is an overloaded operator, then this returns the TREE_CODE | |
1747 | associated with the overloaded operator. | |
1748 | DECL_ASSIGNMENT_OPERATOR_P must also be checked to determine | |
1749 | whether or not NODE is an assignment operator. If NODE is not an | |
1750 | overloaded operator, ERROR_MARK is returned. Since the numerical | |
1751 | value of ERROR_MARK is zero, this macro can be used as a predicate | |
1752 | to test whether or not NODE is an overloaded operator. */ | |
1753 | #define DECL_OVERLOADED_OPERATOR_P(NODE) \ | |
1754 | (IDENTIFIER_OPNAME_P (DECL_NAME (NODE)) \ | |
1755 | ? DECL_LANG_SPECIFIC (NODE)->u.f.operator_code : ERROR_MARK) | |
1756 | ||
1757 | /* Nonzero if NODE is an assignment operator. */ | |
1758 | #define DECL_ASSIGNMENT_OPERATOR_P(NODE) \ | |
1759 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.assignment_operator_p) | |
1760 | ||
1761 | /* For FUNCTION_DECLs: nonzero means that this function is a | |
1762 | constructor or a destructor with an extra in-charge parameter to | |
1763 | control whether or not virtual bases are constructed. */ | |
1764 | #define DECL_HAS_IN_CHARGE_PARM_P(NODE) \ | |
1765 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.has_in_charge_parm_p) | |
1766 | ||
1767 | /* Nonzero if NODE is an overloaded `operator delete[]' function. */ | |
1768 | #define DECL_ARRAY_DELETE_OPERATOR_P(NODE) \ | |
1769 | (DECL_OVERLOADED_OPERATOR_P (NODE) == VEC_DELETE_EXPR) | |
1770 | ||
1771 | /* Nonzero for _DECL means that this decl appears in (or will appear | |
1772 | in) as a member in a RECORD_TYPE or UNION_TYPE node. It is also for | |
1773 | detecting circularity in case members are multiply defined. In the | |
1774 | case of a VAR_DECL, it is also used to determine how program storage | |
1775 | should be allocated. */ | |
1776 | #define DECL_IN_AGGR_P(NODE) (DECL_LANG_FLAG_3 (NODE)) | |
1777 | ||
1778 | /* Nonzero for a VAR_DECL means that the variable's initialization has | |
1779 | been processed. */ | |
1780 | #define DECL_INITIALIZED_P(NODE) \ | |
1781 | (TREE_LANG_FLAG_1 (VAR_DECL_CHECK (NODE))) | |
1782 | ||
1783 | /* Nonzero for a VAR_DECL that was initialized with a | |
1784 | constant-expression. */ | |
1785 | #define DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P(NODE) \ | |
1786 | (TREE_LANG_FLAG_2 (VAR_DECL_CHECK (NODE))) | |
1787 | ||
1788 | /* Nonzero if the DECL was initialized in the class definition itself, | |
1789 | rather than outside the class. This is used for both static member | |
1790 | VAR_DECLS, and FUNTION_DECLS that are defined in the class. */ | |
1791 | #define DECL_INITIALIZED_IN_CLASS_P(DECL) \ | |
1792 | (DECL_LANG_SPECIFIC (DECL)->decl_flags.initialized_in_class) | |
1793 | ||
1794 | /* Nonzero for FUNCTION_DECL means that this decl is just a | |
1795 | friend declaration, and should not be added to the list of | |
1796 | member functions for this class. */ | |
1797 | #define DECL_FRIEND_P(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.friend_attr) | |
1798 | ||
1799 | /* A TREE_LIST of the types which have befriended this FUNCTION_DECL. */ | |
1800 | #define DECL_BEFRIENDING_CLASSES(NODE) \ | |
1801 | (DECL_LANG_SPECIFIC (NODE)->u.f.befriending_classes) | |
1802 | ||
1803 | /* Nonzero for FUNCTION_DECL means that this decl is a static | |
1804 | member function. */ | |
1805 | #define DECL_STATIC_FUNCTION_P(NODE) \ | |
1806 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.static_function) | |
1807 | ||
1808 | /* Nonzero for FUNCTION_DECL means that this decl is a non-static | |
1809 | member function. */ | |
1810 | #define DECL_NONSTATIC_MEMBER_FUNCTION_P(NODE) \ | |
1811 | (TREE_CODE (TREE_TYPE (NODE)) == METHOD_TYPE) | |
1812 | ||
1813 | /* Nonzero for FUNCTION_DECL means that this decl is a member function | |
1814 | (static or non-static). */ | |
1815 | #define DECL_FUNCTION_MEMBER_P(NODE) \ | |
1816 | (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) || DECL_STATIC_FUNCTION_P (NODE)) | |
1817 | ||
1818 | /* Nonzero for FUNCTION_DECL means that this member function | |
1819 | has `this' as const X *const. */ | |
1820 | #define DECL_CONST_MEMFUNC_P(NODE) \ | |
1821 | (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) \ | |
1822 | && CP_TYPE_CONST_P (TREE_TYPE (TREE_VALUE \ | |
1823 | (TYPE_ARG_TYPES (TREE_TYPE (NODE)))))) | |
1824 | ||
1825 | /* Nonzero for FUNCTION_DECL means that this member function | |
1826 | has `this' as volatile X *const. */ | |
1827 | #define DECL_VOLATILE_MEMFUNC_P(NODE) \ | |
1828 | (DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE) \ | |
1829 | && CP_TYPE_VOLATILE_P (TREE_TYPE (TREE_VALUE \ | |
1830 | (TYPE_ARG_TYPES (TREE_TYPE (NODE)))))) | |
1831 | ||
1832 | /* Nonzero for a DECL means that this member is a non-static member. */ | |
1833 | #define DECL_NONSTATIC_MEMBER_P(NODE) \ | |
1834 | ((TREE_CODE (NODE) == FUNCTION_DECL \ | |
1835 | && DECL_NONSTATIC_MEMBER_FUNCTION_P (NODE)) \ | |
1836 | || TREE_CODE (NODE) == FIELD_DECL) | |
1837 | ||
1838 | /* Nonzero for _DECL means that this member object type | |
1839 | is mutable. */ | |
1840 | #define DECL_MUTABLE_P(NODE) (DECL_LANG_FLAG_0 (NODE)) | |
1841 | ||
1842 | /* Nonzero for _DECL means that this constructor is a non-converting | |
1843 | constructor. */ | |
1844 | #define DECL_NONCONVERTING_P(NODE) \ | |
1845 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.nonconverting) | |
1846 | ||
1847 | /* Nonzero for FUNCTION_DECL means that this member function is a pure | |
1848 | virtual function. */ | |
1849 | #define DECL_PURE_VIRTUAL_P(NODE) \ | |
1850 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.pure_virtual) | |
1851 | ||
1852 | /* Nonzero for FUNCTION_DECL means that this member function | |
1853 | must be overridden by derived classes. */ | |
1854 | #define DECL_NEEDS_FINAL_OVERRIDER_P(NODE) \ | |
1855 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.needs_final_overrider) | |
1856 | ||
1857 | /* True (in a FUNCTION_DECL) if NODE is a virtual function that is an | |
1858 | invalid overrider for a function from a base class. Once we have | |
1859 | complained about an invalid overrider we avoid complaining about it | |
1860 | again. */ | |
1861 | #define DECL_INVALID_OVERRIDER_P(NODE) \ | |
1862 | (DECL_LANG_FLAG_4 (NODE)) | |
1863 | ||
1864 | /* The thunks associated with NODE, a FUNCTION_DECL. */ | |
1865 | #define DECL_THUNKS(NODE) \ | |
1866 | (DECL_LANG_SPECIFIC (NODE)->u.f.context) | |
1867 | ||
1868 | /* Nonzero if NODE is a thunk, rather than an ordinary function. */ | |
1869 | #define DECL_THUNK_P(NODE) \ | |
1870 | (TREE_CODE (NODE) == FUNCTION_DECL \ | |
1871 | && DECL_LANG_FLAG_7 (NODE)) | |
1872 | ||
1873 | /* Nonzero if NODE is a this pointer adjusting thunk. */ | |
1874 | #define DECL_THIS_THUNK_P(NODE) \ | |
1875 | (DECL_THUNK_P (NODE) && DECL_LANG_SPECIFIC (NODE)->decl_flags.this_thunk_p) | |
1876 | ||
1877 | /* Nonzero if NODE is a result pointer adjusting thunk. */ | |
1878 | #define DECL_RESULT_THUNK_P(NODE) \ | |
1879 | (DECL_THUNK_P (NODE) && !DECL_LANG_SPECIFIC (NODE)->decl_flags.this_thunk_p) | |
1880 | ||
1881 | /* Nonzero if NODE is a FUNCTION_DECL, but not a thunk. */ | |
1882 | #define DECL_NON_THUNK_FUNCTION_P(NODE) \ | |
1883 | (TREE_CODE (NODE) == FUNCTION_DECL && !DECL_THUNK_P (NODE)) | |
1884 | ||
1885 | /* Nonzero if NODE is `extern "C"'. */ | |
1886 | #define DECL_EXTERN_C_P(NODE) \ | |
1887 | (DECL_LANGUAGE (NODE) == lang_c) | |
1888 | ||
1889 | /* Nonzero if NODE is an `extern "C"' function. */ | |
1890 | #define DECL_EXTERN_C_FUNCTION_P(NODE) \ | |
1891 | (DECL_NON_THUNK_FUNCTION_P (NODE) && DECL_EXTERN_C_P (NODE)) | |
1892 | ||
1893 | /* Set DECL_THUNK_P for node. */ | |
1894 | #define SET_DECL_THUNK_P(NODE, THIS_ADJUSTING) \ | |
1895 | (DECL_LANG_FLAG_7 (NODE) = 1, \ | |
1896 | DECL_LANG_SPECIFIC (NODE)->u.f.u3sel = 1, \ | |
1897 | DECL_LANG_SPECIFIC (NODE)->decl_flags.this_thunk_p = (THIS_ADJUSTING)) | |
1898 | ||
1899 | /* Nonzero if this DECL is the __PRETTY_FUNCTION__ variable in a | |
1900 | template function. */ | |
1901 | #define DECL_PRETTY_FUNCTION_P(NODE) \ | |
1902 | (TREE_LANG_FLAG_0 (VAR_DECL_CHECK (NODE))) | |
1903 | ||
1904 | /* The _TYPE context in which this _DECL appears. This field holds the | |
1905 | class where a virtual function instance is actually defined. */ | |
1906 | #define DECL_CLASS_CONTEXT(NODE) \ | |
1907 | (DECL_CLASS_SCOPE_P (NODE) ? DECL_CONTEXT (NODE) : NULL_TREE) | |
1908 | ||
1909 | /* For a non-member friend function, the class (if any) in which this | |
1910 | friend was defined. For example, given: | |
1911 | ||
1912 | struct S { friend void f (); }; | |
1913 | ||
1914 | the DECL_FRIEND_CONTEXT for `f' will be `S'. */ | |
1915 | #define DECL_FRIEND_CONTEXT(NODE) \ | |
1916 | ((DECL_FRIEND_P (NODE) && !DECL_FUNCTION_MEMBER_P (NODE)) \ | |
1917 | ? DECL_LANG_SPECIFIC (NODE)->u.f.context \ | |
1918 | : NULL_TREE) | |
1919 | ||
1920 | /* Set the DECL_FRIEND_CONTEXT for NODE to CONTEXT. */ | |
1921 | #define SET_DECL_FRIEND_CONTEXT(NODE, CONTEXT) \ | |
1922 | (DECL_LANG_SPECIFIC (NODE)->u.f.context = (CONTEXT)) | |
1923 | ||
1924 | /* NULL_TREE in DECL_CONTEXT represents the global namespace. */ | |
1925 | #define CP_DECL_CONTEXT(NODE) \ | |
1926 | (DECL_CONTEXT (NODE) ? DECL_CONTEXT (NODE) : global_namespace) | |
1927 | #define FROB_CONTEXT(NODE) ((NODE) == global_namespace ? NULL_TREE : (NODE)) | |
1928 | ||
1929 | /* 1 iff NODE has namespace scope, including the global namespace. */ | |
1930 | #define DECL_NAMESPACE_SCOPE_P(NODE) \ | |
1931 | (!DECL_TEMPLATE_PARM_P (NODE) \ | |
1932 | && TREE_CODE (CP_DECL_CONTEXT (NODE)) == NAMESPACE_DECL) | |
1933 | ||
1934 | /* 1 iff NODE is a class member. */ | |
1935 | #define DECL_CLASS_SCOPE_P(NODE) \ | |
1936 | (DECL_CONTEXT (NODE) && TYPE_P (DECL_CONTEXT (NODE))) | |
1937 | ||
1938 | /* 1 iff NODE is function-local. */ | |
1939 | #define DECL_FUNCTION_SCOPE_P(NODE) \ | |
1940 | (DECL_CONTEXT (NODE) \ | |
1941 | && TREE_CODE (DECL_CONTEXT (NODE)) == FUNCTION_DECL) | |
1942 | ||
1943 | /* 1 iff VAR_DECL node NODE is virtual table or VTT. */ | |
1944 | #define DECL_VTABLE_OR_VTT_P(NODE) TREE_LANG_FLAG_5 (VAR_DECL_CHECK (NODE)) | |
1945 | ||
1946 | /* 1 iff NODE is function-local, but for types. */ | |
1947 | #define LOCAL_CLASS_P(NODE) \ | |
1948 | (decl_function_context (TYPE_MAIN_DECL (NODE)) != NULL_TREE) | |
1949 | ||
1950 | /* For a NAMESPACE_DECL: the list of using namespace directives | |
1951 | The PURPOSE is the used namespace, the value is the namespace | |
1952 | that is the common ancestor. */ | |
1953 | #define DECL_NAMESPACE_USING(NODE) DECL_VINDEX (NAMESPACE_DECL_CHECK (NODE)) | |
1954 | ||
1955 | /* In a NAMESPACE_DECL, the DECL_INITIAL is used to record all users | |
1956 | of a namespace, to record the transitive closure of using namespace. */ | |
1957 | #define DECL_NAMESPACE_USERS(NODE) DECL_INITIAL (NAMESPACE_DECL_CHECK (NODE)) | |
1958 | ||
1959 | /* In a NAMESPACE_DECL, the list of namespaces which have associated | |
1960 | themselves with this one. */ | |
1961 | #define DECL_NAMESPACE_ASSOCIATIONS(NODE) \ | |
1962 | (NAMESPACE_DECL_CHECK (NODE)->decl.saved_tree) | |
1963 | ||
1964 | /* In a NAMESPACE_DECL, points to the original namespace if this is | |
1965 | a namespace alias. */ | |
1966 | #define DECL_NAMESPACE_ALIAS(NODE) \ | |
1967 | DECL_ABSTRACT_ORIGIN (NAMESPACE_DECL_CHECK (NODE)) | |
1968 | #define ORIGINAL_NAMESPACE(NODE) \ | |
1969 | (DECL_NAMESPACE_ALIAS (NODE) ? DECL_NAMESPACE_ALIAS (NODE) : (NODE)) | |
1970 | ||
1971 | /* Nonzero if NODE is the std namespace. */ | |
1972 | #define DECL_NAMESPACE_STD_P(NODE) \ | |
1973 | (TREE_CODE (NODE) == NAMESPACE_DECL \ | |
1974 | && CP_DECL_CONTEXT (NODE) == global_namespace \ | |
1975 | && DECL_NAME (NODE) == std_identifier) | |
1976 | ||
1977 | /* In a non-local VAR_DECL with static storage duration, this is the | |
1978 | initialization priority. If this value is zero, the NODE will be | |
1979 | initialized at the DEFAULT_INIT_PRIORITY. */ | |
1980 | #define DECL_INIT_PRIORITY(NODE) (VAR_DECL_CHECK (NODE)->decl.u2.i) | |
1981 | ||
1982 | /* In a TREE_LIST concatenating using directives, indicate indirect | |
1983 | directives */ | |
1984 | #define TREE_INDIRECT_USING(NODE) (TREE_LIST_CHECK (NODE)->common.lang_flag_0) | |
1985 | ||
1986 | /* In a VAR_DECL for a variable declared in a for statement, | |
1987 | this is the shadowed (local) variable. */ | |
1988 | #define DECL_SHADOWED_FOR_VAR(NODE) DECL_RESULT_FLD(VAR_DECL_CHECK (NODE)) | |
1989 | ||
1990 | /* In a FUNCTION_DECL, this is nonzero if this function was defined in | |
1991 | the class definition. We have saved away the text of the function, | |
1992 | but have not yet processed it. */ | |
1993 | #define DECL_PENDING_INLINE_P(NODE) \ | |
1994 | (DECL_LANG_SPECIFIC (NODE)->u.f.pending_inline_p) | |
1995 | ||
1996 | /* If DECL_PENDING_INLINE_P holds, this is the saved text of the | |
1997 | function. */ | |
1998 | #define DECL_PENDING_INLINE_INFO(NODE) \ | |
1999 | (DECL_LANG_SPECIFIC (NODE)->u.f.u.pending_inline_info) | |
2000 | ||
2001 | /* For a TYPE_DECL: if this structure has many fields, we'll sort them | |
2002 | and put them into a TREE_VEC. */ | |
2003 | #define DECL_SORTED_FIELDS(NODE) \ | |
2004 | (DECL_LANG_SPECIFIC (TYPE_DECL_CHECK (NODE))->u.f.u.sorted_fields) | |
2005 | ||
2006 | /* True if on the deferred_fns (see decl2.c) list. */ | |
2007 | #define DECL_DEFERRED_FN(DECL) \ | |
2008 | (DECL_LANG_SPECIFIC (DECL)->decl_flags.deferred) | |
2009 | ||
2010 | /* For a VAR_DECL, FUNCTION_DECL, TYPE_DECL or TEMPLATE_DECL: | |
2011 | template-specific information. */ | |
2012 | #define DECL_TEMPLATE_INFO(NODE) \ | |
2013 | (DECL_LANG_SPECIFIC (VAR_TEMPL_TYPE_OR_FUNCTION_DECL_CHECK (NODE)) \ | |
2014 | ->decl_flags.u.template_info) | |
2015 | ||
2016 | /* For a VAR_DECL, indicates that the variable has been processed. | |
2017 | This flag is set and unset throughout the code; it is always | |
2018 | used for a temporary purpose. */ | |
2019 | #define DECL_VAR_MARKED_P(NODE) \ | |
2020 | (DECL_LANG_FLAG_4 (VAR_DECL_CHECK (NODE))) | |
2021 | ||
2022 | /* Template information for a RECORD_TYPE or UNION_TYPE. */ | |
2023 | #define CLASSTYPE_TEMPLATE_INFO(NODE) \ | |
2024 | (LANG_TYPE_CLASS_CHECK (RECORD_OR_UNION_CHECK (NODE))->template_info) | |
2025 | ||
2026 | /* Template information for an ENUMERAL_TYPE. Although an enumeration may | |
2027 | not be a primary template, it may be declared within the scope of a | |
2028 | primary template and the enumeration constants may depend on | |
2029 | non-type template parameters. */ | |
2030 | #define ENUM_TEMPLATE_INFO(NODE) \ | |
2031 | (TYPE_LANG_SLOT_1 (ENUMERAL_TYPE_CHECK (NODE))) | |
2032 | ||
2033 | /* Template information for a template template parameter. */ | |
2034 | #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO(NODE) \ | |
2035 | (LANG_TYPE_CLASS_CHECK (BOUND_TEMPLATE_TEMPLATE_PARM_TYPE_CHECK (NODE)) \ | |
2036 | ->template_info) | |
2037 | ||
2038 | /* Template information for an ENUMERAL_, RECORD_, or UNION_TYPE. */ | |
2039 | #define TYPE_TEMPLATE_INFO(NODE) \ | |
2040 | (TREE_CODE (NODE) == ENUMERAL_TYPE \ | |
2041 | ? ENUM_TEMPLATE_INFO (NODE) : \ | |
2042 | (TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM \ | |
2043 | ? TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (NODE) : \ | |
2044 | (TYPE_LANG_SPECIFIC (NODE) \ | |
2045 | ? CLASSTYPE_TEMPLATE_INFO (NODE) \ | |
2046 | : NULL_TREE))) | |
2047 | ||
2048 | /* Set the template information for an ENUMERAL_, RECORD_, or | |
2049 | UNION_TYPE to VAL. */ | |
2050 | #define SET_TYPE_TEMPLATE_INFO(NODE, VAL) \ | |
2051 | (TREE_CODE (NODE) == ENUMERAL_TYPE \ | |
2052 | ? (ENUM_TEMPLATE_INFO (NODE) = (VAL)) \ | |
2053 | : (CLASSTYPE_TEMPLATE_INFO (NODE) = (VAL))) | |
2054 | ||
2055 | #define TI_TEMPLATE(NODE) (TREE_PURPOSE (NODE)) | |
2056 | #define TI_ARGS(NODE) (TREE_VALUE (NODE)) | |
2057 | #define TI_PENDING_TEMPLATE_FLAG(NODE) TREE_LANG_FLAG_1 (NODE) | |
2058 | ||
2059 | /* We use TREE_VECs to hold template arguments. If there is only one | |
2060 | level of template arguments, then the TREE_VEC contains the | |
2061 | arguments directly. If there is more than one level of template | |
2062 | arguments, then each entry in the TREE_VEC is itself a TREE_VEC, | |
2063 | containing the template arguments for a single level. The first | |
2064 | entry in the outer TREE_VEC is the outermost level of template | |
2065 | parameters; the last is the innermost. | |
2066 | ||
2067 | It is incorrect to ever form a template argument vector containing | |
2068 | only one level of arguments, but which is a TREE_VEC containing as | |
2069 | its only entry the TREE_VEC for that level. */ | |
2070 | ||
2071 | /* Nonzero if the template arguments is actually a vector of vectors, | |
2072 | rather than just a vector. */ | |
2073 | #define TMPL_ARGS_HAVE_MULTIPLE_LEVELS(NODE) \ | |
2074 | (NODE && TREE_VEC_ELT (NODE, 0) \ | |
2075 | && TREE_CODE (TREE_VEC_ELT (NODE, 0)) == TREE_VEC) | |
2076 | ||
2077 | /* The depth of a template argument vector. When called directly by | |
2078 | the parser, we use a TREE_LIST rather than a TREE_VEC to represent | |
2079 | template arguments. In fact, we may even see NULL_TREE if there | |
2080 | are no template arguments. In both of those cases, there is only | |
2081 | one level of template arguments. */ | |
2082 | #define TMPL_ARGS_DEPTH(NODE) \ | |
2083 | (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (NODE) ? TREE_VEC_LENGTH (NODE) : 1) | |
2084 | ||
2085 | /* The LEVELth level of the template ARGS. The outermost level of | |
2086 | args is level 1, not level 0. */ | |
2087 | #define TMPL_ARGS_LEVEL(ARGS, LEVEL) \ | |
2088 | (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (ARGS) \ | |
2089 | ? TREE_VEC_ELT (ARGS, (LEVEL) - 1) : (ARGS)) | |
2090 | ||
2091 | /* Set the LEVELth level of the template ARGS to VAL. This macro does | |
2092 | not work with single-level argument vectors. */ | |
2093 | #define SET_TMPL_ARGS_LEVEL(ARGS, LEVEL, VAL) \ | |
2094 | (TREE_VEC_ELT (ARGS, (LEVEL) - 1) = (VAL)) | |
2095 | ||
2096 | /* Accesses the IDXth parameter in the LEVELth level of the ARGS. */ | |
2097 | #define TMPL_ARG(ARGS, LEVEL, IDX) \ | |
2098 | (TREE_VEC_ELT (TMPL_ARGS_LEVEL (ARGS, LEVEL), IDX)) | |
2099 | ||
2100 | /* Set the IDXth element in the LEVELth level of ARGS to VAL. This | |
2101 | macro does not work with single-level argument vectors. */ | |
2102 | #define SET_TMPL_ARG(ARGS, LEVEL, IDX, VAL) \ | |
2103 | (TREE_VEC_ELT (TREE_VEC_ELT ((ARGS), (LEVEL) - 1), (IDX)) = (VAL)) | |
2104 | ||
2105 | /* Given a single level of template arguments in NODE, return the | |
2106 | number of arguments. */ | |
2107 | #define NUM_TMPL_ARGS(NODE) \ | |
2108 | (TREE_VEC_LENGTH (NODE)) | |
2109 | ||
2110 | /* Returns the innermost level of template arguments in ARGS. */ | |
2111 | #define INNERMOST_TEMPLATE_ARGS(NODE) \ | |
2112 | (get_innermost_template_args ((NODE), 1)) | |
2113 | ||
2114 | /* The number of levels of template parameters given by NODE. */ | |
2115 | #define TMPL_PARMS_DEPTH(NODE) \ | |
2116 | ((HOST_WIDE_INT) TREE_INT_CST_LOW (TREE_PURPOSE (NODE))) | |
2117 | ||
2118 | /* The TEMPLATE_DECL instantiated or specialized by NODE. This | |
2119 | TEMPLATE_DECL will be the immediate parent, not the most general | |
2120 | template. For example, in: | |
2121 | ||
2122 | template <class T> struct S { template <class U> void f(U); } | |
2123 | ||
2124 | the FUNCTION_DECL for S<int>::f<double> will have, as its | |
2125 | DECL_TI_TEMPLATE, `template <class U> S<int>::f<U>'. | |
2126 | ||
2127 | As a special case, for a member friend template of a template | |
2128 | class, this value will not be a TEMPLATE_DECL, but rather an | |
2129 | IDENTIFIER_NODE or OVERLOAD indicating the name of the template and | |
2130 | any explicit template arguments provided. For example, in: | |
2131 | ||
2132 | template <class T> struct S { friend void f<int>(int, double); } | |
2133 | ||
2134 | the DECL_TI_TEMPLATE will be an IDENTIFIER_NODE for `f' and the | |
2135 | DECL_TI_ARGS will be {int}. */ | |
2136 | #define DECL_TI_TEMPLATE(NODE) TI_TEMPLATE (DECL_TEMPLATE_INFO (NODE)) | |
2137 | ||
2138 | /* The template arguments used to obtain this decl from the most | |
2139 | general form of DECL_TI_TEMPLATE. For the example given for | |
2140 | DECL_TI_TEMPLATE, the DECL_TI_ARGS will be {int, double}. These | |
2141 | are always the full set of arguments required to instantiate this | |
2142 | declaration from the most general template specialized here. */ | |
2143 | #define DECL_TI_ARGS(NODE) TI_ARGS (DECL_TEMPLATE_INFO (NODE)) | |
2144 | #define CLASSTYPE_TI_TEMPLATE(NODE) TI_TEMPLATE (CLASSTYPE_TEMPLATE_INFO (NODE)) | |
2145 | #define CLASSTYPE_TI_ARGS(NODE) TI_ARGS (CLASSTYPE_TEMPLATE_INFO (NODE)) | |
2146 | #define ENUM_TI_TEMPLATE(NODE) \ | |
2147 | TI_TEMPLATE (ENUM_TEMPLATE_INFO (NODE)) | |
2148 | #define ENUM_TI_ARGS(NODE) \ | |
2149 | TI_ARGS (ENUM_TEMPLATE_INFO (NODE)) | |
2150 | ||
2151 | /* For a template instantiation TYPE, returns the TYPE corresponding | |
2152 | to the primary template. Otherwise returns TYPE itself. */ | |
2153 | #define CLASSTYPE_PRIMARY_TEMPLATE_TYPE(TYPE) \ | |
2154 | ((CLASSTYPE_USE_TEMPLATE ((TYPE)) && !CLASSTYPE_TEMPLATE_SPECIALIZATION ((TYPE))) \ | |
2155 | ? TREE_TYPE (DECL_TEMPLATE_RESULT (DECL_PRIMARY_TEMPLATE \ | |
2156 | (CLASSTYPE_TI_TEMPLATE ((TYPE))))) \ | |
2157 | : (TYPE)) | |
2158 | ||
2159 | /* Like DECL_TI_TEMPLATE, but for an ENUMERAL_, RECORD_, or UNION_TYPE. */ | |
2160 | #define TYPE_TI_TEMPLATE(NODE) \ | |
2161 | (TI_TEMPLATE (TYPE_TEMPLATE_INFO (NODE))) | |
2162 | ||
2163 | /* Like DECL_TI_ARGS, but for an ENUMERAL_, RECORD_, or UNION_TYPE. */ | |
2164 | #define TYPE_TI_ARGS(NODE) \ | |
2165 | (TI_ARGS (TYPE_TEMPLATE_INFO (NODE))) | |
2166 | ||
2167 | #define INNERMOST_TEMPLATE_PARMS(NODE) TREE_VALUE (NODE) | |
2168 | ||
2169 | /* Nonzero if the NODE corresponds to the template parameters for a | |
2170 | member template, whose inline definition is being processed after | |
2171 | the class definition is complete. */ | |
2172 | #define TEMPLATE_PARMS_FOR_INLINE(NODE) TREE_LANG_FLAG_1 (NODE) | |
2173 | ||
2174 | /* In a FUNCTION_DECL, the saved language-specific per-function data. */ | |
2175 | #define DECL_SAVED_FUNCTION_DATA(NODE) \ | |
2176 | (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE)) \ | |
2177 | ->u.f.u.saved_language_function) | |
2178 | ||
2179 | #define NEW_EXPR_USE_GLOBAL(NODE) \ | |
2180 | TREE_LANG_FLAG_0 (NEW_EXPR_CHECK (NODE)) | |
2181 | #define DELETE_EXPR_USE_GLOBAL(NODE) \ | |
2182 | TREE_LANG_FLAG_0 (DELETE_EXPR_CHECK (NODE)) | |
2183 | #define DELETE_EXPR_USE_VEC(NODE) \ | |
2184 | TREE_LANG_FLAG_1 (DELETE_EXPR_CHECK (NODE)) | |
2185 | ||
2186 | /* Indicates that this is a non-dependent COMPOUND_EXPR which will | |
2187 | resolve to a function call. */ | |
2188 | #define COMPOUND_EXPR_OVERLOADED(NODE) \ | |
2189 | TREE_LANG_FLAG_0 (COMPOUND_EXPR_CHECK (NODE)) | |
2190 | ||
2191 | /* In a CALL_EXPR appearing in a template, true if Koenig lookup | |
2192 | should be performed at instantiation time. */ | |
2193 | #define KOENIG_LOOKUP_P(NODE) TREE_LANG_FLAG_0 (CALL_EXPR_CHECK (NODE)) | |
2194 | ||
2195 | /* Nonzero if this AGGR_INIT_EXPR provides for initialization via a | |
2196 | constructor call, rather than an ordinary function call. */ | |
2197 | #define AGGR_INIT_VIA_CTOR_P(NODE) \ | |
2198 | TREE_LANG_FLAG_0 (AGGR_INIT_EXPR_CHECK (NODE)) | |
2199 | ||
2200 | /* The TYPE_MAIN_DECL for a class template type is a TYPE_DECL, not a | |
2201 | TEMPLATE_DECL. This macro determines whether or not a given class | |
2202 | type is really a template type, as opposed to an instantiation or | |
2203 | specialization of one. */ | |
2204 | #define CLASSTYPE_IS_TEMPLATE(NODE) \ | |
2205 | (CLASSTYPE_TEMPLATE_INFO (NODE) \ | |
2206 | && !CLASSTYPE_USE_TEMPLATE (NODE) \ | |
2207 | && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (NODE))) | |
2208 | ||
2209 | /* The name used by the user to name the typename type. Typically, | |
2210 | this is an IDENTIFIER_NODE, and the same as the DECL_NAME on the | |
2211 | corresponding TYPE_DECL. However, this may also be a | |
2212 | TEMPLATE_ID_EXPR if we had something like `typename X::Y<T>'. */ | |
2213 | #define TYPENAME_TYPE_FULLNAME(NODE) (TYPENAME_TYPE_CHECK (NODE))->type.values | |
2214 | ||
2215 | /* Nonzero in INTEGER_CST means that this int is negative by dint of | |
2216 | using a twos-complement negated operand. */ | |
2217 | #define TREE_NEGATED_INT(NODE) TREE_LANG_FLAG_0 (INTEGER_CST_CHECK (NODE)) | |
2218 | ||
2219 | /* Nonzero in any kind of _TYPE where conversions to base-classes may | |
2220 | involve pointer arithmetic. If this is zero, then converting to | |
2221 | a base-class never requires changing the value of the pointer. */ | |
2222 | #define TYPE_BASE_CONVS_MAY_REQUIRE_CODE_P(NODE) (TREE_LANG_FLAG_1 (NODE)) | |
2223 | ||
2224 | /* [class.virtual] | |
2225 | ||
2226 | A class that declares or inherits a virtual function is called a | |
2227 | polymorphic class. */ | |
2228 | #define TYPE_POLYMORPHIC_P(NODE) (TREE_LANG_FLAG_2 (NODE)) | |
2229 | ||
2230 | /* Nonzero if this class has a virtual function table pointer. */ | |
2231 | #define TYPE_CONTAINS_VPTR_P(NODE) \ | |
2232 | (TYPE_POLYMORPHIC_P (NODE) \ | |
2233 | || TYPE_USES_VIRTUAL_BASECLASSES (NODE)) | |
2234 | ||
2235 | /* This flag is true of a local VAR_DECL if it was declared in a for | |
2236 | statement, but we are no longer in the scope of the for. */ | |
2237 | #define DECL_DEAD_FOR_LOCAL(NODE) DECL_LANG_FLAG_7 (VAR_DECL_CHECK (NODE)) | |
2238 | ||
2239 | /* This flag is set on a VAR_DECL that is a DECL_DEAD_FOR_LOCAL | |
2240 | if we already emitted a warning about using it. */ | |
2241 | #define DECL_ERROR_REPORTED(NODE) DECL_LANG_FLAG_0 (VAR_DECL_CHECK (NODE)) | |
2242 | ||
2243 | /* Nonzero if NODE is a FUNCTION_DECL (for a function with global | |
2244 | scope) declared in a local scope. */ | |
2245 | #define DECL_LOCAL_FUNCTION_P(NODE) \ | |
2246 | DECL_LANG_FLAG_0 (FUNCTION_DECL_CHECK (NODE)) | |
2247 | ||
2248 | /* Nonzero if NODE is a FUNCTION_DECL for a built-in function, and we have | |
2249 | not yet seen a prototype for that function. */ | |
2250 | #define DECL_ANTICIPATED(NODE) \ | |
2251 | (DECL_LANG_SPECIFIC (DECL_CHECK (NODE))->decl_flags.anticipated_p) | |
2252 | ||
2253 | /* Record whether a typedef for type `int' was actually `signed int'. */ | |
2254 | #define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP) | |
2255 | ||
2256 | /* Returns nonzero if DECL has external linkage, as specified by the | |
2257 | language standard. (This predicate may hold even when the | |
2258 | corresponding entity is not actually given external linkage in the | |
2259 | object file; see decl_linkage for details.) */ | |
2260 | #define DECL_EXTERNAL_LINKAGE_P(DECL) \ | |
2261 | (decl_linkage (DECL) == lk_external) | |
2262 | ||
2263 | #define INTEGRAL_CODE_P(CODE) \ | |
2264 | ((CODE) == INTEGER_TYPE || (CODE) == ENUMERAL_TYPE || (CODE) == BOOLEAN_TYPE) | |
2265 | ||
2266 | /* [basic.fundamental] | |
2267 | ||
2268 | Types bool, char, wchar_t, and the signed and unsigned integer types | |
2269 | are collectively called integral types. | |
2270 | ||
2271 | Note that INTEGRAL_TYPE_P, as defined in tree.h, allows enumeration | |
2272 | types as well, which is incorrect in C++. */ | |
2273 | #define CP_INTEGRAL_TYPE_P(TYPE) \ | |
2274 | (TREE_CODE (TYPE) == BOOLEAN_TYPE \ | |
2275 | || TREE_CODE (TYPE) == INTEGER_TYPE) | |
2276 | ||
2277 | /* Returns true if TYPE is an integral or enumeration name. */ | |
2278 | #define INTEGRAL_OR_ENUMERATION_TYPE_P(TYPE) \ | |
2279 | (CP_INTEGRAL_TYPE_P (TYPE) || TREE_CODE (TYPE) == ENUMERAL_TYPE) | |
2280 | ||
2281 | /* [basic.fundamental] | |
2282 | ||
2283 | Integral and floating types are collectively called arithmetic | |
2284 | types. */ | |
2285 | #define ARITHMETIC_TYPE_P(TYPE) \ | |
2286 | (CP_INTEGRAL_TYPE_P (TYPE) || TREE_CODE (TYPE) == REAL_TYPE) | |
2287 | ||
2288 | /* [basic.types] | |
2289 | ||
2290 | Arithmetic types, enumeration types, pointer types, and | |
2291 | pointer-to-member types, are collectively called scalar types. */ | |
2292 | #define SCALAR_TYPE_P(TYPE) \ | |
2293 | (ARITHMETIC_TYPE_P (TYPE) \ | |
2294 | || TREE_CODE (TYPE) == ENUMERAL_TYPE \ | |
2295 | || TYPE_PTR_P (TYPE) \ | |
2296 | || TYPE_PTR_TO_MEMBER_P (TYPE)) | |
2297 | ||
2298 | /* [dcl.init.aggr] | |
2299 | ||
2300 | An aggregate is an array or a class with no user-declared | |
2301 | constructors, no private or protected non-static data members, no | |
2302 | base classes, and no virtual functions. | |
2303 | ||
2304 | As an extension, we also treat vectors as aggregates. */ | |
2305 | #define CP_AGGREGATE_TYPE_P(TYPE) \ | |
2306 | (TREE_CODE (TYPE) == ARRAY_TYPE \ | |
2307 | || TREE_CODE (TYPE) == VECTOR_TYPE \ | |
2308 | || (CLASS_TYPE_P (TYPE) \ | |
2309 | && !CLASSTYPE_NON_AGGREGATE (TYPE))) | |
2310 | ||
2311 | /* Nonzero for a class type means that the class type has a | |
2312 | user-declared constructor. */ | |
2313 | #define TYPE_HAS_CONSTRUCTOR(NODE) (TYPE_LANG_FLAG_1 (NODE)) | |
2314 | ||
2315 | /* When appearing in an INDIRECT_REF, it means that the tree structure | |
2316 | underneath is actually a call to a constructor. This is needed | |
2317 | when the constructor must initialize local storage (which can | |
2318 | be automatically destroyed), rather than allowing it to allocate | |
2319 | space from the heap. | |
2320 | ||
2321 | When appearing in a SAVE_EXPR, it means that underneath | |
2322 | is a call to a constructor. | |
2323 | ||
2324 | When appearing in a CONSTRUCTOR, the expression is a | |
2325 | compound literal. | |
2326 | ||
2327 | When appearing in a FIELD_DECL, it means that this field | |
2328 | has been duly initialized in its constructor. */ | |
2329 | #define TREE_HAS_CONSTRUCTOR(NODE) (TREE_LANG_FLAG_4 (NODE)) | |
2330 | ||
2331 | /* True if NODE is a brace-enclosed initializer. */ | |
2332 | #define BRACE_ENCLOSED_INITIALIZER_P(NODE) \ | |
2333 | (TREE_CODE (NODE) == CONSTRUCTOR && !TREE_TYPE (NODE)) | |
2334 | ||
2335 | #define EMPTY_CONSTRUCTOR_P(NODE) (TREE_CODE (NODE) == CONSTRUCTOR \ | |
2336 | && CONSTRUCTOR_ELTS (NODE) == NULL_TREE \ | |
2337 | && ! TREE_HAS_CONSTRUCTOR (NODE)) | |
2338 | ||
2339 | /* Nonzero for _TYPE means that the _TYPE defines a destructor. */ | |
2340 | #define TYPE_HAS_DESTRUCTOR(NODE) (TYPE_LANG_FLAG_2 (NODE)) | |
2341 | ||
2342 | /* Nonzero means that an object of this type can not be initialized using | |
2343 | an initializer list. */ | |
2344 | #define CLASSTYPE_NON_AGGREGATE(NODE) \ | |
2345 | (LANG_TYPE_CLASS_CHECK (NODE)->non_aggregate) | |
2346 | #define TYPE_NON_AGGREGATE_CLASS(NODE) \ | |
2347 | (IS_AGGR_TYPE (NODE) && CLASSTYPE_NON_AGGREGATE (NODE)) | |
2348 | ||
2349 | /* Nonzero if there is a user-defined X::op=(x&) for this class. */ | |
2350 | #define TYPE_HAS_COMPLEX_ASSIGN_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_assign_ref) | |
2351 | #define TYPE_HAS_COMPLEX_INIT_REF(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->has_complex_init_ref) | |
2352 | ||
2353 | /* Nonzero if TYPE has a trivial destructor. From [class.dtor]: | |
2354 | ||
2355 | A destructor is trivial if it is an implicitly declared | |
2356 | destructor and if: | |
2357 | ||
2358 | - all of the direct base classes of its class have trivial | |
2359 | destructors, | |
2360 | ||
2361 | - for all of the non-static data members of its class that are | |
2362 | of class type (or array thereof), each such class has a | |
2363 | trivial destructor. */ | |
2364 | #define TYPE_HAS_TRIVIAL_DESTRUCTOR(NODE) \ | |
2365 | (!TYPE_HAS_NONTRIVIAL_DESTRUCTOR (NODE)) | |
2366 | ||
2367 | /* Nonzero for _TYPE node means that this type does not have a trivial | |
2368 | destructor. Therefore, destroying an object of this type will | |
2369 | involve a call to a destructor. This can apply to objects of | |
2370 | ARRAY_TYPE is the type of the elements needs a destructor. */ | |
2371 | #define TYPE_HAS_NONTRIVIAL_DESTRUCTOR(NODE) \ | |
2372 | (TYPE_LANG_FLAG_4 (NODE)) | |
2373 | ||
2374 | /* Nonzero for class type means that copy initialization of this type can use | |
2375 | a bitwise copy. */ | |
2376 | #define TYPE_HAS_TRIVIAL_INIT_REF(NODE) \ | |
2377 | (TYPE_HAS_INIT_REF (NODE) && ! TYPE_HAS_COMPLEX_INIT_REF (NODE)) | |
2378 | ||
2379 | /* Nonzero for class type means that assignment of this type can use | |
2380 | a bitwise copy. */ | |
2381 | #define TYPE_HAS_TRIVIAL_ASSIGN_REF(NODE) \ | |
2382 | (TYPE_HAS_ASSIGN_REF (NODE) && ! TYPE_HAS_COMPLEX_ASSIGN_REF (NODE)) | |
2383 | ||
2384 | /* Returns true if NODE is a pointer-to-data-member. */ | |
2385 | #define TYPE_PTRMEM_P(NODE) \ | |
2386 | (TREE_CODE (NODE) == OFFSET_TYPE) | |
2387 | #define TYPE_PTR_P(NODE) \ | |
2388 | (TREE_CODE (NODE) == POINTER_TYPE) | |
2389 | #define TYPE_PTROB_P(NODE) \ | |
2390 | (TYPE_PTR_P (NODE) \ | |
2391 | && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE \ | |
2392 | && TREE_CODE (TREE_TYPE (NODE)) != METHOD_TYPE \ | |
2393 | && TREE_CODE (TREE_TYPE (NODE)) != VOID_TYPE) | |
2394 | #define TYPE_PTROBV_P(NODE) \ | |
2395 | (TYPE_PTR_P (NODE) && TREE_CODE (TREE_TYPE (NODE)) != FUNCTION_TYPE) | |
2396 | #define TYPE_PTRFN_P(NODE) \ | |
2397 | (TREE_CODE (NODE) == POINTER_TYPE \ | |
2398 | && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE) | |
2399 | #define TYPE_REFFN_P(NODE) \ | |
2400 | (TREE_CODE (NODE) == REFERENCE_TYPE \ | |
2401 | && TREE_CODE (TREE_TYPE (NODE)) == FUNCTION_TYPE) | |
2402 | ||
2403 | /* Nonzero for _TYPE node means that this type is a pointer to member | |
2404 | function type. */ | |
2405 | #define TYPE_PTRMEMFUNC_P(NODE) \ | |
2406 | (TREE_CODE (NODE) == RECORD_TYPE \ | |
2407 | && TYPE_LANG_SPECIFIC (NODE) \ | |
2408 | && TYPE_PTRMEMFUNC_FLAG (NODE)) | |
2409 | ||
2410 | #define TYPE_PTRMEMFUNC_FLAG(NODE) \ | |
2411 | (LANG_TYPE_CLASS_CHECK (NODE)->ptrmemfunc_flag) | |
2412 | ||
2413 | /* Returns true if NODE is a pointer-to-member. */ | |
2414 | #define TYPE_PTR_TO_MEMBER_P(NODE) \ | |
2415 | (TYPE_PTRMEM_P (NODE) || TYPE_PTRMEMFUNC_P (NODE)) | |
2416 | ||
2417 | /* Indicates when overload resolution may resolve to a pointer to | |
2418 | member function. [expr.unary.op]/3 */ | |
2419 | #define PTRMEM_OK_P(NODE) \ | |
2420 | TREE_LANG_FLAG_0 (TREE_CHECK2 ((NODE), ADDR_EXPR, OFFSET_REF)) | |
2421 | ||
2422 | /* Get the POINTER_TYPE to the METHOD_TYPE associated with this | |
2423 | pointer to member function. TYPE_PTRMEMFUNC_P _must_ be true, | |
2424 | before using this macro. */ | |
2425 | #define TYPE_PTRMEMFUNC_FN_TYPE(NODE) \ | |
2426 | (TREE_TYPE (TYPE_FIELDS (NODE))) | |
2427 | ||
2428 | /* Returns `A' for a type like `int (A::*)(double)' */ | |
2429 | #define TYPE_PTRMEMFUNC_OBJECT_TYPE(NODE) \ | |
2430 | TYPE_METHOD_BASETYPE (TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE))) | |
2431 | ||
2432 | /* These are use to manipulate the canonical RECORD_TYPE from the | |
2433 | hashed POINTER_TYPE, and can only be used on the POINTER_TYPE. */ | |
2434 | #define TYPE_GET_PTRMEMFUNC_TYPE(NODE) \ | |
2435 | (TYPE_LANG_SPECIFIC (NODE) ? LANG_TYPE_PTRMEM_CHECK (NODE)->record : NULL) | |
2436 | #define TYPE_SET_PTRMEMFUNC_TYPE(NODE, VALUE) \ | |
2437 | do { \ | |
2438 | if (TYPE_LANG_SPECIFIC (NODE) == NULL) \ | |
2439 | { \ | |
2440 | TYPE_LANG_SPECIFIC (NODE) = \ | |
2441 | ggc_alloc_cleared (sizeof (struct lang_type_ptrmem)); \ | |
2442 | TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.h.is_lang_type_class = 0; \ | |
2443 | } \ | |
2444 | TYPE_LANG_SPECIFIC (NODE)->u.ptrmem.record = (VALUE); \ | |
2445 | } while (0) | |
2446 | /* Returns the pfn field from a TYPE_PTRMEMFUNC_P. */ | |
2447 | #define PFN_FROM_PTRMEMFUNC(NODE) pfn_from_ptrmemfunc ((NODE)) | |
2448 | ||
2449 | /* For a pointer-to-member type of the form `T X::*', this is `X'. | |
2450 | For a type like `void (X::*)() const', this type is `X', not `const | |
2451 | X'. To get at the `const X' you have to look at the | |
2452 | TYPE_PTRMEM_POINTED_TO_TYPE; there, the first parameter will have | |
2453 | type `const X*'. */ | |
2454 | #define TYPE_PTRMEM_CLASS_TYPE(NODE) \ | |
2455 | (TYPE_PTRMEM_P (NODE) \ | |
2456 | ? TYPE_OFFSET_BASETYPE (NODE) \ | |
2457 | : TYPE_PTRMEMFUNC_OBJECT_TYPE (NODE)) | |
2458 | ||
2459 | /* For a pointer-to-member type of the form `T X::*', this is `T'. */ | |
2460 | #define TYPE_PTRMEM_POINTED_TO_TYPE(NODE) \ | |
2461 | (TYPE_PTRMEM_P (NODE) \ | |
2462 | ? TREE_TYPE (NODE) \ | |
2463 | : TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (NODE))) | |
2464 | ||
2465 | /* For a pointer-to-member constant `X::Y' this is the RECORD_TYPE for | |
2466 | `X'. */ | |
2467 | #define PTRMEM_CST_CLASS(NODE) \ | |
2468 | TYPE_PTRMEM_CLASS_TYPE (TREE_TYPE (PTRMEM_CST_CHECK (NODE))) | |
2469 | ||
2470 | /* For a pointer-to-member constant `X::Y' this is the _DECL for | |
2471 | `Y'. */ | |
2472 | #define PTRMEM_CST_MEMBER(NODE) (((ptrmem_cst_t)PTRMEM_CST_CHECK (NODE))->member) | |
2473 | ||
2474 | /* The expression in question for a TYPEOF_TYPE. */ | |
2475 | #define TYPEOF_TYPE_EXPR(NODE) (TYPEOF_TYPE_CHECK (NODE))->type.values | |
2476 | ||
2477 | /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `extern' was | |
2478 | specified in its declaration. This can also be set for an | |
2479 | erroneously declared PARM_DECL. */ | |
2480 | #define DECL_THIS_EXTERN(NODE) \ | |
2481 | DECL_LANG_FLAG_2 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE)) | |
2482 | ||
2483 | /* Nonzero for VAR_DECL and FUNCTION_DECL node means that `static' was | |
2484 | specified in its declaration. This can also be set for an | |
2485 | erroneously declared PARM_DECL. */ | |
2486 | #define DECL_THIS_STATIC(NODE) \ | |
2487 | DECL_LANG_FLAG_6 (VAR_FUNCTION_OR_PARM_DECL_CHECK (NODE)) | |
2488 | ||
2489 | /* Nonzero if TYPE is an anonymous union or struct type. We have to use a | |
2490 | flag for this because "A union for which objects or pointers are | |
2491 | declared is not an anonymous union" [class.union]. */ | |
2492 | #define ANON_AGGR_TYPE_P(NODE) \ | |
2493 | (CLASS_TYPE_P (NODE) && LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr) | |
2494 | #define SET_ANON_AGGR_TYPE_P(NODE) \ | |
2495 | (LANG_TYPE_CLASS_CHECK (NODE)->anon_aggr = 1) | |
2496 | ||
2497 | /* Nonzero if TYPE is an anonymous union type. */ | |
2498 | #define ANON_UNION_TYPE_P(NODE) \ | |
2499 | (TREE_CODE (NODE) == UNION_TYPE && ANON_AGGR_TYPE_P (NODE)) | |
2500 | ||
2501 | #define UNKNOWN_TYPE LANG_TYPE | |
2502 | ||
2503 | /* Define fields and accessors for nodes representing declared names. */ | |
2504 | ||
2505 | #define TYPE_WAS_ANONYMOUS(NODE) (LANG_TYPE_CLASS_CHECK (NODE)->was_anonymous) | |
2506 | ||
2507 | /* C++: all of these are overloaded! These apply only to TYPE_DECLs. */ | |
2508 | ||
2509 | /* The format of each node in the DECL_FRIENDLIST is as follows: | |
2510 | ||
2511 | The TREE_PURPOSE will be the name of a function, i.e., an | |
2512 | IDENTIFIER_NODE. The TREE_VALUE will be itself a TREE_LIST, whose | |
2513 | TREE_VALUEs are friends with the given name. */ | |
2514 | #define DECL_FRIENDLIST(NODE) (DECL_INITIAL (NODE)) | |
2515 | #define FRIEND_NAME(LIST) (TREE_PURPOSE (LIST)) | |
2516 | #define FRIEND_DECLS(LIST) (TREE_VALUE (LIST)) | |
2517 | ||
2518 | /* The DECL_ACCESS, if non-NULL, is a TREE_LIST. The TREE_PURPOSE of | |
2519 | each node is a type; the TREE_VALUE is the access granted for this | |
2520 | DECL in that type. The DECL_ACCESS is set by access declarations. | |
2521 | For example, if a member that would normally be public in a | |
2522 | derived class is made protected, then the derived class and the | |
2523 | protected_access_node will appear in the DECL_ACCESS for the node. */ | |
2524 | #define DECL_ACCESS(NODE) (LANG_DECL_U2_CHECK (NODE, 0)->access) | |
2525 | ||
2526 | /* Nonzero if the FUNCTION_DECL is a global constructor. */ | |
2527 | #define DECL_GLOBAL_CTOR_P(NODE) \ | |
2528 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.global_ctor_p) | |
2529 | ||
2530 | /* Nonzero if the FUNCTION_DECL is a global destructor. */ | |
2531 | #define DECL_GLOBAL_DTOR_P(NODE) \ | |
2532 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.global_dtor_p) | |
2533 | ||
2534 | /* Accessor macros for C++ template decl nodes. */ | |
2535 | ||
2536 | /* The DECL_TEMPLATE_PARMS are a list. The TREE_PURPOSE of each node | |
2537 | is a INT_CST whose TREE_INT_CST_LOW indicates the level of the | |
2538 | template parameters, with 1 being the outermost set of template | |
2539 | parameters. The TREE_VALUE is a vector, whose elements are the | |
2540 | template parameters at each level. Each element in the vector is a | |
2541 | TREE_LIST, whose TREE_VALUE is a PARM_DECL (if the parameter is a | |
2542 | non-type parameter), or a TYPE_DECL (if the parameter is a type | |
2543 | parameter). The TREE_PURPOSE is the default value, if any. The | |
2544 | TEMPLATE_PARM_INDEX for the parameter is available as the | |
2545 | DECL_INITIAL (for a PARM_DECL) or as the TREE_TYPE (for a | |
2546 | TYPE_DECL). */ | |
2547 | #define DECL_TEMPLATE_PARMS(NODE) DECL_ARGUMENTS (NODE) | |
2548 | #define DECL_INNERMOST_TEMPLATE_PARMS(NODE) \ | |
2549 | INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (NODE)) | |
2550 | #define DECL_NTPARMS(NODE) \ | |
2551 | TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (NODE)) | |
2552 | /* For function, method, class-data templates. */ | |
2553 | #define DECL_TEMPLATE_RESULT(NODE) DECL_RESULT_FLD (NODE) | |
2554 | /* For a static member variable template, the | |
2555 | DECL_TEMPLATE_INSTANTIATIONS list contains the explicitly and | |
2556 | implicitly generated instantiations of the variable. There are no | |
2557 | partial instantiations of static member variables, so all of these | |
2558 | will be full instantiations. | |
2559 | ||
2560 | For a class template the DECL_TEMPLATE_INSTANTIATIONS lists holds | |
2561 | all instantiations and specializations of the class type, including | |
2562 | partial instantiations and partial specializations. | |
2563 | ||
2564 | In both cases, the TREE_PURPOSE of each node contains the arguments | |
2565 | used; the TREE_VALUE contains the generated variable. The template | |
2566 | arguments are always complete. For example, given: | |
2567 | ||
2568 | template <class T> struct S1 { | |
2569 | template <class U> struct S2 {}; | |
2570 | template <class U> struct S2<U*> {}; | |
2571 | }; | |
2572 | ||
2573 | the record for the partial specialization will contain, as its | |
2574 | argument list, { {T}, {U*} }, and will be on the | |
2575 | DECL_TEMPLATE_INSTANTIATIONS list for `template <class T> template | |
2576 | <class U> struct S1<T>::S2'. | |
2577 | ||
2578 | This list is not used for function templates. */ | |
2579 | #define DECL_TEMPLATE_INSTANTIATIONS(NODE) DECL_VINDEX (NODE) | |
2580 | /* For a function template, the DECL_TEMPLATE_SPECIALIZATIONS lists | |
2581 | contains all instantiations and specializations of the function, | |
2582 | including partial instantiations. For a partial instantiation | |
2583 | which is a specialization, this list holds only full | |
2584 | specializations of the template that are instantiations of the | |
2585 | partial instantiation. For example, given: | |
2586 | ||
2587 | template <class T> struct S { | |
2588 | template <class U> void f(U); | |
2589 | template <> void f(T); | |
2590 | }; | |
2591 | ||
2592 | the `S<int>::f<int>(int)' function will appear on the | |
2593 | DECL_TEMPLATE_SPECIALIZATIONS list for both `template <class T> | |
2594 | template <class U> void S<T>::f(U)' and `template <class T> void | |
2595 | S<int>::f(T)'. In the latter case, however, it will have only the | |
2596 | innermost set of arguments (T, in this case). The DECL_TI_TEMPLATE | |
2597 | for the function declaration will point at the specialization, not | |
2598 | the fully general template. | |
2599 | ||
2600 | For a class template, this list contains the partial | |
2601 | specializations of this template. (Full specializations are not | |
2602 | recorded on this list.) The TREE_PURPOSE holds the innermost | |
2603 | arguments used in the partial specialization (e.g., for `template | |
2604 | <class T> struct S<T*, int>' this will be `T*'.) The TREE_VALUE | |
2605 | holds the innermost template parameters for the specialization | |
2606 | (e.g., `T' in the example above.) The TREE_TYPE is the _TYPE node | |
2607 | for the partial specialization. | |
2608 | ||
2609 | This list is not used for static variable templates. */ | |
2610 | #define DECL_TEMPLATE_SPECIALIZATIONS(NODE) DECL_SIZE (NODE) | |
2611 | ||
2612 | /* Nonzero for a DECL which is actually a template parameter. */ | |
2613 | #define DECL_TEMPLATE_PARM_P(NODE) \ | |
2614 | (DECL_LANG_FLAG_0 (NODE) \ | |
2615 | && (TREE_CODE (NODE) == CONST_DECL \ | |
2616 | || TREE_CODE (NODE) == PARM_DECL \ | |
2617 | || TREE_CODE (NODE) == TYPE_DECL \ | |
2618 | || TREE_CODE (NODE) == TEMPLATE_DECL)) | |
2619 | ||
2620 | /* Mark NODE as a template parameter. */ | |
2621 | #define SET_DECL_TEMPLATE_PARM_P(NODE) \ | |
2622 | (DECL_LANG_FLAG_0 (NODE) = 1) | |
2623 | ||
2624 | /* Nonzero if NODE is a template template parameter. */ | |
2625 | #define DECL_TEMPLATE_TEMPLATE_PARM_P(NODE) \ | |
2626 | (TREE_CODE (NODE) == TEMPLATE_DECL && DECL_TEMPLATE_PARM_P (NODE)) | |
2627 | ||
2628 | /* Nonzero if NODE is a TEMPLATE_DECL representing an | |
2629 | UNBOUND_CLASS_TEMPLATE tree node. */ | |
2630 | #define DECL_UNBOUND_CLASS_TEMPLATE_P(NODE) \ | |
2631 | (TREE_CODE (NODE) == TEMPLATE_DECL && !DECL_TEMPLATE_RESULT (NODE)) | |
2632 | ||
2633 | #define DECL_FUNCTION_TEMPLATE_P(NODE) \ | |
2634 | (TREE_CODE (NODE) == TEMPLATE_DECL \ | |
2635 | && !DECL_UNBOUND_CLASS_TEMPLATE_P (NODE) \ | |
2636 | && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == FUNCTION_DECL) | |
2637 | ||
2638 | /* Nonzero for a DECL that represents a template class. */ | |
2639 | #define DECL_CLASS_TEMPLATE_P(NODE) \ | |
2640 | (TREE_CODE (NODE) == TEMPLATE_DECL \ | |
2641 | && !DECL_UNBOUND_CLASS_TEMPLATE_P (NODE) \ | |
2642 | && TREE_CODE (DECL_TEMPLATE_RESULT (NODE)) == TYPE_DECL \ | |
2643 | && !DECL_TEMPLATE_TEMPLATE_PARM_P (NODE)) | |
2644 | ||
2645 | /* Nonzero if NODE which declares a type. */ | |
2646 | #define DECL_DECLARES_TYPE_P(NODE) \ | |
2647 | (TREE_CODE (NODE) == TYPE_DECL || DECL_CLASS_TEMPLATE_P (NODE)) | |
2648 | ||
2649 | /* Nonzero if NODE is the typedef implicitly generated for a type when | |
2650 | the type is declared. In C++, `struct S {};' is roughly | |
2651 | equivalent to `struct S {}; typedef struct S S;' in C. | |
2652 | DECL_IMPLICIT_TYPEDEF_P will hold for the typedef indicated in this | |
2653 | example. In C++, there is a second implicit typedef for each | |
2654 | class, in the scope of `S' itself, so that you can say `S::S'. | |
2655 | DECL_SELF_REFERENCE_P will hold for that second typedef. */ | |
2656 | #define DECL_IMPLICIT_TYPEDEF_P(NODE) \ | |
2657 | (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_2 (NODE)) | |
2658 | #define SET_DECL_IMPLICIT_TYPEDEF_P(NODE) \ | |
2659 | (DECL_LANG_FLAG_2 (NODE) = 1) | |
2660 | #define DECL_SELF_REFERENCE_P(NODE) \ | |
2661 | (TREE_CODE (NODE) == TYPE_DECL && DECL_LANG_FLAG_4 (NODE)) | |
2662 | #define SET_DECL_SELF_REFERENCE_P(NODE) \ | |
2663 | (DECL_LANG_FLAG_4 (NODE) = 1) | |
2664 | ||
2665 | /* A `primary' template is one that has its own template header. A | |
2666 | member function of a class template is a template, but not primary. | |
2667 | A member template is primary. Friend templates are primary, too. */ | |
2668 | ||
2669 | /* Returns the primary template corresponding to these parameters. */ | |
2670 | #define DECL_PRIMARY_TEMPLATE(NODE) \ | |
2671 | (TREE_TYPE (DECL_INNERMOST_TEMPLATE_PARMS (NODE))) | |
2672 | ||
2673 | /* Returns nonzero if NODE is a primary template. */ | |
2674 | #define PRIMARY_TEMPLATE_P(NODE) (DECL_PRIMARY_TEMPLATE (NODE) == (NODE)) | |
2675 | ||
2676 | #define CLASSTYPE_TEMPLATE_LEVEL(NODE) \ | |
2677 | (TREE_INT_CST_LOW (TREE_PURPOSE (CLASSTYPE_TI_TEMPLATE (NODE)))) | |
2678 | ||
2679 | /* Indicates whether or not (and how) a template was expanded for this | |
2680 | FUNCTION_DECL or VAR_DECL. | |
2681 | 0=normal declaration, e.g. int min (int, int); | |
2682 | 1=implicit template instantiation | |
2683 | 2=explicit template specialization, e.g. int min<int> (int, int); | |
2684 | 3=explicit template instantiation, e.g. template int min<int> (int, int); */ | |
2685 | #define DECL_USE_TEMPLATE(NODE) (DECL_LANG_SPECIFIC (NODE)->decl_flags.use_template) | |
2686 | ||
2687 | #define DECL_TEMPLATE_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) & 1) | |
2688 | #define CLASSTYPE_TEMPLATE_INSTANTIATION(NODE) \ | |
2689 | (CLASSTYPE_USE_TEMPLATE (NODE) & 1) | |
2690 | ||
2691 | #define DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) == 2) | |
2692 | #define SET_DECL_TEMPLATE_SPECIALIZATION(NODE) (DECL_USE_TEMPLATE (NODE) = 2) | |
2693 | #define CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \ | |
2694 | (CLASSTYPE_USE_TEMPLATE (NODE) == 2) | |
2695 | #define SET_CLASSTYPE_TEMPLATE_SPECIALIZATION(NODE) \ | |
2696 | (CLASSTYPE_USE_TEMPLATE (NODE) = 2) | |
2697 | ||
2698 | #define DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 1) | |
2699 | #define SET_DECL_IMPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 1) | |
2700 | #define CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \ | |
2701 | (CLASSTYPE_USE_TEMPLATE (NODE) == 1) | |
2702 | #define SET_CLASSTYPE_IMPLICIT_INSTANTIATION(NODE) \ | |
2703 | (CLASSTYPE_USE_TEMPLATE (NODE) = 1) | |
2704 | ||
2705 | #define DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) == 3) | |
2706 | #define SET_DECL_EXPLICIT_INSTANTIATION(NODE) (DECL_USE_TEMPLATE (NODE) = 3) | |
2707 | #define CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \ | |
2708 | (CLASSTYPE_USE_TEMPLATE (NODE) == 3) | |
2709 | #define SET_CLASSTYPE_EXPLICIT_INSTANTIATION(NODE) \ | |
2710 | (CLASSTYPE_USE_TEMPLATE (NODE) = 3) | |
2711 | ||
2712 | /* Nonzero if DECL is a friend function which is an instantiation | |
2713 | from the point of view of the compiler, but not from the point of | |
2714 | view of the language. For example given: | |
2715 | template <class T> struct S { friend void f(T) {}; }; | |
2716 | the declaration of `void f(int)' generated when S<int> is | |
2717 | instantiated will not be a DECL_TEMPLATE_INSTANTIATION, but will be | |
2718 | a DECL_FRIEND_PSUEDO_TEMPLATE_INSTANTIATION. */ | |
2719 | #define DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION(DECL) \ | |
2720 | (DECL_TEMPLATE_INFO (DECL) && !DECL_USE_TEMPLATE (DECL)) | |
2721 | ||
2722 | /* Nonzero iff we are currently processing a declaration for an | |
2723 | entity with its own template parameter list, and which is not a | |
2724 | full specialization. */ | |
2725 | #define PROCESSING_REAL_TEMPLATE_DECL_P() \ | |
2726 | (processing_template_decl > template_class_depth (current_scope ())) | |
2727 | ||
2728 | /* Nonzero if this VAR_DECL or FUNCTION_DECL has already been | |
2729 | instantiated, i.e. its definition has been generated from the | |
2730 | pattern given in the the template. */ | |
2731 | #define DECL_TEMPLATE_INSTANTIATED(NODE) \ | |
2732 | DECL_LANG_FLAG_1 (VAR_OR_FUNCTION_DECL_CHECK (NODE)) | |
2733 | ||
2734 | /* We know what we're doing with this decl now. */ | |
2735 | #define DECL_INTERFACE_KNOWN(NODE) DECL_LANG_FLAG_5 (NODE) | |
2736 | ||
2737 | /* DECL_EXTERNAL must be set on a decl until the decl is actually emitted, | |
2738 | so that assemble_external will work properly. So we have this flag to | |
2739 | tell us whether the decl is really not external. */ | |
2740 | #define DECL_NOT_REALLY_EXTERN(NODE) \ | |
2741 | (DECL_LANG_SPECIFIC (NODE)->decl_flags.not_really_extern) | |
2742 | ||
2743 | #define DECL_REALLY_EXTERN(NODE) \ | |
2744 | (DECL_EXTERNAL (NODE) && ! DECL_NOT_REALLY_EXTERN (NODE)) | |
2745 | ||
2746 | /* A thunk is a stub function. | |
2747 | ||
2748 | A thunk is an alternate entry point for an ordinary FUNCTION_DECL. | |
2749 | The address of the ordinary FUNCTION_DECL is given by the | |
2750 | DECL_INITIAL, which is always an ADDR_EXPR whose operand is a | |
2751 | FUNCTION_DECL. The job of the thunk is to either adjust the this | |
2752 | pointer before transferring control to the FUNCTION_DECL, or call | |
2753 | FUNCTION_DECL and then adjust the result value. Note, the result | |
2754 | pointer adjusting thunk must perform a call to the thunked | |
2755 | function, (or be implemented via passing some invisible parameter | |
2756 | to the thunked function, which is modified to perform the | |
2757 | adjustment just before returning). | |
2758 | ||
2759 | A thunk may perform either, or both, of the following operations: | |
2760 | ||
2761 | o Adjust the this or result pointer by a constant offset. | |
2762 | o Adjust the this or result pointer by looking up a vcall or vbase offset | |
2763 | in the vtable. | |
2764 | ||
2765 | A this pointer adjusting thunk converts from a base to a derived | |
2766 | class, and hence adds the offsets. A result pointer adjusting thunk | |
2767 | converts from a derived class to a base, and hence subtracts the | |
2768 | offsets. If both operations are performed, then the constant | |
2769 | adjustment is performed first for this pointer adjustment and last | |
2770 | for the result pointer adjustment. | |
2771 | ||
2772 | The constant adjustment is given by THUNK_FIXED_OFFSET. If the | |
2773 | vcall or vbase offset is required, THUNK_VIRTUAL_OFFSET is | |
2774 | used. For this pointer adjusting thunks, it is the vcall offset | |
2775 | into the vtable. For result pointer adjusting thunks it is the | |
2776 | binfo of the virtual base to convert to. Use that binfo's vbase | |
2777 | offset. | |
2778 | ||
2779 | It is possible to have equivalent covariant thunks. These are | |
2780 | distinct virtual covariant thunks whose vbase offsets happen to | |
2781 | have the same value. THUNK_ALIAS is used to pick one as the | |
2782 | canonical thunk, which will get all the this pointer adjusting | |
2783 | thunks attached to it. */ | |
2784 | ||
2785 | /* An integer indicating how many bytes should be subtracted from the | |
2786 | this or result pointer when this function is called. */ | |
2787 | #define THUNK_FIXED_OFFSET(DECL) \ | |
2788 | (DECL_LANG_SPECIFIC (VAR_OR_FUNCTION_DECL_CHECK (DECL))->u.f.fixed_offset) | |
2789 | ||
2790 | /* A tree indicating how to perform the virtual adjustment. For a this | |
2791 | adjusting thunk it is the number of bytes to be added to the vtable | |
2792 | to find the vcall offset. For a result adjusting thunk, it is the | |
2793 | binfo of the relevant virtual base. If NULL, then there is no | |
2794 | virtual adjust. (The vptr is always located at offset zero from | |
2795 | the this or result pointer.) (If the covariant type is within the | |
2796 | class hierarchy being laid out, the vbase index is not yet known | |
2797 | at the point we need to create the thunks, hence the need to use | |
2798 | binfos.) */ | |
2799 | ||
2800 | #define THUNK_VIRTUAL_OFFSET(DECL) \ | |
2801 | (LANG_DECL_U2_CHECK (FUNCTION_DECL_CHECK (DECL), 0)->access) | |
2802 | ||
2803 | /* A thunk which is equivalent to another thunk. */ | |
2804 | #define THUNK_ALIAS(DECL) \ | |
2805 | (DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (DECL))->decl_flags.u.template_info) | |
2806 | ||
2807 | /* For thunk NODE, this is the FUNCTION_DECL thunked to. */ | |
2808 | #define THUNK_TARGET(NODE) \ | |
2809 | (DECL_LANG_SPECIFIC (NODE)->u.f.befriending_classes) | |
2810 | ||
2811 | /* These macros provide convenient access to the various _STMT nodes | |
2812 | created when parsing template declarations. */ | |
2813 | #define TRY_STMTS(NODE) TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 0) | |
2814 | #define TRY_HANDLERS(NODE) TREE_OPERAND (TRY_BLOCK_CHECK (NODE), 1) | |
2815 | ||
2816 | #define EH_SPEC_STMTS(NODE) TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 0) | |
2817 | #define EH_SPEC_RAISES(NODE) TREE_OPERAND (EH_SPEC_BLOCK_CHECK (NODE), 1) | |
2818 | ||
2819 | #define USING_STMT_NAMESPACE(NODE) TREE_OPERAND (USING_STMT_CHECK (NODE), 0) | |
2820 | ||
2821 | /* Nonzero if this try block is a function try block. */ | |
2822 | #define FN_TRY_BLOCK_P(NODE) TREE_LANG_FLAG_3 (TRY_BLOCK_CHECK (NODE)) | |
2823 | #define HANDLER_PARMS(NODE) TREE_OPERAND (HANDLER_CHECK (NODE), 0) | |
2824 | #define HANDLER_BODY(NODE) TREE_OPERAND (HANDLER_CHECK (NODE), 1) | |
2825 | #define HANDLER_TYPE(NODE) TREE_TYPE (HANDLER_CHECK (NODE)) | |
2826 | ||
2827 | /* CLEANUP_STMT accessors. The statement(s) covered, the cleanup to run | |
2828 | and the VAR_DECL for which this cleanup exists. */ | |
2829 | #define CLEANUP_BODY(NODE) TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 0) | |
2830 | #define CLEANUP_EXPR(NODE) TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 1) | |
2831 | #define CLEANUP_DECL(NODE) TREE_OPERAND (CLEANUP_STMT_CHECK (NODE), 2) | |
2832 | ||
2833 | /* IF_STMT accessors. These give access to the condition of the if | |
2834 | statement, the then block of the if statement, and the else block | |
2835 | of the if statement if it exists. */ | |
2836 | #define IF_COND(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 0) | |
2837 | #define THEN_CLAUSE(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 1) | |
2838 | #define ELSE_CLAUSE(NODE) TREE_OPERAND (IF_STMT_CHECK (NODE), 2) | |
2839 | ||
2840 | /* An enumeration of the kind of tags that C++ accepts. */ | |
2841 | enum tag_types { | |
2842 | none_type = 0, /* Not a tag type. */ | |
2843 | record_type, /* "struct" types. */ | |
2844 | class_type, /* "class" types. */ | |
2845 | union_type, /* "union" types. */ | |
2846 | enum_type, /* "enum" types. */ | |
2847 | typename_type /* "typename" types. */ | |
2848 | }; | |
2849 | ||
2850 | /* The various kinds of lvalues we distinguish. */ | |
2851 | typedef enum cp_lvalue_kind { | |
2852 | clk_none = 0, /* Things that are not an lvalue. */ | |
2853 | clk_ordinary = 1, /* An ordinary lvalue. */ | |
2854 | clk_class = 2, /* An rvalue of class-type. */ | |
2855 | clk_bitfield = 4, /* An lvalue for a bit-field. */ | |
2856 | clk_packed = 8 /* An lvalue for a packed field. */ | |
2857 | } cp_lvalue_kind; | |
2858 | ||
2859 | /* Various kinds of template specialization, instantiation, etc. */ | |
2860 | typedef enum tmpl_spec_kind { | |
2861 | tsk_none, /* Not a template at all. */ | |
2862 | tsk_invalid_member_spec, /* An explicit member template | |
2863 | specialization, but the enclosing | |
2864 | classes have not all been explicitly | |
2865 | specialized. */ | |
2866 | tsk_invalid_expl_inst, /* An explicit instantiation containing | |
2867 | template parameter lists. */ | |
2868 | tsk_excessive_parms, /* A template declaration with too many | |
2869 | template parameter lists. */ | |
2870 | tsk_insufficient_parms, /* A template declaration with too few | |
2871 | parameter lists. */ | |
2872 | tsk_template, /* A template declaration. */ | |
2873 | tsk_expl_spec, /* An explicit specialization. */ | |
2874 | tsk_expl_inst /* An explicit instantiation. */ | |
2875 | } tmpl_spec_kind; | |
2876 | ||
2877 | /* The various kinds of access. BINFO_ACCESS depends on these being | |
2878 | two bit quantities. The numerical values are important; they are | |
2879 | used to initialize RTTI data structures, so changing them changes | |
2880 | the ABI. */ | |
2881 | typedef enum access_kind { | |
2882 | ak_none = 0, /* Inaccessible. */ | |
2883 | ak_public = 1, /* Accessible, as a `public' thing. */ | |
2884 | ak_protected = 2, /* Accessible, as a `protected' thing. */ | |
2885 | ak_private = 3 /* Accessible, as a `private' thing. */ | |
2886 | } access_kind; | |
2887 | ||
2888 | /* The various kinds of special functions. If you add to this list, | |
2889 | you should update special_function_p as well. */ | |
2890 | typedef enum special_function_kind { | |
2891 | sfk_none = 0, /* Not a special function. This enumeral | |
2892 | must have value zero; see | |
2893 | special_function_p. */ | |
2894 | sfk_constructor, /* A constructor. */ | |
2895 | sfk_copy_constructor, /* A copy constructor. */ | |
2896 | sfk_assignment_operator, /* An assignment operator. */ | |
2897 | sfk_destructor, /* A destructor. */ | |
2898 | sfk_complete_destructor, /* A destructor for complete objects. */ | |
2899 | sfk_base_destructor, /* A destructor for base subobjects. */ | |
2900 | sfk_deleting_destructor, /* A destructor for complete objects that | |
2901 | deletes the object after it has been | |
2902 | destroyed. */ | |
2903 | sfk_conversion /* A conversion operator. */ | |
2904 | } special_function_kind; | |
2905 | ||
2906 | /* The various kinds of linkage. From [basic.link], | |
2907 | ||
2908 | A name is said to have linkage when it might denote the same | |
2909 | object, reference, function, type, template, namespace or value | |
2910 | as a name introduced in another scope: | |
2911 | ||
2912 | -- When a name has external linkage, the entity it denotes can | |
2913 | be referred to from scopes of other translation units or from | |
2914 | other scopes of the same translation unit. | |
2915 | ||
2916 | -- When a name has internal linkage, the entity it denotes can | |
2917 | be referred to by names from other scopes in the same | |
2918 | translation unit. | |
2919 | ||
2920 | -- When a name has no linkage, the entity it denotes cannot be | |
2921 | referred to by names from other scopes. */ | |
2922 | ||
2923 | typedef enum linkage_kind { | |
2924 | lk_none, /* No linkage. */ | |
2925 | lk_internal, /* Internal linkage. */ | |
2926 | lk_external /* External linkage. */ | |
2927 | } linkage_kind; | |
2928 | ||
2929 | /* Bitmask flags to control type substitution. */ | |
2930 | typedef enum tsubst_flags_t { | |
2931 | tf_none = 0, /* nothing special */ | |
2932 | tf_error = 1 << 0, /* give error messages */ | |
2933 | tf_warning = 1 << 1, /* give warnings too */ | |
2934 | tf_ignore_bad_quals = 1 << 2, /* ignore bad cvr qualifiers */ | |
2935 | tf_keep_type_decl = 1 << 3, /* retain typedef type decls | |
2936 | (make_typename_type use) */ | |
2937 | tf_ptrmem_ok = 1 << 4, /* pointers to member ok (internal | |
2938 | instantiate_type use) */ | |
2939 | tf_user = 1 << 5, /* found template must be a user template | |
2940 | (lookup_template_class use) */ | |
2941 | tf_conv = 1 << 6 /* We are determining what kind of | |
2942 | conversion might be permissible, | |
2943 | not actually performing the | |
2944 | conversion. */ | |
2945 | } tsubst_flags_t; | |
2946 | ||
2947 | /* The kind of checking we can do looking in a class hierarchy. */ | |
2948 | typedef enum base_access { | |
2949 | ba_any = 0, /* Do not check access, allow an ambiguous base, | |
2950 | prefer a non-virtual base */ | |
2951 | ba_ignore = 1, /* Do not check access */ | |
2952 | ba_check = 2, /* Check access */ | |
2953 | ba_not_special = 3, /* Do not consider special privilege | |
2954 | current_class_type might give. */ | |
2955 | ba_quiet = 4 /* Do not issue error messages (bit mask). */ | |
2956 | } base_access; | |
2957 | ||
2958 | /* The various kinds of access check during parsing. */ | |
2959 | typedef enum deferring_kind { | |
2960 | dk_no_deferred = 0, /* Check access immediately */ | |
2961 | dk_deferred = 1, /* Deferred check */ | |
2962 | dk_no_check = 2 /* No access check */ | |
2963 | } deferring_kind; | |
2964 | ||
2965 | /* The kind of base we can find, looking in a class hierarchy. | |
2966 | Values <0 indicate we failed. */ | |
2967 | typedef enum base_kind { | |
2968 | bk_inaccessible = -3, /* The base is inaccessible */ | |
2969 | bk_ambig = -2, /* The base is ambiguous */ | |
2970 | bk_not_base = -1, /* It is not a base */ | |
2971 | bk_same_type = 0, /* It is the same type */ | |
2972 | bk_proper_base = 1, /* It is a proper base */ | |
2973 | bk_via_virtual = 2 /* It is a proper base, but via a virtual | |
2974 | path. This might not be the canonical | |
2975 | binfo. */ | |
2976 | } base_kind; | |
2977 | ||
2978 | /* in decl{2}.c */ | |
2979 | /* A node that is a list (length 1) of error_mark_nodes. */ | |
2980 | extern GTY(()) tree error_mark_list; | |
2981 | ||
2982 | /* Node for "pointer to (virtual) function". | |
2983 | This may be distinct from ptr_type_node so gdb can distinguish them. */ | |
2984 | #define vfunc_ptr_type_node vtable_entry_type | |
2985 | ||
2986 | ||
2987 | /* For building calls to `delete'. */ | |
2988 | extern GTY(()) tree integer_two_node; | |
2989 | extern GTY(()) tree integer_three_node; | |
2990 | ||
2991 | /* The number of function bodies which we are currently processing. | |
2992 | (Zero if we are at namespace scope, one inside the body of a | |
2993 | function, two inside the body of a function in a local class, etc.) */ | |
2994 | extern int function_depth; | |
2995 | ||
2996 | /* in pt.c */ | |
2997 | ||
2998 | /* These values are used for the `STRICT' parameter to type_unification and | |
2999 | fn_type_unification. Their meanings are described with the | |
3000 | documentation for fn_type_unification. */ | |
3001 | ||
3002 | typedef enum unification_kind_t { | |
3003 | DEDUCE_CALL, | |
3004 | DEDUCE_CONV, | |
3005 | DEDUCE_EXACT, | |
3006 | DEDUCE_ORDER | |
3007 | } unification_kind_t; | |
3008 | ||
3009 | /* Macros for operating on a template instantiation level node. */ | |
3010 | ||
3011 | #define TINST_DECL(NODE) TREE_OPERAND (NODE, 0) | |
3012 | ||
3013 | /* in class.c */ | |
3014 | ||
3015 | extern int current_class_depth; | |
3016 | ||
3017 | /* An array of all local classes present in this translation unit, in | |
3018 | declaration order. */ | |
3019 | extern GTY(()) varray_type local_classes; | |
3020 | \f | |
3021 | /* Here's where we control how name mangling takes place. */ | |
3022 | ||
3023 | /* Cannot use '$' up front, because this confuses gdb | |
3024 | (names beginning with '$' are gdb-local identifiers). | |
3025 | ||
3026 | Note that all forms in which the '$' is significant are long enough | |
3027 | for direct indexing (meaning that if we know there is a '$' | |
3028 | at a particular location, we can index into the string at | |
3029 | any other location that provides distinguishing characters). */ | |
3030 | ||
3031 | /* Define NO_DOLLAR_IN_LABEL in your favorite tm file if your assembler | |
3032 | doesn't allow '$' in symbol names. */ | |
3033 | #ifndef NO_DOLLAR_IN_LABEL | |
3034 | ||
3035 | #define JOINER '$' | |
3036 | ||
3037 | #define VPTR_NAME "$v" | |
3038 | #define THROW_NAME "$eh_throw" | |
3039 | #define AUTO_VTABLE_NAME "__vtbl$me__" | |
3040 | #define AUTO_TEMP_NAME "_$tmp_" | |
3041 | #define AUTO_TEMP_FORMAT "_$tmp_%d" | |
3042 | #define VTABLE_BASE "$vb" | |
3043 | #define VTABLE_NAME_PREFIX "__vt_" | |
3044 | #define VFIELD_BASE "$vf" | |
3045 | #define VFIELD_NAME "_vptr$" | |
3046 | #define VFIELD_NAME_FORMAT "_vptr$%s" | |
3047 | #define STATIC_NAME_FORMAT "_%s$%s" | |
3048 | #define ANON_AGGRNAME_FORMAT "$_%d" | |
3049 | ||
3050 | #else /* NO_DOLLAR_IN_LABEL */ | |
3051 | ||
3052 | #ifndef NO_DOT_IN_LABEL | |
3053 | ||
3054 | #define JOINER '.' | |
3055 | ||
3056 | #define VPTR_NAME ".v" | |
3057 | #define THROW_NAME ".eh_throw" | |
3058 | #define AUTO_VTABLE_NAME "__vtbl.me__" | |
3059 | #define AUTO_TEMP_NAME "_.tmp_" | |
3060 | #define AUTO_TEMP_FORMAT "_.tmp_%d" | |
3061 | #define VTABLE_BASE ".vb" | |
3062 | #define VTABLE_NAME_PREFIX "__vt_" | |
3063 | #define VFIELD_BASE ".vf" | |
3064 | #define VFIELD_NAME "_vptr." | |
3065 | #define VFIELD_NAME_FORMAT "_vptr.%s" | |
3066 | #define STATIC_NAME_FORMAT "_%s.%s" | |
3067 | ||
3068 | #define ANON_AGGRNAME_FORMAT "._%d" | |
3069 | ||
3070 | #else /* NO_DOT_IN_LABEL */ | |
3071 | ||
3072 | #define VPTR_NAME "__vptr" | |
3073 | #define VPTR_NAME_P(ID_NODE) \ | |
3074 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VPTR_NAME, sizeof (VPTR_NAME) - 1)) | |
3075 | #define THROW_NAME "__eh_throw" | |
3076 | #define IN_CHARGE_NAME "__in_chrg" | |
3077 | #define AUTO_VTABLE_NAME "__vtbl_me__" | |
3078 | #define AUTO_TEMP_NAME "__tmp_" | |
3079 | #define TEMP_NAME_P(ID_NODE) \ | |
3080 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, \ | |
3081 | sizeof (AUTO_TEMP_NAME) - 1)) | |
3082 | #define AUTO_TEMP_FORMAT "__tmp_%d" | |
3083 | #define VTABLE_BASE "__vtb" | |
3084 | #define VTABLE_NAME "__vt_" | |
3085 | #define VTABLE_NAME_PREFIX "__vt_" | |
3086 | #define VTABLE_NAME_P(ID_NODE) \ | |
3087 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VTABLE_NAME, \ | |
3088 | sizeof (VTABLE_NAME) - 1)) | |
3089 | #define VFIELD_BASE "__vfb" | |
3090 | #define VFIELD_NAME "__vptr_" | |
3091 | #define VFIELD_NAME_P(ID_NODE) \ | |
3092 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, \ | |
3093 | sizeof (VFIELD_NAME) - 1)) | |
3094 | #define VFIELD_NAME_FORMAT "__vptr_%s" | |
3095 | #define STATIC_NAME_FORMAT "__static_%s_%s" | |
3096 | ||
3097 | #define ANON_AGGRNAME_PREFIX "__anon_" | |
3098 | #define ANON_AGGRNAME_P(ID_NODE) \ | |
3099 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), ANON_AGGRNAME_PREFIX, \ | |
3100 | sizeof (ANON_AGGRNAME_PREFIX) - 1)) | |
3101 | #define ANON_AGGRNAME_FORMAT "__anon_%d" | |
3102 | ||
3103 | #endif /* NO_DOT_IN_LABEL */ | |
3104 | #endif /* NO_DOLLAR_IN_LABEL */ | |
3105 | ||
3106 | #define THIS_NAME "this" | |
3107 | #define CTOR_NAME "__ct" | |
3108 | #define DTOR_NAME "__dt" | |
3109 | ||
3110 | #define IN_CHARGE_NAME "__in_chrg" | |
3111 | ||
3112 | #define VTBL_PTR_TYPE "__vtbl_ptr_type" | |
3113 | #define VTABLE_DELTA_NAME "__delta" | |
3114 | #define VTABLE_PFN_NAME "__pfn" | |
3115 | ||
3116 | #define EXCEPTION_CLEANUP_NAME "exception cleanup" | |
3117 | ||
3118 | #if !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) | |
3119 | ||
3120 | #define VPTR_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \ | |
3121 | && IDENTIFIER_POINTER (ID_NODE)[1] == 'v') | |
3122 | ||
3123 | #define VTABLE_NAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[1] == 'v' \ | |
3124 | && IDENTIFIER_POINTER (ID_NODE)[2] == 't' \ | |
3125 | && IDENTIFIER_POINTER (ID_NODE)[3] == JOINER) | |
3126 | ||
3127 | #define TEMP_NAME_P(ID_NODE) \ | |
3128 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), AUTO_TEMP_NAME, sizeof (AUTO_TEMP_NAME)-1)) | |
3129 | #define VFIELD_NAME_P(ID_NODE) \ | |
3130 | (!strncmp (IDENTIFIER_POINTER (ID_NODE), VFIELD_NAME, sizeof(VFIELD_NAME)-1)) | |
3131 | ||
3132 | /* For anonymous aggregate types, we need some sort of name to | |
3133 | hold on to. In practice, this should not appear, but it should | |
3134 | not be harmful if it does. */ | |
3135 | #define ANON_AGGRNAME_P(ID_NODE) (IDENTIFIER_POINTER (ID_NODE)[0] == JOINER \ | |
3136 | && IDENTIFIER_POINTER (ID_NODE)[1] == '_') | |
3137 | #endif /* !defined(NO_DOLLAR_IN_LABEL) || !defined(NO_DOT_IN_LABEL) */ | |
3138 | ||
3139 | /* Returns nonzero iff NODE is a declaration for the global function | |
3140 | `main'. */ | |
3141 | #define DECL_MAIN_P(NODE) \ | |
3142 | (DECL_EXTERN_C_FUNCTION_P (NODE) \ | |
3143 | && DECL_NAME (NODE) != NULL_TREE \ | |
3144 | && MAIN_NAME_P (DECL_NAME (NODE))) | |
3145 | ||
3146 | \f | |
3147 | /* Nonzero if we're done parsing and into end-of-file activities. */ | |
3148 | ||
3149 | extern int at_eof; | |
3150 | ||
3151 | /* A list of namespace-scope objects which have constructors or | |
3152 | destructors which reside in the global scope. The decl is stored | |
3153 | in the TREE_VALUE slot and the initializer is stored in the | |
3154 | TREE_PURPOSE slot. */ | |
3155 | extern GTY(()) tree static_aggregates; | |
3156 | ||
3157 | /* Functions called along with real static constructors and destructors. */ | |
3158 | ||
3159 | extern GTY(()) tree static_ctors; | |
3160 | extern GTY(()) tree static_dtors; | |
3161 | ||
3162 | enum overload_flags { NO_SPECIAL = 0, DTOR_FLAG, OP_FLAG, TYPENAME_FLAG }; | |
3163 | ||
3164 | /* Some macros for char-based bitfields. */ | |
3165 | #define B_SET(A,X) ((A)[(X)>>3] |= (1 << ((X)&7))) | |
3166 | #define B_CLR(A,X) ((A)[(X)>>3] &= ~(1 << ((X)&7))) | |
3167 | #define B_TST(A,X) ((A)[(X)>>3] & (1 << ((X)&7))) | |
3168 | ||
3169 | /* These are uses as bits in flags passed to build_new_method_call | |
3170 | to control its error reporting behavior. | |
3171 | ||
3172 | LOOKUP_PROTECT means flag access violations. | |
3173 | LOOKUP_COMPLAIN mean complain if no suitable member function | |
3174 | matching the arguments is found. | |
3175 | LOOKUP_NORMAL is just a combination of these two. | |
3176 | LOOKUP_NONVIRTUAL means make a direct call to the member function found | |
3177 | LOOKUP_GLOBAL means search through the space of overloaded functions, | |
3178 | as well as the space of member functions. | |
3179 | LOOKUP_ONLYCONVERTING means that non-conversion constructors are not tried. | |
3180 | DIRECT_BIND means that if a temporary is created, it should be created so | |
3181 | that it lives as long as the current variable bindings; otherwise it | |
3182 | only lives until the end of the complete-expression. It also forces | |
3183 | direct-initialization in cases where other parts of the compiler have | |
3184 | already generated a temporary, such as reference initialization and the | |
3185 | catch parameter. | |
3186 | LOOKUP_NO_CONVERSION means that user-defined conversions are not | |
3187 | permitted. Built-in conversions are permitted. | |
3188 | LOOKUP_DESTRUCTOR means explicit call to destructor. | |
3189 | LOOKUP_NO_TEMP_BIND means temporaries will not be bound to references. | |
3190 | ||
3191 | These are used in global lookup to support elaborated types and | |
3192 | qualifiers. | |
3193 | ||
3194 | LOOKUP_PREFER_TYPES means not to accept objects, and possibly namespaces. | |
3195 | LOOKUP_PREFER_NAMESPACES means not to accept objects, and possibly types. | |
3196 | LOOKUP_PREFER_BOTH means class-or-namespace-name. */ | |
3197 | ||
3198 | #define LOOKUP_PROTECT (1 << 0) | |
3199 | #define LOOKUP_COMPLAIN (1 << 1) | |
3200 | #define LOOKUP_NORMAL (LOOKUP_PROTECT | LOOKUP_COMPLAIN) | |
3201 | #define LOOKUP_NONVIRTUAL (1 << 2) | |
3202 | #define LOOKUP_GLOBAL (1 << 3) | |
3203 | #define LOOKUP_ONLYCONVERTING (1 << 4) | |
3204 | #define DIRECT_BIND (1 << 5) | |
3205 | #define LOOKUP_NO_CONVERSION (1 << 6) | |
3206 | #define LOOKUP_DESTRUCTOR (1 << 7) | |
3207 | #define LOOKUP_NO_TEMP_BIND (1 << 8) | |
3208 | #define LOOKUP_PREFER_TYPES (1 << 9) | |
3209 | #define LOOKUP_PREFER_NAMESPACES (1 << 10) | |
3210 | #define LOOKUP_PREFER_BOTH (LOOKUP_PREFER_TYPES | LOOKUP_PREFER_NAMESPACES) | |
3211 | #define LOOKUP_CONSTRUCTOR_CALLABLE (1 << 11) | |
3212 | ||
3213 | #define LOOKUP_NAMESPACES_ONLY(F) \ | |
3214 | (((F) & LOOKUP_PREFER_NAMESPACES) && !((F) & LOOKUP_PREFER_TYPES)) | |
3215 | #define LOOKUP_TYPES_ONLY(F) \ | |
3216 | (!((F) & LOOKUP_PREFER_NAMESPACES) && ((F) & LOOKUP_PREFER_TYPES)) | |
3217 | #define LOOKUP_QUALIFIERS_ONLY(F) ((F) & LOOKUP_PREFER_BOTH) | |
3218 | ||
3219 | ||
3220 | /* These flags are used by the conversion code. | |
3221 | CONV_IMPLICIT : Perform implicit conversions (standard and user-defined). | |
3222 | CONV_STATIC : Perform the explicit conversions for static_cast. | |
3223 | CONV_CONST : Perform the explicit conversions for const_cast. | |
3224 | CONV_REINTERPRET: Perform the explicit conversions for reinterpret_cast. | |
3225 | CONV_PRIVATE : Perform upcasts to private bases. | |
3226 | CONV_FORCE_TEMP : Require a new temporary when converting to the same | |
3227 | aggregate type. */ | |
3228 | ||
3229 | #define CONV_IMPLICIT 1 | |
3230 | #define CONV_STATIC 2 | |
3231 | #define CONV_CONST 4 | |
3232 | #define CONV_REINTERPRET 8 | |
3233 | #define CONV_PRIVATE 16 | |
3234 | /* #define CONV_NONCONVERTING 32 */ | |
3235 | #define CONV_FORCE_TEMP 64 | |
3236 | #define CONV_STATIC_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_FORCE_TEMP) | |
3237 | #define CONV_OLD_CONVERT (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \ | |
3238 | | CONV_REINTERPRET) | |
3239 | #define CONV_C_CAST (CONV_IMPLICIT | CONV_STATIC | CONV_CONST \ | |
3240 | | CONV_REINTERPRET | CONV_PRIVATE | CONV_FORCE_TEMP) | |
3241 | ||
3242 | /* Used by build_expr_type_conversion to indicate which types are | |
3243 | acceptable as arguments to the expression under consideration. */ | |
3244 | ||
3245 | #define WANT_INT 1 /* integer types, including bool */ | |
3246 | #define WANT_FLOAT 2 /* floating point types */ | |
3247 | #define WANT_ENUM 4 /* enumerated types */ | |
3248 | #define WANT_POINTER 8 /* pointer types */ | |
3249 | #define WANT_NULL 16 /* null pointer constant */ | |
3250 | #define WANT_ARITH (WANT_INT | WANT_FLOAT) | |
3251 | ||
3252 | /* Used with comptypes, and related functions, to guide type | |
3253 | comparison. */ | |
3254 | ||
3255 | #define COMPARE_STRICT 0 /* Just check if the types are the | |
3256 | same. */ | |
3257 | #define COMPARE_BASE 1 /* Check to see if the second type is | |
3258 | derived from the first. */ | |
3259 | #define COMPARE_DERIVED 2 /* Like COMPARE_BASE, but in | |
3260 | reverse. */ | |
3261 | #define COMPARE_REDECLARATION 4 /* The comparison is being done when | |
3262 | another declaration of an existing | |
3263 | entity is seen. */ | |
3264 | ||
3265 | /* Used with push_overloaded_decl. */ | |
3266 | #define PUSH_GLOBAL 0 /* Push the DECL into namespace scope, | |
3267 | regardless of the current scope. */ | |
3268 | #define PUSH_LOCAL 1 /* Push the DECL into the current | |
3269 | scope. */ | |
3270 | #define PUSH_USING 2 /* We are pushing this DECL as the | |
3271 | result of a using declaration. */ | |
3272 | ||
3273 | /* Used with start function. */ | |
3274 | #define SF_DEFAULT 0 /* No flags. */ | |
3275 | #define SF_PRE_PARSED 1 /* The function declaration has | |
3276 | already been parsed. */ | |
3277 | #define SF_INCLASS_INLINE 2 /* The function is an inline, defined | |
3278 | in the class body. */ | |
3279 | ||
3280 | /* Returns nonzero iff TYPE1 and TYPE2 are the same type, or if TYPE2 | |
3281 | is derived from TYPE1, or if TYPE2 is a pointer (reference) to a | |
3282 | class derived from the type pointed to (referred to) by TYPE1. */ | |
3283 | #define same_or_base_type_p(TYPE1, TYPE2) \ | |
3284 | comptypes ((TYPE1), (TYPE2), COMPARE_BASE) | |
3285 | ||
3286 | /* These macros are used to access a TEMPLATE_PARM_INDEX. */ | |
3287 | #define TEMPLATE_PARM_INDEX_CAST(NODE) \ | |
3288 | ((template_parm_index*)TEMPLATE_PARM_INDEX_CHECK (NODE)) | |
3289 | #define TEMPLATE_PARM_IDX(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->index) | |
3290 | #define TEMPLATE_PARM_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->level) | |
3291 | #define TEMPLATE_PARM_DESCENDANTS(NODE) (TREE_CHAIN (NODE)) | |
3292 | #define TEMPLATE_PARM_ORIG_LEVEL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->orig_level) | |
3293 | #define TEMPLATE_PARM_DECL(NODE) (TEMPLATE_PARM_INDEX_CAST (NODE)->decl) | |
3294 | ||
3295 | /* These macros are for accessing the fields of TEMPLATE_TYPE_PARM, | |
3296 | TEMPLATE_TEMPLATE_PARM and BOUND_TEMPLATE_TEMPLATE_PARM nodes. */ | |
3297 | #define TEMPLATE_TYPE_PARM_INDEX(NODE) \ | |
3298 | (TREE_CHECK3 ((NODE), TEMPLATE_TYPE_PARM, TEMPLATE_TEMPLATE_PARM, \ | |
3299 | BOUND_TEMPLATE_TEMPLATE_PARM))->type.values | |
3300 | #define TEMPLATE_TYPE_IDX(NODE) \ | |
3301 | (TEMPLATE_PARM_IDX (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3302 | #define TEMPLATE_TYPE_LEVEL(NODE) \ | |
3303 | (TEMPLATE_PARM_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3304 | #define TEMPLATE_TYPE_ORIG_LEVEL(NODE) \ | |
3305 | (TEMPLATE_PARM_ORIG_LEVEL (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3306 | #define TEMPLATE_TYPE_DECL(NODE) \ | |
3307 | (TEMPLATE_PARM_DECL (TEMPLATE_TYPE_PARM_INDEX (NODE))) | |
3308 | ||
3309 | /* These constants can used as bit flags in the process of tree formatting. | |
3310 | ||
3311 | TFF_PLAIN_IDENTIFIER: unqualified part of a name. | |
3312 | TFF_SCOPE: include the class and namespace scope of the name. | |
3313 | TFF_CHASE_TYPEDEF: print the original type-id instead of the typedef-name. | |
3314 | TFF_DECL_SPECIFIERS: print decl-specifiers. | |
3315 | TFF_CLASS_KEY_OR_ENUM: precede a class-type name (resp. enum name) with | |
3316 | a class-key (resp. `enum'). | |
3317 | TFF_RETURN_TYPE: include function return type. | |
3318 | TFF_FUNCTION_DEFAULT_ARGUMENTS: include function default parameter values. | |
3319 | TFF_EXCEPTION_SPECIFICATION: show function exception specification. | |
3320 | TFF_TEMPLATE_HEADER: show the template<...> header in a | |
3321 | template-declaration. | |
3322 | TFF_TEMPLATE_NAME: show only template-name. | |
3323 | TFF_EXPR_IN_PARENS: parenthesize expressions. | |
3324 | TFF_NO_FUNCTION_ARGUMENTS: don't show function arguments. */ | |
3325 | ||
3326 | #define TFF_PLAIN_IDENTIFIER (0) | |
3327 | #define TFF_SCOPE (1) | |
3328 | #define TFF_CHASE_TYPEDEF (1 << 1) | |
3329 | #define TFF_DECL_SPECIFIERS (1 << 2) | |
3330 | #define TFF_CLASS_KEY_OR_ENUM (1 << 3) | |
3331 | #define TFF_RETURN_TYPE (1 << 4) | |
3332 | #define TFF_FUNCTION_DEFAULT_ARGUMENTS (1 << 5) | |
3333 | #define TFF_EXCEPTION_SPECIFICATION (1 << 6) | |
3334 | #define TFF_TEMPLATE_HEADER (1 << 7) | |
3335 | #define TFF_TEMPLATE_NAME (1 << 8) | |
3336 | #define TFF_EXPR_IN_PARENS (1 << 9) | |
3337 | #define TFF_NO_FUNCTION_ARGUMENTS (1 << 10) | |
3338 | ||
3339 | /* Returns the TEMPLATE_DECL associated to a TEMPLATE_TEMPLATE_PARM | |
3340 | node. */ | |
3341 | #define TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL(NODE) \ | |
3342 | ((TREE_CODE (NODE) == BOUND_TEMPLATE_TEMPLATE_PARM) \ | |
3343 | ? TYPE_TI_TEMPLATE (NODE) \ | |
3344 | : TYPE_NAME (NODE)) | |
3345 | ||
3346 | /* in lex.c */ | |
3347 | ||
3348 | extern void init_reswords (void); | |
3349 | ||
3350 | /* Indexed by TREE_CODE, these tables give C-looking names to | |
3351 | operators represented by TREE_CODES. For example, | |
3352 | opname_tab[(int) MINUS_EXPR] == "-". */ | |
3353 | extern const char **opname_tab, **assignop_tab; | |
3354 | ||
3355 | typedef struct operator_name_info_t GTY(()) | |
3356 | { | |
3357 | /* The IDENTIFIER_NODE for the operator. */ | |
3358 | tree identifier; | |
3359 | /* The name of the operator. */ | |
3360 | const char *name; | |
3361 | /* The mangled name of the operator. */ | |
3362 | const char *mangled_name; | |
3363 | /* The arity of the operator. */ | |
3364 | int arity; | |
3365 | } operator_name_info_t; | |
3366 | ||
3367 | /* A mapping from tree codes to operator name information. */ | |
3368 | extern GTY(()) operator_name_info_t operator_name_info | |
3369 | [(int) LAST_CPLUS_TREE_CODE]; | |
3370 | /* Similar, but for assignment operators. */ | |
3371 | extern GTY(()) operator_name_info_t assignment_operator_name_info | |
3372 | [(int) LAST_CPLUS_TREE_CODE]; | |
3373 | ||
3374 | /* A type-qualifier, or bitmask therefore, using the TYPE_QUAL | |
3375 | constants. */ | |
3376 | ||
3377 | typedef int cp_cv_quals; | |
3378 | ||
3379 | /* A storage class. */ | |
3380 | ||
3381 | typedef enum cp_storage_class { | |
3382 | /* sc_none must be zero so that zeroing a cp_decl_specifier_seq | |
3383 | sets the storage_class field to sc_none. */ | |
3384 | sc_none = 0, | |
3385 | sc_auto, | |
3386 | sc_register, | |
3387 | sc_static, | |
3388 | sc_extern, | |
3389 | sc_mutable | |
3390 | } cp_storage_class; | |
3391 | ||
3392 | /* An individual decl-specifier. */ | |
3393 | ||
3394 | typedef enum cp_decl_spec { | |
3395 | ds_first, | |
3396 | ds_signed = ds_first, | |
3397 | ds_unsigned, | |
3398 | ds_short, | |
3399 | ds_long, | |
3400 | ds_const, | |
3401 | ds_volatile, | |
3402 | ds_restrict, | |
3403 | ds_inline, | |
3404 | ds_virtual, | |
3405 | ds_explicit, | |
3406 | ds_friend, | |
3407 | ds_typedef, | |
3408 | ds_complex, | |
3409 | ds_thread, | |
3410 | ds_last | |
3411 | } cp_decl_spec; | |
3412 | ||
3413 | /* A decl-specifier-seq. */ | |
3414 | ||
3415 | typedef struct cp_decl_specifier_seq { | |
3416 | /* The number of times each of the keywords has been seen. */ | |
3417 | unsigned specs[(int) ds_last]; | |
3418 | /* The primary type, if any, given by the decl-specifier-seq. | |
3419 | Modifiers, like "short", "const", and "unsigned" are not | |
3420 | reflected here. This field will be a TYPE, unless a typedef-name | |
3421 | was used, in which case it will be a TYPE_DECL. */ | |
3422 | tree type; | |
3423 | /* The attributes, if any, provided with the specifier sequence. */ | |
3424 | tree attributes; | |
3425 | /* If non-NULL, a built-in type that the user attempted to redefine | |
3426 | to some other type. */ | |
3427 | tree redefined_builtin_type; | |
3428 | /* The storage class specified -- or sc_none if no storage class was | |
3429 | explicitly specified. */ | |
3430 | cp_storage_class storage_class; | |
3431 | /* True iff TYPE_SPEC indicates a user-defined type. */ | |
3432 | BOOL_BITFIELD user_defined_type_p : 1; | |
3433 | /* True iff multiple types were (erroneously) specified for this | |
3434 | decl-specifier-seq. */ | |
3435 | BOOL_BITFIELD multiple_types_p : 1; | |
3436 | /* True iff multiple storage classes were (erroneously) specified | |
3437 | for this decl-specifier-seq. */ | |
3438 | BOOL_BITFIELD multiple_storage_classes_p : 1; | |
3439 | /* True iff at least one decl-specifier was found. */ | |
3440 | BOOL_BITFIELD any_specifiers_p : 1; | |
3441 | /* True iff "int" was explicitly provided. */ | |
3442 | BOOL_BITFIELD explicit_int_p : 1; | |
3443 | /* True iff "char" was explicitly provided. */ | |
3444 | BOOL_BITFIELD explicit_char_p : 1; | |
3445 | } cp_decl_specifier_seq; | |
3446 | ||
3447 | /* The various kinds of declarators. */ | |
3448 | ||
3449 | typedef enum cp_declarator_kind { | |
3450 | cdk_id, | |
3451 | cdk_function, | |
3452 | cdk_array, | |
3453 | cdk_pointer, | |
3454 | cdk_reference, | |
3455 | cdk_ptrmem, | |
3456 | cdk_error | |
3457 | } cp_declarator_kind; | |
3458 | ||
3459 | /* A declarator. */ | |
3460 | ||
3461 | typedef struct cp_declarator cp_declarator; | |
3462 | ||
3463 | typedef struct cp_parameter_declarator cp_parameter_declarator; | |
3464 | ||
3465 | /* A parameter, before it has been semantically analyzed. */ | |
3466 | struct cp_parameter_declarator { | |
3467 | /* The next parameter, or NULL_TREE if none. */ | |
3468 | cp_parameter_declarator *next; | |
3469 | /* The decl-specifiers-seq for the parameter. */ | |
3470 | cp_decl_specifier_seq decl_specifiers; | |
3471 | /* The declarator for the parameter. */ | |
3472 | cp_declarator *declarator; | |
3473 | /* The default-argument expression, or NULL_TREE, if none. */ | |
3474 | tree default_argument; | |
3475 | /* True iff this is the first parameter in the list and the | |
3476 | parameter sequence ends with an ellipsis. */ | |
3477 | bool ellipsis_p; | |
3478 | }; | |
3479 | ||
3480 | /* A declarator. */ | |
3481 | struct cp_declarator { | |
3482 | /* The kind of declarator. */ | |
3483 | cp_declarator_kind kind; | |
3484 | /* Attributes that apply to this declarator. */ | |
3485 | tree attributes; | |
3486 | /* For all but cdk_id and cdk_error, the contained declarator. For | |
3487 | cdk_id and cdk_error, guaranteed to be NULL. */ | |
3488 | cp_declarator *declarator; | |
3489 | union { | |
3490 | /* For identifiers. */ | |
3491 | struct { | |
3492 | /* The name of the function -- an IDENTIFIER_NODE, BIT_NOT_EXPR, | |
3493 | TEMPLATE_ID_EXPR, or SCOPE_REF. */ | |
3494 | tree name; | |
3495 | /* If this is the name of a function, what kind of special | |
3496 | function (if any). */ | |
3497 | special_function_kind sfk; | |
3498 | } id; | |
3499 | /* For functions. */ | |
3500 | struct { | |
3501 | /* The parameters to the function. */ | |
3502 | cp_parameter_declarator *parameters; | |
3503 | /* The cv-qualifiers for the function. */ | |
3504 | cp_cv_quals qualifiers; | |
3505 | /* The exception-specification for the function. */ | |
3506 | tree exception_specification; | |
3507 | } function; | |
3508 | /* For arrays. */ | |
3509 | struct { | |
3510 | /* The bounds to the array. */ | |
3511 | tree bounds; | |
3512 | } array; | |
3513 | /* For cdk_pointer, cdk_reference, and cdk_ptrmem. */ | |
3514 | struct { | |
3515 | /* The cv-qualifiers for the pointer. */ | |
3516 | cp_cv_quals qualifiers; | |
3517 | /* For cdk_ptrmem, the class type containing the member. */ | |
3518 | tree class_type; | |
3519 | } pointer; | |
3520 | } u; | |
3521 | }; | |
3522 | ||
3523 | /* An erroneous declarator. */ | |
3524 | extern cp_declarator *cp_error_declarator; | |
3525 | ||
3526 | /* A parameter list indicating for a function with no parameters, | |
3527 | e.g "int f(void)". */ | |
3528 | extern cp_parameter_declarator *no_parameters; | |
3529 | ||
3530 | /* in call.c */ | |
3531 | extern bool check_dtor_name (tree, tree); | |
3532 | ||
3533 | extern tree build_vfield_ref (tree, tree); | |
3534 | extern tree build_conditional_expr (tree, tree, tree); | |
3535 | extern tree build_addr_func (tree); | |
3536 | extern tree build_call (tree, tree); | |
3537 | extern bool null_ptr_cst_p (tree); | |
3538 | extern bool sufficient_parms_p (tree); | |
3539 | extern tree type_decays_to (tree); | |
3540 | extern tree build_user_type_conversion (tree, tree, int); | |
3541 | extern tree build_new_function_call (tree, tree); | |
3542 | extern tree build_operator_new_call (tree, tree, tree *, tree *); | |
3543 | extern tree build_new_method_call (tree, tree, tree, tree, int); | |
3544 | extern tree build_special_member_call (tree, tree, tree, tree, int); | |
3545 | extern tree build_new_op (enum tree_code, int, tree, tree, tree, bool *); | |
3546 | extern tree build_op_delete_call (enum tree_code, tree, tree, bool, tree); | |
3547 | extern bool can_convert (tree, tree); | |
3548 | extern bool can_convert_arg (tree, tree, tree); | |
3549 | extern bool can_convert_arg_bad (tree, tree, tree); | |
3550 | extern bool enforce_access (tree, tree); | |
3551 | extern tree convert_default_arg (tree, tree, tree, int); | |
3552 | extern tree convert_arg_to_ellipsis (tree); | |
3553 | extern tree build_x_va_arg (tree, tree); | |
3554 | extern tree cxx_type_promotes_to (tree); | |
3555 | extern tree type_passed_as (tree); | |
3556 | extern tree convert_for_arg_passing (tree, tree); | |
3557 | extern tree cp_convert_parm_for_inlining (tree, tree, tree); | |
3558 | extern bool is_properly_derived_from (tree, tree); | |
3559 | extern tree initialize_reference (tree, tree, tree, tree *); | |
3560 | extern tree make_temporary_var_for_ref_to_temp (tree, tree); | |
3561 | extern tree strip_top_quals (tree); | |
3562 | extern tree perform_implicit_conversion (tree, tree); | |
3563 | extern tree perform_direct_initialization_if_possible (tree, tree); | |
3564 | extern tree in_charge_arg_for_name (tree); | |
3565 | extern tree build_cxx_call (tree, tree); | |
3566 | #ifdef ENABLE_CHECKING | |
3567 | extern void validate_conversion_obstack (void); | |
3568 | #endif /* ENABLE_CHECKING */ | |
3569 | ||
3570 | /* in class.c */ | |
3571 | extern tree build_base_path (enum tree_code, tree, tree, int); | |
3572 | extern tree convert_to_base (tree, tree, bool); | |
3573 | extern tree convert_to_base_statically (tree, tree); | |
3574 | extern tree build_vtbl_ref (tree, tree); | |
3575 | extern tree build_vfn_ref (tree, tree); | |
3576 | extern tree get_vtable_decl (tree, int); | |
3577 | extern void resort_type_method_vec | |
3578 | (void *, void *, gt_pointer_operator, void *); | |
3579 | extern void add_method (tree, tree); | |
3580 | extern int currently_open_class (tree); | |
3581 | extern tree currently_open_derived_class (tree); | |
3582 | extern tree finish_struct (tree, tree); | |
3583 | extern void finish_struct_1 (tree); | |
3584 | extern int resolves_to_fixed_type_p (tree, int *); | |
3585 | extern void init_class_processing (void); | |
3586 | extern int is_empty_class (tree); | |
3587 | extern void pushclass (tree); | |
3588 | extern void popclass (void); | |
3589 | extern void push_nested_class (tree); | |
3590 | extern void pop_nested_class (void); | |
3591 | extern int current_lang_depth (void); | |
3592 | extern void push_lang_context (tree); | |
3593 | extern void pop_lang_context (void); | |
3594 | extern tree instantiate_type (tree, tree, tsubst_flags_t); | |
3595 | extern void print_class_statistics (void); | |
3596 | extern void cxx_print_statistics (void); | |
3597 | extern void cxx_print_xnode (FILE *, tree, int); | |
3598 | extern void cxx_print_decl (FILE *, tree, int); | |
3599 | extern void cxx_print_type (FILE *, tree, int); | |
3600 | extern void cxx_print_identifier (FILE *, tree, int); | |
3601 | extern void cxx_print_error_function (struct diagnostic_context *, | |
3602 | const char *); | |
3603 | extern void build_self_reference (void); | |
3604 | extern int same_signature_p (tree, tree); | |
3605 | extern void warn_hidden (tree); | |
3606 | extern void maybe_add_class_template_decl_list (tree, tree, int); | |
3607 | extern tree get_enclosing_class (tree); | |
3608 | extern void unreverse_member_declarations (tree); | |
3609 | extern void invalidate_class_lookup_cache (void); | |
3610 | extern void maybe_note_name_used_in_class (tree, tree); | |
3611 | extern void note_name_declared_in_class (tree, tree); | |
3612 | extern tree get_vtbl_decl_for_binfo (tree); | |
3613 | extern tree get_vtt_name (tree); | |
3614 | extern tree get_primary_binfo (tree); | |
3615 | extern void debug_class (tree); | |
3616 | extern void debug_thunks (tree); | |
3617 | extern tree cp_fold_obj_type_ref (tree, tree); | |
3618 | ||
3619 | /* in cvt.c */ | |
3620 | extern tree convert_to_reference (tree, tree, int, int, tree); | |
3621 | extern tree convert_from_reference (tree); | |
3622 | extern tree convert_lvalue (tree, tree); | |
3623 | extern tree force_rvalue (tree); | |
3624 | extern tree ocp_convert (tree, tree, int, int); | |
3625 | extern tree cp_convert (tree, tree); | |
3626 | extern tree convert_to_void (tree, const char */*implicit context*/); | |
3627 | extern tree convert_force (tree, tree, int); | |
3628 | extern tree build_type_conversion (tree, tree); | |
3629 | extern tree build_expr_type_conversion (int, tree, bool); | |
3630 | extern tree type_promotes_to (tree); | |
3631 | extern tree perform_qualification_conversions (tree, tree); | |
3632 | extern void clone_function_decl (tree, int); | |
3633 | extern void adjust_clone_args (tree); | |
3634 | ||
3635 | /* decl.c */ | |
3636 | extern tree poplevel (int, int, int); | |
3637 | extern void insert_block (tree); | |
3638 | extern tree pushdecl (tree); | |
3639 | extern void cxx_init_decl_processing (void); | |
3640 | enum cp_tree_node_structure_enum cp_tree_node_structure | |
3641 | (union lang_tree_node *); | |
3642 | extern bool cxx_mark_addressable (tree); | |
3643 | extern void cxx_push_function_context (struct function *); | |
3644 | extern void cxx_pop_function_context (struct function *); | |
3645 | extern void cxx_mark_function_context (struct function *); | |
3646 | extern void maybe_push_cleanup_level (tree); | |
3647 | extern void finish_scope (void); | |
3648 | extern void delete_block (tree); | |
3649 | extern void add_block_current_level (tree); | |
3650 | extern void push_switch (tree); | |
3651 | extern void pop_switch (void); | |
3652 | extern void pushtag (tree, tree, int); | |
3653 | extern tree make_anon_name (void); | |
3654 | extern void clear_anon_tags (void); | |
3655 | extern int decls_match (tree, tree); | |
3656 | extern tree duplicate_decls (tree, tree); | |
3657 | extern tree pushdecl_top_level (tree); | |
3658 | extern tree pushdecl_top_level_and_finish (tree, tree); | |
3659 | extern tree push_using_decl (tree, tree); | |
3660 | extern tree declare_local_label (tree); | |
3661 | extern tree define_label (location_t, tree); | |
3662 | extern void check_goto (tree); | |
3663 | extern void define_case_label (void); | |
3664 | extern tree make_typename_type (tree, tree, tsubst_flags_t); | |
3665 | extern tree make_unbound_class_template (tree, tree, tsubst_flags_t); | |
3666 | extern tree check_for_out_of_scope_variable (tree); | |
3667 | extern tree build_library_fn (tree, tree); | |
3668 | extern tree build_library_fn_ptr (const char *, tree); | |
3669 | extern tree build_cp_library_fn_ptr (const char *, tree); | |
3670 | extern tree push_library_fn (tree, tree); | |
3671 | extern tree push_void_library_fn (tree, tree); | |
3672 | extern tree push_throw_library_fn (tree, tree); | |
3673 | extern int init_type_desc (void); | |
3674 | extern tree check_tag_decl (cp_decl_specifier_seq *); | |
3675 | extern tree shadow_tag (cp_decl_specifier_seq *); | |
3676 | extern tree groktypename (cp_decl_specifier_seq *, const cp_declarator *); | |
3677 | extern tree start_decl (const cp_declarator *, cp_decl_specifier_seq *, int, tree, tree); | |
3678 | extern void start_decl_1 (tree); | |
3679 | extern void cp_finish_decl (tree, tree, tree, int); | |
3680 | extern void finish_decl (tree, tree, tree); | |
3681 | extern int complete_array_type (tree, tree, int); | |
3682 | extern tree build_ptrmemfunc_type (tree); | |
3683 | extern tree build_ptrmem_type (tree, tree); | |
3684 | /* the grokdeclarator prototype is in decl.h */ | |
3685 | extern int copy_fn_p (tree); | |
3686 | extern tree get_scope_of_declarator (const cp_declarator *); | |
3687 | extern void grok_special_member_properties (tree); | |
3688 | extern int grok_ctor_properties (tree, tree); | |
3689 | extern bool grok_op_properties (tree, int, bool); | |
3690 | extern tree xref_tag (enum tag_types, tree, bool, bool); | |
3691 | extern tree xref_tag_from_type (tree, tree, int); | |
3692 | extern void xref_basetypes (tree, tree); | |
3693 | extern tree start_enum (tree); | |
3694 | extern void finish_enum (tree); | |
3695 | extern void build_enumerator (tree, tree, tree); | |
3696 | extern void start_preparsed_function (tree, tree, int); | |
3697 | extern int start_function (cp_decl_specifier_seq *, const cp_declarator *, tree); | |
3698 | extern tree begin_function_body (void); | |
3699 | extern void finish_function_body (tree); | |
3700 | extern tree finish_function (int); | |
3701 | extern tree start_method (cp_decl_specifier_seq *, const cp_declarator *, tree); | |
3702 | extern tree finish_method (tree); | |
3703 | extern void maybe_register_incomplete_var (tree); | |
3704 | extern void complete_vars (tree); | |
3705 | extern void finish_stmt (void); | |
3706 | extern void print_other_binding_stack (struct cp_binding_level *); | |
3707 | extern void revert_static_member_fn (tree); | |
3708 | extern void fixup_anonymous_aggr (tree); | |
3709 | extern int check_static_variable_definition (tree, tree); | |
3710 | extern tree compute_array_index_type (tree, tree); | |
3711 | extern tree check_default_argument (tree, tree); | |
3712 | extern int vtable_decl_p (tree, void *); | |
3713 | extern int vtype_decl_p (tree, void *); | |
3714 | extern int sigtable_decl_p (tree, void *); | |
3715 | typedef bool (*walk_globals_pred) (tree, void *); | |
3716 | typedef bool (*walk_globals_fn) (tree *, void *); | |
3717 | extern bool walk_globals (walk_globals_pred, walk_globals_fn, void *); | |
3718 | extern bool walk_vtables (walk_globals_pred, walk_globals_fn, void *); | |
3719 | typedef int (*walk_namespaces_fn) (tree, void *); | |
3720 | extern int walk_namespaces (walk_namespaces_fn, | |
3721 | void *); | |
3722 | extern int wrapup_globals_for_namespace (tree, void *); | |
3723 | extern tree create_implicit_typedef (tree, tree); | |
3724 | extern tree maybe_push_decl (tree); | |
3725 | extern tree force_target_expr (tree, tree); | |
3726 | extern tree build_target_expr_with_type (tree, tree); | |
3727 | extern int local_variable_p (tree); | |
3728 | extern int nonstatic_local_decl_p (tree); | |
3729 | extern tree declare_global_var (tree, tree); | |
3730 | extern void register_dtor_fn (tree); | |
3731 | extern tmpl_spec_kind current_tmpl_spec_kind (int); | |
3732 | extern tree cp_fname_init (const char *, tree *); | |
3733 | extern tree builtin_function (const char *, tree, int, enum built_in_class, | |
3734 | const char *, tree); | |
3735 | extern tree check_elaborated_type_specifier (enum tag_types, tree, bool); | |
3736 | extern void warn_extern_redeclared_static (tree, tree); | |
3737 | extern bool cp_missing_noreturn_ok_p (tree); | |
3738 | ||
3739 | extern bool have_extern_spec; | |
3740 | ||
3741 | /* in decl2.c */ | |
3742 | extern bool check_java_method (tree); | |
3743 | extern cp_cv_quals grok_method_quals (tree, tree, cp_cv_quals); | |
3744 | extern void maybe_retrofit_in_chrg (tree); | |
3745 | extern void maybe_make_one_only (tree); | |
3746 | extern void grokclassfn (tree, tree, enum overload_flags, cp_cv_quals); | |
3747 | extern tree grok_array_decl (tree, tree); | |
3748 | extern tree delete_sanity (tree, tree, bool, int); | |
3749 | extern tree check_classfn (tree, tree, tree); | |
3750 | extern void check_member_template (tree); | |
3751 | extern tree grokfield (const cp_declarator *, cp_decl_specifier_seq *, tree, tree, tree); | |
3752 | extern tree grokbitfield (const cp_declarator *, cp_decl_specifier_seq *, tree); | |
3753 | extern tree groktypefield (tree, tree); | |
3754 | extern void cplus_decl_attributes (tree *, tree, int); | |
3755 | extern void finish_anon_union (tree); | |
3756 | extern tree finish_table (tree, tree, tree, int); | |
3757 | extern tree coerce_new_type (tree); | |
3758 | extern tree coerce_delete_type (tree); | |
3759 | extern void comdat_linkage (tree); | |
3760 | extern void import_export_vtable (tree, tree, int); | |
3761 | extern void import_export_decl (tree); | |
3762 | extern void import_export_tinfo (tree, tree, bool); | |
3763 | extern tree build_cleanup (tree); | |
3764 | extern tree build_offset_ref_call_from_tree (tree, tree); | |
3765 | extern void check_default_args (tree); | |
3766 | extern void mark_used (tree); | |
3767 | extern void finish_static_data_member_decl (tree, tree, tree, int); | |
3768 | extern tree cp_build_parm_decl (tree, tree); | |
3769 | extern tree build_artificial_parm (tree, tree); | |
3770 | extern tree get_guard (tree); | |
3771 | extern tree get_guard_cond (tree); | |
3772 | extern tree set_guard (tree); | |
3773 | extern tree cxx_callgraph_analyze_expr (tree *, int *, tree); | |
3774 | ||
3775 | /* XXX Not i18n clean. */ | |
3776 | #define cp_deprecated(STR) \ | |
3777 | do { \ | |
3778 | if (warn_deprecated) \ | |
3779 | warning ("%s is deprecated, please see the documentation for details", \ | |
3780 | (STR)); \ | |
3781 | } while (0) | |
3782 | ||
3783 | /* in error.c */ | |
3784 | extern void init_error (void); | |
3785 | extern const char *type_as_string (tree, int); | |
3786 | extern const char *decl_as_string (tree, int); | |
3787 | extern const char *expr_as_string (tree, int); | |
3788 | extern const char *context_as_string (tree, int); | |
3789 | extern const char *lang_decl_name (tree, int); | |
3790 | extern const char *language_to_string (enum languages); | |
3791 | extern void print_instantiation_context (void); | |
3792 | ||
3793 | /* in except.c */ | |
3794 | extern void init_exception_processing (void); | |
3795 | extern tree expand_start_catch_block (tree); | |
3796 | extern void expand_end_catch_block (void); | |
3797 | extern void expand_builtin_throw (void); | |
3798 | extern void expand_exception_blocks (void); | |
3799 | extern tree build_exc_ptr (void); | |
3800 | extern tree build_throw (tree); | |
3801 | extern void mark_all_runtime_matches (void); | |
3802 | extern int nothrow_libfn_p (tree); | |
3803 | extern void check_handlers (tree); | |
3804 | extern void choose_personality_routine (enum languages); | |
3805 | extern tree eh_type_info (tree); | |
3806 | ||
3807 | /* in expr.c */ | |
3808 | extern rtx cxx_expand_expr (tree, rtx, | |
3809 | enum machine_mode, | |
3810 | int, rtx *); | |
3811 | extern tree cplus_expand_constant (tree); | |
3812 | ||
3813 | /* friend.c */ | |
3814 | extern int is_friend (tree, tree); | |
3815 | extern void make_friend_class (tree, tree, bool); | |
3816 | extern void add_friend (tree, tree, bool); | |
3817 | extern tree do_friend (tree, tree, tree, tree, enum overload_flags, cp_cv_quals, int); | |
3818 | ||
3819 | /* in init.c */ | |
3820 | extern tree expand_member_init (tree); | |
3821 | extern void emit_mem_initializers (tree); | |
3822 | extern tree build_aggr_init (tree, tree, int); | |
3823 | extern tree build_init (tree, tree, int); | |
3824 | extern int is_aggr_type (tree, int); | |
3825 | extern tree get_type_value (tree); | |
3826 | extern tree build_zero_init (tree, tree, bool); | |
3827 | extern tree build_offset_ref (tree, tree, bool); | |
3828 | extern tree build_new (tree, tree, tree, tree, int); | |
3829 | extern tree build_vec_init (tree, tree, tree, int); | |
3830 | extern tree build_x_delete (tree, int, tree); | |
3831 | extern tree build_delete (tree, tree, special_function_kind, int, int); | |
3832 | extern void push_base_cleanups (void); | |
3833 | extern tree build_vbase_delete (tree, tree); | |
3834 | extern tree build_vec_delete (tree, tree, special_function_kind, int); | |
3835 | extern tree create_temporary_var (tree); | |
3836 | extern void initialize_vtbl_ptrs (tree); | |
3837 | extern tree build_java_class_ref (tree); | |
3838 | ||
3839 | /* in lex.c */ | |
3840 | extern void cxx_dup_lang_specific_decl (tree); | |
3841 | extern void print_parse_statistics (void); | |
3842 | extern void do_pending_inlines (void); | |
3843 | extern void yyungetc (int, int); | |
3844 | extern void snarf_method (tree); | |
3845 | ||
3846 | extern void see_typename (void); | |
3847 | extern tree unqualified_name_lookup_error (tree); | |
3848 | extern tree unqualified_fn_lookup_error (tree); | |
3849 | extern tree build_lang_decl (enum tree_code, tree, tree); | |
3850 | extern void retrofit_lang_decl (tree); | |
3851 | extern tree copy_decl (tree); | |
3852 | extern tree copy_type (tree); | |
3853 | extern tree cxx_make_type (enum tree_code); | |
3854 | extern tree make_aggr_type (enum tree_code); | |
3855 | extern void yyerror (const char *); | |
3856 | extern void yyhook (int); | |
3857 | extern int cp_type_qual_from_rid (tree); | |
3858 | extern bool cxx_init (void); | |
3859 | extern void cxx_finish (void); | |
3860 | ||
3861 | /* in method.c */ | |
3862 | extern void init_method (void); | |
3863 | extern tree make_thunk (tree, bool, tree, tree); | |
3864 | extern void finish_thunk (tree); | |
3865 | extern void use_thunk (tree, bool); | |
3866 | extern void synthesize_method (tree); | |
3867 | extern tree implicitly_declare_fn (special_function_kind, tree, bool); | |
3868 | extern tree lazily_declare_fn (special_function_kind, tree); | |
3869 | extern tree skip_artificial_parms_for (tree, tree); | |
3870 | ||
3871 | /* In optimize.c */ | |
3872 | extern bool maybe_clone_body (tree); | |
3873 | ||
3874 | /* in pt.c */ | |
3875 | extern void check_template_shadow (tree); | |
3876 | extern tree get_innermost_template_args (tree, int); | |
3877 | extern void maybe_begin_member_template_processing (tree); | |
3878 | extern void maybe_end_member_template_processing (void); | |
3879 | extern tree finish_member_template_decl (tree); | |
3880 | extern void begin_template_parm_list (void); | |
3881 | extern void begin_specialization (void); | |
3882 | extern void reset_specialization (void); | |
3883 | extern void end_specialization (void); | |
3884 | extern void begin_explicit_instantiation (void); | |
3885 | extern void end_explicit_instantiation (void); | |
3886 | extern tree check_explicit_specialization (tree, tree, int, int); | |
3887 | extern tree process_template_parm (tree, tree, bool); | |
3888 | extern tree end_template_parm_list (tree); | |
3889 | extern void end_template_decl (void); | |
3890 | extern tree current_template_args (void); | |
3891 | extern tree push_template_decl (tree); | |
3892 | extern tree push_template_decl_real (tree, int); | |
3893 | extern void redeclare_class_template (tree, tree); | |
3894 | extern tree lookup_template_class (tree, tree, tree, tree, int, tsubst_flags_t); | |
3895 | extern tree lookup_template_function (tree, tree); | |
3896 | extern int uses_template_parms (tree); | |
3897 | extern int uses_template_parms_level (tree, int); | |
3898 | extern tree instantiate_class_template (tree); | |
3899 | extern tree instantiate_template (tree, tree, tsubst_flags_t); | |
3900 | extern int fn_type_unification (tree, tree, tree, tree, tree, unification_kind_t, int); | |
3901 | extern tree tinst_for_decl (void); | |
3902 | extern void mark_decl_instantiated (tree, int); | |
3903 | extern int more_specialized (tree, tree, int, int); | |
3904 | extern void mark_class_instantiated (tree, int); | |
3905 | extern void do_decl_instantiation (tree, tree); | |
3906 | extern void do_type_instantiation (tree, tree, tsubst_flags_t); | |
3907 | extern tree instantiate_decl (tree, int, int); | |
3908 | extern int push_tinst_level (tree); | |
3909 | extern void pop_tinst_level (void); | |
3910 | extern int more_specialized_class (tree, tree, tree); | |
3911 | extern int is_member_template (tree); | |
3912 | extern int comp_template_parms (tree, tree); | |
3913 | extern int template_class_depth (tree); | |
3914 | extern int is_specialization_of (tree, tree); | |
3915 | extern bool is_specialization_of_friend (tree, tree); | |
3916 | extern int comp_template_args (tree, tree); | |
3917 | extern void maybe_process_partial_specialization (tree); | |
3918 | extern void maybe_check_template_type (tree); | |
3919 | extern tree most_specialized_instantiation (tree); | |
3920 | extern void print_candidates (tree); | |
3921 | extern int instantiate_pending_templates (void); | |
3922 | extern tree tsubst_default_argument (tree, tree, tree); | |
3923 | extern tree tsubst_copy_and_build (tree, tree, tsubst_flags_t, tree, bool); | |
3924 | extern tree most_general_template (tree); | |
3925 | extern tree get_mostly_instantiated_function_type (tree); | |
3926 | extern int problematic_instantiation_changed (void); | |
3927 | extern void record_last_problematic_instantiation (void); | |
3928 | extern tree current_instantiation (void); | |
3929 | extern tree maybe_get_template_decl_from_type_decl (tree); | |
3930 | extern int processing_template_parmlist; | |
3931 | extern bool dependent_type_p (tree); | |
3932 | extern bool any_dependent_template_arguments_p (tree); | |
3933 | extern bool dependent_template_p (tree); | |
3934 | extern bool dependent_template_id_p (tree, tree); | |
3935 | extern bool type_dependent_expression_p (tree); | |
3936 | extern bool any_type_dependent_arguments_p (tree); | |
3937 | extern bool value_dependent_expression_p (tree); | |
3938 | extern tree resolve_typename_type (tree, bool); | |
3939 | extern tree template_for_substitution (tree); | |
3940 | extern tree build_non_dependent_expr (tree); | |
3941 | extern tree build_non_dependent_args (tree); | |
3942 | extern bool reregister_specialization (tree, tree, tree); | |
3943 | extern tree fold_non_dependent_expr (tree); | |
3944 | ||
3945 | /* in repo.c */ | |
3946 | extern void repo_template_used (tree); | |
3947 | extern void repo_template_instantiated (tree, bool); | |
3948 | extern void init_repo (const char *); | |
3949 | extern void finish_repo (void); | |
3950 | ||
3951 | /* in rtti.c */ | |
3952 | /* A varray of all tinfo decls that haven't been emitted yet. */ | |
3953 | extern GTY(()) varray_type unemitted_tinfo_decls; | |
3954 | ||
3955 | extern void init_rtti_processing (void); | |
3956 | extern tree build_typeid (tree); | |
3957 | extern tree get_tinfo_decl (tree); | |
3958 | extern tree get_typeid (tree); | |
3959 | extern tree build_dynamic_cast (tree, tree); | |
3960 | extern void emit_support_tinfos (void); | |
3961 | extern bool emit_tinfo_decl (tree); | |
3962 | ||
3963 | /* in search.c */ | |
3964 | extern bool accessible_base_p (tree, tree); | |
3965 | extern tree lookup_base (tree, tree, base_access, base_kind *); | |
3966 | extern int types_overlap_p (tree, tree); | |
3967 | extern tree get_dynamic_cast_base_type (tree, tree); | |
3968 | extern int accessible_p (tree, tree); | |
3969 | extern tree lookup_field_1 (tree, tree, bool); | |
3970 | extern tree lookup_field (tree, tree, int, bool); | |
3971 | extern int lookup_fnfields_1 (tree, tree); | |
3972 | extern tree lookup_fnfields (tree, tree, int); | |
3973 | extern tree lookup_member (tree, tree, int, bool); | |
3974 | extern int look_for_overrides (tree, tree); | |
3975 | extern void get_pure_virtuals (tree); | |
3976 | extern void maybe_suppress_debug_info (tree); | |
3977 | extern void note_debug_info_needed (tree); | |
3978 | extern void print_search_statistics (void); | |
3979 | extern void reinit_search_statistics (void); | |
3980 | extern tree current_scope (void); | |
3981 | extern int at_function_scope_p (void); | |
3982 | extern bool at_class_scope_p (void); | |
3983 | extern bool at_namespace_scope_p (void); | |
3984 | extern tree context_for_name_lookup (tree); | |
3985 | extern tree lookup_conversions (tree); | |
3986 | extern tree binfo_for_vtable (tree); | |
3987 | extern tree binfo_from_vbase (tree); | |
3988 | extern tree binfo_for_vbase (tree, tree); | |
3989 | extern tree look_for_overrides_here (tree, tree); | |
3990 | extern int check_final_overrider (tree, tree); | |
3991 | extern tree dfs_walk (tree, | |
3992 | tree (*) (tree, void *), | |
3993 | tree (*) (tree, int, void *), | |
3994 | void *); | |
3995 | extern tree dfs_walk_real (tree, | |
3996 | tree (*) (tree, void *), | |
3997 | tree (*) (tree, void *), | |
3998 | tree (*) (tree, int, void *), | |
3999 | void *); | |
4000 | extern tree dfs_unmark (tree, void *); | |
4001 | extern tree markedp (tree, int, void *); | |
4002 | extern tree unmarkedp (tree, int, void *); | |
4003 | extern tree binfo_via_virtual (tree, tree); | |
4004 | extern tree build_baselink (tree, tree, tree, tree); | |
4005 | extern tree adjust_result_of_qualified_name_lookup | |
4006 | (tree, tree, tree); | |
4007 | extern tree copied_binfo (tree, tree); | |
4008 | extern tree original_binfo (tree, tree); | |
4009 | ||
4010 | /* in semantics.c */ | |
4011 | extern void push_deferring_access_checks (deferring_kind); | |
4012 | extern void resume_deferring_access_checks (void); | |
4013 | extern void stop_deferring_access_checks (void); | |
4014 | extern void pop_deferring_access_checks (void); | |
4015 | extern tree get_deferred_access_checks (void); | |
4016 | extern void pop_to_parent_deferring_access_checks (void); | |
4017 | extern void perform_deferred_access_checks (void); | |
4018 | extern void perform_or_defer_access_check (tree, tree); | |
4019 | extern void init_cp_semantics (void); | |
4020 | extern void add_decl_expr (tree); | |
4021 | extern tree finish_expr_stmt (tree); | |
4022 | extern tree begin_if_stmt (void); | |
4023 | extern void finish_if_stmt_cond (tree, tree); | |
4024 | extern tree finish_then_clause (tree); | |
4025 | extern void begin_else_clause (tree); | |
4026 | extern void finish_else_clause (tree); | |
4027 | extern void finish_if_stmt (tree); | |
4028 | extern tree begin_while_stmt (void); | |
4029 | extern void finish_while_stmt_cond (tree, tree); | |
4030 | extern void finish_while_stmt (tree); | |
4031 | extern tree begin_do_stmt (void); | |
4032 | extern void finish_do_body (tree); | |
4033 | extern void finish_do_stmt (tree, tree); | |
4034 | extern tree finish_return_stmt (tree); | |
4035 | extern tree begin_for_stmt (void); | |
4036 | extern void finish_for_init_stmt (tree); | |
4037 | extern void finish_for_cond (tree, tree); | |
4038 | extern void finish_for_expr (tree, tree); | |
4039 | extern void finish_for_stmt (tree); | |
4040 | extern tree finish_break_stmt (void); | |
4041 | extern tree finish_continue_stmt (void); | |
4042 | extern tree begin_switch_stmt (void); | |
4043 | extern void finish_switch_cond (tree, tree); | |
4044 | extern void finish_switch_stmt (tree); | |
4045 | extern tree finish_case_label (tree, tree); | |
4046 | extern tree finish_goto_stmt (tree); | |
4047 | extern tree begin_try_block (void); | |
4048 | extern void finish_try_block (tree); | |
4049 | extern tree begin_eh_spec_block (void); | |
4050 | extern void finish_eh_spec_block (tree, tree); | |
4051 | extern void finish_handler_sequence (tree); | |
4052 | extern tree begin_function_try_block (void); | |
4053 | extern void finish_function_try_block (tree); | |
4054 | extern void finish_function_handler_sequence (tree); | |
4055 | extern void finish_cleanup_try_block (tree); | |
4056 | extern tree begin_handler (void); | |
4057 | extern void finish_handler_parms (tree, tree); | |
4058 | extern void begin_catch_block (tree); | |
4059 | extern void finish_handler (tree); | |
4060 | extern void finish_cleanup (tree, tree); | |
4061 | ||
4062 | enum { | |
4063 | BCS_NO_SCOPE = 1, | |
4064 | BCS_TRY_BLOCK = 2, | |
4065 | BCS_FN_BODY = 4 | |
4066 | }; | |
4067 | extern tree begin_compound_stmt (unsigned int); | |
4068 | ||
4069 | extern void finish_compound_stmt (tree); | |
4070 | extern tree finish_asm_stmt (int, tree, tree, tree, tree); | |
4071 | extern tree finish_label_stmt (tree); | |
4072 | extern void finish_label_decl (tree); | |
4073 | extern void finish_subobject (tree); | |
4074 | extern tree finish_parenthesized_expr (tree); | |
4075 | extern tree finish_non_static_data_member (tree, tree, tree); | |
4076 | extern tree begin_stmt_expr (void); | |
4077 | extern tree finish_stmt_expr_expr (tree, tree); | |
4078 | extern tree finish_stmt_expr (tree, bool); | |
4079 | extern tree perform_koenig_lookup (tree, tree); | |
4080 | extern tree finish_call_expr (tree, tree, bool, bool); | |
4081 | extern tree finish_increment_expr (tree, enum tree_code); | |
4082 | extern tree finish_this_expr (void); | |
4083 | extern tree finish_pseudo_destructor_expr (tree, tree, tree); | |
4084 | extern tree finish_unary_op_expr (enum tree_code, tree); | |
4085 | extern tree finish_compound_literal (tree, tree); | |
4086 | extern tree finish_fname (tree); | |
4087 | extern void finish_translation_unit (void); | |
4088 | extern tree finish_template_type_parm (tree, tree); | |
4089 | extern tree finish_template_template_parm (tree, tree); | |
4090 | extern tree begin_class_definition (tree); | |
4091 | extern void finish_default_args (void); | |
4092 | extern void finish_template_decl (tree); | |
4093 | extern tree finish_template_type (tree, tree, int); | |
4094 | extern tree finish_base_specifier (tree, tree, bool); | |
4095 | extern void finish_member_declaration (tree); | |
4096 | extern void check_multiple_declarators (void); | |
4097 | extern void qualified_name_lookup_error (tree, tree); | |
4098 | extern tree finish_id_expression (tree, tree, tree, | |
4099 | cp_id_kind *, tree *, | |
4100 | bool, bool, bool *, | |
4101 | const char **); | |
4102 | extern tree finish_typeof (tree); | |
4103 | extern void finish_decl_cleanup (tree, tree); | |
4104 | extern void finish_eh_cleanup (tree); | |
4105 | extern void expand_body (tree); | |
4106 | extern void cxx_expand_function_start (void); | |
4107 | extern void finish_mem_initializers (tree); | |
4108 | extern void setup_vtbl_ptr (tree, tree); | |
4109 | extern void clear_out_block (void); | |
4110 | extern tree check_template_template_default_arg (tree); | |
4111 | extern void expand_or_defer_fn (tree); | |
4112 | extern void check_accessibility_of_qualified_id (tree, tree, tree); | |
4113 | extern tree finish_qualified_id_expr (tree, tree, bool, bool); | |
4114 | extern void simplify_aggr_init_expr (tree *); | |
4115 | extern void finalize_nrv (tree *, tree, tree); | |
4116 | ||
4117 | /* in tree.c */ | |
4118 | extern void lang_check_failed (const char *, int, | |
4119 | const char *); | |
4120 | extern tree stabilize_expr (tree, tree *); | |
4121 | extern void stabilize_call (tree, tree *); | |
4122 | extern bool stabilize_init (tree, tree *); | |
4123 | extern tree cxx_unsave_expr_now (tree); | |
4124 | extern tree cxx_maybe_build_cleanup (tree); | |
4125 | extern void init_tree (void); | |
4126 | extern int pod_type_p (tree); | |
4127 | extern int zero_init_p (tree); | |
4128 | extern tree canonical_type_variant (tree); | |
4129 | extern tree copy_binfo (tree, tree, tree, | |
4130 | tree *, int); | |
4131 | extern int member_p (tree); | |
4132 | extern cp_lvalue_kind real_lvalue_p (tree); | |
4133 | extern int lvalue_or_else (tree, const char *); | |
4134 | extern tree build_min (enum tree_code, tree, ...); | |
4135 | extern tree build_min_nt (enum tree_code, ...); | |
4136 | extern tree build_min_non_dep (enum tree_code, tree, ...); | |
4137 | extern tree build_cplus_new (tree, tree); | |
4138 | extern tree get_target_expr (tree); | |
4139 | extern tree build_cplus_staticfn_type (tree, tree, tree); | |
4140 | extern tree build_cplus_array_type (tree, tree); | |
4141 | extern tree hash_tree_cons (tree, tree, tree); | |
4142 | extern tree hash_tree_chain (tree, tree); | |
4143 | extern tree hash_chainon (tree, tree); | |
4144 | extern int count_functions (tree); | |
4145 | extern int is_overloaded_fn (tree); | |
4146 | extern tree get_first_fn (tree); | |
4147 | extern int bound_pmf_p (tree); | |
4148 | extern tree ovl_cons (tree, tree); | |
4149 | extern tree build_overload (tree, tree); | |
4150 | extern tree function_arg_chain (tree); | |
4151 | extern int promotes_to_aggr_type (tree, enum tree_code); | |
4152 | extern const char *cxx_printable_name (tree, int); | |
4153 | extern tree build_exception_variant (tree, tree); | |
4154 | extern tree bind_template_template_parm (tree, tree); | |
4155 | extern tree array_type_nelts_total (tree); | |
4156 | extern tree array_type_nelts_top (tree); | |
4157 | extern tree break_out_target_exprs (tree); | |
4158 | extern tree get_type_decl (tree); | |
4159 | extern tree decl_namespace_context (tree); | |
4160 | extern tree lvalue_type (tree); | |
4161 | extern tree error_type (tree); | |
4162 | extern int varargs_function_p (tree); | |
4163 | extern int really_overloaded_fn (tree); | |
4164 | extern bool cp_tree_equal (tree, tree); | |
4165 | extern tree no_linkage_check (tree); | |
4166 | extern void debug_binfo (tree); | |
4167 | extern tree build_dummy_object (tree); | |
4168 | extern tree maybe_dummy_object (tree, tree *); | |
4169 | extern int is_dummy_object (tree); | |
4170 | extern const struct attribute_spec cxx_attribute_table[]; | |
4171 | extern tree make_ptrmem_cst (tree, tree); | |
4172 | extern tree cp_build_type_attribute_variant (tree, tree); | |
4173 | extern tree cp_build_qualified_type_real (tree, int, tsubst_flags_t); | |
4174 | #define cp_build_qualified_type(TYPE, QUALS) \ | |
4175 | cp_build_qualified_type_real ((TYPE), (QUALS), tf_error | tf_warning) | |
4176 | extern tree build_shared_int_cst (int); | |
4177 | extern special_function_kind special_function_p (tree); | |
4178 | extern bool name_p (tree); | |
4179 | extern int count_trees (tree); | |
4180 | extern int char_type_p (tree); | |
4181 | extern void verify_stmt_tree (tree); | |
4182 | extern tree find_tree (tree, tree); | |
4183 | extern linkage_kind decl_linkage (tree); | |
4184 | extern tree cp_walk_subtrees (tree*, int*, walk_tree_fn, | |
4185 | void*, void*); | |
4186 | extern int cp_cannot_inline_tree_fn (tree*); | |
4187 | extern tree cp_add_pending_fn_decls (void*,tree); | |
4188 | extern int cp_is_overload_p (tree); | |
4189 | extern int cp_auto_var_in_fn_p (tree,tree); | |
4190 | extern void cp_update_decl_after_saving (tree, void *); | |
4191 | ||
4192 | /* in typeck.c */ | |
4193 | extern int string_conv_p (tree, tree, int); | |
4194 | extern tree cp_truthvalue_conversion (tree); | |
4195 | extern tree condition_conversion (tree); | |
4196 | extern tree target_type (tree); | |
4197 | extern tree require_complete_type (tree); | |
4198 | extern tree complete_type (tree); | |
4199 | extern tree complete_type_or_diagnostic (tree, tree, int); | |
4200 | #define complete_type_or_else(T,V) (complete_type_or_diagnostic ((T), (V), 0)) | |
4201 | extern int type_unknown_p (tree); | |
4202 | extern tree commonparms (tree, tree); | |
4203 | extern tree original_type (tree); | |
4204 | extern bool comp_except_specs (tree, tree, bool); | |
4205 | extern bool comptypes (tree, tree, int); | |
4206 | extern bool compparms (tree, tree); | |
4207 | extern int comp_cv_qualification (tree, tree); | |
4208 | extern int comp_cv_qual_signature (tree, tree); | |
4209 | extern tree cxx_sizeof_or_alignof_expr (tree, enum tree_code); | |
4210 | extern tree cxx_sizeof_or_alignof_type (tree, enum tree_code, bool); | |
4211 | #define cxx_sizeof_nowarn(T) cxx_sizeof_or_alignof_type (T, SIZEOF_EXPR, false) | |
4212 | extern tree inline_conversion (tree); | |
4213 | extern tree decay_conversion (tree); | |
4214 | extern tree perform_integral_promotions (tree); | |
4215 | extern tree build_class_member_access_expr (tree, tree, tree, bool); | |
4216 | extern tree finish_class_member_access_expr (tree, tree); | |
4217 | extern tree build_x_indirect_ref (tree, const char *); | |
4218 | extern tree build_indirect_ref (tree, const char *); | |
4219 | extern tree build_array_ref (tree, tree); | |
4220 | extern tree get_member_function_from_ptrfunc (tree *, tree); | |
4221 | extern tree convert_arguments (tree, tree, tree, int); | |
4222 | extern tree build_x_binary_op (enum tree_code, tree, tree, | |
4223 | bool *); | |
4224 | extern tree build_x_unary_op (enum tree_code, tree); | |
4225 | extern tree unary_complex_lvalue (enum tree_code, tree); | |
4226 | extern tree build_x_conditional_expr (tree, tree, tree); | |
4227 | extern tree build_x_compound_expr_from_list (tree, const char *); | |
4228 | extern tree build_x_compound_expr (tree, tree); | |
4229 | extern tree build_compound_expr (tree, tree); | |
4230 | extern tree build_static_cast (tree, tree); | |
4231 | extern tree build_reinterpret_cast (tree, tree); | |
4232 | extern tree build_const_cast (tree, tree); | |
4233 | extern tree build_c_cast (tree, tree); | |
4234 | extern tree build_x_modify_expr (tree, enum tree_code, tree); | |
4235 | extern tree build_modify_expr (tree, enum tree_code, tree); | |
4236 | extern tree dubious_conversion_warnings (tree, tree, const char *, tree, int); | |
4237 | extern tree convert_for_initialization (tree, tree, tree, int, const char *, tree, int); | |
4238 | extern int comp_ptr_ttypes (tree, tree); | |
4239 | extern int ptr_reasonably_similar (tree, tree); | |
4240 | extern tree build_ptrmemfunc (tree, tree, int); | |
4241 | extern int cp_type_quals (tree); | |
4242 | extern bool cp_has_mutable_p (tree); | |
4243 | extern bool at_least_as_qualified_p (tree, tree); | |
4244 | extern bool more_qualified_p (tree, tree); | |
4245 | extern tree build_ptrmemfunc1 (tree, tree, tree); | |
4246 | extern void expand_ptrmemfunc_cst (tree, tree *, tree *); | |
4247 | extern tree pfn_from_ptrmemfunc (tree); | |
4248 | extern tree type_after_usual_arithmetic_conversions (tree, tree); | |
4249 | extern tree composite_pointer_type (tree, tree, tree, tree, | |
4250 | const char*); | |
4251 | extern tree merge_types (tree, tree); | |
4252 | extern tree check_return_expr (tree); | |
4253 | #define cp_build_binary_op(code, arg1, arg2) \ | |
4254 | build_binary_op(code, arg1, arg2, 1) | |
4255 | #define cxx_sizeof(T) cxx_sizeof_or_alignof_type (T, SIZEOF_EXPR, true) | |
4256 | #define cxx_alignof(T) cxx_sizeof_or_alignof_type (T, ALIGNOF_EXPR, true) | |
4257 | extern tree build_ptrmemfunc_access_expr (tree, tree); | |
4258 | extern tree build_address (tree); | |
4259 | extern tree build_nop (tree, tree); | |
4260 | extern tree non_reference (tree); | |
4261 | extern tree lookup_anon_field (tree, tree); | |
4262 | extern bool invalid_nonstatic_memfn_p (tree); | |
4263 | ||
4264 | /* in typeck2.c */ | |
4265 | extern void require_complete_eh_spec_types (tree, tree); | |
4266 | extern void cxx_incomplete_type_diagnostic (tree, tree, int); | |
4267 | #undef cxx_incomplete_type_error | |
4268 | extern void cxx_incomplete_type_error (tree, tree); | |
4269 | #define cxx_incomplete_type_error(V,T) \ | |
4270 | (cxx_incomplete_type_diagnostic ((V), (T), 0)) | |
4271 | extern tree error_not_base_type (tree, tree); | |
4272 | extern tree binfo_or_else (tree, tree); | |
4273 | extern void readonly_error (tree, const char *, int); | |
4274 | extern void complete_type_check_abstract (tree); | |
4275 | extern int abstract_virtuals_error (tree, tree); | |
4276 | ||
4277 | extern tree store_init_value (tree, tree); | |
4278 | extern tree digest_init (tree, tree, tree *); | |
4279 | extern tree build_scoped_ref (tree, tree, tree *); | |
4280 | extern tree build_x_arrow (tree); | |
4281 | extern tree build_m_component_ref (tree, tree); | |
4282 | extern tree build_functional_cast (tree, tree); | |
4283 | extern tree add_exception_specifier (tree, tree, int); | |
4284 | extern tree merge_exception_specifiers (tree, tree); | |
4285 | ||
4286 | /* in mangle.c */ | |
4287 | extern void init_mangle (void); | |
4288 | extern void mangle_decl (tree); | |
4289 | extern const char *mangle_type_string (tree); | |
4290 | extern tree mangle_type (tree); | |
4291 | extern tree mangle_typeinfo_for_type (tree); | |
4292 | extern tree mangle_typeinfo_string_for_type (tree); | |
4293 | extern tree mangle_vtbl_for_type (tree); | |
4294 | extern tree mangle_vtt_for_type (tree); | |
4295 | extern tree mangle_ctor_vtbl_for_type (tree, tree); | |
4296 | extern tree mangle_thunk (tree, int, tree, tree); | |
4297 | extern tree mangle_conv_op_name_for_type (tree); | |
4298 | extern tree mangle_guard_variable (tree); | |
4299 | extern tree mangle_ref_init_variable (tree); | |
4300 | ||
4301 | /* in dump.c */ | |
4302 | extern bool cp_dump_tree (void *, tree); | |
4303 | ||
4304 | /* in cp-simplify.c */ | |
4305 | extern int cp_gimplify_expr (tree *, tree *, tree *); | |
4306 | extern void cp_genericize (tree); | |
4307 | ||
4308 | /* -- end of C++ */ | |
4309 | ||
4310 | /* In order for the format checking to accept the C++ frontend | |
4311 | diagnostic framework extensions, you must include this file before | |
4312 | toplev.h, not after. */ | |
4313 | #define GCC_DIAG_STYLE __gcc_cxxdiag__ | |
4314 | #if GCC_VERSION >= 3004 | |
4315 | #define ATTRIBUTE_GCC_CXXDIAG(m, n) __attribute__ ((__format__ (GCC_DIAG_STYLE, m, n))) ATTRIBUTE_NONNULL(m) | |
4316 | #else | |
4317 | #define ATTRIBUTE_GCC_CXXDIAG(m, n) ATTRIBUTE_NONNULL(m) | |
4318 | #endif | |
4319 | ||
4320 | extern void cp_error_at (const char *, ...) ATTRIBUTE_GCC_CXXDIAG(1, 2); | |
4321 | extern void cp_warning_at (const char *, ...) ATTRIBUTE_GCC_CXXDIAG(1, 2); | |
4322 | extern void cp_pedwarn_at (const char *, ...) ATTRIBUTE_GCC_CXXDIAG(1, 2); | |
4323 | ||
4324 | #endif /* ! GCC_CP_TREE_H */ |