2 /* Internal type definitions for GDB.
4 Copyright (C) 1992-2020 Free Software Foundation, Inc.
6 Contributed by Cygnus Support, using pieces from other GDB modules.
8 This file is part of GDB.
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 3 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program. If not, see <http://www.gnu.org/licenses/>. */
23 #if !defined (GDBTYPES_H)
26 /* * \page gdbtypes GDB Types
28 GDB represents all the different kinds of types in programming
29 languages using a common representation defined in gdbtypes.h.
31 The main data structure is main_type; it consists of a code (such
32 as #TYPE_CODE_ENUM for enumeration types), a number of
33 generally-useful fields such as the printable name, and finally a
34 field main_type::type_specific that is a union of info specific to
35 particular languages or other special cases (such as calling
38 The available type codes are defined in enum #type_code. The enum
39 includes codes both for types that are common across a variety
40 of languages, and for types that are language-specific.
42 Most accesses to type fields go through macros such as
43 #TYPE_CODE(thistype) and #TYPE_FN_FIELD_CONST(thisfn, n). These are
44 written such that they can be used as both rvalues and lvalues.
48 #include "gdbsupport/array-view.h"
49 #include "gdbsupport/offset-type.h"
50 #include "gdbsupport/enum-flags.h"
51 #include "gdbsupport/underlying.h"
52 #include "gdbsupport/print-utils.h"
54 #include "gdb_obstack.h"
55 #include "gmp-utils.h"
57 /* Forward declarations for prototypes. */
60 struct value_print_options
;
62 struct dwarf2_per_cu_data
;
63 struct dwarf2_per_objfile
;
65 /* These declarations are DWARF-specific as some of the gdbtypes.h data types
66 are already DWARF-specific. */
68 /* * Offset relative to the start of its containing CU (compilation
70 DEFINE_OFFSET_TYPE (cu_offset
, unsigned int);
72 /* * Offset relative to the start of its .debug_info or .debug_types
74 DEFINE_OFFSET_TYPE (sect_offset
, uint64_t);
77 sect_offset_str (sect_offset offset
)
79 return hex_string (to_underlying (offset
));
82 /* Some macros for char-based bitfields. */
84 #define B_SET(a,x) ((a)[(x)>>3] |= (1 << ((x)&7)))
85 #define B_CLR(a,x) ((a)[(x)>>3] &= ~(1 << ((x)&7)))
86 #define B_TST(a,x) ((a)[(x)>>3] & (1 << ((x)&7)))
87 #define B_TYPE unsigned char
88 #define B_BYTES(x) ( 1 + ((x)>>3) )
89 #define B_CLRALL(a,x) memset ((a), 0, B_BYTES(x))
91 /* * Different kinds of data types are distinguished by the `code'
96 TYPE_CODE_BITSTRING
= -1, /**< Deprecated */
97 TYPE_CODE_UNDEF
= 0, /**< Not used; catches errors */
98 TYPE_CODE_PTR
, /**< Pointer type */
100 /* * Array type with lower & upper bounds.
102 Regardless of the language, GDB represents multidimensional
103 array types the way C does: as arrays of arrays. So an
104 instance of a GDB array type T can always be seen as a series
105 of instances of TYPE_TARGET_TYPE (T) laid out sequentially in
108 Row-major languages like C lay out multi-dimensional arrays so
109 that incrementing the rightmost index in a subscripting
110 expression results in the smallest change in the address of the
111 element referred to. Column-major languages like Fortran lay
112 them out so that incrementing the leftmost index results in the
115 This means that, in column-major languages, working our way
116 from type to target type corresponds to working through indices
117 from right to left, not left to right. */
120 TYPE_CODE_STRUCT
, /**< C struct or Pascal record */
121 TYPE_CODE_UNION
, /**< C union or Pascal variant part */
122 TYPE_CODE_ENUM
, /**< Enumeration type */
123 TYPE_CODE_FLAGS
, /**< Bit flags type */
124 TYPE_CODE_FUNC
, /**< Function type */
125 TYPE_CODE_INT
, /**< Integer type */
127 /* * Floating type. This is *NOT* a complex type. */
130 /* * Void type. The length field specifies the length (probably
131 always one) which is used in pointer arithmetic involving
132 pointers to this type, but actually dereferencing such a
133 pointer is invalid; a void type has no length and no actual
134 representation in memory or registers. A pointer to a void
135 type is a generic pointer. */
138 TYPE_CODE_SET
, /**< Pascal sets */
139 TYPE_CODE_RANGE
, /**< Range (integers within spec'd bounds). */
141 /* * A string type which is like an array of character but prints
142 differently. It does not contain a length field as Pascal
143 strings (for many Pascals, anyway) do; if we want to deal with
144 such strings, we should use a new type code. */
147 /* * Unknown type. The length field is valid if we were able to
148 deduce that much about the type, or 0 if we don't even know
153 TYPE_CODE_METHOD
, /**< Method type */
155 /* * Pointer-to-member-function type. This describes how to access a
156 particular member function of a class (possibly a virtual
157 member function). The representation may vary between different
161 /* * Pointer-to-member type. This is the offset within a class to
162 some particular data member. The only currently supported
163 representation uses an unbiased offset, with -1 representing
164 NULL; this is used by the Itanium C++ ABI (used by GCC on all
168 TYPE_CODE_REF
, /**< C++ Reference types */
170 TYPE_CODE_RVALUE_REF
, /**< C++ rvalue reference types */
172 TYPE_CODE_CHAR
, /**< *real* character type */
174 /* * Boolean type. 0 is false, 1 is true, and other values are
175 non-boolean (e.g. FORTRAN "logical" used as unsigned int). */
179 TYPE_CODE_COMPLEX
, /**< Complex float */
183 TYPE_CODE_NAMESPACE
, /**< C++ namespace. */
185 TYPE_CODE_DECFLOAT
, /**< Decimal floating point. */
187 TYPE_CODE_MODULE
, /**< Fortran module. */
189 /* * Internal function type. */
190 TYPE_CODE_INTERNAL_FUNCTION
,
192 /* * Methods implemented in extension languages. */
195 /* * Fixed Point type. */
196 TYPE_CODE_FIXED_POINT
,
199 /* * Some bits for the type's instance_flags word. See the macros
200 below for documentation on each bit. */
202 enum type_instance_flag_value
: unsigned
204 TYPE_INSTANCE_FLAG_CONST
= (1 << 0),
205 TYPE_INSTANCE_FLAG_VOLATILE
= (1 << 1),
206 TYPE_INSTANCE_FLAG_CODE_SPACE
= (1 << 2),
207 TYPE_INSTANCE_FLAG_DATA_SPACE
= (1 << 3),
208 TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1
= (1 << 4),
209 TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2
= (1 << 5),
210 TYPE_INSTANCE_FLAG_NOTTEXT
= (1 << 6),
211 TYPE_INSTANCE_FLAG_RESTRICT
= (1 << 7),
212 TYPE_INSTANCE_FLAG_ATOMIC
= (1 << 8)
215 DEF_ENUM_FLAGS_TYPE (enum type_instance_flag_value
, type_instance_flags
);
217 /* * Not textual. By default, GDB treats all single byte integers as
218 characters (or elements of strings) unless this flag is set. */
220 #define TYPE_NOTTEXT(t) (((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_NOTTEXT)
222 /* * Type owner. If TYPE_OBJFILE_OWNED is true, the type is owned by
223 the objfile retrieved as TYPE_OBJFILE. Otherwise, the type is
224 owned by an architecture; TYPE_OBJFILE is NULL in this case. */
226 #define TYPE_OBJFILE_OWNED(t) (TYPE_MAIN_TYPE (t)->flag_objfile_owned)
227 #define TYPE_OWNER(t) TYPE_MAIN_TYPE(t)->owner
228 #define TYPE_OBJFILE(t) (TYPE_OBJFILE_OWNED(t)? TYPE_OWNER(t).objfile : NULL)
230 /* * True if this type was declared using the "class" keyword. This is
231 only valid for C++ structure and enum types. If false, a structure
232 was declared as a "struct"; if true it was declared "class". For
233 enum types, this is true when "enum class" or "enum struct" was
234 used to declare the type.. */
236 #define TYPE_DECLARED_CLASS(t) (TYPE_MAIN_TYPE (t)->flag_declared_class)
238 /* * True if this type is a "flag" enum. A flag enum is one where all
239 the values are pairwise disjoint when "and"ed together. This
240 affects how enum values are printed. */
242 #define TYPE_FLAG_ENUM(t) (TYPE_MAIN_TYPE (t)->flag_flag_enum)
244 /* * Constant type. If this is set, the corresponding type has a
247 #define TYPE_CONST(t) ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_CONST) != 0)
249 /* * Volatile type. If this is set, the corresponding type has a
250 volatile modifier. */
252 #define TYPE_VOLATILE(t) \
253 ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_VOLATILE) != 0)
255 /* * Restrict type. If this is set, the corresponding type has a
256 restrict modifier. */
258 #define TYPE_RESTRICT(t) \
259 ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_RESTRICT) != 0)
261 /* * Atomic type. If this is set, the corresponding type has an
264 #define TYPE_ATOMIC(t) \
265 ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_ATOMIC) != 0)
267 /* * True if this type represents either an lvalue or lvalue reference type. */
269 #define TYPE_IS_REFERENCE(t) \
270 ((t)->code () == TYPE_CODE_REF || (t)->code () == TYPE_CODE_RVALUE_REF)
272 /* * True if this type is allocatable. */
273 #define TYPE_IS_ALLOCATABLE(t) \
274 ((t)->dyn_prop (DYN_PROP_ALLOCATED) != NULL)
276 /* * True if this type has variant parts. */
277 #define TYPE_HAS_VARIANT_PARTS(t) \
278 ((t)->dyn_prop (DYN_PROP_VARIANT_PARTS) != nullptr)
280 /* * True if this type has a dynamic length. */
281 #define TYPE_HAS_DYNAMIC_LENGTH(t) \
282 ((t)->dyn_prop (DYN_PROP_BYTE_SIZE) != nullptr)
284 /* * Instruction-space delimited type. This is for Harvard architectures
285 which have separate instruction and data address spaces (and perhaps
288 GDB usually defines a flat address space that is a superset of the
289 architecture's two (or more) address spaces, but this is an extension
290 of the architecture's model.
292 If TYPE_INSTANCE_FLAG_CODE_SPACE is set, an object of the corresponding type
293 resides in instruction memory, even if its address (in the extended
294 flat address space) does not reflect this.
296 Similarly, if TYPE_INSTANCE_FLAG_DATA_SPACE is set, then an object of the
297 corresponding type resides in the data memory space, even if
298 this is not indicated by its (flat address space) address.
300 If neither flag is set, the default space for functions / methods
301 is instruction space, and for data objects is data memory. */
303 #define TYPE_CODE_SPACE(t) \
304 ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_CODE_SPACE) != 0)
306 #define TYPE_DATA_SPACE(t) \
307 ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_DATA_SPACE) != 0)
309 /* * Address class flags. Some environments provide for pointers
310 whose size is different from that of a normal pointer or address
311 types where the bits are interpreted differently than normal
312 addresses. The TYPE_INSTANCE_FLAG_ADDRESS_CLASS_n flags may be used in
313 target specific ways to represent these different types of address
316 #define TYPE_ADDRESS_CLASS_1(t) (((t)->instance_flags ()) \
317 & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1)
318 #define TYPE_ADDRESS_CLASS_2(t) (((t)->instance_flags ()) \
319 & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
320 #define TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL \
321 (TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 | TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
322 #define TYPE_ADDRESS_CLASS_ALL(t) (((t)->instance_flags ()) \
323 & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL)
325 /* * Information about a single discriminant. */
327 struct discriminant_range
329 /* * The range of values for the variant. This is an inclusive
333 /* * Return true if VALUE is contained in this range. IS_UNSIGNED
334 is true if this should be an unsigned comparison; false for
336 bool contains (ULONGEST value
, bool is_unsigned
) const
339 return value
>= low
&& value
<= high
;
340 LONGEST valuel
= (LONGEST
) value
;
341 return valuel
>= (LONGEST
) low
&& valuel
<= (LONGEST
) high
;
347 /* * A single variant. A variant has a list of discriminant values.
348 When the discriminator matches one of these, the variant is
349 enabled. Each variant controls zero or more fields; and may also
350 control other variant parts as well. This struct corresponds to
351 DW_TAG_variant in DWARF. */
353 struct variant
: allocate_on_obstack
355 /* * The discriminant ranges for this variant. */
356 gdb::array_view
<discriminant_range
> discriminants
;
358 /* * The fields controlled by this variant. This is inclusive on
359 the low end and exclusive on the high end. A variant may not
360 control any fields, in which case the two values will be equal.
361 These are indexes into the type's array of fields. */
365 /* * Variant parts controlled by this variant. */
366 gdb::array_view
<variant_part
> parts
;
368 /* * Return true if this is the default variant. The default
369 variant can be recognized because it has no associated
371 bool is_default () const
373 return discriminants
.empty ();
376 /* * Return true if this variant matches VALUE. IS_UNSIGNED is true
377 if this should be an unsigned comparison; false for signed. */
378 bool matches (ULONGEST value
, bool is_unsigned
) const;
381 /* * A variant part. Each variant part has an optional discriminant
382 and holds an array of variants. This struct corresponds to
383 DW_TAG_variant_part in DWARF. */
385 struct variant_part
: allocate_on_obstack
387 /* * The index of the discriminant field in the outer type. This is
388 an index into the type's array of fields. If this is -1, there
389 is no discriminant, and only the default variant can be
390 considered to be selected. */
391 int discriminant_index
;
393 /* * True if this discriminant is unsigned; false if signed. This
394 comes from the type of the discriminant. */
397 /* * The variants that are controlled by this variant part. Note
398 that these will always be sorted by field number. */
399 gdb::array_view
<variant
> variants
;
403 enum dynamic_prop_kind
405 PROP_UNDEFINED
, /* Not defined. */
406 PROP_CONST
, /* Constant. */
407 PROP_ADDR_OFFSET
, /* Address offset. */
408 PROP_LOCEXPR
, /* Location expression. */
409 PROP_LOCLIST
, /* Location list. */
410 PROP_VARIANT_PARTS
, /* Variant parts. */
411 PROP_TYPE
, /* Type. */
414 union dynamic_prop_data
416 /* Storage for constant property. */
420 /* Storage for dynamic property. */
424 /* Storage of variant parts for a type. A type with variant parts
425 has all its fields "linearized" -- stored in a single field
426 array, just as if they had all been declared that way. The
427 variant parts are attached via a dynamic property, and then are
428 used to control which fields end up in the final type during
429 dynamic type resolution. */
431 const gdb::array_view
<variant_part
> *variant_parts
;
433 /* Once a variant type is resolved, we may want to be able to go
434 from the resolved type to the original type. In this case we
435 rewrite the property's kind and set this field. */
437 struct type
*original_type
;
440 /* * Used to store a dynamic property. */
444 dynamic_prop_kind
kind () const
449 void set_undefined ()
451 m_kind
= PROP_UNDEFINED
;
454 LONGEST
const_val () const
456 gdb_assert (m_kind
== PROP_CONST
);
458 return m_data
.const_val
;
461 void set_const_val (LONGEST const_val
)
464 m_data
.const_val
= const_val
;
469 gdb_assert (m_kind
== PROP_LOCEXPR
470 || m_kind
== PROP_LOCLIST
471 || m_kind
== PROP_ADDR_OFFSET
);
476 void set_locexpr (void *baton
)
478 m_kind
= PROP_LOCEXPR
;
479 m_data
.baton
= baton
;
482 void set_loclist (void *baton
)
484 m_kind
= PROP_LOCLIST
;
485 m_data
.baton
= baton
;
488 void set_addr_offset (void *baton
)
490 m_kind
= PROP_ADDR_OFFSET
;
491 m_data
.baton
= baton
;
494 const gdb::array_view
<variant_part
> *variant_parts () const
496 gdb_assert (m_kind
== PROP_VARIANT_PARTS
);
498 return m_data
.variant_parts
;
501 void set_variant_parts (gdb::array_view
<variant_part
> *variant_parts
)
503 m_kind
= PROP_VARIANT_PARTS
;
504 m_data
.variant_parts
= variant_parts
;
507 struct type
*original_type () const
509 gdb_assert (m_kind
== PROP_TYPE
);
511 return m_data
.original_type
;
514 void set_original_type (struct type
*original_type
)
517 m_data
.original_type
= original_type
;
520 /* Determine which field of the union dynamic_prop.data is used. */
521 enum dynamic_prop_kind m_kind
;
523 /* Storage for dynamic or static value. */
524 union dynamic_prop_data m_data
;
527 /* Compare two dynamic_prop objects for equality. dynamic_prop
528 instances are equal iff they have the same type and storage. */
529 extern bool operator== (const dynamic_prop
&l
, const dynamic_prop
&r
);
531 /* Compare two dynamic_prop objects for inequality. */
532 static inline bool operator!= (const dynamic_prop
&l
, const dynamic_prop
&r
)
537 /* * Define a type's dynamic property node kind. */
538 enum dynamic_prop_node_kind
540 /* A property providing a type's data location.
541 Evaluating this field yields to the location of an object's data. */
542 DYN_PROP_DATA_LOCATION
,
544 /* A property representing DW_AT_allocated. The presence of this attribute
545 indicates that the object of the type can be allocated/deallocated. */
548 /* A property representing DW_AT_associated. The presence of this attribute
549 indicated that the object of the type can be associated. */
552 /* A property providing an array's byte stride. */
553 DYN_PROP_BYTE_STRIDE
,
555 /* A property holding variant parts. */
556 DYN_PROP_VARIANT_PARTS
,
558 /* A property holding the size of the type. */
562 /* * List for dynamic type attributes. */
563 struct dynamic_prop_list
565 /* The kind of dynamic prop in this node. */
566 enum dynamic_prop_node_kind prop_kind
;
568 /* The dynamic property itself. */
569 struct dynamic_prop prop
;
571 /* A pointer to the next dynamic property. */
572 struct dynamic_prop_list
*next
;
575 /* * Determine which field of the union main_type.fields[x].loc is
580 FIELD_LOC_KIND_BITPOS
, /**< bitpos */
581 FIELD_LOC_KIND_ENUMVAL
, /**< enumval */
582 FIELD_LOC_KIND_PHYSADDR
, /**< physaddr */
583 FIELD_LOC_KIND_PHYSNAME
, /**< physname */
584 FIELD_LOC_KIND_DWARF_BLOCK
/**< dwarf_block */
587 /* * A discriminant to determine which field in the
588 main_type.type_specific union is being used, if any.
590 For types such as TYPE_CODE_FLT, the use of this
591 discriminant is really redundant, as we know from the type code
592 which field is going to be used. As such, it would be possible to
593 reduce the size of this enum in order to save a bit or two for
594 other fields of struct main_type. But, since we still have extra
595 room , and for the sake of clarity and consistency, we treat all fields
596 of the union the same way. */
598 enum type_specific_kind
601 TYPE_SPECIFIC_CPLUS_STUFF
,
602 TYPE_SPECIFIC_GNAT_STUFF
,
603 TYPE_SPECIFIC_FLOATFORMAT
,
604 /* Note: This is used by TYPE_CODE_FUNC and TYPE_CODE_METHOD. */
606 TYPE_SPECIFIC_SELF_TYPE
,
608 TYPE_SPECIFIC_FIXED_POINT
,
613 struct objfile
*objfile
;
614 struct gdbarch
*gdbarch
;
619 /* * Position of this field, counting in bits from start of
620 containing structure. For big-endian targets, it is the bit
621 offset to the MSB. For little-endian targets, it is the bit
622 offset to the LSB. */
629 /* * For a static field, if TYPE_FIELD_STATIC_HAS_ADDR then
630 physaddr is the location (in the target) of the static
631 field. Otherwise, physname is the mangled label of the
635 const char *physname
;
637 /* * The field location can be computed by evaluating the
638 following DWARF block. Its DATA is allocated on
639 objfile_obstack - no CU load is needed to access it. */
641 struct dwarf2_locexpr_baton
*dwarf_block
;
646 struct type
*type () const
651 void set_type (struct type
*type
)
656 union field_location loc
;
658 /* * For a function or member type, this is 1 if the argument is
659 marked artificial. Artificial arguments should not be shown
660 to the user. For TYPE_CODE_RANGE it is set if the specific
661 bound is not defined. */
663 unsigned int artificial
: 1;
665 /* * Discriminant for union field_location. */
667 ENUM_BITFIELD(field_loc_kind
) loc_kind
: 3;
669 /* * Size of this field, in bits, or zero if not packed.
670 If non-zero in an array type, indicates the element size in
671 bits (used only in Ada at the moment).
672 For an unpacked field, the field's type's length
673 says how many bytes the field occupies. */
675 unsigned int bitsize
: 28;
677 /* * In a struct or union type, type of this field.
678 - In a function or member type, type of this argument.
679 - In an array type, the domain-type of the array. */
683 /* * Name of field, value or argument.
684 NULL for range bounds, array domains, and member function
692 ULONGEST
bit_stride () const
694 if (this->flag_is_byte_stride
)
695 return this->stride
.const_val () * 8;
697 return this->stride
.const_val ();
700 /* * Low bound of range. */
702 struct dynamic_prop low
;
704 /* * High bound of range. */
706 struct dynamic_prop high
;
708 /* The stride value for this range. This can be stored in bits or bytes
709 based on the value of BYTE_STRIDE_P. It is optional to have a stride
710 value, if this range has no stride value defined then this will be set
711 to the constant zero. */
713 struct dynamic_prop stride
;
715 /* * The bias. Sometimes a range value is biased before storage.
716 The bias is added to the stored bits to form the true value. */
720 /* True if HIGH range bound contains the number of elements in the
721 subrange. This affects how the final high bound is computed. */
723 unsigned int flag_upper_bound_is_count
: 1;
725 /* True if LOW or/and HIGH are resolved into a static bound from
728 unsigned int flag_bound_evaluated
: 1;
730 /* If this is true this STRIDE is in bytes, otherwise STRIDE is in bits. */
732 unsigned int flag_is_byte_stride
: 1;
735 /* Compare two range_bounds objects for equality. Simply does
736 memberwise comparison. */
737 extern bool operator== (const range_bounds
&l
, const range_bounds
&r
);
739 /* Compare two range_bounds objects for inequality. */
740 static inline bool operator!= (const range_bounds
&l
, const range_bounds
&r
)
747 /* * CPLUS_STUFF is for TYPE_CODE_STRUCT. It is initialized to
748 point to cplus_struct_default, a default static instance of a
749 struct cplus_struct_type. */
751 struct cplus_struct_type
*cplus_stuff
;
753 /* * GNAT_STUFF is for types for which the GNAT Ada compiler
754 provides additional information. */
756 struct gnat_aux_type
*gnat_stuff
;
758 /* * FLOATFORMAT is for TYPE_CODE_FLT. It is a pointer to a
759 floatformat object that describes the floating-point value
760 that resides within the type. */
762 const struct floatformat
*floatformat
;
764 /* * For TYPE_CODE_FUNC and TYPE_CODE_METHOD types. */
766 struct func_type
*func_stuff
;
768 /* * For types that are pointer to member types (TYPE_CODE_METHODPTR,
769 TYPE_CODE_MEMBERPTR), SELF_TYPE is the type that this pointer
772 struct type
*self_type
;
774 /* * For TYPE_CODE_FIXED_POINT types, the info necessary to decode
775 values of that type. */
776 struct fixed_point_type_info
*fixed_point_info
;
778 /* * An integer-like scalar type may be stored in just part of its
779 enclosing storage bytes. This structure describes this
783 /* * The bit size of the integer. This can be 0. For integers
784 that fill their storage (the ordinary case), this field holds
785 the byte size times 8. */
786 unsigned short bit_size
;
787 /* * The bit offset of the integer. This is ordinarily 0, and can
788 only be non-zero if the bit size is less than the storage
790 unsigned short bit_offset
;
794 /* * Main structure representing a type in GDB.
796 This structure is space-critical. Its layout has been tweaked to
797 reduce the space used. */
801 /* * Code for kind of type. */
803 ENUM_BITFIELD(type_code
) code
: 8;
805 /* * Flags about this type. These fields appear at this location
806 because they packs nicely here. See the TYPE_* macros for
807 documentation about these fields. */
809 unsigned int m_flag_unsigned
: 1;
810 unsigned int m_flag_nosign
: 1;
811 unsigned int m_flag_stub
: 1;
812 unsigned int m_flag_target_stub
: 1;
813 unsigned int m_flag_prototyped
: 1;
814 unsigned int m_flag_varargs
: 1;
815 unsigned int m_flag_vector
: 1;
816 unsigned int m_flag_stub_supported
: 1;
817 unsigned int m_flag_gnu_ifunc
: 1;
818 unsigned int m_flag_fixed_instance
: 1;
819 unsigned int flag_objfile_owned
: 1;
820 unsigned int m_flag_endianity_not_default
: 1;
822 /* * True if this type was declared with "class" rather than
825 unsigned int flag_declared_class
: 1;
827 /* * True if this is an enum type with disjoint values. This
828 affects how the enum is printed. */
830 unsigned int flag_flag_enum
: 1;
832 /* * A discriminant telling us which field of the type_specific
833 union is being used for this type, if any. */
835 ENUM_BITFIELD(type_specific_kind
) type_specific_field
: 3;
837 /* * Number of fields described for this type. This field appears
838 at this location because it packs nicely here. */
842 /* * Name of this type, or NULL if none.
844 This is used for printing only. For looking up a name, look for
845 a symbol in the VAR_DOMAIN. This is generally allocated in the
846 objfile's obstack. However coffread.c uses malloc. */
850 /* * Every type is now associated with a particular objfile, and the
851 type is allocated on the objfile_obstack for that objfile. One
852 problem however, is that there are times when gdb allocates new
853 types while it is not in the process of reading symbols from a
854 particular objfile. Fortunately, these happen when the type
855 being created is a derived type of an existing type, such as in
856 lookup_pointer_type(). So we can just allocate the new type
857 using the same objfile as the existing type, but to do this we
858 need a backpointer to the objfile from the existing type. Yes
859 this is somewhat ugly, but without major overhaul of the internal
860 type system, it can't be avoided for now. */
862 union type_owner owner
;
864 /* * For a pointer type, describes the type of object pointed to.
865 - For an array type, describes the type of the elements.
866 - For a function or method type, describes the type of the return value.
867 - For a range type, describes the type of the full range.
868 - For a complex type, describes the type of each coordinate.
869 - For a special record or union type encoding a dynamic-sized type
870 in GNAT, a memoized pointer to a corresponding static version of
872 - Unused otherwise. */
874 struct type
*target_type
;
876 /* * For structure and union types, a description of each field.
877 For set and pascal array types, there is one "field",
878 whose type is the domain type of the set or array.
879 For range types, there are two "fields",
880 the minimum and maximum values (both inclusive).
881 For enum types, each possible value is described by one "field".
882 For a function or method type, a "field" for each parameter.
883 For C++ classes, there is one field for each base class (if it is
884 a derived class) plus one field for each class data member. Member
885 functions are recorded elsewhere.
887 Using a pointer to a separate array of fields
888 allows all types to have the same size, which is useful
889 because we can allocate the space for a type before
890 we know what to put in it. */
894 struct field
*fields
;
896 /* * Union member used for range types. */
898 struct range_bounds
*bounds
;
900 /* If this is a scalar type, then this is its corresponding
902 struct type
*complex_type
;
906 /* * Slot to point to additional language-specific fields of this
909 union type_specific type_specific
;
911 /* * Contains all dynamic type properties. */
912 struct dynamic_prop_list
*dyn_prop_list
;
915 /* * Number of bits allocated for alignment. */
917 #define TYPE_ALIGN_BITS 8
919 /* * A ``struct type'' describes a particular instance of a type, with
920 some particular qualification. */
924 /* Get the type code of this type.
926 Note that the code can be TYPE_CODE_TYPEDEF, so if you want the real
927 type, you need to do `check_typedef (type)->code ()`. */
928 type_code
code () const
930 return this->main_type
->code
;
933 /* Set the type code of this type. */
934 void set_code (type_code code
)
936 this->main_type
->code
= code
;
939 /* Get the name of this type. */
940 const char *name () const
942 return this->main_type
->name
;
945 /* Set the name of this type. */
946 void set_name (const char *name
)
948 this->main_type
->name
= name
;
951 /* Get the number of fields of this type. */
952 int num_fields () const
954 return this->main_type
->nfields
;
957 /* Set the number of fields of this type. */
958 void set_num_fields (int num_fields
)
960 this->main_type
->nfields
= num_fields
;
963 /* Get the fields array of this type. */
964 struct field
*fields () const
966 return this->main_type
->flds_bnds
.fields
;
969 /* Get the field at index IDX. */
970 struct field
&field (int idx
) const
972 return this->fields ()[idx
];
975 /* Set the fields array of this type. */
976 void set_fields (struct field
*fields
)
978 this->main_type
->flds_bnds
.fields
= fields
;
981 type
*index_type () const
983 return this->field (0).type ();
986 void set_index_type (type
*index_type
)
988 this->field (0).set_type (index_type
);
991 /* Return the instance flags converted to the correct type. */
992 const type_instance_flags
instance_flags () const
994 return (enum type_instance_flag_value
) this->m_instance_flags
;
997 /* Set the instance flags. */
998 void set_instance_flags (type_instance_flags flags
)
1000 this->m_instance_flags
= flags
;
1003 /* Get the bounds bounds of this type. The type must be a range type. */
1004 range_bounds
*bounds () const
1006 switch (this->code ())
1008 case TYPE_CODE_RANGE
:
1009 return this->main_type
->flds_bnds
.bounds
;
1011 case TYPE_CODE_ARRAY
:
1012 case TYPE_CODE_STRING
:
1013 return this->index_type ()->bounds ();
1016 gdb_assert_not_reached
1017 ("type::bounds called on type with invalid code");
1021 /* Set the bounds of this type. The type must be a range type. */
1022 void set_bounds (range_bounds
*bounds
)
1024 gdb_assert (this->code () == TYPE_CODE_RANGE
);
1026 this->main_type
->flds_bnds
.bounds
= bounds
;
1029 ULONGEST
bit_stride () const
1031 return this->bounds ()->bit_stride ();
1034 /* Unsigned integer type. If this is not set for a TYPE_CODE_INT,
1035 the type is signed (unless TYPE_NOSIGN is set). */
1037 bool is_unsigned () const
1039 return this->main_type
->m_flag_unsigned
;
1042 void set_is_unsigned (bool is_unsigned
)
1044 this->main_type
->m_flag_unsigned
= is_unsigned
;
1047 /* No sign for this type. In C++, "char", "signed char", and
1048 "unsigned char" are distinct types; so we need an extra flag to
1049 indicate the absence of a sign! */
1051 bool has_no_signedness () const
1053 return this->main_type
->m_flag_nosign
;
1056 void set_has_no_signedness (bool has_no_signedness
)
1058 this->main_type
->m_flag_nosign
= has_no_signedness
;
1061 /* This appears in a type's flags word if it is a stub type (e.g.,
1062 if someone referenced a type that wasn't defined in a source file
1063 via (struct sir_not_appearing_in_this_film *)). */
1065 bool is_stub () const
1067 return this->main_type
->m_flag_stub
;
1070 void set_is_stub (bool is_stub
)
1072 this->main_type
->m_flag_stub
= is_stub
;
1075 /* The target type of this type is a stub type, and this type needs
1076 to be updated if it gets un-stubbed in check_typedef. Used for
1077 arrays and ranges, in which TYPE_LENGTH of the array/range gets set
1078 based on the TYPE_LENGTH of the target type. Also, set for
1079 TYPE_CODE_TYPEDEF. */
1081 bool target_is_stub () const
1083 return this->main_type
->m_flag_target_stub
;
1086 void set_target_is_stub (bool target_is_stub
)
1088 this->main_type
->m_flag_target_stub
= target_is_stub
;
1091 /* This is a function type which appears to have a prototype. We
1092 need this for function calls in order to tell us if it's necessary
1093 to coerce the args, or to just do the standard conversions. This
1094 is used with a short field. */
1096 bool is_prototyped () const
1098 return this->main_type
->m_flag_prototyped
;
1101 void set_is_prototyped (bool is_prototyped
)
1103 this->main_type
->m_flag_prototyped
= is_prototyped
;
1106 /* FIXME drow/2002-06-03: Only used for methods, but applies as well
1109 bool has_varargs () const
1111 return this->main_type
->m_flag_varargs
;
1114 void set_has_varargs (bool has_varargs
)
1116 this->main_type
->m_flag_varargs
= has_varargs
;
1119 /* Identify a vector type. Gcc is handling this by adding an extra
1120 attribute to the array type. We slurp that in as a new flag of a
1121 type. This is used only in dwarf2read.c. */
1123 bool is_vector () const
1125 return this->main_type
->m_flag_vector
;
1128 void set_is_vector (bool is_vector
)
1130 this->main_type
->m_flag_vector
= is_vector
;
1133 /* This debug target supports TYPE_STUB(t). In the unsupported case
1134 we have to rely on NFIELDS to be zero etc., see TYPE_IS_OPAQUE().
1135 TYPE_STUB(t) with !TYPE_STUB_SUPPORTED(t) may exist if we only
1136 guessed the TYPE_STUB(t) value (see dwarfread.c). */
1138 bool stub_is_supported () const
1140 return this->main_type
->m_flag_stub_supported
;
1143 void set_stub_is_supported (bool stub_is_supported
)
1145 this->main_type
->m_flag_stub_supported
= stub_is_supported
;
1148 /* Used only for TYPE_CODE_FUNC where it specifies the real function
1149 address is returned by this function call. TYPE_TARGET_TYPE
1150 determines the final returned function type to be presented to
1153 bool is_gnu_ifunc () const
1155 return this->main_type
->m_flag_gnu_ifunc
;
1158 void set_is_gnu_ifunc (bool is_gnu_ifunc
)
1160 this->main_type
->m_flag_gnu_ifunc
= is_gnu_ifunc
;
1163 /* The debugging formats (especially STABS) do not contain enough
1164 information to represent all Ada types---especially those whose
1165 size depends on dynamic quantities. Therefore, the GNAT Ada
1166 compiler includes extra information in the form of additional type
1167 definitions connected by naming conventions. This flag indicates
1168 that the type is an ordinary (unencoded) GDB type that has been
1169 created from the necessary run-time information, and does not need
1170 further interpretation. Optionally marks ordinary, fixed-size GDB
1173 bool is_fixed_instance () const
1175 return this->main_type
->m_flag_fixed_instance
;
1178 void set_is_fixed_instance (bool is_fixed_instance
)
1180 this->main_type
->m_flag_fixed_instance
= is_fixed_instance
;
1183 /* A compiler may supply dwarf instrumentation that indicates the desired
1184 endian interpretation of the variable differs from the native endian
1187 bool endianity_is_not_default () const
1189 return this->main_type
->m_flag_endianity_not_default
;
1192 void set_endianity_is_not_default (bool endianity_is_not_default
)
1194 this->main_type
->m_flag_endianity_not_default
= endianity_is_not_default
;
1197 /* * Return the dynamic property of the requested KIND from this type's
1198 list of dynamic properties. */
1199 dynamic_prop
*dyn_prop (dynamic_prop_node_kind kind
) const;
1201 /* * Given a dynamic property PROP of a given KIND, add this dynamic
1202 property to this type.
1204 This function assumes that this type is objfile-owned. */
1205 void add_dyn_prop (dynamic_prop_node_kind kind
, dynamic_prop prop
);
1207 /* * Remove dynamic property of kind KIND from this type, if it exists. */
1208 void remove_dyn_prop (dynamic_prop_node_kind kind
);
1210 /* * Return true if this is an integer type whose logical (bit) size
1211 differs from its storage size; false otherwise. Always return
1212 false for non-integer (i.e., non-TYPE_SPECIFIC_INT) types. */
1213 bool bit_size_differs_p () const
1215 return (main_type
->type_specific_field
== TYPE_SPECIFIC_INT
1216 && main_type
->type_specific
.int_stuff
.bit_size
!= 8 * length
);
1219 /* * Return the logical (bit) size for this integer type. Only
1220 valid for integer (TYPE_SPECIFIC_INT) types. */
1221 unsigned short bit_size () const
1223 gdb_assert (main_type
->type_specific_field
== TYPE_SPECIFIC_INT
);
1224 return main_type
->type_specific
.int_stuff
.bit_size
;
1227 /* * Return the bit offset for this integer type. Only valid for
1228 integer (TYPE_SPECIFIC_INT) types. */
1229 unsigned short bit_offset () const
1231 gdb_assert (main_type
->type_specific_field
== TYPE_SPECIFIC_INT
);
1232 return main_type
->type_specific
.int_stuff
.bit_offset
;
1235 /* * Type that is a pointer to this type.
1236 NULL if no such pointer-to type is known yet.
1237 The debugger may add the address of such a type
1238 if it has to construct one later. */
1240 struct type
*pointer_type
;
1242 /* * C++: also need a reference type. */
1244 struct type
*reference_type
;
1246 /* * A C++ rvalue reference type added in C++11. */
1248 struct type
*rvalue_reference_type
;
1250 /* * Variant chain. This points to a type that differs from this
1251 one only in qualifiers and length. Currently, the possible
1252 qualifiers are const, volatile, code-space, data-space, and
1253 address class. The length may differ only when one of the
1254 address class flags are set. The variants are linked in a
1255 circular ring and share MAIN_TYPE. */
1259 /* * The alignment for this type. Zero means that the alignment was
1260 not specified in the debug info. Note that this is stored in a
1261 funny way: as the log base 2 (plus 1) of the alignment; so a
1262 value of 1 means the alignment is 1, and a value of 9 means the
1263 alignment is 256. */
1265 unsigned align_log2
: TYPE_ALIGN_BITS
;
1267 /* * Flags specific to this instance of the type, indicating where
1270 For TYPE_CODE_TYPEDEF the flags of the typedef type should be
1271 binary or-ed with the target type, with a special case for
1272 address class and space class. For example if this typedef does
1273 not specify any new qualifiers, TYPE_INSTANCE_FLAGS is 0 and the
1274 instance flags are completely inherited from the target type. No
1275 qualifiers can be cleared by the typedef. See also
1277 unsigned m_instance_flags
: 9;
1279 /* * Length of storage for a value of this type. The value is the
1280 expression in host bytes of what sizeof(type) would return. This
1281 size includes padding. For example, an i386 extended-precision
1282 floating point value really only occupies ten bytes, but most
1283 ABI's declare its size to be 12 bytes, to preserve alignment.
1284 A `struct type' representing such a floating-point type would
1285 have a `length' value of 12, even though the last two bytes are
1288 Since this field is expressed in host bytes, its value is appropriate
1289 to pass to memcpy and such (it is assumed that GDB itself always runs
1290 on an 8-bits addressable architecture). However, when using it for
1291 target address arithmetic (e.g. adding it to a target address), the
1292 type_length_units function should be used in order to get the length
1293 expressed in target addressable memory units. */
1297 /* * Core type, shared by a group of qualified types. */
1299 struct main_type
*main_type
;
1305 /* * The overloaded name.
1306 This is generally allocated in the objfile's obstack.
1307 However stabsread.c sometimes uses malloc. */
1311 /* * The number of methods with this name. */
1315 /* * The list of methods. */
1317 struct fn_field
*fn_fields
;
1324 /* * If is_stub is clear, this is the mangled name which we can look
1325 up to find the address of the method (FIXME: it would be cleaner
1326 to have a pointer to the struct symbol here instead).
1328 If is_stub is set, this is the portion of the mangled name which
1329 specifies the arguments. For example, "ii", if there are two int
1330 arguments, or "" if there are no arguments. See gdb_mangle_name
1331 for the conversion from this format to the one used if is_stub is
1334 const char *physname
;
1336 /* * The function type for the method.
1338 (This comment used to say "The return value of the method", but
1339 that's wrong. The function type is expected here, i.e. something
1340 with TYPE_CODE_METHOD, and *not* the return-value type). */
1344 /* * For virtual functions. First baseclass that defines this
1345 virtual function. */
1347 struct type
*fcontext
;
1351 unsigned int is_const
:1;
1352 unsigned int is_volatile
:1;
1353 unsigned int is_private
:1;
1354 unsigned int is_protected
:1;
1355 unsigned int is_artificial
:1;
1357 /* * A stub method only has some fields valid (but they are enough
1358 to reconstruct the rest of the fields). */
1360 unsigned int is_stub
:1;
1362 /* * True if this function is a constructor, false otherwise. */
1364 unsigned int is_constructor
: 1;
1366 /* * True if this function is deleted, false otherwise. */
1368 unsigned int is_deleted
: 1;
1370 /* * DW_AT_defaulted attribute for this function. The value is one
1371 of the DW_DEFAULTED constants. */
1373 ENUM_BITFIELD (dwarf_defaulted_attribute
) defaulted
: 2;
1377 unsigned int dummy
:6;
1379 /* * Index into that baseclass's virtual function table, minus 2;
1380 else if static: VOFFSET_STATIC; else: 0. */
1382 unsigned int voffset
:16;
1384 #define VOFFSET_STATIC 1
1390 /* * Unqualified name to be prefixed by owning class qualified
1395 /* * Type this typedef named NAME represents. */
1399 /* * True if this field was declared protected, false otherwise. */
1400 unsigned int is_protected
: 1;
1402 /* * True if this field was declared private, false otherwise. */
1403 unsigned int is_private
: 1;
1406 /* * C++ language-specific information for TYPE_CODE_STRUCT and
1407 TYPE_CODE_UNION nodes. */
1409 struct cplus_struct_type
1411 /* * Number of base classes this type derives from. The
1412 baseclasses are stored in the first N_BASECLASSES fields
1413 (i.e. the `fields' field of the struct type). The only fields
1414 of struct field that are used are: type, name, loc.bitpos. */
1416 short n_baseclasses
;
1418 /* * Field number of the virtual function table pointer in VPTR_BASETYPE.
1419 All access to this field must be through TYPE_VPTR_FIELDNO as one
1420 thing it does is check whether the field has been initialized.
1421 Initially TYPE_RAW_CPLUS_SPECIFIC has the value of cplus_struct_default,
1422 which for portability reasons doesn't initialize this field.
1423 TYPE_VPTR_FIELDNO returns -1 for this case.
1425 If -1, we were unable to find the virtual function table pointer in
1426 initial symbol reading, and get_vptr_fieldno should be called to find
1427 it if possible. get_vptr_fieldno will update this field if possible.
1428 Otherwise the value is left at -1.
1430 Unused if this type does not have virtual functions. */
1434 /* * Number of methods with unique names. All overloaded methods
1435 with the same name count only once. */
1439 /* * Number of template arguments. */
1441 unsigned short n_template_arguments
;
1443 /* * One if this struct is a dynamic class, as defined by the
1444 Itanium C++ ABI: if it requires a virtual table pointer,
1445 because it or any of its base classes have one or more virtual
1446 member functions or virtual base classes. Minus one if not
1447 dynamic. Zero if not yet computed. */
1451 /* * The calling convention for this type, fetched from the
1452 DW_AT_calling_convention attribute. The value is one of the
1455 ENUM_BITFIELD (dwarf_calling_convention
) calling_convention
: 8;
1457 /* * The base class which defined the virtual function table pointer. */
1459 struct type
*vptr_basetype
;
1461 /* * For derived classes, the number of base classes is given by
1462 n_baseclasses and virtual_field_bits is a bit vector containing
1463 one bit per base class. If the base class is virtual, the
1464 corresponding bit will be set.
1469 class C : public B, public virtual A {};
1471 B is a baseclass of C; A is a virtual baseclass for C.
1472 This is a C++ 2.0 language feature. */
1474 B_TYPE
*virtual_field_bits
;
1476 /* * For classes with private fields, the number of fields is
1477 given by nfields and private_field_bits is a bit vector
1478 containing one bit per field.
1480 If the field is private, the corresponding bit will be set. */
1482 B_TYPE
*private_field_bits
;
1484 /* * For classes with protected fields, the number of fields is
1485 given by nfields and protected_field_bits is a bit vector
1486 containing one bit per field.
1488 If the field is private, the corresponding bit will be set. */
1490 B_TYPE
*protected_field_bits
;
1492 /* * For classes with fields to be ignored, either this is
1493 optimized out or this field has length 0. */
1495 B_TYPE
*ignore_field_bits
;
1497 /* * For classes, structures, and unions, a description of each
1498 field, which consists of an overloaded name, followed by the
1499 types of arguments that the method expects, and then the name
1500 after it has been renamed to make it distinct.
1502 fn_fieldlists points to an array of nfn_fields of these. */
1504 struct fn_fieldlist
*fn_fieldlists
;
1506 /* * typedefs defined inside this class. typedef_field points to
1507 an array of typedef_field_count elements. */
1509 struct decl_field
*typedef_field
;
1511 unsigned typedef_field_count
;
1513 /* * The nested types defined by this type. nested_types points to
1514 an array of nested_types_count elements. */
1516 struct decl_field
*nested_types
;
1518 unsigned nested_types_count
;
1520 /* * The template arguments. This is an array with
1521 N_TEMPLATE_ARGUMENTS elements. This is NULL for non-template
1524 struct symbol
**template_arguments
;
1527 /* * Struct used to store conversion rankings. */
1533 /* * When two conversions are of the same type and therefore have
1534 the same rank, subrank is used to differentiate the two.
1536 Eg: Two derived-class-pointer to base-class-pointer conversions
1537 would both have base pointer conversion rank, but the
1538 conversion with the shorter distance to the ancestor is
1539 preferable. 'subrank' would be used to reflect that. */
1544 /* * Used for ranking a function for overload resolution. */
1546 typedef std::vector
<rank
> badness_vector
;
1548 /* * GNAT Ada-specific information for various Ada types. */
1550 struct gnat_aux_type
1552 /* * Parallel type used to encode information about dynamic types
1553 used in Ada (such as variant records, variable-size array,
1555 struct type
* descriptive_type
;
1558 /* * For TYPE_CODE_FUNC and TYPE_CODE_METHOD types. */
1562 /* * The calling convention for targets supporting multiple ABIs.
1563 Right now this is only fetched from the Dwarf-2
1564 DW_AT_calling_convention attribute. The value is one of the
1567 ENUM_BITFIELD (dwarf_calling_convention
) calling_convention
: 8;
1569 /* * Whether this function normally returns to its caller. It is
1570 set from the DW_AT_noreturn attribute if set on the
1571 DW_TAG_subprogram. */
1573 unsigned int is_noreturn
: 1;
1575 /* * Only those DW_TAG_call_site's in this function that have
1576 DW_AT_call_tail_call set are linked in this list. Function
1577 without its tail call list complete
1578 (DW_AT_call_all_tail_calls or its superset
1579 DW_AT_call_all_calls) has TAIL_CALL_LIST NULL, even if some
1580 DW_TAG_call_site's exist in such function. */
1582 struct call_site
*tail_call_list
;
1584 /* * For method types (TYPE_CODE_METHOD), the aggregate type that
1585 contains the method. */
1587 struct type
*self_type
;
1590 /* struct call_site_parameter can be referenced in callees by several ways. */
1592 enum call_site_parameter_kind
1594 /* * Use field call_site_parameter.u.dwarf_reg. */
1595 CALL_SITE_PARAMETER_DWARF_REG
,
1597 /* * Use field call_site_parameter.u.fb_offset. */
1598 CALL_SITE_PARAMETER_FB_OFFSET
,
1600 /* * Use field call_site_parameter.u.param_offset. */
1601 CALL_SITE_PARAMETER_PARAM_OFFSET
1604 struct call_site_target
1606 union field_location loc
;
1608 /* * Discriminant for union field_location. */
1610 ENUM_BITFIELD(field_loc_kind
) loc_kind
: 3;
1613 union call_site_parameter_u
1615 /* * DW_TAG_formal_parameter's DW_AT_location's DW_OP_regX
1616 as DWARF register number, for register passed
1621 /* * Offset from the callee's frame base, for stack passed
1622 parameters. This equals offset from the caller's stack
1625 CORE_ADDR fb_offset
;
1627 /* * Offset relative to the start of this PER_CU to
1628 DW_TAG_formal_parameter which is referenced by both
1629 caller and the callee. */
1631 cu_offset param_cu_off
;
1634 struct call_site_parameter
1636 ENUM_BITFIELD (call_site_parameter_kind
) kind
: 2;
1638 union call_site_parameter_u u
;
1640 /* * DW_TAG_formal_parameter's DW_AT_call_value. It is never NULL. */
1642 const gdb_byte
*value
;
1645 /* * DW_TAG_formal_parameter's DW_AT_call_data_value.
1646 It may be NULL if not provided by DWARF. */
1648 const gdb_byte
*data_value
;
1649 size_t data_value_size
;
1652 /* * A place where a function gets called from, represented by
1653 DW_TAG_call_site. It can be looked up from symtab->call_site_htab. */
1657 /* * Address of the first instruction after this call. It must be
1658 the first field as we overload core_addr_hash and core_addr_eq
1663 /* * List successor with head in FUNC_TYPE.TAIL_CALL_LIST. */
1665 struct call_site
*tail_call_next
;
1667 /* * Describe DW_AT_call_target. Missing attribute uses
1668 FIELD_LOC_KIND_DWARF_BLOCK with FIELD_DWARF_BLOCK == NULL. */
1670 struct call_site_target target
;
1672 /* * Size of the PARAMETER array. */
1674 unsigned parameter_count
;
1676 /* * CU of the function where the call is located. It gets used
1677 for DWARF blocks execution in the parameter array below. */
1679 dwarf2_per_cu_data
*per_cu
;
1681 /* objfile of the function where the call is located. */
1683 dwarf2_per_objfile
*per_objfile
;
1685 /* * Describe DW_TAG_call_site's DW_TAG_formal_parameter. */
1687 struct call_site_parameter parameter
[1];
1690 /* The type-specific info for TYPE_CODE_FIXED_POINT types. */
1692 struct fixed_point_type_info
1694 /* The fixed point type's scaling factor. */
1695 gdb_mpq scaling_factor
;
1698 /* * The default value of TYPE_CPLUS_SPECIFIC(T) points to this shared
1699 static structure. */
1701 extern const struct cplus_struct_type cplus_struct_default
;
1703 extern void allocate_cplus_struct_type (struct type
*);
1705 #define INIT_CPLUS_SPECIFIC(type) \
1706 (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_CPLUS_STUFF, \
1707 TYPE_RAW_CPLUS_SPECIFIC (type) = (struct cplus_struct_type*) \
1708 &cplus_struct_default)
1710 #define ALLOCATE_CPLUS_STRUCT_TYPE(type) allocate_cplus_struct_type (type)
1712 #define HAVE_CPLUS_STRUCT(type) \
1713 (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_CPLUS_STUFF \
1714 && TYPE_RAW_CPLUS_SPECIFIC (type) != &cplus_struct_default)
1716 #define INIT_NONE_SPECIFIC(type) \
1717 (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_NONE, \
1718 TYPE_MAIN_TYPE (type)->type_specific = {})
1720 extern const struct gnat_aux_type gnat_aux_default
;
1722 extern void allocate_gnat_aux_type (struct type
*);
1724 #define INIT_GNAT_SPECIFIC(type) \
1725 (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_GNAT_STUFF, \
1726 TYPE_GNAT_SPECIFIC (type) = (struct gnat_aux_type *) &gnat_aux_default)
1727 #define ALLOCATE_GNAT_AUX_TYPE(type) allocate_gnat_aux_type (type)
1728 /* * A macro that returns non-zero if the type-specific data should be
1729 read as "gnat-stuff". */
1730 #define HAVE_GNAT_AUX_INFO(type) \
1731 (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF)
1733 /* * True if TYPE is known to be an Ada type of some kind. */
1734 #define ADA_TYPE_P(type) \
1735 (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF \
1736 || (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_NONE \
1737 && (type)->is_fixed_instance ()))
1739 #define INIT_FUNC_SPECIFIC(type) \
1740 (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_FUNC, \
1741 TYPE_MAIN_TYPE (type)->type_specific.func_stuff = (struct func_type *) \
1742 TYPE_ZALLOC (type, \
1743 sizeof (*TYPE_MAIN_TYPE (type)->type_specific.func_stuff)))
1745 /* "struct fixed_point_type_info" has a field that has a destructor.
1746 See allocate_fixed_point_type_info to understand how this is
1748 #define INIT_FIXED_POINT_SPECIFIC(type) \
1749 (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_FIXED_POINT, \
1750 TYPE_FIXED_POINT_INFO (type) = allocate_fixed_point_type_info (type))
1752 #define TYPE_MAIN_TYPE(thistype) (thistype)->main_type
1753 #define TYPE_TARGET_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->target_type
1754 #define TYPE_POINTER_TYPE(thistype) (thistype)->pointer_type
1755 #define TYPE_REFERENCE_TYPE(thistype) (thistype)->reference_type
1756 #define TYPE_RVALUE_REFERENCE_TYPE(thistype) (thistype)->rvalue_reference_type
1757 #define TYPE_CHAIN(thistype) (thistype)->chain
1758 /* * Note that if thistype is a TYPEDEF type, you have to call check_typedef.
1759 But check_typedef does set the TYPE_LENGTH of the TYPEDEF type,
1760 so you only have to call check_typedef once. Since allocate_value
1761 calls check_typedef, TYPE_LENGTH (VALUE_TYPE (X)) is safe. */
1762 #define TYPE_LENGTH(thistype) (thistype)->length
1764 /* * Return the alignment of the type in target addressable memory
1765 units, or 0 if no alignment was specified. */
1766 #define TYPE_RAW_ALIGN(thistype) type_raw_align (thistype)
1768 /* * Return the alignment of the type in target addressable memory
1769 units, or 0 if no alignment was specified. */
1770 extern unsigned type_raw_align (struct type
*);
1772 /* * Return the alignment of the type in target addressable memory
1773 units. Return 0 if the alignment cannot be determined; but note
1774 that this makes an effort to compute the alignment even it it was
1775 not specified in the debug info. */
1776 extern unsigned type_align (struct type
*);
1778 /* * Set the alignment of the type. The alignment must be a power of
1779 2. Returns false if the given value does not fit in the available
1780 space in struct type. */
1781 extern bool set_type_align (struct type
*, ULONGEST
);
1783 /* Property accessors for the type data location. */
1784 #define TYPE_DATA_LOCATION(thistype) \
1785 ((thistype)->dyn_prop (DYN_PROP_DATA_LOCATION))
1786 #define TYPE_DATA_LOCATION_BATON(thistype) \
1787 TYPE_DATA_LOCATION (thistype)->data.baton
1788 #define TYPE_DATA_LOCATION_ADDR(thistype) \
1789 (TYPE_DATA_LOCATION (thistype)->const_val ())
1790 #define TYPE_DATA_LOCATION_KIND(thistype) \
1791 (TYPE_DATA_LOCATION (thistype)->kind ())
1792 #define TYPE_DYNAMIC_LENGTH(thistype) \
1793 ((thistype)->dyn_prop (DYN_PROP_BYTE_SIZE))
1795 /* Property accessors for the type allocated/associated. */
1796 #define TYPE_ALLOCATED_PROP(thistype) \
1797 ((thistype)->dyn_prop (DYN_PROP_ALLOCATED))
1798 #define TYPE_ASSOCIATED_PROP(thistype) \
1799 ((thistype)->dyn_prop (DYN_PROP_ASSOCIATED))
1803 #define TYPE_SELF_TYPE(thistype) internal_type_self_type (thistype)
1804 /* Do not call this, use TYPE_SELF_TYPE. */
1805 extern struct type
*internal_type_self_type (struct type
*);
1806 extern void set_type_self_type (struct type
*, struct type
*);
1808 extern int internal_type_vptr_fieldno (struct type
*);
1809 extern void set_type_vptr_fieldno (struct type
*, int);
1810 extern struct type
*internal_type_vptr_basetype (struct type
*);
1811 extern void set_type_vptr_basetype (struct type
*, struct type
*);
1812 #define TYPE_VPTR_FIELDNO(thistype) internal_type_vptr_fieldno (thistype)
1813 #define TYPE_VPTR_BASETYPE(thistype) internal_type_vptr_basetype (thistype)
1815 #define TYPE_NFN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields
1816 #define TYPE_SPECIFIC_FIELD(thistype) \
1817 TYPE_MAIN_TYPE(thistype)->type_specific_field
1818 /* We need this tap-dance with the TYPE_RAW_SPECIFIC because of the case
1819 where we're trying to print an Ada array using the C language.
1820 In that case, there is no "cplus_stuff", but the C language assumes
1821 that there is. What we do, in that case, is pretend that there is
1822 an implicit one which is the default cplus stuff. */
1823 #define TYPE_CPLUS_SPECIFIC(thistype) \
1824 (!HAVE_CPLUS_STRUCT(thistype) \
1825 ? (struct cplus_struct_type*)&cplus_struct_default \
1826 : TYPE_RAW_CPLUS_SPECIFIC(thistype))
1827 #define TYPE_RAW_CPLUS_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff
1828 #define TYPE_CPLUS_CALLING_CONVENTION(thistype) \
1829 TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff->calling_convention
1830 #define TYPE_FLOATFORMAT(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.floatformat
1831 #define TYPE_GNAT_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.gnat_stuff
1832 #define TYPE_DESCRIPTIVE_TYPE(thistype) TYPE_GNAT_SPECIFIC(thistype)->descriptive_type
1833 #define TYPE_CALLING_CONVENTION(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->calling_convention
1834 #define TYPE_NO_RETURN(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->is_noreturn
1835 #define TYPE_TAIL_CALL_LIST(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->tail_call_list
1836 #define TYPE_BASECLASS(thistype,index) ((thistype)->field (index).type ())
1837 #define TYPE_N_BASECLASSES(thistype) TYPE_CPLUS_SPECIFIC(thistype)->n_baseclasses
1838 #define TYPE_BASECLASS_NAME(thistype,index) TYPE_FIELD_NAME(thistype, index)
1839 #define TYPE_BASECLASS_BITPOS(thistype,index) TYPE_FIELD_BITPOS(thistype,index)
1840 #define BASETYPE_VIA_PUBLIC(thistype, index) \
1841 ((!TYPE_FIELD_PRIVATE(thistype, index)) && (!TYPE_FIELD_PROTECTED(thistype, index)))
1842 #define TYPE_CPLUS_DYNAMIC(thistype) TYPE_CPLUS_SPECIFIC (thistype)->is_dynamic
1844 #define BASETYPE_VIA_VIRTUAL(thistype, index) \
1845 (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
1846 : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (index)))
1848 #define TYPE_FIXED_POINT_INFO(thistype) \
1849 (TYPE_MAIN_TYPE(thistype)->type_specific.fixed_point_info)
1851 #define FIELD_NAME(thisfld) ((thisfld).name)
1852 #define FIELD_LOC_KIND(thisfld) ((thisfld).loc_kind)
1853 #define FIELD_BITPOS_LVAL(thisfld) ((thisfld).loc.bitpos)
1854 #define FIELD_BITPOS(thisfld) (FIELD_BITPOS_LVAL (thisfld) + 0)
1855 #define FIELD_ENUMVAL_LVAL(thisfld) ((thisfld).loc.enumval)
1856 #define FIELD_ENUMVAL(thisfld) (FIELD_ENUMVAL_LVAL (thisfld) + 0)
1857 #define FIELD_STATIC_PHYSNAME(thisfld) ((thisfld).loc.physname)
1858 #define FIELD_STATIC_PHYSADDR(thisfld) ((thisfld).loc.physaddr)
1859 #define FIELD_DWARF_BLOCK(thisfld) ((thisfld).loc.dwarf_block)
1860 #define SET_FIELD_BITPOS(thisfld, bitpos) \
1861 (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_BITPOS, \
1862 FIELD_BITPOS_LVAL (thisfld) = (bitpos))
1863 #define SET_FIELD_ENUMVAL(thisfld, enumval) \
1864 (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_ENUMVAL, \
1865 FIELD_ENUMVAL_LVAL (thisfld) = (enumval))
1866 #define SET_FIELD_PHYSNAME(thisfld, name) \
1867 (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSNAME, \
1868 FIELD_STATIC_PHYSNAME (thisfld) = (name))
1869 #define SET_FIELD_PHYSADDR(thisfld, addr) \
1870 (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSADDR, \
1871 FIELD_STATIC_PHYSADDR (thisfld) = (addr))
1872 #define SET_FIELD_DWARF_BLOCK(thisfld, addr) \
1873 (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_DWARF_BLOCK, \
1874 FIELD_DWARF_BLOCK (thisfld) = (addr))
1875 #define FIELD_ARTIFICIAL(thisfld) ((thisfld).artificial)
1876 #define FIELD_BITSIZE(thisfld) ((thisfld).bitsize)
1878 #define TYPE_FIELD_NAME(thistype, n) FIELD_NAME((thistype)->field (n))
1879 #define TYPE_FIELD_LOC_KIND(thistype, n) FIELD_LOC_KIND ((thistype)->field (n))
1880 #define TYPE_FIELD_BITPOS(thistype, n) FIELD_BITPOS ((thistype)->field (n))
1881 #define TYPE_FIELD_ENUMVAL(thistype, n) FIELD_ENUMVAL ((thistype)->field (n))
1882 #define TYPE_FIELD_STATIC_PHYSNAME(thistype, n) FIELD_STATIC_PHYSNAME ((thistype)->field (n))
1883 #define TYPE_FIELD_STATIC_PHYSADDR(thistype, n) FIELD_STATIC_PHYSADDR ((thistype)->field (n))
1884 #define TYPE_FIELD_DWARF_BLOCK(thistype, n) FIELD_DWARF_BLOCK ((thistype)->field (n))
1885 #define TYPE_FIELD_ARTIFICIAL(thistype, n) FIELD_ARTIFICIAL((thistype)->field (n))
1886 #define TYPE_FIELD_BITSIZE(thistype, n) FIELD_BITSIZE((thistype)->field (n))
1887 #define TYPE_FIELD_PACKED(thistype, n) (FIELD_BITSIZE((thistype)->field (n))!=0)
1889 #define TYPE_FIELD_PRIVATE_BITS(thistype) \
1890 TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits
1891 #define TYPE_FIELD_PROTECTED_BITS(thistype) \
1892 TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits
1893 #define TYPE_FIELD_IGNORE_BITS(thistype) \
1894 TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits
1895 #define TYPE_FIELD_VIRTUAL_BITS(thistype) \
1896 TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits
1897 #define SET_TYPE_FIELD_PRIVATE(thistype, n) \
1898 B_SET (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n))
1899 #define SET_TYPE_FIELD_PROTECTED(thistype, n) \
1900 B_SET (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n))
1901 #define SET_TYPE_FIELD_IGNORE(thistype, n) \
1902 B_SET (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n))
1903 #define SET_TYPE_FIELD_VIRTUAL(thistype, n) \
1904 B_SET (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n))
1905 #define TYPE_FIELD_PRIVATE(thistype, n) \
1906 (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits == NULL ? 0 \
1907 : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n)))
1908 #define TYPE_FIELD_PROTECTED(thistype, n) \
1909 (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits == NULL ? 0 \
1910 : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n)))
1911 #define TYPE_FIELD_IGNORE(thistype, n) \
1912 (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits == NULL ? 0 \
1913 : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n)))
1914 #define TYPE_FIELD_VIRTUAL(thistype, n) \
1915 (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
1916 : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n)))
1918 #define TYPE_FN_FIELDLISTS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists
1919 #define TYPE_FN_FIELDLIST(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n]
1920 #define TYPE_FN_FIELDLIST1(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].fn_fields
1921 #define TYPE_FN_FIELDLIST_NAME(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].name
1922 #define TYPE_FN_FIELDLIST_LENGTH(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].length
1924 #define TYPE_N_TEMPLATE_ARGUMENTS(thistype) \
1925 TYPE_CPLUS_SPECIFIC (thistype)->n_template_arguments
1926 #define TYPE_TEMPLATE_ARGUMENTS(thistype) \
1927 TYPE_CPLUS_SPECIFIC (thistype)->template_arguments
1928 #define TYPE_TEMPLATE_ARGUMENT(thistype, n) \
1929 TYPE_CPLUS_SPECIFIC (thistype)->template_arguments[n]
1931 #define TYPE_FN_FIELD(thisfn, n) (thisfn)[n]
1932 #define TYPE_FN_FIELD_PHYSNAME(thisfn, n) (thisfn)[n].physname
1933 #define TYPE_FN_FIELD_TYPE(thisfn, n) (thisfn)[n].type
1934 #define TYPE_FN_FIELD_ARGS(thisfn, n) (((thisfn)[n].type)->fields ())
1935 #define TYPE_FN_FIELD_CONST(thisfn, n) ((thisfn)[n].is_const)
1936 #define TYPE_FN_FIELD_VOLATILE(thisfn, n) ((thisfn)[n].is_volatile)
1937 #define TYPE_FN_FIELD_PRIVATE(thisfn, n) ((thisfn)[n].is_private)
1938 #define TYPE_FN_FIELD_PROTECTED(thisfn, n) ((thisfn)[n].is_protected)
1939 #define TYPE_FN_FIELD_ARTIFICIAL(thisfn, n) ((thisfn)[n].is_artificial)
1940 #define TYPE_FN_FIELD_STUB(thisfn, n) ((thisfn)[n].is_stub)
1941 #define TYPE_FN_FIELD_CONSTRUCTOR(thisfn, n) ((thisfn)[n].is_constructor)
1942 #define TYPE_FN_FIELD_FCONTEXT(thisfn, n) ((thisfn)[n].fcontext)
1943 #define TYPE_FN_FIELD_VOFFSET(thisfn, n) ((thisfn)[n].voffset-2)
1944 #define TYPE_FN_FIELD_VIRTUAL_P(thisfn, n) ((thisfn)[n].voffset > 1)
1945 #define TYPE_FN_FIELD_STATIC_P(thisfn, n) ((thisfn)[n].voffset == VOFFSET_STATIC)
1946 #define TYPE_FN_FIELD_DEFAULTED(thisfn, n) ((thisfn)[n].defaulted)
1947 #define TYPE_FN_FIELD_DELETED(thisfn, n) ((thisfn)[n].is_deleted)
1949 /* Accessors for typedefs defined by a class. */
1950 #define TYPE_TYPEDEF_FIELD_ARRAY(thistype) \
1951 TYPE_CPLUS_SPECIFIC (thistype)->typedef_field
1952 #define TYPE_TYPEDEF_FIELD(thistype, n) \
1953 TYPE_CPLUS_SPECIFIC (thistype)->typedef_field[n]
1954 #define TYPE_TYPEDEF_FIELD_NAME(thistype, n) \
1955 TYPE_TYPEDEF_FIELD (thistype, n).name
1956 #define TYPE_TYPEDEF_FIELD_TYPE(thistype, n) \
1957 TYPE_TYPEDEF_FIELD (thistype, n).type
1958 #define TYPE_TYPEDEF_FIELD_COUNT(thistype) \
1959 TYPE_CPLUS_SPECIFIC (thistype)->typedef_field_count
1960 #define TYPE_TYPEDEF_FIELD_PROTECTED(thistype, n) \
1961 TYPE_TYPEDEF_FIELD (thistype, n).is_protected
1962 #define TYPE_TYPEDEF_FIELD_PRIVATE(thistype, n) \
1963 TYPE_TYPEDEF_FIELD (thistype, n).is_private
1965 #define TYPE_NESTED_TYPES_ARRAY(thistype) \
1966 TYPE_CPLUS_SPECIFIC (thistype)->nested_types
1967 #define TYPE_NESTED_TYPES_FIELD(thistype, n) \
1968 TYPE_CPLUS_SPECIFIC (thistype)->nested_types[n]
1969 #define TYPE_NESTED_TYPES_FIELD_NAME(thistype, n) \
1970 TYPE_NESTED_TYPES_FIELD (thistype, n).name
1971 #define TYPE_NESTED_TYPES_FIELD_TYPE(thistype, n) \
1972 TYPE_NESTED_TYPES_FIELD (thistype, n).type
1973 #define TYPE_NESTED_TYPES_COUNT(thistype) \
1974 TYPE_CPLUS_SPECIFIC (thistype)->nested_types_count
1975 #define TYPE_NESTED_TYPES_FIELD_PROTECTED(thistype, n) \
1976 TYPE_NESTED_TYPES_FIELD (thistype, n).is_protected
1977 #define TYPE_NESTED_TYPES_FIELD_PRIVATE(thistype, n) \
1978 TYPE_NESTED_TYPES_FIELD (thistype, n).is_private
1980 #define TYPE_IS_OPAQUE(thistype) \
1981 ((((thistype)->code () == TYPE_CODE_STRUCT) \
1982 || ((thistype)->code () == TYPE_CODE_UNION)) \
1983 && ((thistype)->num_fields () == 0) \
1984 && (!HAVE_CPLUS_STRUCT (thistype) \
1985 || TYPE_NFN_FIELDS (thistype) == 0) \
1986 && ((thistype)->is_stub () || !(thistype)->stub_is_supported ()))
1988 /* * A helper macro that returns the name of a type or "unnamed type"
1989 if the type has no name. */
1991 #define TYPE_SAFE_NAME(type) \
1992 (type->name () != nullptr ? type->name () : _("<unnamed type>"))
1994 /* * A helper macro that returns the name of an error type. If the
1995 type has a name, it is used; otherwise, a default is used. */
1997 #define TYPE_ERROR_NAME(type) \
1998 (type->name () ? type->name () : _("<error type>"))
2000 /* Given TYPE, return its floatformat. */
2001 const struct floatformat
*floatformat_from_type (const struct type
*type
);
2005 /* Integral types. */
2007 /* Implicit size/sign (based on the architecture's ABI). */
2008 struct type
*builtin_void
;
2009 struct type
*builtin_char
;
2010 struct type
*builtin_short
;
2011 struct type
*builtin_int
;
2012 struct type
*builtin_long
;
2013 struct type
*builtin_signed_char
;
2014 struct type
*builtin_unsigned_char
;
2015 struct type
*builtin_unsigned_short
;
2016 struct type
*builtin_unsigned_int
;
2017 struct type
*builtin_unsigned_long
;
2018 struct type
*builtin_bfloat16
;
2019 struct type
*builtin_half
;
2020 struct type
*builtin_float
;
2021 struct type
*builtin_double
;
2022 struct type
*builtin_long_double
;
2023 struct type
*builtin_complex
;
2024 struct type
*builtin_double_complex
;
2025 struct type
*builtin_string
;
2026 struct type
*builtin_bool
;
2027 struct type
*builtin_long_long
;
2028 struct type
*builtin_unsigned_long_long
;
2029 struct type
*builtin_decfloat
;
2030 struct type
*builtin_decdouble
;
2031 struct type
*builtin_declong
;
2033 /* "True" character types.
2034 We use these for the '/c' print format, because c_char is just a
2035 one-byte integral type, which languages less laid back than C
2036 will print as ... well, a one-byte integral type. */
2037 struct type
*builtin_true_char
;
2038 struct type
*builtin_true_unsigned_char
;
2040 /* Explicit sizes - see C9X <intypes.h> for naming scheme. The "int0"
2041 is for when an architecture needs to describe a register that has
2043 struct type
*builtin_int0
;
2044 struct type
*builtin_int8
;
2045 struct type
*builtin_uint8
;
2046 struct type
*builtin_int16
;
2047 struct type
*builtin_uint16
;
2048 struct type
*builtin_int24
;
2049 struct type
*builtin_uint24
;
2050 struct type
*builtin_int32
;
2051 struct type
*builtin_uint32
;
2052 struct type
*builtin_int64
;
2053 struct type
*builtin_uint64
;
2054 struct type
*builtin_int128
;
2055 struct type
*builtin_uint128
;
2057 /* Wide character types. */
2058 struct type
*builtin_char16
;
2059 struct type
*builtin_char32
;
2060 struct type
*builtin_wchar
;
2062 /* Pointer types. */
2064 /* * `pointer to data' type. Some target platforms use an implicitly
2065 {sign,zero} -extended 32-bit ABI pointer on a 64-bit ISA. */
2066 struct type
*builtin_data_ptr
;
2068 /* * `pointer to function (returning void)' type. Harvard
2069 architectures mean that ABI function and code pointers are not
2070 interconvertible. Similarly, since ANSI, C standards have
2071 explicitly said that pointers to functions and pointers to data
2072 are not interconvertible --- that is, you can't cast a function
2073 pointer to void * and back, and expect to get the same value.
2074 However, all function pointer types are interconvertible, so void
2075 (*) () can server as a generic function pointer. */
2077 struct type
*builtin_func_ptr
;
2079 /* * `function returning pointer to function (returning void)' type.
2080 The final void return type is not significant for it. */
2082 struct type
*builtin_func_func
;
2084 /* Special-purpose types. */
2086 /* * This type is used to represent a GDB internal function. */
2088 struct type
*internal_fn
;
2090 /* * This type is used to represent an xmethod. */
2091 struct type
*xmethod
;
2094 /* * Return the type table for the specified architecture. */
2096 extern const struct builtin_type
*builtin_type (struct gdbarch
*gdbarch
);
2098 /* * Per-objfile types used by symbol readers. */
2102 /* Basic types based on the objfile architecture. */
2103 struct type
*builtin_void
;
2104 struct type
*builtin_char
;
2105 struct type
*builtin_short
;
2106 struct type
*builtin_int
;
2107 struct type
*builtin_long
;
2108 struct type
*builtin_long_long
;
2109 struct type
*builtin_signed_char
;
2110 struct type
*builtin_unsigned_char
;
2111 struct type
*builtin_unsigned_short
;
2112 struct type
*builtin_unsigned_int
;
2113 struct type
*builtin_unsigned_long
;
2114 struct type
*builtin_unsigned_long_long
;
2115 struct type
*builtin_half
;
2116 struct type
*builtin_float
;
2117 struct type
*builtin_double
;
2118 struct type
*builtin_long_double
;
2120 /* * This type is used to represent symbol addresses. */
2121 struct type
*builtin_core_addr
;
2123 /* * This type represents a type that was unrecognized in symbol
2125 struct type
*builtin_error
;
2127 /* * Types used for symbols with no debug information. */
2128 struct type
*nodebug_text_symbol
;
2129 struct type
*nodebug_text_gnu_ifunc_symbol
;
2130 struct type
*nodebug_got_plt_symbol
;
2131 struct type
*nodebug_data_symbol
;
2132 struct type
*nodebug_unknown_symbol
;
2133 struct type
*nodebug_tls_symbol
;
2136 /* * Return the type table for the specified objfile. */
2138 extern const struct objfile_type
*objfile_type (struct objfile
*objfile
);
2140 /* Explicit floating-point formats. See "floatformat.h". */
2141 extern const struct floatformat
*floatformats_ieee_half
[BFD_ENDIAN_UNKNOWN
];
2142 extern const struct floatformat
*floatformats_ieee_single
[BFD_ENDIAN_UNKNOWN
];
2143 extern const struct floatformat
*floatformats_ieee_double
[BFD_ENDIAN_UNKNOWN
];
2144 extern const struct floatformat
*floatformats_ieee_double_littlebyte_bigword
[BFD_ENDIAN_UNKNOWN
];
2145 extern const struct floatformat
*floatformats_i387_ext
[BFD_ENDIAN_UNKNOWN
];
2146 extern const struct floatformat
*floatformats_m68881_ext
[BFD_ENDIAN_UNKNOWN
];
2147 extern const struct floatformat
*floatformats_arm_ext
[BFD_ENDIAN_UNKNOWN
];
2148 extern const struct floatformat
*floatformats_ia64_spill
[BFD_ENDIAN_UNKNOWN
];
2149 extern const struct floatformat
*floatformats_ia64_quad
[BFD_ENDIAN_UNKNOWN
];
2150 extern const struct floatformat
*floatformats_vax_f
[BFD_ENDIAN_UNKNOWN
];
2151 extern const struct floatformat
*floatformats_vax_d
[BFD_ENDIAN_UNKNOWN
];
2152 extern const struct floatformat
*floatformats_ibm_long_double
[BFD_ENDIAN_UNKNOWN
];
2153 extern const struct floatformat
*floatformats_bfloat16
[BFD_ENDIAN_UNKNOWN
];
2155 /* Allocate space for storing data associated with a particular
2156 type. We ensure that the space is allocated using the same
2157 mechanism that was used to allocate the space for the type
2158 structure itself. I.e. if the type is on an objfile's
2159 objfile_obstack, then the space for data associated with that type
2160 will also be allocated on the objfile_obstack. If the type is
2161 associated with a gdbarch, then the space for data associated with that
2162 type will also be allocated on the gdbarch_obstack.
2164 If a type is not associated with neither an objfile or a gdbarch then
2165 you should not use this macro to allocate space for data, instead you
2166 should call xmalloc directly, and ensure the memory is correctly freed
2167 when it is no longer needed. */
2169 #define TYPE_ALLOC(t,size) \
2170 (obstack_alloc ((TYPE_OBJFILE_OWNED (t) \
2171 ? &TYPE_OBJFILE (t)->objfile_obstack \
2172 : gdbarch_obstack (TYPE_OWNER (t).gdbarch)), \
2176 /* See comment on TYPE_ALLOC. */
2178 #define TYPE_ZALLOC(t,size) (memset (TYPE_ALLOC (t, size), 0, size))
2180 /* Use alloc_type to allocate a type owned by an objfile. Use
2181 alloc_type_arch to allocate a type owned by an architecture. Use
2182 alloc_type_copy to allocate a type with the same owner as a
2183 pre-existing template type, no matter whether objfile or
2185 extern struct type
*alloc_type (struct objfile
*);
2186 extern struct type
*alloc_type_arch (struct gdbarch
*);
2187 extern struct type
*alloc_type_copy (const struct type
*);
2189 /* * Return the type's architecture. For types owned by an
2190 architecture, that architecture is returned. For types owned by an
2191 objfile, that objfile's architecture is returned. */
2193 extern struct gdbarch
*get_type_arch (const struct type
*);
2195 /* * This returns the target type (or NULL) of TYPE, also skipping
2198 extern struct type
*get_target_type (struct type
*type
);
2200 /* Return the equivalent of TYPE_LENGTH, but in number of target
2201 addressable memory units of the associated gdbarch instead of bytes. */
2203 extern unsigned int type_length_units (struct type
*type
);
2205 /* * Helper function to construct objfile-owned types. */
2207 extern struct type
*init_type (struct objfile
*, enum type_code
, int,
2209 extern struct type
*init_integer_type (struct objfile
*, int, int,
2211 extern struct type
*init_character_type (struct objfile
*, int, int,
2213 extern struct type
*init_boolean_type (struct objfile
*, int, int,
2215 extern struct type
*init_float_type (struct objfile
*, int, const char *,
2216 const struct floatformat
**,
2217 enum bfd_endian
= BFD_ENDIAN_UNKNOWN
);
2218 extern struct type
*init_decfloat_type (struct objfile
*, int, const char *);
2219 extern struct type
*init_complex_type (const char *, struct type
*);
2220 extern struct type
*init_pointer_type (struct objfile
*, int, const char *,
2222 extern struct type
*init_fixed_point_type (struct objfile
*, int, int,
2225 /* Helper functions to construct architecture-owned types. */
2226 extern struct type
*arch_type (struct gdbarch
*, enum type_code
, int,
2228 extern struct type
*arch_integer_type (struct gdbarch
*, int, int,
2230 extern struct type
*arch_character_type (struct gdbarch
*, int, int,
2232 extern struct type
*arch_boolean_type (struct gdbarch
*, int, int,
2234 extern struct type
*arch_float_type (struct gdbarch
*, int, const char *,
2235 const struct floatformat
**);
2236 extern struct type
*arch_decfloat_type (struct gdbarch
*, int, const char *);
2237 extern struct type
*arch_pointer_type (struct gdbarch
*, int, const char *,
2240 /* Helper functions to construct a struct or record type. An
2241 initially empty type is created using arch_composite_type().
2242 Fields are then added using append_composite_type_field*(). A union
2243 type has its size set to the largest field. A struct type has each
2244 field packed against the previous. */
2246 extern struct type
*arch_composite_type (struct gdbarch
*gdbarch
,
2247 const char *name
, enum type_code code
);
2248 extern void append_composite_type_field (struct type
*t
, const char *name
,
2249 struct type
*field
);
2250 extern void append_composite_type_field_aligned (struct type
*t
,
2254 struct field
*append_composite_type_field_raw (struct type
*t
, const char *name
,
2255 struct type
*field
);
2257 /* Helper functions to construct a bit flags type. An initially empty
2258 type is created using arch_flag_type(). Flags are then added using
2259 append_flag_type_field() and append_flag_type_flag(). */
2260 extern struct type
*arch_flags_type (struct gdbarch
*gdbarch
,
2261 const char *name
, int bit
);
2262 extern void append_flags_type_field (struct type
*type
,
2263 int start_bitpos
, int nr_bits
,
2264 struct type
*field_type
, const char *name
);
2265 extern void append_flags_type_flag (struct type
*type
, int bitpos
,
2268 extern void make_vector_type (struct type
*array_type
);
2269 extern struct type
*init_vector_type (struct type
*elt_type
, int n
);
2271 extern struct type
*lookup_reference_type (struct type
*, enum type_code
);
2272 extern struct type
*lookup_lvalue_reference_type (struct type
*);
2273 extern struct type
*lookup_rvalue_reference_type (struct type
*);
2276 extern struct type
*make_reference_type (struct type
*, struct type
**,
2279 extern struct type
*make_cv_type (int, int, struct type
*, struct type
**);
2281 extern struct type
*make_restrict_type (struct type
*);
2283 extern struct type
*make_unqualified_type (struct type
*);
2285 extern struct type
*make_atomic_type (struct type
*);
2287 extern void replace_type (struct type
*, struct type
*);
2289 extern type_instance_flags address_space_name_to_type_instance_flags
2290 (struct gdbarch
*, const char *);
2292 extern const char *address_space_type_instance_flags_to_name
2293 (struct gdbarch
*, type_instance_flags
);
2295 extern struct type
*make_type_with_address_space
2296 (struct type
*type
, type_instance_flags space_identifier
);
2298 extern struct type
*lookup_memberptr_type (struct type
*, struct type
*);
2300 extern struct type
*lookup_methodptr_type (struct type
*);
2302 extern void smash_to_method_type (struct type
*type
, struct type
*self_type
,
2303 struct type
*to_type
, struct field
*args
,
2304 int nargs
, int varargs
);
2306 extern void smash_to_memberptr_type (struct type
*, struct type
*,
2309 extern void smash_to_methodptr_type (struct type
*, struct type
*);
2311 extern struct type
*allocate_stub_method (struct type
*);
2313 extern const char *type_name_or_error (struct type
*type
);
2317 /* The field of the element, or NULL if no element was found. */
2318 struct field
*field
;
2320 /* The bit offset of the element in the parent structure. */
2324 /* Given a type TYPE, lookup the field and offset of the component named
2327 TYPE can be either a struct or union, or a pointer or reference to
2328 a struct or union. If it is a pointer or reference, its target
2329 type is automatically used. Thus '.' and '->' are interchangable,
2330 as specified for the definitions of the expression element types
2331 STRUCTOP_STRUCT and STRUCTOP_PTR.
2333 If NOERR is nonzero, the returned structure will have field set to
2334 NULL if there is no component named NAME.
2336 If the component NAME is a field in an anonymous substructure of
2337 TYPE, the returned offset is a "global" offset relative to TYPE
2338 rather than an offset within the substructure. */
2340 extern struct_elt
lookup_struct_elt (struct type
*, const char *, int);
2342 /* Given a type TYPE, lookup the type of the component named NAME.
2344 TYPE can be either a struct or union, or a pointer or reference to
2345 a struct or union. If it is a pointer or reference, its target
2346 type is automatically used. Thus '.' and '->' are interchangable,
2347 as specified for the definitions of the expression element types
2348 STRUCTOP_STRUCT and STRUCTOP_PTR.
2350 If NOERR is nonzero, return NULL if there is no component named
2353 extern struct type
*lookup_struct_elt_type (struct type
*, const char *, int);
2355 extern struct type
*make_pointer_type (struct type
*, struct type
**);
2357 extern struct type
*lookup_pointer_type (struct type
*);
2359 extern struct type
*make_function_type (struct type
*, struct type
**);
2361 extern struct type
*lookup_function_type (struct type
*);
2363 extern struct type
*lookup_function_type_with_arguments (struct type
*,
2367 extern struct type
*create_static_range_type (struct type
*, struct type
*,
2371 extern struct type
*create_array_type_with_stride
2372 (struct type
*, struct type
*, struct type
*,
2373 struct dynamic_prop
*, unsigned int);
2375 extern struct type
*create_range_type (struct type
*, struct type
*,
2376 const struct dynamic_prop
*,
2377 const struct dynamic_prop
*,
2380 /* Like CREATE_RANGE_TYPE but also sets up a stride. When BYTE_STRIDE_P
2381 is true the value in STRIDE is a byte stride, otherwise STRIDE is a bit
2384 extern struct type
* create_range_type_with_stride
2385 (struct type
*result_type
, struct type
*index_type
,
2386 const struct dynamic_prop
*low_bound
,
2387 const struct dynamic_prop
*high_bound
, LONGEST bias
,
2388 const struct dynamic_prop
*stride
, bool byte_stride_p
);
2390 extern struct type
*create_array_type (struct type
*, struct type
*,
2393 extern struct type
*lookup_array_range_type (struct type
*, LONGEST
, LONGEST
);
2395 extern struct type
*create_string_type (struct type
*, struct type
*,
2397 extern struct type
*lookup_string_range_type (struct type
*, LONGEST
, LONGEST
);
2399 extern struct type
*create_set_type (struct type
*, struct type
*);
2401 extern struct type
*lookup_unsigned_typename (const struct language_defn
*,
2404 extern struct type
*lookup_signed_typename (const struct language_defn
*,
2407 extern void get_unsigned_type_max (struct type
*, ULONGEST
*);
2409 extern void get_signed_type_minmax (struct type
*, LONGEST
*, LONGEST
*);
2411 /* * Resolve all dynamic values of a type e.g. array bounds to static values.
2412 ADDR specifies the location of the variable the type is bound to.
2413 If TYPE has no dynamic properties return TYPE; otherwise a new type with
2414 static properties is returned. */
2415 extern struct type
*resolve_dynamic_type
2416 (struct type
*type
, gdb::array_view
<const gdb_byte
> valaddr
,
2419 /* * Predicate if the type has dynamic values, which are not resolved yet. */
2420 extern int is_dynamic_type (struct type
*type
);
2422 extern struct type
*check_typedef (struct type
*);
2424 extern void check_stub_method_group (struct type
*, int);
2426 extern char *gdb_mangle_name (struct type
*, int, int);
2428 extern struct type
*lookup_typename (const struct language_defn
*,
2429 const char *, const struct block
*, int);
2431 extern struct type
*lookup_template_type (const char *, struct type
*,
2432 const struct block
*);
2434 extern int get_vptr_fieldno (struct type
*, struct type
**);
2436 extern int get_discrete_bounds (struct type
*, LONGEST
*, LONGEST
*);
2438 /* Assuming TYPE is a simple, non-empty array type, compute its upper
2439 and lower bound. Save the low bound into LOW_BOUND if not NULL.
2440 Save the high bound into HIGH_BOUND if not NULL.
2442 Return true if the operation was successful. Return false otherwise,
2443 in which case the values of LOW_BOUND and HIGH_BOUNDS are unmodified. */
2445 extern bool get_array_bounds (struct type
*type
, LONGEST
*low_bound
,
2446 LONGEST
*high_bound
);
2448 extern int discrete_position (struct type
*type
, LONGEST val
, LONGEST
*pos
);
2450 extern int class_types_same_p (const struct type
*, const struct type
*);
2452 extern int is_ancestor (struct type
*, struct type
*);
2454 extern int is_public_ancestor (struct type
*, struct type
*);
2456 extern int is_unique_ancestor (struct type
*, struct value
*);
2458 /* Overload resolution */
2460 /* * Badness if parameter list length doesn't match arg list length. */
2461 extern const struct rank LENGTH_MISMATCH_BADNESS
;
2463 /* * Dummy badness value for nonexistent parameter positions. */
2464 extern const struct rank TOO_FEW_PARAMS_BADNESS
;
2465 /* * Badness if no conversion among types. */
2466 extern const struct rank INCOMPATIBLE_TYPE_BADNESS
;
2468 /* * Badness of an exact match. */
2469 extern const struct rank EXACT_MATCH_BADNESS
;
2471 /* * Badness of integral promotion. */
2472 extern const struct rank INTEGER_PROMOTION_BADNESS
;
2473 /* * Badness of floating promotion. */
2474 extern const struct rank FLOAT_PROMOTION_BADNESS
;
2475 /* * Badness of converting a derived class pointer
2476 to a base class pointer. */
2477 extern const struct rank BASE_PTR_CONVERSION_BADNESS
;
2478 /* * Badness of integral conversion. */
2479 extern const struct rank INTEGER_CONVERSION_BADNESS
;
2480 /* * Badness of floating conversion. */
2481 extern const struct rank FLOAT_CONVERSION_BADNESS
;
2482 /* * Badness of integer<->floating conversions. */
2483 extern const struct rank INT_FLOAT_CONVERSION_BADNESS
;
2484 /* * Badness of conversion of pointer to void pointer. */
2485 extern const struct rank VOID_PTR_CONVERSION_BADNESS
;
2486 /* * Badness of conversion to boolean. */
2487 extern const struct rank BOOL_CONVERSION_BADNESS
;
2488 /* * Badness of converting derived to base class. */
2489 extern const struct rank BASE_CONVERSION_BADNESS
;
2490 /* * Badness of converting from non-reference to reference. Subrank
2491 is the type of reference conversion being done. */
2492 extern const struct rank REFERENCE_CONVERSION_BADNESS
;
2493 extern const struct rank REFERENCE_SEE_THROUGH_BADNESS
;
2494 /* * Conversion to rvalue reference. */
2495 #define REFERENCE_CONVERSION_RVALUE 1
2496 /* * Conversion to const lvalue reference. */
2497 #define REFERENCE_CONVERSION_CONST_LVALUE 2
2499 /* * Badness of converting integer 0 to NULL pointer. */
2500 extern const struct rank NULL_POINTER_CONVERSION
;
2501 /* * Badness of cv-conversion. Subrank is a flag describing the conversions
2503 extern const struct rank CV_CONVERSION_BADNESS
;
2504 #define CV_CONVERSION_CONST 1
2505 #define CV_CONVERSION_VOLATILE 2
2507 /* Non-standard conversions allowed by the debugger */
2509 /* * Converting a pointer to an int is usually OK. */
2510 extern const struct rank NS_POINTER_CONVERSION_BADNESS
;
2512 /* * Badness of converting a (non-zero) integer constant
2514 extern const struct rank NS_INTEGER_POINTER_CONVERSION_BADNESS
;
2516 extern struct rank
sum_ranks (struct rank a
, struct rank b
);
2517 extern int compare_ranks (struct rank a
, struct rank b
);
2519 extern int compare_badness (const badness_vector
&,
2520 const badness_vector
&);
2522 extern badness_vector
rank_function (gdb::array_view
<type
*> parms
,
2523 gdb::array_view
<value
*> args
);
2525 extern struct rank
rank_one_type (struct type
*, struct type
*,
2528 extern void recursive_dump_type (struct type
*, int);
2530 extern int field_is_static (struct field
*);
2534 extern void print_scalar_formatted (const gdb_byte
*, struct type
*,
2535 const struct value_print_options
*,
2536 int, struct ui_file
*);
2538 extern int can_dereference (struct type
*);
2540 extern int is_integral_type (struct type
*);
2542 extern int is_floating_type (struct type
*);
2544 extern int is_scalar_type (struct type
*type
);
2546 extern int is_scalar_type_recursive (struct type
*);
2548 extern int class_or_union_p (const struct type
*);
2550 extern void maintenance_print_type (const char *, int);
2552 extern htab_up
create_copied_types_hash (struct objfile
*objfile
);
2554 extern struct type
*copy_type_recursive (struct objfile
*objfile
,
2556 htab_t copied_types
);
2558 extern struct type
*copy_type (const struct type
*type
);
2560 extern bool types_equal (struct type
*, struct type
*);
2562 extern bool types_deeply_equal (struct type
*, struct type
*);
2564 extern int type_not_allocated (const struct type
*type
);
2566 extern int type_not_associated (const struct type
*type
);
2568 /* Return True if TYPE is a TYPE_CODE_FIXED_POINT or if TYPE is
2569 a range type whose base type is a TYPE_CODE_FIXED_POINT. */
2570 extern bool is_fixed_point_type (struct type
*type
);
2572 /* Assuming that TYPE is a fixed point type, return its base type.
2574 In other words, this returns the type after having peeled all
2575 intermediate type layers (such as TYPE_CODE_RANGE, for instance).
2576 The TYPE_CODE of the type returned is guaranteed to be
2577 a TYPE_CODE_FIXED_POINT. */
2578 extern struct type
*fixed_point_type_base_type (struct type
*type
);
2580 /* Given TYPE, which is a fixed point type, return its scaling factor. */
2581 extern const gdb_mpq
&fixed_point_scaling_factor (struct type
*type
);
2583 /* Allocate a fixed-point type info for TYPE. This should only be
2584 called by INIT_FIXED_POINT_SPECIFIC. */
2585 extern fixed_point_type_info
*allocate_fixed_point_type_info
2586 (struct type
*type
);
2588 /* * When the type includes explicit byte ordering, return that.
2589 Otherwise, the byte ordering from gdbarch_byte_order for
2590 get_type_arch is returned. */
2592 extern enum bfd_endian
type_byte_order (const struct type
*type
);
2594 /* A flag to enable printing of debugging information of C++
2597 extern unsigned int overload_debug
;
2599 #endif /* GDBTYPES_H */