]> Git Repo - binutils.git/blob - gdb/gdbtypes.h
gdb: add field::name / field::set_name
[binutils.git] / gdb / gdbtypes.h
1
2 /* Internal type definitions for GDB.
3
4    Copyright (C) 1992-2021 Free Software Foundation, Inc.
5
6    Contributed by Cygnus Support, using pieces from other GDB modules.
7
8    This file is part of GDB.
9
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.
14
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.
19
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/>.  */
22
23 #if !defined (GDBTYPES_H)
24 #define GDBTYPES_H 1
25
26 /* * \page gdbtypes GDB Types
27
28    GDB represents all the different kinds of types in programming
29    languages using a common representation defined in gdbtypes.h.
30
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
36    convention).
37
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.
41
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.
45  */
46
47 #include "hashtab.h"
48 #include "gdbsupport/array-view.h"
49 #include "gdbsupport/gdb_optional.h"
50 #include "gdbsupport/offset-type.h"
51 #include "gdbsupport/enum-flags.h"
52 #include "gdbsupport/underlying.h"
53 #include "gdbsupport/print-utils.h"
54 #include "dwarf2.h"
55 #include "gdb_obstack.h"
56 #include "gmp-utils.h"
57
58 /* Forward declarations for prototypes.  */
59 struct field;
60 struct block;
61 struct value_print_options;
62 struct language_defn;
63 struct dwarf2_per_cu_data;
64 struct dwarf2_per_objfile;
65
66 /* These declarations are DWARF-specific as some of the gdbtypes.h data types
67    are already DWARF-specific.  */
68
69 /* * Offset relative to the start of its containing CU (compilation
70    unit).  */
71 DEFINE_OFFSET_TYPE (cu_offset, unsigned int);
72
73 /* * Offset relative to the start of its .debug_info or .debug_types
74    section.  */
75 DEFINE_OFFSET_TYPE (sect_offset, uint64_t);
76
77 static inline char *
78 sect_offset_str (sect_offset offset)
79 {
80   return hex_string (to_underlying (offset));
81 }
82
83 /* Some macros for char-based bitfields.  */
84
85 #define B_SET(a,x)      ((a)[(x)>>3] |= (1 << ((x)&7)))
86 #define B_CLR(a,x)      ((a)[(x)>>3] &= ~(1 << ((x)&7)))
87 #define B_TST(a,x)      ((a)[(x)>>3] & (1 << ((x)&7)))
88 #define B_TYPE          unsigned char
89 #define B_BYTES(x)      ( 1 + ((x)>>3) )
90 #define B_CLRALL(a,x)   memset ((a), 0, B_BYTES(x))
91
92 /* * Different kinds of data types are distinguished by the `code'
93    field.  */
94
95 enum type_code
96   {
97     TYPE_CODE_BITSTRING = -1,   /**< Deprecated  */
98     TYPE_CODE_UNDEF = 0,        /**< Not used; catches errors */
99     TYPE_CODE_PTR,              /**< Pointer type */
100
101     /* * Array type with lower & upper bounds.
102
103        Regardless of the language, GDB represents multidimensional
104        array types the way C does: as arrays of arrays.  So an
105        instance of a GDB array type T can always be seen as a series
106        of instances of TYPE_TARGET_TYPE (T) laid out sequentially in
107        memory.
108
109        Row-major languages like C lay out multi-dimensional arrays so
110        that incrementing the rightmost index in a subscripting
111        expression results in the smallest change in the address of the
112        element referred to.  Column-major languages like Fortran lay
113        them out so that incrementing the leftmost index results in the
114        smallest change.
115
116        This means that, in column-major languages, working our way
117        from type to target type corresponds to working through indices
118        from right to left, not left to right.  */
119     TYPE_CODE_ARRAY,
120
121     TYPE_CODE_STRUCT,           /**< C struct or Pascal record */
122     TYPE_CODE_UNION,            /**< C union or Pascal variant part */
123     TYPE_CODE_ENUM,             /**< Enumeration type */
124     TYPE_CODE_FLAGS,            /**< Bit flags type */
125     TYPE_CODE_FUNC,             /**< Function type */
126     TYPE_CODE_INT,              /**< Integer type */
127
128     /* * Floating type.  This is *NOT* a complex type.  */
129     TYPE_CODE_FLT,
130
131     /* * Void type.  The length field specifies the length (probably
132        always one) which is used in pointer arithmetic involving
133        pointers to this type, but actually dereferencing such a
134        pointer is invalid; a void type has no length and no actual
135        representation in memory or registers.  A pointer to a void
136        type is a generic pointer.  */
137     TYPE_CODE_VOID,
138
139     TYPE_CODE_SET,              /**< Pascal sets */
140     TYPE_CODE_RANGE,            /**< Range (integers within spec'd bounds).  */
141
142     /* * A string type which is like an array of character but prints
143        differently.  It does not contain a length field as Pascal
144        strings (for many Pascals, anyway) do; if we want to deal with
145        such strings, we should use a new type code.  */
146     TYPE_CODE_STRING,
147
148     /* * Unknown type.  The length field is valid if we were able to
149        deduce that much about the type, or 0 if we don't even know
150        that.  */
151     TYPE_CODE_ERROR,
152
153     /* C++ */
154     TYPE_CODE_METHOD,           /**< Method type */
155
156     /* * Pointer-to-member-function type.  This describes how to access a
157        particular member function of a class (possibly a virtual
158        member function).  The representation may vary between different
159        C++ ABIs.  */
160     TYPE_CODE_METHODPTR,
161
162     /* * Pointer-to-member type.  This is the offset within a class to
163        some particular data member.  The only currently supported
164        representation uses an unbiased offset, with -1 representing
165        NULL; this is used by the Itanium C++ ABI (used by GCC on all
166        platforms).  */
167     TYPE_CODE_MEMBERPTR,
168
169     TYPE_CODE_REF,              /**< C++ Reference types */
170
171     TYPE_CODE_RVALUE_REF,       /**< C++ rvalue reference types */
172
173     TYPE_CODE_CHAR,             /**< *real* character type */
174
175     /* * Boolean type.  0 is false, 1 is true, and other values are
176        non-boolean (e.g. FORTRAN "logical" used as unsigned int).  */
177     TYPE_CODE_BOOL,
178
179     /* Fortran */
180     TYPE_CODE_COMPLEX,          /**< Complex float */
181
182     TYPE_CODE_TYPEDEF,
183
184     TYPE_CODE_NAMESPACE,        /**< C++ namespace.  */
185
186     TYPE_CODE_DECFLOAT,         /**< Decimal floating point.  */
187
188     TYPE_CODE_MODULE,           /**< Fortran module.  */
189
190     /* * Internal function type.  */
191     TYPE_CODE_INTERNAL_FUNCTION,
192
193     /* * Methods implemented in extension languages.  */
194     TYPE_CODE_XMETHOD,
195
196     /* * Fixed Point type.  */
197     TYPE_CODE_FIXED_POINT,
198   };
199
200 /* * Some bits for the type's instance_flags word.  See the macros
201    below for documentation on each bit.  */
202
203 enum type_instance_flag_value : unsigned
204 {
205   TYPE_INSTANCE_FLAG_CONST = (1 << 0),
206   TYPE_INSTANCE_FLAG_VOLATILE = (1 << 1),
207   TYPE_INSTANCE_FLAG_CODE_SPACE = (1 << 2),
208   TYPE_INSTANCE_FLAG_DATA_SPACE = (1 << 3),
209   TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 = (1 << 4),
210   TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2 = (1 << 5),
211   TYPE_INSTANCE_FLAG_NOTTEXT = (1 << 6),
212   TYPE_INSTANCE_FLAG_RESTRICT = (1 << 7),
213   TYPE_INSTANCE_FLAG_ATOMIC = (1 << 8)
214 };
215
216 DEF_ENUM_FLAGS_TYPE (enum type_instance_flag_value, type_instance_flags);
217
218 /* * Not textual.  By default, GDB treats all single byte integers as
219    characters (or elements of strings) unless this flag is set.  */
220
221 #define TYPE_NOTTEXT(t) (((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_NOTTEXT)
222
223 /* * Constant type.  If this is set, the corresponding type has a
224    const modifier.  */
225
226 #define TYPE_CONST(t) ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_CONST) != 0)
227
228 /* * Volatile type.  If this is set, the corresponding type has a
229    volatile modifier.  */
230
231 #define TYPE_VOLATILE(t) \
232   ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_VOLATILE) != 0)
233
234 /* * Restrict type.  If this is set, the corresponding type has a
235    restrict modifier.  */
236
237 #define TYPE_RESTRICT(t) \
238   ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_RESTRICT) != 0)
239
240 /* * Atomic type.  If this is set, the corresponding type has an
241    _Atomic modifier.  */
242
243 #define TYPE_ATOMIC(t) \
244   ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_ATOMIC) != 0)
245
246 /* * True if this type represents either an lvalue or lvalue reference type.  */
247
248 #define TYPE_IS_REFERENCE(t) \
249   ((t)->code () == TYPE_CODE_REF || (t)->code () == TYPE_CODE_RVALUE_REF)
250
251 /* * True if this type is allocatable.  */
252 #define TYPE_IS_ALLOCATABLE(t) \
253   ((t)->dyn_prop (DYN_PROP_ALLOCATED) != NULL)
254
255 /* * True if this type has variant parts.  */
256 #define TYPE_HAS_VARIANT_PARTS(t) \
257   ((t)->dyn_prop (DYN_PROP_VARIANT_PARTS) != nullptr)
258
259 /* * True if this type has a dynamic length.  */
260 #define TYPE_HAS_DYNAMIC_LENGTH(t) \
261   ((t)->dyn_prop (DYN_PROP_BYTE_SIZE) != nullptr)
262
263 /* * Instruction-space delimited type.  This is for Harvard architectures
264    which have separate instruction and data address spaces (and perhaps
265    others).
266
267    GDB usually defines a flat address space that is a superset of the
268    architecture's two (or more) address spaces, but this is an extension
269    of the architecture's model.
270
271    If TYPE_INSTANCE_FLAG_CODE_SPACE is set, an object of the corresponding type
272    resides in instruction memory, even if its address (in the extended
273    flat address space) does not reflect this.
274
275    Similarly, if TYPE_INSTANCE_FLAG_DATA_SPACE is set, then an object of the
276    corresponding type resides in the data memory space, even if
277    this is not indicated by its (flat address space) address.
278
279    If neither flag is set, the default space for functions / methods
280    is instruction space, and for data objects is data memory.  */
281
282 #define TYPE_CODE_SPACE(t) \
283   ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_CODE_SPACE) != 0)
284
285 #define TYPE_DATA_SPACE(t) \
286   ((((t)->instance_flags ()) & TYPE_INSTANCE_FLAG_DATA_SPACE) != 0)
287
288 /* * Address class flags.  Some environments provide for pointers
289    whose size is different from that of a normal pointer or address
290    types where the bits are interpreted differently than normal
291    addresses.  The TYPE_INSTANCE_FLAG_ADDRESS_CLASS_n flags may be used in
292    target specific ways to represent these different types of address
293    classes.  */
294
295 #define TYPE_ADDRESS_CLASS_1(t) (((t)->instance_flags ()) \
296                                  & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1)
297 #define TYPE_ADDRESS_CLASS_2(t) (((t)->instance_flags ()) \
298                                  & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
299 #define TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL \
300   (TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 | TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
301 #define TYPE_ADDRESS_CLASS_ALL(t) (((t)->instance_flags ()) \
302                                    & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL)
303
304 /* * Information about a single discriminant.  */
305
306 struct discriminant_range
307 {
308   /* * The range of values for the variant.  This is an inclusive
309      range.  */
310   ULONGEST low, high;
311
312   /* * Return true if VALUE is contained in this range.  IS_UNSIGNED
313      is true if this should be an unsigned comparison; false for
314      signed.  */
315   bool contains (ULONGEST value, bool is_unsigned) const
316   {
317     if (is_unsigned)
318       return value >= low && value <= high;
319     LONGEST valuel = (LONGEST) value;
320     return valuel >= (LONGEST) low && valuel <= (LONGEST) high;
321   }
322 };
323
324 struct variant_part;
325
326 /* * A single variant.  A variant has a list of discriminant values.
327    When the discriminator matches one of these, the variant is
328    enabled.  Each variant controls zero or more fields; and may also
329    control other variant parts as well.  This struct corresponds to
330    DW_TAG_variant in DWARF.  */
331
332 struct variant : allocate_on_obstack
333 {
334   /* * The discriminant ranges for this variant.  */
335   gdb::array_view<discriminant_range> discriminants;
336
337   /* * The fields controlled by this variant.  This is inclusive on
338      the low end and exclusive on the high end.  A variant may not
339      control any fields, in which case the two values will be equal.
340      These are indexes into the type's array of fields.  */
341   int first_field;
342   int last_field;
343
344   /* * Variant parts controlled by this variant.  */
345   gdb::array_view<variant_part> parts;
346
347   /* * Return true if this is the default variant.  The default
348      variant can be recognized because it has no associated
349      discriminants.  */
350   bool is_default () const
351   {
352     return discriminants.empty ();
353   }
354
355   /* * Return true if this variant matches VALUE.  IS_UNSIGNED is true
356      if this should be an unsigned comparison; false for signed.  */
357   bool matches (ULONGEST value, bool is_unsigned) const;
358 };
359
360 /* * A variant part.  Each variant part has an optional discriminant
361    and holds an array of variants.  This struct corresponds to
362    DW_TAG_variant_part in DWARF.  */
363
364 struct variant_part : allocate_on_obstack
365 {
366   /* * The index of the discriminant field in the outer type.  This is
367      an index into the type's array of fields.  If this is -1, there
368      is no discriminant, and only the default variant can be
369      considered to be selected.  */
370   int discriminant_index;
371
372   /* * True if this discriminant is unsigned; false if signed.  This
373      comes from the type of the discriminant.  */
374   bool is_unsigned;
375
376   /* * The variants that are controlled by this variant part.  Note
377      that these will always be sorted by field number.  */
378   gdb::array_view<variant> variants;
379 };
380
381
382 enum dynamic_prop_kind
383 {
384   PROP_UNDEFINED, /* Not defined.  */
385   PROP_CONST,     /* Constant.  */
386   PROP_ADDR_OFFSET, /* Address offset.  */
387   PROP_LOCEXPR,   /* Location expression.  */
388   PROP_LOCLIST,    /* Location list.  */
389   PROP_VARIANT_PARTS, /* Variant parts.  */
390   PROP_TYPE,       /* Type.  */
391   PROP_VARIABLE_NAME, /* Variable name.  */
392 };
393
394 union dynamic_prop_data
395 {
396   /* Storage for constant property.  */
397
398   LONGEST const_val;
399
400   /* Storage for dynamic property.  */
401
402   void *baton;
403
404   /* Storage of variant parts for a type.  A type with variant parts
405      has all its fields "linearized" -- stored in a single field
406      array, just as if they had all been declared that way.  The
407      variant parts are attached via a dynamic property, and then are
408      used to control which fields end up in the final type during
409      dynamic type resolution.  */
410
411   const gdb::array_view<variant_part> *variant_parts;
412
413   /* Once a variant type is resolved, we may want to be able to go
414      from the resolved type to the original type.  In this case we
415      rewrite the property's kind and set this field.  */
416
417   struct type *original_type;
418
419   /* Name of a variable to look up; the variable holds the value of
420      this property.  */
421
422   const char *variable_name;
423 };
424
425 /* * Used to store a dynamic property.  */
426
427 struct dynamic_prop
428 {
429   dynamic_prop_kind kind () const
430   {
431     return m_kind;
432   }
433
434   void set_undefined ()
435   {
436     m_kind = PROP_UNDEFINED;
437   }
438
439   LONGEST const_val () const
440   {
441     gdb_assert (m_kind == PROP_CONST);
442
443     return m_data.const_val;
444   }
445
446   void set_const_val (LONGEST const_val)
447   {
448     m_kind = PROP_CONST;
449     m_data.const_val = const_val;
450   }
451
452   void *baton () const
453   {
454     gdb_assert (m_kind == PROP_LOCEXPR
455                 || m_kind == PROP_LOCLIST
456                 || m_kind == PROP_ADDR_OFFSET);
457
458     return m_data.baton;
459   }
460
461   void set_locexpr (void *baton)
462   {
463     m_kind = PROP_LOCEXPR;
464     m_data.baton = baton;
465   }
466
467   void set_loclist (void *baton)
468   {
469     m_kind = PROP_LOCLIST;
470     m_data.baton = baton;
471   }
472
473   void set_addr_offset (void *baton)
474   {
475     m_kind = PROP_ADDR_OFFSET;
476     m_data.baton = baton;
477   }
478
479   const gdb::array_view<variant_part> *variant_parts () const
480   {
481     gdb_assert (m_kind == PROP_VARIANT_PARTS);
482
483     return m_data.variant_parts;
484   }
485
486   void set_variant_parts (gdb::array_view<variant_part> *variant_parts)
487   {
488     m_kind = PROP_VARIANT_PARTS;
489     m_data.variant_parts = variant_parts;
490   }
491
492   struct type *original_type () const
493   {
494     gdb_assert (m_kind == PROP_TYPE);
495
496     return m_data.original_type;
497   }
498
499   void set_original_type (struct type *original_type)
500   {
501     m_kind = PROP_TYPE;
502     m_data.original_type = original_type;
503   }
504
505   /* Return the name of the variable that holds this property's value.
506      Only valid for PROP_VARIABLE_NAME.  */
507   const char *variable_name () const
508   {
509     gdb_assert (m_kind == PROP_VARIABLE_NAME);
510     return m_data.variable_name;
511   }
512
513   /* Set the name of the variable that holds this property's value,
514      and set this property to be of kind PROP_VARIABLE_NAME.  */
515   void set_variable_name (const char *name)
516   {
517     m_kind = PROP_VARIABLE_NAME;
518     m_data.variable_name = name;
519   }
520
521   /* Determine which field of the union dynamic_prop.data is used.  */
522   enum dynamic_prop_kind m_kind;
523
524   /* Storage for dynamic or static value.  */
525   union dynamic_prop_data m_data;
526 };
527
528 /* Compare two dynamic_prop objects for equality.  dynamic_prop
529    instances are equal iff they have the same type and storage.  */
530 extern bool operator== (const dynamic_prop &l, const dynamic_prop &r);
531
532 /* Compare two dynamic_prop objects for inequality.  */
533 static inline bool operator!= (const dynamic_prop &l, const dynamic_prop &r)
534 {
535   return !(l == r);
536 }
537
538 /* * Define a type's dynamic property node kind.  */
539 enum dynamic_prop_node_kind
540 {
541   /* A property providing a type's data location.
542      Evaluating this field yields to the location of an object's data.  */
543   DYN_PROP_DATA_LOCATION,
544
545   /* A property representing DW_AT_allocated.  The presence of this attribute
546      indicates that the object of the type can be allocated/deallocated.  */
547   DYN_PROP_ALLOCATED,
548
549   /* A property representing DW_AT_associated.  The presence of this attribute
550      indicated that the object of the type can be associated.  */
551   DYN_PROP_ASSOCIATED,
552
553   /* A property providing an array's byte stride.  */
554   DYN_PROP_BYTE_STRIDE,
555
556   /* A property holding variant parts.  */
557   DYN_PROP_VARIANT_PARTS,
558
559   /* A property holding the size of the type.  */
560   DYN_PROP_BYTE_SIZE,
561 };
562
563 /* * List for dynamic type attributes.  */
564 struct dynamic_prop_list
565 {
566   /* The kind of dynamic prop in this node.  */
567   enum dynamic_prop_node_kind prop_kind;
568
569   /* The dynamic property itself.  */
570   struct dynamic_prop prop;
571
572   /* A pointer to the next dynamic property.  */
573   struct dynamic_prop_list *next;
574 };
575
576 /* * Determine which field of the union main_type.fields[x].loc is
577    used.  */
578
579 enum field_loc_kind
580   {
581     FIELD_LOC_KIND_BITPOS,      /**< bitpos */
582     FIELD_LOC_KIND_ENUMVAL,     /**< enumval */
583     FIELD_LOC_KIND_PHYSADDR,    /**< physaddr */
584     FIELD_LOC_KIND_PHYSNAME,    /**< physname */
585     FIELD_LOC_KIND_DWARF_BLOCK  /**< dwarf_block */
586   };
587
588 /* * A discriminant to determine which field in the
589    main_type.type_specific union is being used, if any.
590
591    For types such as TYPE_CODE_FLT, the use of this
592    discriminant is really redundant, as we know from the type code
593    which field is going to be used.  As such, it would be possible to
594    reduce the size of this enum in order to save a bit or two for
595    other fields of struct main_type.  But, since we still have extra
596    room , and for the sake of clarity and consistency, we treat all fields
597    of the union the same way.  */
598
599 enum type_specific_kind
600 {
601   TYPE_SPECIFIC_NONE,
602   TYPE_SPECIFIC_CPLUS_STUFF,
603   TYPE_SPECIFIC_GNAT_STUFF,
604   TYPE_SPECIFIC_FLOATFORMAT,
605   /* Note: This is used by TYPE_CODE_FUNC and TYPE_CODE_METHOD.  */
606   TYPE_SPECIFIC_FUNC,
607   TYPE_SPECIFIC_SELF_TYPE,
608   TYPE_SPECIFIC_INT,
609   TYPE_SPECIFIC_FIXED_POINT,
610 };
611
612 union type_owner
613 {
614   struct objfile *objfile;
615   struct gdbarch *gdbarch;
616 };
617
618 union field_location
619 {
620   /* * Position of this field, counting in bits from start of
621      containing structure.  For big-endian targets, it is the bit
622      offset to the MSB.  For little-endian targets, it is the bit
623      offset to the LSB.  */
624
625   LONGEST bitpos;
626
627   /* * Enum value.  */
628   LONGEST enumval;
629
630   /* * For a static field, if TYPE_FIELD_STATIC_HAS_ADDR then
631      physaddr is the location (in the target) of the static
632      field.  Otherwise, physname is the mangled label of the
633      static field.  */
634
635   CORE_ADDR physaddr;
636   const char *physname;
637
638   /* * The field location can be computed by evaluating the
639      following DWARF block.  Its DATA is allocated on
640      objfile_obstack - no CU load is needed to access it.  */
641
642   struct dwarf2_locexpr_baton *dwarf_block;
643 };
644
645 struct field
646 {
647   struct type *type () const
648   {
649     return this->m_type;
650   }
651
652   void set_type (struct type *type)
653   {
654     this->m_type = type;
655   }
656
657   const char *name () const
658   {
659     return m_name;
660   }
661
662   void set_name (const char *name)
663   {
664     m_name = name;
665   }
666
667   union field_location loc;
668
669   /* * For a function or member type, this is 1 if the argument is
670      marked artificial.  Artificial arguments should not be shown
671      to the user.  For TYPE_CODE_RANGE it is set if the specific
672      bound is not defined.  */
673
674   unsigned int artificial : 1;
675
676   /* * Discriminant for union field_location.  */
677
678   ENUM_BITFIELD(field_loc_kind) loc_kind : 3;
679
680   /* * Size of this field, in bits, or zero if not packed.
681      If non-zero in an array type, indicates the element size in
682      bits (used only in Ada at the moment).
683      For an unpacked field, the field's type's length
684      says how many bytes the field occupies.  */
685
686   unsigned int bitsize : 28;
687
688   /* * In a struct or union type, type of this field.
689      - In a function or member type, type of this argument.
690      - In an array type, the domain-type of the array.  */
691
692   struct type *m_type;
693
694   /* * Name of field, value or argument.
695      NULL for range bounds, array domains, and member function
696      arguments.  */
697
698   const char *m_name;
699 };
700
701 struct range_bounds
702 {
703   ULONGEST bit_stride () const
704   {
705     if (this->flag_is_byte_stride)
706       return this->stride.const_val () * 8;
707     else
708       return this->stride.const_val ();
709   }
710
711   /* * Low bound of range.  */
712
713   struct dynamic_prop low;
714
715   /* * High bound of range.  */
716
717   struct dynamic_prop high;
718
719   /* The stride value for this range.  This can be stored in bits or bytes
720      based on the value of BYTE_STRIDE_P.  It is optional to have a stride
721      value, if this range has no stride value defined then this will be set
722      to the constant zero.  */
723
724   struct dynamic_prop stride;
725
726   /* * The bias.  Sometimes a range value is biased before storage.
727      The bias is added to the stored bits to form the true value.  */
728
729   LONGEST bias;
730
731   /* True if HIGH range bound contains the number of elements in the
732      subrange.  This affects how the final high bound is computed.  */
733
734   unsigned int flag_upper_bound_is_count : 1;
735
736   /* True if LOW or/and HIGH are resolved into a static bound from
737      a dynamic one.  */
738
739   unsigned int flag_bound_evaluated : 1;
740
741   /* If this is true this STRIDE is in bytes, otherwise STRIDE is in bits.  */
742
743   unsigned int flag_is_byte_stride : 1;
744 };
745
746 /* Compare two range_bounds objects for equality.  Simply does
747    memberwise comparison.  */
748 extern bool operator== (const range_bounds &l, const range_bounds &r);
749
750 /* Compare two range_bounds objects for inequality.  */
751 static inline bool operator!= (const range_bounds &l, const range_bounds &r)
752 {
753   return !(l == r);
754 }
755
756 union type_specific
757 {
758   /* * CPLUS_STUFF is for TYPE_CODE_STRUCT.  It is initialized to
759      point to cplus_struct_default, a default static instance of a
760      struct cplus_struct_type.  */
761
762   struct cplus_struct_type *cplus_stuff;
763
764   /* * GNAT_STUFF is for types for which the GNAT Ada compiler
765      provides additional information.  */
766
767   struct gnat_aux_type *gnat_stuff;
768
769   /* * FLOATFORMAT is for TYPE_CODE_FLT.  It is a pointer to a
770      floatformat object that describes the floating-point value
771      that resides within the type.  */
772
773   const struct floatformat *floatformat;
774
775   /* * For TYPE_CODE_FUNC and TYPE_CODE_METHOD types.  */
776
777   struct func_type *func_stuff;
778
779   /* * For types that are pointer to member types (TYPE_CODE_METHODPTR,
780      TYPE_CODE_MEMBERPTR), SELF_TYPE is the type that this pointer
781      is a member of.  */
782
783   struct type *self_type;
784
785   /* * For TYPE_CODE_FIXED_POINT types, the info necessary to decode
786      values of that type.  */
787   struct fixed_point_type_info *fixed_point_info;
788
789   /* * An integer-like scalar type may be stored in just part of its
790      enclosing storage bytes.  This structure describes this
791      situation.  */
792   struct
793   {
794     /* * The bit size of the integer.  This can be 0.  For integers
795        that fill their storage (the ordinary case), this field holds
796        the byte size times 8.  */
797     unsigned short bit_size;
798     /* * The bit offset of the integer.  This is ordinarily 0, and can
799        only be non-zero if the bit size is less than the storage
800        size.  */
801     unsigned short bit_offset;
802   } int_stuff;
803 };
804
805 /* * Main structure representing a type in GDB.
806
807    This structure is space-critical.  Its layout has been tweaked to
808    reduce the space used.  */
809
810 struct main_type
811 {
812   /* * Code for kind of type.  */
813
814   ENUM_BITFIELD(type_code) code : 8;
815
816   /* * Flags about this type.  These fields appear at this location
817      because they packs nicely here.  See the TYPE_* macros for
818      documentation about these fields.  */
819
820   unsigned int m_flag_unsigned : 1;
821   unsigned int m_flag_nosign : 1;
822   unsigned int m_flag_stub : 1;
823   unsigned int m_flag_target_stub : 1;
824   unsigned int m_flag_prototyped : 1;
825   unsigned int m_flag_varargs : 1;
826   unsigned int m_flag_vector : 1;
827   unsigned int m_flag_stub_supported : 1;
828   unsigned int m_flag_gnu_ifunc : 1;
829   unsigned int m_flag_fixed_instance : 1;
830   unsigned int m_flag_objfile_owned : 1;
831   unsigned int m_flag_endianity_not_default : 1;
832
833   /* * True if this type was declared with "class" rather than
834      "struct".  */
835
836   unsigned int m_flag_declared_class : 1;
837
838   /* * True if this is an enum type with disjoint values.  This
839      affects how the enum is printed.  */
840
841   unsigned int m_flag_flag_enum : 1;
842
843   /* * A discriminant telling us which field of the type_specific
844      union is being used for this type, if any.  */
845
846   ENUM_BITFIELD(type_specific_kind) type_specific_field : 3;
847
848   /* * Number of fields described for this type.  This field appears
849      at this location because it packs nicely here.  */
850
851   short nfields;
852
853   /* * Name of this type, or NULL if none.
854
855      This is used for printing only.  For looking up a name, look for
856      a symbol in the VAR_DOMAIN.  This is generally allocated in the
857      objfile's obstack.  However coffread.c uses malloc.  */
858
859   const char *name;
860
861   /* * Every type is now associated with a particular objfile, and the
862      type is allocated on the objfile_obstack for that objfile.  One
863      problem however, is that there are times when gdb allocates new
864      types while it is not in the process of reading symbols from a
865      particular objfile.  Fortunately, these happen when the type
866      being created is a derived type of an existing type, such as in
867      lookup_pointer_type().  So we can just allocate the new type
868      using the same objfile as the existing type, but to do this we
869      need a backpointer to the objfile from the existing type.  Yes
870      this is somewhat ugly, but without major overhaul of the internal
871      type system, it can't be avoided for now.  */
872
873   union type_owner m_owner;
874
875   /* * For a pointer type, describes the type of object pointed to.
876      - For an array type, describes the type of the elements.
877      - For a function or method type, describes the type of the return value.
878      - For a range type, describes the type of the full range.
879      - For a complex type, describes the type of each coordinate.
880      - For a special record or union type encoding a dynamic-sized type
881      in GNAT, a memoized pointer to a corresponding static version of
882      the type.
883      - Unused otherwise.  */
884
885   struct type *target_type;
886
887   /* * For structure and union types, a description of each field.
888      For set and pascal array types, there is one "field",
889      whose type is the domain type of the set or array.
890      For range types, there are two "fields",
891      the minimum and maximum values (both inclusive).
892      For enum types, each possible value is described by one "field".
893      For a function or method type, a "field" for each parameter.
894      For C++ classes, there is one field for each base class (if it is
895      a derived class) plus one field for each class data member.  Member
896      functions are recorded elsewhere.
897
898      Using a pointer to a separate array of fields
899      allows all types to have the same size, which is useful
900      because we can allocate the space for a type before
901      we know what to put in it.  */
902
903   union 
904   {
905     struct field *fields;
906
907     /* * Union member used for range types.  */
908
909     struct range_bounds *bounds;
910
911     /* If this is a scalar type, then this is its corresponding
912        complex type.  */
913     struct type *complex_type;
914
915   } flds_bnds;
916
917   /* * Slot to point to additional language-specific fields of this
918      type.  */
919
920   union type_specific type_specific;
921
922   /* * Contains all dynamic type properties.  */
923   struct dynamic_prop_list *dyn_prop_list;
924 };
925
926 /* * Number of bits allocated for alignment.  */
927
928 #define TYPE_ALIGN_BITS 8
929
930 /* * A ``struct type'' describes a particular instance of a type, with
931    some particular qualification.  */
932
933 struct type
934 {
935   /* Get the type code of this type. 
936
937      Note that the code can be TYPE_CODE_TYPEDEF, so if you want the real
938      type, you need to do `check_typedef (type)->code ()`.  */
939   type_code code () const
940   {
941     return this->main_type->code;
942   }
943
944   /* Set the type code of this type.  */
945   void set_code (type_code code)
946   {
947     this->main_type->code = code;
948   }
949
950   /* Get the name of this type.  */
951   const char *name () const
952   {
953     return this->main_type->name;
954   }
955
956   /* Set the name of this type.  */
957   void set_name (const char *name)
958   {
959     this->main_type->name = name;
960   }
961
962   /* Get the number of fields of this type.  */
963   int num_fields () const
964   {
965     return this->main_type->nfields;
966   }
967
968   /* Set the number of fields of this type.  */
969   void set_num_fields (int num_fields)
970   {
971     this->main_type->nfields = num_fields;
972   }
973
974   /* Get the fields array of this type.  */
975   struct field *fields () const
976   {
977     return this->main_type->flds_bnds.fields;
978   }
979
980   /* Get the field at index IDX.  */
981   struct field &field (int idx) const
982   {
983     return this->fields ()[idx];
984   }
985
986   /* Set the fields array of this type.  */
987   void set_fields (struct field *fields)
988   {
989     this->main_type->flds_bnds.fields = fields;
990   }
991
992   type *index_type () const
993   {
994     return this->field (0).type ();
995   }
996
997   void set_index_type (type *index_type)
998   {
999     this->field (0).set_type (index_type);
1000   }
1001
1002   /* Return the instance flags converted to the correct type.  */
1003   const type_instance_flags instance_flags () const
1004   {
1005     return (enum type_instance_flag_value) this->m_instance_flags;
1006   }
1007
1008   /* Set the instance flags.  */
1009   void set_instance_flags (type_instance_flags flags)
1010   {
1011     this->m_instance_flags = flags;
1012   }
1013
1014   /* Get the bounds bounds of this type.  The type must be a range type.  */
1015   range_bounds *bounds () const
1016   {
1017     switch (this->code ())
1018       {
1019       case TYPE_CODE_RANGE:
1020         return this->main_type->flds_bnds.bounds;
1021
1022       case TYPE_CODE_ARRAY:
1023       case TYPE_CODE_STRING:
1024         return this->index_type ()->bounds ();
1025
1026       default:
1027         gdb_assert_not_reached
1028           ("type::bounds called on type with invalid code");
1029       }
1030   }
1031
1032   /* Set the bounds of this type.  The type must be a range type.  */
1033   void set_bounds (range_bounds *bounds)
1034   {
1035     gdb_assert (this->code () == TYPE_CODE_RANGE);
1036
1037     this->main_type->flds_bnds.bounds = bounds;
1038   }
1039
1040   ULONGEST bit_stride () const
1041   {
1042     if (this->code () == TYPE_CODE_ARRAY && this->field (0).bitsize != 0)
1043       return this->field (0).bitsize;
1044     return this->bounds ()->bit_stride ();
1045   }
1046
1047   /* Unsigned integer type.  If this is not set for a TYPE_CODE_INT,
1048      the type is signed (unless TYPE_NOSIGN is set).  */
1049
1050   bool is_unsigned () const
1051   {
1052     return this->main_type->m_flag_unsigned;
1053   }
1054
1055   void set_is_unsigned (bool is_unsigned)
1056   {
1057     this->main_type->m_flag_unsigned = is_unsigned;
1058   }
1059
1060   /* No sign for this type.  In C++, "char", "signed char", and
1061      "unsigned char" are distinct types; so we need an extra flag to
1062      indicate the absence of a sign!  */
1063
1064   bool has_no_signedness () const
1065   {
1066     return this->main_type->m_flag_nosign;
1067   }
1068
1069   void set_has_no_signedness (bool has_no_signedness)
1070   {
1071     this->main_type->m_flag_nosign = has_no_signedness;
1072   }
1073
1074   /* This appears in a type's flags word if it is a stub type (e.g.,
1075      if someone referenced a type that wasn't defined in a source file
1076      via (struct sir_not_appearing_in_this_film *)).  */
1077
1078   bool is_stub () const
1079   {
1080     return this->main_type->m_flag_stub;
1081   }
1082
1083   void set_is_stub (bool is_stub)
1084   {
1085     this->main_type->m_flag_stub = is_stub;
1086   }
1087
1088   /* The target type of this type is a stub type, and this type needs
1089      to be updated if it gets un-stubbed in check_typedef.  Used for
1090      arrays and ranges, in which TYPE_LENGTH of the array/range gets set
1091      based on the TYPE_LENGTH of the target type.  Also, set for
1092      TYPE_CODE_TYPEDEF.  */
1093
1094   bool target_is_stub () const
1095   {
1096     return this->main_type->m_flag_target_stub;
1097   }
1098
1099   void set_target_is_stub (bool target_is_stub)
1100   {
1101     this->main_type->m_flag_target_stub = target_is_stub;
1102   }
1103
1104   /* This is a function type which appears to have a prototype.  We
1105      need this for function calls in order to tell us if it's necessary
1106      to coerce the args, or to just do the standard conversions.  This
1107      is used with a short field.  */
1108
1109   bool is_prototyped () const
1110   {
1111     return this->main_type->m_flag_prototyped;
1112   }
1113
1114   void set_is_prototyped (bool is_prototyped)
1115   {
1116     this->main_type->m_flag_prototyped = is_prototyped;
1117   }
1118
1119   /* FIXME drow/2002-06-03:  Only used for methods, but applies as well
1120      to functions.  */
1121
1122   bool has_varargs () const
1123   {
1124     return this->main_type->m_flag_varargs;
1125   }
1126
1127   void set_has_varargs (bool has_varargs)
1128   {
1129     this->main_type->m_flag_varargs = has_varargs;
1130   }
1131
1132   /* Identify a vector type.  Gcc is handling this by adding an extra
1133      attribute to the array type.  We slurp that in as a new flag of a
1134      type.  This is used only in dwarf2read.c.  */
1135
1136   bool is_vector () const
1137   {
1138     return this->main_type->m_flag_vector;
1139   }
1140
1141   void set_is_vector (bool is_vector)
1142   {
1143     this->main_type->m_flag_vector = is_vector;
1144   }
1145
1146   /* This debug target supports TYPE_STUB(t).  In the unsupported case
1147      we have to rely on NFIELDS to be zero etc., see TYPE_IS_OPAQUE().
1148      TYPE_STUB(t) with !TYPE_STUB_SUPPORTED(t) may exist if we only
1149      guessed the TYPE_STUB(t) value (see dwarfread.c).  */
1150
1151   bool stub_is_supported () const
1152   {
1153     return this->main_type->m_flag_stub_supported;
1154   }
1155
1156   void set_stub_is_supported (bool stub_is_supported)
1157   {
1158     this->main_type->m_flag_stub_supported = stub_is_supported;
1159   }
1160
1161   /* Used only for TYPE_CODE_FUNC where it specifies the real function
1162      address is returned by this function call.  TYPE_TARGET_TYPE
1163      determines the final returned function type to be presented to
1164      user.  */
1165
1166   bool is_gnu_ifunc () const
1167   {
1168     return this->main_type->m_flag_gnu_ifunc;
1169   }
1170
1171   void set_is_gnu_ifunc (bool is_gnu_ifunc)
1172   {
1173     this->main_type->m_flag_gnu_ifunc = is_gnu_ifunc;
1174   }
1175
1176   /* The debugging formats (especially STABS) do not contain enough
1177      information to represent all Ada types---especially those whose
1178      size depends on dynamic quantities.  Therefore, the GNAT Ada
1179      compiler includes extra information in the form of additional type
1180      definitions connected by naming conventions.  This flag indicates
1181      that the type is an ordinary (unencoded) GDB type that has been
1182      created from the necessary run-time information, and does not need
1183      further interpretation.  Optionally marks ordinary, fixed-size GDB
1184      type.  */
1185
1186   bool is_fixed_instance () const
1187   {
1188     return this->main_type->m_flag_fixed_instance;
1189   }
1190
1191   void set_is_fixed_instance (bool is_fixed_instance)
1192   {
1193     this->main_type->m_flag_fixed_instance = is_fixed_instance;
1194   }
1195
1196   /* A compiler may supply dwarf instrumentation that indicates the desired
1197      endian interpretation of the variable differs from the native endian
1198      representation. */
1199
1200   bool endianity_is_not_default () const
1201   {
1202     return this->main_type->m_flag_endianity_not_default;
1203   }
1204
1205   void set_endianity_is_not_default (bool endianity_is_not_default)
1206   {
1207     this->main_type->m_flag_endianity_not_default = endianity_is_not_default;
1208   }
1209
1210
1211   /* True if this type was declared using the "class" keyword.  This is
1212      only valid for C++ structure and enum types.  If false, a structure
1213      was declared as a "struct"; if true it was declared "class".  For
1214      enum types, this is true when "enum class" or "enum struct" was
1215      used to declare the type.  */
1216
1217   bool is_declared_class () const
1218   {
1219     return this->main_type->m_flag_declared_class;
1220   }
1221
1222   void set_is_declared_class (bool is_declared_class) const
1223   {
1224     this->main_type->m_flag_declared_class = is_declared_class;
1225   }
1226
1227   /* True if this type is a "flag" enum.  A flag enum is one where all
1228      the values are pairwise disjoint when "and"ed together.  This
1229      affects how enum values are printed.  */
1230
1231   bool is_flag_enum () const
1232   {
1233     return this->main_type->m_flag_flag_enum;
1234   }
1235
1236   void set_is_flag_enum (bool is_flag_enum)
1237   {
1238     this->main_type->m_flag_flag_enum = is_flag_enum;
1239   }
1240
1241   /* * Assuming that THIS is a TYPE_CODE_FIXED_POINT, return a reference
1242      to this type's fixed_point_info.  */
1243
1244   struct fixed_point_type_info &fixed_point_info () const
1245   {
1246     gdb_assert (this->code () == TYPE_CODE_FIXED_POINT);
1247     gdb_assert (this->main_type->type_specific.fixed_point_info != nullptr);
1248
1249     return *this->main_type->type_specific.fixed_point_info;
1250   }
1251
1252   /* * Assuming that THIS is a TYPE_CODE_FIXED_POINT, set this type's
1253      fixed_point_info to INFO.  */
1254
1255   void set_fixed_point_info (struct fixed_point_type_info *info) const
1256   {
1257     gdb_assert (this->code () == TYPE_CODE_FIXED_POINT);
1258
1259     this->main_type->type_specific.fixed_point_info = info;
1260   }
1261
1262   /* * Assuming that THIS is a TYPE_CODE_FIXED_POINT, return its base type.
1263
1264      In other words, this returns the type after having peeled all
1265      intermediate type layers (such as TYPE_CODE_RANGE, for instance).
1266      The TYPE_CODE of the type returned is guaranteed to be
1267      a TYPE_CODE_FIXED_POINT.  */
1268
1269   struct type *fixed_point_type_base_type ();
1270
1271   /* * Assuming that THIS is a TYPE_CODE_FIXED_POINT, return its scaling
1272      factor.  */
1273
1274   const gdb_mpq &fixed_point_scaling_factor ();
1275
1276   /* * Return the dynamic property of the requested KIND from this type's
1277      list of dynamic properties.  */
1278   dynamic_prop *dyn_prop (dynamic_prop_node_kind kind) const;
1279
1280   /* * Given a dynamic property PROP of a given KIND, add this dynamic
1281      property to this type.
1282
1283      This function assumes that this type is objfile-owned.  */
1284   void add_dyn_prop (dynamic_prop_node_kind kind, dynamic_prop prop);
1285
1286   /* * Remove dynamic property of kind KIND from this type, if it exists.  */
1287   void remove_dyn_prop (dynamic_prop_node_kind kind);
1288
1289   /* Return true if this type is owned by an objfile.  Return false if it is
1290      owned by an architecture.  */
1291   bool is_objfile_owned () const
1292   {
1293     return this->main_type->m_flag_objfile_owned;
1294   }
1295
1296   /* Set the owner of the type to be OBJFILE.  */
1297   void set_owner (objfile *objfile)
1298   {
1299     gdb_assert (objfile != nullptr);
1300
1301     this->main_type->m_owner.objfile = objfile;
1302     this->main_type->m_flag_objfile_owned = true;
1303   }
1304
1305   /* Set the owner of the type to be ARCH.  */
1306   void set_owner (gdbarch *arch)
1307   {
1308     gdb_assert (arch != nullptr);
1309
1310     this->main_type->m_owner.gdbarch = arch;
1311     this->main_type->m_flag_objfile_owned = false;
1312   }
1313
1314   /* Return the objfile owner of this type.
1315
1316      Return nullptr if this type is not objfile-owned.  */
1317   struct objfile *objfile_owner () const
1318   {
1319     if (!this->is_objfile_owned ())
1320       return nullptr;
1321
1322     return this->main_type->m_owner.objfile;
1323   }
1324
1325   /* Return the gdbarch owner of this type.
1326
1327      Return nullptr if this type is not gdbarch-owned.  */
1328   gdbarch *arch_owner () const
1329   {
1330     if (this->is_objfile_owned ())
1331       return nullptr;
1332
1333     return this->main_type->m_owner.gdbarch;
1334   }
1335
1336   /* Return the type's architecture.  For types owned by an
1337      architecture, that architecture is returned.  For types owned by an
1338      objfile, that objfile's architecture is returned.
1339
1340      The return value is always non-nullptr.  */
1341   gdbarch *arch () const;
1342
1343   /* * Return true if this is an integer type whose logical (bit) size
1344      differs from its storage size; false otherwise.  Always return
1345      false for non-integer (i.e., non-TYPE_SPECIFIC_INT) types.  */
1346   bool bit_size_differs_p () const
1347   {
1348     return (main_type->type_specific_field == TYPE_SPECIFIC_INT
1349             && main_type->type_specific.int_stuff.bit_size != 8 * length);
1350   }
1351
1352   /* * Return the logical (bit) size for this integer type.  Only
1353      valid for integer (TYPE_SPECIFIC_INT) types.  */
1354   unsigned short bit_size () const
1355   {
1356     gdb_assert (main_type->type_specific_field == TYPE_SPECIFIC_INT);
1357     return main_type->type_specific.int_stuff.bit_size;
1358   }
1359
1360   /* * Return the bit offset for this integer type.  Only valid for
1361      integer (TYPE_SPECIFIC_INT) types.  */
1362   unsigned short bit_offset () const
1363   {
1364     gdb_assert (main_type->type_specific_field == TYPE_SPECIFIC_INT);
1365     return main_type->type_specific.int_stuff.bit_offset;
1366   }
1367
1368   /* Return true if this is a pointer or reference type.  */
1369   bool is_pointer_or_reference () const
1370   {
1371     return this->code () == TYPE_CODE_PTR || TYPE_IS_REFERENCE (this);
1372   }
1373
1374   /* * Type that is a pointer to this type.
1375      NULL if no such pointer-to type is known yet.
1376      The debugger may add the address of such a type
1377      if it has to construct one later.  */
1378
1379   struct type *pointer_type;
1380
1381   /* * C++: also need a reference type.  */
1382
1383   struct type *reference_type;
1384
1385   /* * A C++ rvalue reference type added in C++11. */
1386
1387   struct type *rvalue_reference_type;
1388
1389   /* * Variant chain.  This points to a type that differs from this
1390      one only in qualifiers and length.  Currently, the possible
1391      qualifiers are const, volatile, code-space, data-space, and
1392      address class.  The length may differ only when one of the
1393      address class flags are set.  The variants are linked in a
1394      circular ring and share MAIN_TYPE.  */
1395
1396   struct type *chain;
1397
1398   /* * The alignment for this type.  Zero means that the alignment was
1399      not specified in the debug info.  Note that this is stored in a
1400      funny way: as the log base 2 (plus 1) of the alignment; so a
1401      value of 1 means the alignment is 1, and a value of 9 means the
1402      alignment is 256.  */
1403
1404   unsigned align_log2 : TYPE_ALIGN_BITS;
1405
1406   /* * Flags specific to this instance of the type, indicating where
1407      on the ring we are.
1408
1409      For TYPE_CODE_TYPEDEF the flags of the typedef type should be
1410      binary or-ed with the target type, with a special case for
1411      address class and space class.  For example if this typedef does
1412      not specify any new qualifiers, TYPE_INSTANCE_FLAGS is 0 and the
1413      instance flags are completely inherited from the target type.  No
1414      qualifiers can be cleared by the typedef.  See also
1415      check_typedef.  */
1416   unsigned m_instance_flags : 9;
1417
1418   /* * Length of storage for a value of this type.  The value is the
1419      expression in host bytes of what sizeof(type) would return.  This
1420      size includes padding.  For example, an i386 extended-precision
1421      floating point value really only occupies ten bytes, but most
1422      ABI's declare its size to be 12 bytes, to preserve alignment.
1423      A `struct type' representing such a floating-point type would
1424      have a `length' value of 12, even though the last two bytes are
1425      unused.
1426
1427      Since this field is expressed in host bytes, its value is appropriate
1428      to pass to memcpy and such (it is assumed that GDB itself always runs
1429      on an 8-bits addressable architecture).  However, when using it for
1430      target address arithmetic (e.g. adding it to a target address), the
1431      type_length_units function should be used in order to get the length
1432      expressed in target addressable memory units.  */
1433
1434   ULONGEST length;
1435
1436   /* * Core type, shared by a group of qualified types.  */
1437
1438   struct main_type *main_type;
1439 };
1440
1441 struct fn_fieldlist
1442 {
1443
1444   /* * The overloaded name.
1445      This is generally allocated in the objfile's obstack.
1446      However stabsread.c sometimes uses malloc.  */
1447
1448   const char *name;
1449
1450   /* * The number of methods with this name.  */
1451
1452   int length;
1453
1454   /* * The list of methods.  */
1455
1456   struct fn_field *fn_fields;
1457 };
1458
1459
1460
1461 struct fn_field
1462 {
1463   /* * If is_stub is clear, this is the mangled name which we can look
1464      up to find the address of the method (FIXME: it would be cleaner
1465      to have a pointer to the struct symbol here instead).
1466
1467      If is_stub is set, this is the portion of the mangled name which
1468      specifies the arguments.  For example, "ii", if there are two int
1469      arguments, or "" if there are no arguments.  See gdb_mangle_name
1470      for the conversion from this format to the one used if is_stub is
1471      clear.  */
1472
1473   const char *physname;
1474
1475   /* * The function type for the method.
1476                
1477      (This comment used to say "The return value of the method", but
1478      that's wrong.  The function type is expected here, i.e. something
1479      with TYPE_CODE_METHOD, and *not* the return-value type).  */
1480
1481   struct type *type;
1482
1483   /* * For virtual functions.  First baseclass that defines this
1484      virtual function.  */
1485
1486   struct type *fcontext;
1487
1488   /* Attributes.  */
1489
1490   unsigned int is_const:1;
1491   unsigned int is_volatile:1;
1492   unsigned int is_private:1;
1493   unsigned int is_protected:1;
1494   unsigned int is_artificial:1;
1495
1496   /* * A stub method only has some fields valid (but they are enough
1497      to reconstruct the rest of the fields).  */
1498
1499   unsigned int is_stub:1;
1500
1501   /* * True if this function is a constructor, false otherwise.  */
1502
1503   unsigned int is_constructor : 1;
1504
1505   /* * True if this function is deleted, false otherwise.  */
1506
1507   unsigned int is_deleted : 1;
1508
1509   /* * DW_AT_defaulted attribute for this function.  The value is one
1510      of the DW_DEFAULTED constants.  */
1511
1512   ENUM_BITFIELD (dwarf_defaulted_attribute) defaulted : 2;
1513
1514   /* * Unused.  */
1515
1516   unsigned int dummy:6;
1517
1518   /* * Index into that baseclass's virtual function table, minus 2;
1519      else if static: VOFFSET_STATIC; else: 0.  */
1520
1521   unsigned int voffset:16;
1522
1523 #define VOFFSET_STATIC 1
1524
1525 };
1526
1527 struct decl_field
1528 {
1529   /* * Unqualified name to be prefixed by owning class qualified
1530      name.  */
1531
1532   const char *name;
1533
1534   /* * Type this typedef named NAME represents.  */
1535
1536   struct type *type;
1537
1538   /* * True if this field was declared protected, false otherwise.  */
1539   unsigned int is_protected : 1;
1540
1541   /* * True if this field was declared private, false otherwise.  */
1542   unsigned int is_private : 1;
1543 };
1544
1545 /* * C++ language-specific information for TYPE_CODE_STRUCT and
1546    TYPE_CODE_UNION nodes.  */
1547
1548 struct cplus_struct_type
1549   {
1550     /* * Number of base classes this type derives from.  The
1551        baseclasses are stored in the first N_BASECLASSES fields
1552        (i.e. the `fields' field of the struct type).  The only fields
1553        of struct field that are used are: type, name, loc.bitpos.  */
1554
1555     short n_baseclasses;
1556
1557     /* * Field number of the virtual function table pointer in VPTR_BASETYPE.
1558        All access to this field must be through TYPE_VPTR_FIELDNO as one
1559        thing it does is check whether the field has been initialized.
1560        Initially TYPE_RAW_CPLUS_SPECIFIC has the value of cplus_struct_default,
1561        which for portability reasons doesn't initialize this field.
1562        TYPE_VPTR_FIELDNO returns -1 for this case.
1563
1564        If -1, we were unable to find the virtual function table pointer in
1565        initial symbol reading, and get_vptr_fieldno should be called to find
1566        it if possible.  get_vptr_fieldno will update this field if possible.
1567        Otherwise the value is left at -1.
1568
1569        Unused if this type does not have virtual functions.  */
1570
1571     short vptr_fieldno;
1572
1573     /* * Number of methods with unique names.  All overloaded methods
1574        with the same name count only once.  */
1575
1576     short nfn_fields;
1577
1578     /* * Number of template arguments.  */
1579
1580     unsigned short n_template_arguments;
1581
1582     /* * One if this struct is a dynamic class, as defined by the
1583        Itanium C++ ABI: if it requires a virtual table pointer,
1584        because it or any of its base classes have one or more virtual
1585        member functions or virtual base classes.  Minus one if not
1586        dynamic.  Zero if not yet computed.  */
1587
1588     int is_dynamic : 2;
1589
1590     /* * The calling convention for this type, fetched from the
1591        DW_AT_calling_convention attribute.  The value is one of the
1592        DW_CC constants.  */
1593
1594     ENUM_BITFIELD (dwarf_calling_convention) calling_convention : 8;
1595
1596     /* * The base class which defined the virtual function table pointer.  */
1597
1598     struct type *vptr_basetype;
1599
1600     /* * For derived classes, the number of base classes is given by
1601        n_baseclasses and virtual_field_bits is a bit vector containing
1602        one bit per base class.  If the base class is virtual, the
1603        corresponding bit will be set.
1604        I.E, given:
1605
1606        class A{};
1607        class B{};
1608        class C : public B, public virtual A {};
1609
1610        B is a baseclass of C; A is a virtual baseclass for C.
1611        This is a C++ 2.0 language feature.  */
1612
1613     B_TYPE *virtual_field_bits;
1614
1615     /* * For classes with private fields, the number of fields is
1616        given by nfields and private_field_bits is a bit vector
1617        containing one bit per field.
1618
1619        If the field is private, the corresponding bit will be set.  */
1620
1621     B_TYPE *private_field_bits;
1622
1623     /* * For classes with protected fields, the number of fields is
1624        given by nfields and protected_field_bits is a bit vector
1625        containing one bit per field.
1626
1627        If the field is private, the corresponding bit will be set.  */
1628
1629     B_TYPE *protected_field_bits;
1630
1631     /* * For classes with fields to be ignored, either this is
1632        optimized out or this field has length 0.  */
1633
1634     B_TYPE *ignore_field_bits;
1635
1636     /* * For classes, structures, and unions, a description of each
1637        field, which consists of an overloaded name, followed by the
1638        types of arguments that the method expects, and then the name
1639        after it has been renamed to make it distinct.
1640
1641        fn_fieldlists points to an array of nfn_fields of these.  */
1642
1643     struct fn_fieldlist *fn_fieldlists;
1644
1645     /* * typedefs defined inside this class.  typedef_field points to
1646        an array of typedef_field_count elements.  */
1647
1648     struct decl_field *typedef_field;
1649
1650     unsigned typedef_field_count;
1651
1652     /* * The nested types defined by this type.  nested_types points to
1653        an array of nested_types_count elements.  */
1654
1655     struct decl_field *nested_types;
1656
1657     unsigned nested_types_count;
1658
1659     /* * The template arguments.  This is an array with
1660        N_TEMPLATE_ARGUMENTS elements.  This is NULL for non-template
1661        classes.  */
1662
1663     struct symbol **template_arguments;
1664   };
1665
1666 /* * Struct used to store conversion rankings.  */
1667
1668 struct rank
1669   {
1670     short rank;
1671
1672     /* * When two conversions are of the same type and therefore have
1673        the same rank, subrank is used to differentiate the two.
1674
1675        Eg: Two derived-class-pointer to base-class-pointer conversions
1676        would both have base pointer conversion rank, but the
1677        conversion with the shorter distance to the ancestor is
1678        preferable.  'subrank' would be used to reflect that.  */
1679
1680     short subrank;
1681   };
1682
1683 /* * Used for ranking a function for overload resolution.  */
1684
1685 typedef std::vector<rank> badness_vector;
1686
1687 /* * GNAT Ada-specific information for various Ada types.  */
1688
1689 struct gnat_aux_type
1690   {
1691     /* * Parallel type used to encode information about dynamic types
1692        used in Ada (such as variant records, variable-size array,
1693        etc).  */
1694     struct type* descriptive_type;
1695   };
1696
1697 /* * For TYPE_CODE_FUNC and TYPE_CODE_METHOD types.  */
1698
1699 struct func_type
1700   {
1701     /* * The calling convention for targets supporting multiple ABIs.
1702        Right now this is only fetched from the Dwarf-2
1703        DW_AT_calling_convention attribute.  The value is one of the
1704        DW_CC constants.  */
1705
1706     ENUM_BITFIELD (dwarf_calling_convention) calling_convention : 8;
1707
1708     /* * Whether this function normally returns to its caller.  It is
1709        set from the DW_AT_noreturn attribute if set on the
1710        DW_TAG_subprogram.  */
1711
1712     unsigned int is_noreturn : 1;
1713
1714     /* * Only those DW_TAG_call_site's in this function that have
1715        DW_AT_call_tail_call set are linked in this list.  Function
1716        without its tail call list complete
1717        (DW_AT_call_all_tail_calls or its superset
1718        DW_AT_call_all_calls) has TAIL_CALL_LIST NULL, even if some
1719        DW_TAG_call_site's exist in such function. */
1720
1721     struct call_site *tail_call_list;
1722
1723     /* * For method types (TYPE_CODE_METHOD), the aggregate type that
1724        contains the method.  */
1725
1726     struct type *self_type;
1727   };
1728
1729 /* struct call_site_parameter can be referenced in callees by several ways.  */
1730
1731 enum call_site_parameter_kind
1732 {
1733   /* * Use field call_site_parameter.u.dwarf_reg.  */
1734   CALL_SITE_PARAMETER_DWARF_REG,
1735
1736   /* * Use field call_site_parameter.u.fb_offset.  */
1737   CALL_SITE_PARAMETER_FB_OFFSET,
1738
1739   /* * Use field call_site_parameter.u.param_offset.  */
1740   CALL_SITE_PARAMETER_PARAM_OFFSET
1741 };
1742
1743 struct call_site_target
1744 {
1745   union field_location loc;
1746
1747   /* * Discriminant for union field_location.  */
1748
1749   ENUM_BITFIELD(field_loc_kind) loc_kind : 3;
1750 };
1751
1752 union call_site_parameter_u
1753 {
1754   /* * DW_TAG_formal_parameter's DW_AT_location's DW_OP_regX
1755      as DWARF register number, for register passed
1756      parameters.  */
1757
1758   int dwarf_reg;
1759
1760   /* * Offset from the callee's frame base, for stack passed
1761      parameters.  This equals offset from the caller's stack
1762      pointer.  */
1763
1764   CORE_ADDR fb_offset;
1765
1766   /* * Offset relative to the start of this PER_CU to
1767      DW_TAG_formal_parameter which is referenced by both
1768      caller and the callee.  */
1769
1770   cu_offset param_cu_off;
1771 };
1772
1773 struct call_site_parameter
1774 {
1775   ENUM_BITFIELD (call_site_parameter_kind) kind : 2;
1776
1777   union call_site_parameter_u u;
1778
1779   /* * DW_TAG_formal_parameter's DW_AT_call_value.  It is never NULL.  */
1780
1781   const gdb_byte *value;
1782   size_t value_size;
1783
1784   /* * DW_TAG_formal_parameter's DW_AT_call_data_value.
1785      It may be NULL if not provided by DWARF.  */
1786
1787   const gdb_byte *data_value;
1788   size_t data_value_size;
1789 };
1790
1791 /* * A place where a function gets called from, represented by
1792    DW_TAG_call_site.  It can be looked up from symtab->call_site_htab.  */
1793
1794 struct call_site
1795   {
1796     /* * Address of the first instruction after this call.  It must be
1797        the first field as we overload core_addr_hash and core_addr_eq
1798        for it.  */
1799
1800     CORE_ADDR pc;
1801
1802     /* * List successor with head in FUNC_TYPE.TAIL_CALL_LIST.  */
1803
1804     struct call_site *tail_call_next;
1805
1806     /* * Describe DW_AT_call_target.  Missing attribute uses
1807        FIELD_LOC_KIND_DWARF_BLOCK with FIELD_DWARF_BLOCK == NULL.  */
1808
1809     struct call_site_target target;
1810
1811     /* * Size of the PARAMETER array.  */
1812
1813     unsigned parameter_count;
1814
1815     /* * CU of the function where the call is located.  It gets used
1816        for DWARF blocks execution in the parameter array below.  */
1817
1818     dwarf2_per_cu_data *per_cu;
1819
1820     /* objfile of the function where the call is located.  */
1821
1822     dwarf2_per_objfile *per_objfile;
1823
1824     /* * Describe DW_TAG_call_site's DW_TAG_formal_parameter.  */
1825
1826     struct call_site_parameter parameter[1];
1827   };
1828
1829 /* The type-specific info for TYPE_CODE_FIXED_POINT types.  */
1830
1831 struct fixed_point_type_info
1832 {
1833   /* The fixed point type's scaling factor.  */
1834   gdb_mpq scaling_factor;
1835 };
1836
1837 /* * The default value of TYPE_CPLUS_SPECIFIC(T) points to this shared
1838    static structure.  */
1839
1840 extern const struct cplus_struct_type cplus_struct_default;
1841
1842 extern void allocate_cplus_struct_type (struct type *);
1843
1844 #define INIT_CPLUS_SPECIFIC(type) \
1845   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_CPLUS_STUFF, \
1846    TYPE_RAW_CPLUS_SPECIFIC (type) = (struct cplus_struct_type*) \
1847    &cplus_struct_default)
1848
1849 #define ALLOCATE_CPLUS_STRUCT_TYPE(type) allocate_cplus_struct_type (type)
1850
1851 #define HAVE_CPLUS_STRUCT(type) \
1852   (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_CPLUS_STUFF \
1853    && TYPE_RAW_CPLUS_SPECIFIC (type) !=  &cplus_struct_default)
1854
1855 #define INIT_NONE_SPECIFIC(type) \
1856   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_NONE, \
1857    TYPE_MAIN_TYPE (type)->type_specific = {})
1858
1859 extern const struct gnat_aux_type gnat_aux_default;
1860
1861 extern void allocate_gnat_aux_type (struct type *);
1862
1863 #define INIT_GNAT_SPECIFIC(type) \
1864   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_GNAT_STUFF, \
1865    TYPE_GNAT_SPECIFIC (type) = (struct gnat_aux_type *) &gnat_aux_default)
1866 #define ALLOCATE_GNAT_AUX_TYPE(type) allocate_gnat_aux_type (type)
1867 /* * A macro that returns non-zero if the type-specific data should be
1868    read as "gnat-stuff".  */
1869 #define HAVE_GNAT_AUX_INFO(type) \
1870   (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF)
1871
1872 /* * True if TYPE is known to be an Ada type of some kind.  */
1873 #define ADA_TYPE_P(type)                                        \
1874   (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF       \
1875     || (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_NONE        \
1876         && (type)->is_fixed_instance ()))
1877
1878 #define INIT_FUNC_SPECIFIC(type)                                               \
1879   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_FUNC,                            \
1880    TYPE_MAIN_TYPE (type)->type_specific.func_stuff = (struct func_type *)      \
1881      TYPE_ZALLOC (type,                                                        \
1882                   sizeof (*TYPE_MAIN_TYPE (type)->type_specific.func_stuff)))
1883
1884 /* "struct fixed_point_type_info" has a field that has a destructor.
1885    See allocate_fixed_point_type_info to understand how this is
1886    handled.  */
1887 #define INIT_FIXED_POINT_SPECIFIC(type) \
1888   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_FIXED_POINT, \
1889    allocate_fixed_point_type_info (type))
1890
1891 #define TYPE_MAIN_TYPE(thistype) (thistype)->main_type
1892 #define TYPE_TARGET_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->target_type
1893 #define TYPE_POINTER_TYPE(thistype) (thistype)->pointer_type
1894 #define TYPE_REFERENCE_TYPE(thistype) (thistype)->reference_type
1895 #define TYPE_RVALUE_REFERENCE_TYPE(thistype) (thistype)->rvalue_reference_type
1896 #define TYPE_CHAIN(thistype) (thistype)->chain
1897 /* * Note that if thistype is a TYPEDEF type, you have to call check_typedef.
1898    But check_typedef does set the TYPE_LENGTH of the TYPEDEF type,
1899    so you only have to call check_typedef once.  Since allocate_value
1900    calls check_typedef, TYPE_LENGTH (VALUE_TYPE (X)) is safe.  */
1901 #define TYPE_LENGTH(thistype) (thistype)->length
1902
1903 /* * Return the alignment of the type in target addressable memory
1904    units, or 0 if no alignment was specified.  */
1905 #define TYPE_RAW_ALIGN(thistype) type_raw_align (thistype)
1906
1907 /* * Return the alignment of the type in target addressable memory
1908    units, or 0 if no alignment was specified.  */
1909 extern unsigned type_raw_align (struct type *);
1910
1911 /* * Return the alignment of the type in target addressable memory
1912    units.  Return 0 if the alignment cannot be determined; but note
1913    that this makes an effort to compute the alignment even it it was
1914    not specified in the debug info.  */
1915 extern unsigned type_align (struct type *);
1916
1917 /* * Set the alignment of the type.  The alignment must be a power of
1918    2.  Returns false if the given value does not fit in the available
1919    space in struct type.  */
1920 extern bool set_type_align (struct type *, ULONGEST);
1921
1922 /* Property accessors for the type data location.  */
1923 #define TYPE_DATA_LOCATION(thistype) \
1924   ((thistype)->dyn_prop (DYN_PROP_DATA_LOCATION))
1925 #define TYPE_DATA_LOCATION_BATON(thistype) \
1926   TYPE_DATA_LOCATION (thistype)->data.baton
1927 #define TYPE_DATA_LOCATION_ADDR(thistype) \
1928   (TYPE_DATA_LOCATION (thistype)->const_val ())
1929 #define TYPE_DATA_LOCATION_KIND(thistype) \
1930   (TYPE_DATA_LOCATION (thistype)->kind ())
1931 #define TYPE_DYNAMIC_LENGTH(thistype) \
1932   ((thistype)->dyn_prop (DYN_PROP_BYTE_SIZE))
1933
1934 /* Property accessors for the type allocated/associated.  */
1935 #define TYPE_ALLOCATED_PROP(thistype) \
1936   ((thistype)->dyn_prop (DYN_PROP_ALLOCATED))
1937 #define TYPE_ASSOCIATED_PROP(thistype) \
1938   ((thistype)->dyn_prop (DYN_PROP_ASSOCIATED))
1939
1940 /* C++ */
1941
1942 #define TYPE_SELF_TYPE(thistype) internal_type_self_type (thistype)
1943 /* Do not call this, use TYPE_SELF_TYPE.  */
1944 extern struct type *internal_type_self_type (struct type *);
1945 extern void set_type_self_type (struct type *, struct type *);
1946
1947 extern int internal_type_vptr_fieldno (struct type *);
1948 extern void set_type_vptr_fieldno (struct type *, int);
1949 extern struct type *internal_type_vptr_basetype (struct type *);
1950 extern void set_type_vptr_basetype (struct type *, struct type *);
1951 #define TYPE_VPTR_FIELDNO(thistype) internal_type_vptr_fieldno (thistype)
1952 #define TYPE_VPTR_BASETYPE(thistype) internal_type_vptr_basetype (thistype)
1953
1954 #define TYPE_NFN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields
1955 #define TYPE_SPECIFIC_FIELD(thistype) \
1956   TYPE_MAIN_TYPE(thistype)->type_specific_field
1957 /* We need this tap-dance with the TYPE_RAW_SPECIFIC because of the case
1958    where we're trying to print an Ada array using the C language.
1959    In that case, there is no "cplus_stuff", but the C language assumes
1960    that there is.  What we do, in that case, is pretend that there is
1961    an implicit one which is the default cplus stuff.  */
1962 #define TYPE_CPLUS_SPECIFIC(thistype) \
1963    (!HAVE_CPLUS_STRUCT(thistype) \
1964     ? (struct cplus_struct_type*)&cplus_struct_default \
1965     : TYPE_RAW_CPLUS_SPECIFIC(thistype))
1966 #define TYPE_RAW_CPLUS_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff
1967 #define TYPE_CPLUS_CALLING_CONVENTION(thistype) \
1968   TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff->calling_convention
1969 #define TYPE_FLOATFORMAT(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.floatformat
1970 #define TYPE_GNAT_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.gnat_stuff
1971 #define TYPE_DESCRIPTIVE_TYPE(thistype) TYPE_GNAT_SPECIFIC(thistype)->descriptive_type
1972 #define TYPE_CALLING_CONVENTION(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->calling_convention
1973 #define TYPE_NO_RETURN(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->is_noreturn
1974 #define TYPE_TAIL_CALL_LIST(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->tail_call_list
1975 #define TYPE_BASECLASS(thistype,index) ((thistype)->field (index).type ())
1976 #define TYPE_N_BASECLASSES(thistype) TYPE_CPLUS_SPECIFIC(thistype)->n_baseclasses
1977 #define TYPE_BASECLASS_NAME(thistype,index) TYPE_FIELD_NAME(thistype, index)
1978 #define TYPE_BASECLASS_BITPOS(thistype,index) TYPE_FIELD_BITPOS(thistype,index)
1979 #define BASETYPE_VIA_PUBLIC(thistype, index) \
1980   ((!TYPE_FIELD_PRIVATE(thistype, index)) && (!TYPE_FIELD_PROTECTED(thistype, index)))
1981 #define TYPE_CPLUS_DYNAMIC(thistype) TYPE_CPLUS_SPECIFIC (thistype)->is_dynamic
1982
1983 #define BASETYPE_VIA_VIRTUAL(thistype, index) \
1984   (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
1985     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (index)))
1986
1987 #define FIELD_NAME(thisfld) ((thisfld).name ())
1988 #define FIELD_LOC_KIND(thisfld) ((thisfld).loc_kind)
1989 #define FIELD_BITPOS_LVAL(thisfld) ((thisfld).loc.bitpos)
1990 #define FIELD_BITPOS(thisfld) (FIELD_BITPOS_LVAL (thisfld) + 0)
1991 #define FIELD_ENUMVAL_LVAL(thisfld) ((thisfld).loc.enumval)
1992 #define FIELD_ENUMVAL(thisfld) (FIELD_ENUMVAL_LVAL (thisfld) + 0)
1993 #define FIELD_STATIC_PHYSNAME(thisfld) ((thisfld).loc.physname)
1994 #define FIELD_STATIC_PHYSADDR(thisfld) ((thisfld).loc.physaddr)
1995 #define FIELD_DWARF_BLOCK(thisfld) ((thisfld).loc.dwarf_block)
1996 #define SET_FIELD_BITPOS(thisfld, bitpos)                       \
1997   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_BITPOS,            \
1998    FIELD_BITPOS_LVAL (thisfld) = (bitpos))
1999 #define SET_FIELD_ENUMVAL(thisfld, enumval)                     \
2000   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_ENUMVAL,           \
2001    FIELD_ENUMVAL_LVAL (thisfld) = (enumval))
2002 #define SET_FIELD_PHYSNAME(thisfld, name)                       \
2003   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSNAME,          \
2004    FIELD_STATIC_PHYSNAME (thisfld) = (name))
2005 #define SET_FIELD_PHYSADDR(thisfld, addr)                       \
2006   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSADDR,          \
2007    FIELD_STATIC_PHYSADDR (thisfld) = (addr))
2008 #define SET_FIELD_DWARF_BLOCK(thisfld, addr)                    \
2009   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_DWARF_BLOCK,       \
2010    FIELD_DWARF_BLOCK (thisfld) = (addr))
2011 #define FIELD_ARTIFICIAL(thisfld) ((thisfld).artificial)
2012 #define FIELD_BITSIZE(thisfld) ((thisfld).bitsize)
2013
2014 #define TYPE_FIELD_NAME(thistype, n) ((thistype)->field (n).name ())
2015 #define TYPE_FIELD_LOC_KIND(thistype, n) FIELD_LOC_KIND ((thistype)->field (n))
2016 #define TYPE_FIELD_BITPOS(thistype, n) FIELD_BITPOS ((thistype)->field (n))
2017 #define TYPE_FIELD_ENUMVAL(thistype, n) FIELD_ENUMVAL ((thistype)->field (n))
2018 #define TYPE_FIELD_STATIC_PHYSNAME(thistype, n) FIELD_STATIC_PHYSNAME ((thistype)->field (n))
2019 #define TYPE_FIELD_STATIC_PHYSADDR(thistype, n) FIELD_STATIC_PHYSADDR ((thistype)->field (n))
2020 #define TYPE_FIELD_DWARF_BLOCK(thistype, n) FIELD_DWARF_BLOCK ((thistype)->field (n))
2021 #define TYPE_FIELD_ARTIFICIAL(thistype, n) FIELD_ARTIFICIAL((thistype)->field (n))
2022 #define TYPE_FIELD_BITSIZE(thistype, n) FIELD_BITSIZE((thistype)->field (n))
2023 #define TYPE_FIELD_PACKED(thistype, n) (FIELD_BITSIZE((thistype)->field (n))!=0)
2024
2025 #define TYPE_FIELD_PRIVATE_BITS(thistype) \
2026   TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits
2027 #define TYPE_FIELD_PROTECTED_BITS(thistype) \
2028   TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits
2029 #define TYPE_FIELD_IGNORE_BITS(thistype) \
2030   TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits
2031 #define TYPE_FIELD_VIRTUAL_BITS(thistype) \
2032   TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits
2033 #define SET_TYPE_FIELD_PRIVATE(thistype, n) \
2034   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n))
2035 #define SET_TYPE_FIELD_PROTECTED(thistype, n) \
2036   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n))
2037 #define SET_TYPE_FIELD_IGNORE(thistype, n) \
2038   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n))
2039 #define SET_TYPE_FIELD_VIRTUAL(thistype, n) \
2040   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n))
2041 #define TYPE_FIELD_PRIVATE(thistype, n) \
2042   (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits == NULL ? 0 \
2043     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n)))
2044 #define TYPE_FIELD_PROTECTED(thistype, n) \
2045   (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits == NULL ? 0 \
2046     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n)))
2047 #define TYPE_FIELD_IGNORE(thistype, n) \
2048   (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits == NULL ? 0 \
2049     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n)))
2050 #define TYPE_FIELD_VIRTUAL(thistype, n) \
2051   (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
2052     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n)))
2053
2054 #define TYPE_FN_FIELDLISTS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists
2055 #define TYPE_FN_FIELDLIST(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n]
2056 #define TYPE_FN_FIELDLIST1(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].fn_fields
2057 #define TYPE_FN_FIELDLIST_NAME(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].name
2058 #define TYPE_FN_FIELDLIST_LENGTH(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].length
2059
2060 #define TYPE_N_TEMPLATE_ARGUMENTS(thistype) \
2061   TYPE_CPLUS_SPECIFIC (thistype)->n_template_arguments
2062 #define TYPE_TEMPLATE_ARGUMENTS(thistype) \
2063   TYPE_CPLUS_SPECIFIC (thistype)->template_arguments
2064 #define TYPE_TEMPLATE_ARGUMENT(thistype, n) \
2065   TYPE_CPLUS_SPECIFIC (thistype)->template_arguments[n]
2066
2067 #define TYPE_FN_FIELD(thisfn, n) (thisfn)[n]
2068 #define TYPE_FN_FIELD_PHYSNAME(thisfn, n) (thisfn)[n].physname
2069 #define TYPE_FN_FIELD_TYPE(thisfn, n) (thisfn)[n].type
2070 #define TYPE_FN_FIELD_ARGS(thisfn, n) (((thisfn)[n].type)->fields ())
2071 #define TYPE_FN_FIELD_CONST(thisfn, n) ((thisfn)[n].is_const)
2072 #define TYPE_FN_FIELD_VOLATILE(thisfn, n) ((thisfn)[n].is_volatile)
2073 #define TYPE_FN_FIELD_PRIVATE(thisfn, n) ((thisfn)[n].is_private)
2074 #define TYPE_FN_FIELD_PROTECTED(thisfn, n) ((thisfn)[n].is_protected)
2075 #define TYPE_FN_FIELD_ARTIFICIAL(thisfn, n) ((thisfn)[n].is_artificial)
2076 #define TYPE_FN_FIELD_STUB(thisfn, n) ((thisfn)[n].is_stub)
2077 #define TYPE_FN_FIELD_CONSTRUCTOR(thisfn, n) ((thisfn)[n].is_constructor)
2078 #define TYPE_FN_FIELD_FCONTEXT(thisfn, n) ((thisfn)[n].fcontext)
2079 #define TYPE_FN_FIELD_VOFFSET(thisfn, n) ((thisfn)[n].voffset-2)
2080 #define TYPE_FN_FIELD_VIRTUAL_P(thisfn, n) ((thisfn)[n].voffset > 1)
2081 #define TYPE_FN_FIELD_STATIC_P(thisfn, n) ((thisfn)[n].voffset == VOFFSET_STATIC)
2082 #define TYPE_FN_FIELD_DEFAULTED(thisfn, n) ((thisfn)[n].defaulted)
2083 #define TYPE_FN_FIELD_DELETED(thisfn, n) ((thisfn)[n].is_deleted)
2084
2085 /* Accessors for typedefs defined by a class.  */
2086 #define TYPE_TYPEDEF_FIELD_ARRAY(thistype) \
2087   TYPE_CPLUS_SPECIFIC (thistype)->typedef_field
2088 #define TYPE_TYPEDEF_FIELD(thistype, n) \
2089   TYPE_CPLUS_SPECIFIC (thistype)->typedef_field[n]
2090 #define TYPE_TYPEDEF_FIELD_NAME(thistype, n) \
2091   TYPE_TYPEDEF_FIELD (thistype, n).name
2092 #define TYPE_TYPEDEF_FIELD_TYPE(thistype, n) \
2093   TYPE_TYPEDEF_FIELD (thistype, n).type
2094 #define TYPE_TYPEDEF_FIELD_COUNT(thistype) \
2095   TYPE_CPLUS_SPECIFIC (thistype)->typedef_field_count
2096 #define TYPE_TYPEDEF_FIELD_PROTECTED(thistype, n) \
2097   TYPE_TYPEDEF_FIELD (thistype, n).is_protected
2098 #define TYPE_TYPEDEF_FIELD_PRIVATE(thistype, n)        \
2099   TYPE_TYPEDEF_FIELD (thistype, n).is_private
2100
2101 #define TYPE_NESTED_TYPES_ARRAY(thistype)       \
2102   TYPE_CPLUS_SPECIFIC (thistype)->nested_types
2103 #define TYPE_NESTED_TYPES_FIELD(thistype, n) \
2104   TYPE_CPLUS_SPECIFIC (thistype)->nested_types[n]
2105 #define TYPE_NESTED_TYPES_FIELD_NAME(thistype, n) \
2106   TYPE_NESTED_TYPES_FIELD (thistype, n).name
2107 #define TYPE_NESTED_TYPES_FIELD_TYPE(thistype, n) \
2108   TYPE_NESTED_TYPES_FIELD (thistype, n).type
2109 #define TYPE_NESTED_TYPES_COUNT(thistype) \
2110   TYPE_CPLUS_SPECIFIC (thistype)->nested_types_count
2111 #define TYPE_NESTED_TYPES_FIELD_PROTECTED(thistype, n) \
2112   TYPE_NESTED_TYPES_FIELD (thistype, n).is_protected
2113 #define TYPE_NESTED_TYPES_FIELD_PRIVATE(thistype, n)    \
2114   TYPE_NESTED_TYPES_FIELD (thistype, n).is_private
2115
2116 #define TYPE_IS_OPAQUE(thistype) \
2117   ((((thistype)->code () == TYPE_CODE_STRUCT) \
2118     || ((thistype)->code () == TYPE_CODE_UNION)) \
2119    && ((thistype)->num_fields () == 0) \
2120    && (!HAVE_CPLUS_STRUCT (thistype) \
2121        || TYPE_NFN_FIELDS (thistype) == 0) \
2122    && ((thistype)->is_stub () || !(thistype)->stub_is_supported ()))
2123
2124 /* * A helper macro that returns the name of a type or "unnamed type"
2125    if the type has no name.  */
2126
2127 #define TYPE_SAFE_NAME(type) \
2128   (type->name () != nullptr ? type->name () : _("<unnamed type>"))
2129
2130 /* * A helper macro that returns the name of an error type.  If the
2131    type has a name, it is used; otherwise, a default is used.  */
2132
2133 #define TYPE_ERROR_NAME(type) \
2134   (type->name () ? type->name () : _("<error type>"))
2135
2136 /* Given TYPE, return its floatformat.  */
2137 const struct floatformat *floatformat_from_type (const struct type *type);
2138
2139 struct builtin_type
2140 {
2141   /* Integral types.  */
2142
2143   /* Implicit size/sign (based on the architecture's ABI).  */
2144   struct type *builtin_void;
2145   struct type *builtin_char;
2146   struct type *builtin_short;
2147   struct type *builtin_int;
2148   struct type *builtin_long;
2149   struct type *builtin_signed_char;
2150   struct type *builtin_unsigned_char;
2151   struct type *builtin_unsigned_short;
2152   struct type *builtin_unsigned_int;
2153   struct type *builtin_unsigned_long;
2154   struct type *builtin_bfloat16;
2155   struct type *builtin_half;
2156   struct type *builtin_float;
2157   struct type *builtin_double;
2158   struct type *builtin_long_double;
2159   struct type *builtin_complex;
2160   struct type *builtin_double_complex;
2161   struct type *builtin_string;
2162   struct type *builtin_bool;
2163   struct type *builtin_long_long;
2164   struct type *builtin_unsigned_long_long;
2165   struct type *builtin_decfloat;
2166   struct type *builtin_decdouble;
2167   struct type *builtin_declong;
2168
2169   /* "True" character types.
2170       We use these for the '/c' print format, because c_char is just a
2171       one-byte integral type, which languages less laid back than C
2172       will print as ... well, a one-byte integral type.  */
2173   struct type *builtin_true_char;
2174   struct type *builtin_true_unsigned_char;
2175
2176   /* Explicit sizes - see C9X <intypes.h> for naming scheme.  The "int0"
2177      is for when an architecture needs to describe a register that has
2178      no size.  */
2179   struct type *builtin_int0;
2180   struct type *builtin_int8;
2181   struct type *builtin_uint8;
2182   struct type *builtin_int16;
2183   struct type *builtin_uint16;
2184   struct type *builtin_int24;
2185   struct type *builtin_uint24;
2186   struct type *builtin_int32;
2187   struct type *builtin_uint32;
2188   struct type *builtin_int64;
2189   struct type *builtin_uint64;
2190   struct type *builtin_int128;
2191   struct type *builtin_uint128;
2192
2193   /* Wide character types.  */
2194   struct type *builtin_char16;
2195   struct type *builtin_char32;
2196   struct type *builtin_wchar;
2197
2198   /* Pointer types.  */
2199
2200   /* * `pointer to data' type.  Some target platforms use an implicitly
2201      {sign,zero} -extended 32-bit ABI pointer on a 64-bit ISA.  */
2202   struct type *builtin_data_ptr;
2203
2204   /* * `pointer to function (returning void)' type.  Harvard
2205      architectures mean that ABI function and code pointers are not
2206      interconvertible.  Similarly, since ANSI, C standards have
2207      explicitly said that pointers to functions and pointers to data
2208      are not interconvertible --- that is, you can't cast a function
2209      pointer to void * and back, and expect to get the same value.
2210      However, all function pointer types are interconvertible, so void
2211      (*) () can server as a generic function pointer.  */
2212
2213   struct type *builtin_func_ptr;
2214
2215   /* * `function returning pointer to function (returning void)' type.
2216      The final void return type is not significant for it.  */
2217
2218   struct type *builtin_func_func;
2219
2220   /* Special-purpose types.  */
2221
2222   /* * This type is used to represent a GDB internal function.  */
2223
2224   struct type *internal_fn;
2225
2226   /* * This type is used to represent an xmethod.  */
2227   struct type *xmethod;
2228 };
2229
2230 /* * Return the type table for the specified architecture.  */
2231
2232 extern const struct builtin_type *builtin_type (struct gdbarch *gdbarch);
2233
2234 /* * Per-objfile types used by symbol readers.  */
2235
2236 struct objfile_type
2237 {
2238   /* Basic types based on the objfile architecture.  */
2239   struct type *builtin_void;
2240   struct type *builtin_char;
2241   struct type *builtin_short;
2242   struct type *builtin_int;
2243   struct type *builtin_long;
2244   struct type *builtin_long_long;
2245   struct type *builtin_signed_char;
2246   struct type *builtin_unsigned_char;
2247   struct type *builtin_unsigned_short;
2248   struct type *builtin_unsigned_int;
2249   struct type *builtin_unsigned_long;
2250   struct type *builtin_unsigned_long_long;
2251   struct type *builtin_half;
2252   struct type *builtin_float;
2253   struct type *builtin_double;
2254   struct type *builtin_long_double;
2255
2256   /* * This type is used to represent symbol addresses.  */
2257   struct type *builtin_core_addr;
2258
2259   /* * This type represents a type that was unrecognized in symbol
2260      read-in.  */
2261   struct type *builtin_error;
2262
2263   /* * Types used for symbols with no debug information.  */
2264   struct type *nodebug_text_symbol;
2265   struct type *nodebug_text_gnu_ifunc_symbol;
2266   struct type *nodebug_got_plt_symbol;
2267   struct type *nodebug_data_symbol;
2268   struct type *nodebug_unknown_symbol;
2269   struct type *nodebug_tls_symbol;
2270 };
2271
2272 /* * Return the type table for the specified objfile.  */
2273
2274 extern const struct objfile_type *objfile_type (struct objfile *objfile);
2275  
2276 /* Explicit floating-point formats.  See "floatformat.h".  */
2277 extern const struct floatformat *floatformats_ieee_half[BFD_ENDIAN_UNKNOWN];
2278 extern const struct floatformat *floatformats_ieee_single[BFD_ENDIAN_UNKNOWN];
2279 extern const struct floatformat *floatformats_ieee_double[BFD_ENDIAN_UNKNOWN];
2280 extern const struct floatformat *floatformats_ieee_double_littlebyte_bigword[BFD_ENDIAN_UNKNOWN];
2281 extern const struct floatformat *floatformats_i387_ext[BFD_ENDIAN_UNKNOWN];
2282 extern const struct floatformat *floatformats_m68881_ext[BFD_ENDIAN_UNKNOWN];
2283 extern const struct floatformat *floatformats_arm_ext[BFD_ENDIAN_UNKNOWN];
2284 extern const struct floatformat *floatformats_ia64_spill[BFD_ENDIAN_UNKNOWN];
2285 extern const struct floatformat *floatformats_ia64_quad[BFD_ENDIAN_UNKNOWN];
2286 extern const struct floatformat *floatformats_vax_f[BFD_ENDIAN_UNKNOWN];
2287 extern const struct floatformat *floatformats_vax_d[BFD_ENDIAN_UNKNOWN];
2288 extern const struct floatformat *floatformats_ibm_long_double[BFD_ENDIAN_UNKNOWN];
2289 extern const struct floatformat *floatformats_bfloat16[BFD_ENDIAN_UNKNOWN];
2290
2291 /* Allocate space for storing data associated with a particular
2292    type.  We ensure that the space is allocated using the same
2293    mechanism that was used to allocate the space for the type
2294    structure itself.  I.e.  if the type is on an objfile's
2295    objfile_obstack, then the space for data associated with that type
2296    will also be allocated on the objfile_obstack.  If the type is
2297    associated with a gdbarch, then the space for data associated with that
2298    type will also be allocated on the gdbarch_obstack.
2299
2300    If a type is not associated with neither an objfile or a gdbarch then
2301    you should not use this macro to allocate space for data, instead you
2302    should call xmalloc directly, and ensure the memory is correctly freed
2303    when it is no longer needed.  */
2304
2305 #define TYPE_ALLOC(t,size)                                              \
2306   (obstack_alloc (((t)->is_objfile_owned ()                             \
2307                    ? &((t)->objfile_owner ()->objfile_obstack)          \
2308                    : gdbarch_obstack ((t)->arch_owner ())),             \
2309                   size))
2310
2311
2312 /* See comment on TYPE_ALLOC.  */
2313
2314 #define TYPE_ZALLOC(t,size) (memset (TYPE_ALLOC (t, size), 0, size))
2315
2316 /* Use alloc_type to allocate a type owned by an objfile.  Use
2317    alloc_type_arch to allocate a type owned by an architecture.  Use
2318    alloc_type_copy to allocate a type with the same owner as a
2319    pre-existing template type, no matter whether objfile or
2320    gdbarch.  */
2321 extern struct type *alloc_type (struct objfile *);
2322 extern struct type *alloc_type_arch (struct gdbarch *);
2323 extern struct type *alloc_type_copy (const struct type *);
2324
2325 /* * This returns the target type (or NULL) of TYPE, also skipping
2326    past typedefs.  */
2327
2328 extern struct type *get_target_type (struct type *type);
2329
2330 /* Return the equivalent of TYPE_LENGTH, but in number of target
2331    addressable memory units of the associated gdbarch instead of bytes.  */
2332
2333 extern unsigned int type_length_units (struct type *type);
2334
2335 /* * Helper function to construct objfile-owned types.  */
2336
2337 extern struct type *init_type (struct objfile *, enum type_code, int,
2338                                const char *);
2339 extern struct type *init_integer_type (struct objfile *, int, int,
2340                                        const char *);
2341 extern struct type *init_character_type (struct objfile *, int, int,
2342                                          const char *);
2343 extern struct type *init_boolean_type (struct objfile *, int, int,
2344                                        const char *);
2345 extern struct type *init_float_type (struct objfile *, int, const char *,
2346                                      const struct floatformat **,
2347                                      enum bfd_endian = BFD_ENDIAN_UNKNOWN);
2348 extern struct type *init_decfloat_type (struct objfile *, int, const char *);
2349 extern bool can_create_complex_type (struct type *);
2350 extern struct type *init_complex_type (const char *, struct type *);
2351 extern struct type *init_pointer_type (struct objfile *, int, const char *,
2352                                        struct type *);
2353 extern struct type *init_fixed_point_type (struct objfile *, int, int,
2354                                            const char *);
2355
2356 /* Helper functions to construct architecture-owned types.  */
2357 extern struct type *arch_type (struct gdbarch *, enum type_code, int,
2358                                const char *);
2359 extern struct type *arch_integer_type (struct gdbarch *, int, int,
2360                                        const char *);
2361 extern struct type *arch_character_type (struct gdbarch *, int, int,
2362                                          const char *);
2363 extern struct type *arch_boolean_type (struct gdbarch *, int, int,
2364                                        const char *);
2365 extern struct type *arch_float_type (struct gdbarch *, int, const char *,
2366                                      const struct floatformat **);
2367 extern struct type *arch_decfloat_type (struct gdbarch *, int, const char *);
2368 extern struct type *arch_pointer_type (struct gdbarch *, int, const char *,
2369                                        struct type *);
2370
2371 /* Helper functions to construct a struct or record type.  An
2372    initially empty type is created using arch_composite_type().
2373    Fields are then added using append_composite_type_field*().  A union
2374    type has its size set to the largest field.  A struct type has each
2375    field packed against the previous.  */
2376
2377 extern struct type *arch_composite_type (struct gdbarch *gdbarch,
2378                                          const char *name, enum type_code code);
2379 extern void append_composite_type_field (struct type *t, const char *name,
2380                                          struct type *field);
2381 extern void append_composite_type_field_aligned (struct type *t,
2382                                                  const char *name,
2383                                                  struct type *field,
2384                                                  int alignment);
2385 struct field *append_composite_type_field_raw (struct type *t, const char *name,
2386                                                struct type *field);
2387
2388 /* Helper functions to construct a bit flags type.  An initially empty
2389    type is created using arch_flag_type().  Flags are then added using
2390    append_flag_type_field() and append_flag_type_flag().  */
2391 extern struct type *arch_flags_type (struct gdbarch *gdbarch,
2392                                      const char *name, int bit);
2393 extern void append_flags_type_field (struct type *type,
2394                                      int start_bitpos, int nr_bits,
2395                                      struct type *field_type, const char *name);
2396 extern void append_flags_type_flag (struct type *type, int bitpos,
2397                                     const char *name);
2398
2399 extern void make_vector_type (struct type *array_type);
2400 extern struct type *init_vector_type (struct type *elt_type, int n);
2401
2402 extern struct type *lookup_reference_type (struct type *, enum type_code);
2403 extern struct type *lookup_lvalue_reference_type (struct type *);
2404 extern struct type *lookup_rvalue_reference_type (struct type *);
2405
2406
2407 extern struct type *make_reference_type (struct type *, struct type **,
2408                                          enum type_code);
2409
2410 extern struct type *make_cv_type (int, int, struct type *, struct type **);
2411
2412 extern struct type *make_restrict_type (struct type *);
2413
2414 extern struct type *make_unqualified_type (struct type *);
2415
2416 extern struct type *make_atomic_type (struct type *);
2417
2418 extern void replace_type (struct type *, struct type *);
2419
2420 extern type_instance_flags address_space_name_to_type_instance_flags
2421   (struct gdbarch *, const char *);
2422
2423 extern const char *address_space_type_instance_flags_to_name
2424   (struct gdbarch *, type_instance_flags);
2425
2426 extern struct type *make_type_with_address_space
2427   (struct type *type, type_instance_flags space_identifier);
2428
2429 extern struct type *lookup_memberptr_type (struct type *, struct type *);
2430
2431 extern struct type *lookup_methodptr_type (struct type *);
2432
2433 extern void smash_to_method_type (struct type *type, struct type *self_type,
2434                                   struct type *to_type, struct field *args,
2435                                   int nargs, int varargs);
2436
2437 extern void smash_to_memberptr_type (struct type *, struct type *,
2438                                      struct type *);
2439
2440 extern void smash_to_methodptr_type (struct type *, struct type *);
2441
2442 extern struct type *allocate_stub_method (struct type *);
2443
2444 extern const char *type_name_or_error (struct type *type);
2445
2446 struct struct_elt
2447 {
2448   /* The field of the element, or NULL if no element was found.  */
2449   struct field *field;
2450
2451   /* The bit offset of the element in the parent structure.  */
2452   LONGEST offset;
2453 };
2454
2455 /* Given a type TYPE, lookup the field and offset of the component named
2456    NAME.
2457
2458    TYPE can be either a struct or union, or a pointer or reference to
2459    a struct or union.  If it is a pointer or reference, its target
2460    type is automatically used.  Thus '.' and '->' are interchangable,
2461    as specified for the definitions of the expression element types
2462    STRUCTOP_STRUCT and STRUCTOP_PTR.
2463
2464    If NOERR is nonzero, the returned structure will have field set to
2465    NULL if there is no component named NAME.
2466
2467    If the component NAME is a field in an anonymous substructure of
2468    TYPE, the returned offset is a "global" offset relative to TYPE
2469    rather than an offset within the substructure.  */
2470
2471 extern struct_elt lookup_struct_elt (struct type *, const char *, int);
2472
2473 /* Given a type TYPE, lookup the type of the component named NAME.
2474
2475    TYPE can be either a struct or union, or a pointer or reference to
2476    a struct or union.  If it is a pointer or reference, its target
2477    type is automatically used.  Thus '.' and '->' are interchangable,
2478    as specified for the definitions of the expression element types
2479    STRUCTOP_STRUCT and STRUCTOP_PTR.
2480
2481    If NOERR is nonzero, return NULL if there is no component named
2482    NAME.  */
2483
2484 extern struct type *lookup_struct_elt_type (struct type *, const char *, int);
2485
2486 extern struct type *make_pointer_type (struct type *, struct type **);
2487
2488 extern struct type *lookup_pointer_type (struct type *);
2489
2490 extern struct type *make_function_type (struct type *, struct type **);
2491
2492 extern struct type *lookup_function_type (struct type *);
2493
2494 extern struct type *lookup_function_type_with_arguments (struct type *,
2495                                                          int,
2496                                                          struct type **);
2497
2498 extern struct type *create_static_range_type (struct type *, struct type *,
2499                                               LONGEST, LONGEST);
2500
2501
2502 extern struct type *create_array_type_with_stride
2503   (struct type *, struct type *, struct type *,
2504    struct dynamic_prop *, unsigned int);
2505
2506 extern struct type *create_range_type (struct type *, struct type *,
2507                                        const struct dynamic_prop *,
2508                                        const struct dynamic_prop *,
2509                                        LONGEST);
2510
2511 /* Like CREATE_RANGE_TYPE but also sets up a stride.  When BYTE_STRIDE_P
2512    is true the value in STRIDE is a byte stride, otherwise STRIDE is a bit
2513    stride.  */
2514
2515 extern struct type * create_range_type_with_stride
2516   (struct type *result_type, struct type *index_type,
2517    const struct dynamic_prop *low_bound,
2518    const struct dynamic_prop *high_bound, LONGEST bias,
2519    const struct dynamic_prop *stride, bool byte_stride_p);
2520
2521 extern struct type *create_array_type (struct type *, struct type *,
2522                                        struct type *);
2523
2524 extern struct type *lookup_array_range_type (struct type *, LONGEST, LONGEST);
2525
2526 extern struct type *create_string_type (struct type *, struct type *,
2527                                         struct type *);
2528 extern struct type *lookup_string_range_type (struct type *, LONGEST, LONGEST);
2529
2530 extern struct type *create_set_type (struct type *, struct type *);
2531
2532 extern struct type *lookup_unsigned_typename (const struct language_defn *,
2533                                               const char *);
2534
2535 extern struct type *lookup_signed_typename (const struct language_defn *,
2536                                             const char *);
2537
2538 extern ULONGEST get_unsigned_type_max (struct type *);
2539
2540 extern void get_signed_type_minmax (struct type *, LONGEST *, LONGEST *);
2541
2542 extern CORE_ADDR get_pointer_type_max (struct type *);
2543
2544 /* * Resolve all dynamic values of a type e.g. array bounds to static values.
2545    ADDR specifies the location of the variable the type is bound to.
2546    If TYPE has no dynamic properties return TYPE; otherwise a new type with
2547    static properties is returned.  */
2548 extern struct type *resolve_dynamic_type
2549   (struct type *type, gdb::array_view<const gdb_byte> valaddr,
2550    CORE_ADDR addr);
2551
2552 /* * Predicate if the type has dynamic values, which are not resolved yet.  */
2553 extern int is_dynamic_type (struct type *type);
2554
2555 extern struct type *check_typedef (struct type *);
2556
2557 extern void check_stub_method_group (struct type *, int);
2558
2559 extern char *gdb_mangle_name (struct type *, int, int);
2560
2561 extern struct type *lookup_typename (const struct language_defn *,
2562                                      const char *, const struct block *, int);
2563
2564 extern struct type *lookup_template_type (const char *, struct type *,
2565                                           const struct block *);
2566
2567 extern int get_vptr_fieldno (struct type *, struct type **);
2568
2569 /* Set *LOWP and *HIGHP to the lower and upper bounds of discrete type
2570    TYPE.
2571
2572    Return true if the two bounds are available, false otherwise.  */
2573
2574 extern bool get_discrete_bounds (struct type *type, LONGEST *lowp,
2575                                  LONGEST *highp);
2576
2577 /* If TYPE's low bound is a known constant, return it, else return nullopt.  */
2578
2579 extern gdb::optional<LONGEST> get_discrete_low_bound (struct type *type);
2580
2581 /* If TYPE's high bound is a known constant, return it, else return nullopt.  */
2582
2583 extern gdb::optional<LONGEST> get_discrete_high_bound (struct type *type);
2584
2585 /* Assuming TYPE is a simple, non-empty array type, compute its upper
2586    and lower bound.  Save the low bound into LOW_BOUND if not NULL.
2587    Save the high bound into HIGH_BOUND if not NULL.
2588
2589    Return true if the operation was successful.  Return false otherwise,
2590    in which case the values of LOW_BOUND and HIGH_BOUNDS are unmodified.  */
2591
2592 extern bool get_array_bounds (struct type *type, LONGEST *low_bound,
2593                               LONGEST *high_bound);
2594
2595 extern gdb::optional<LONGEST> discrete_position (struct type *type,
2596                                                  LONGEST val);
2597
2598 extern int class_types_same_p (const struct type *, const struct type *);
2599
2600 extern int is_ancestor (struct type *, struct type *);
2601
2602 extern int is_public_ancestor (struct type *, struct type *);
2603
2604 extern int is_unique_ancestor (struct type *, struct value *);
2605
2606 /* Overload resolution */
2607
2608 /* * Badness if parameter list length doesn't match arg list length.  */
2609 extern const struct rank LENGTH_MISMATCH_BADNESS;
2610
2611 /* * Dummy badness value for nonexistent parameter positions.  */
2612 extern const struct rank TOO_FEW_PARAMS_BADNESS;
2613 /* * Badness if no conversion among types.  */
2614 extern const struct rank INCOMPATIBLE_TYPE_BADNESS;
2615
2616 /* * Badness of an exact match.  */
2617 extern const struct rank EXACT_MATCH_BADNESS;
2618
2619 /* * Badness of integral promotion.  */
2620 extern const struct rank INTEGER_PROMOTION_BADNESS;
2621 /* * Badness of floating promotion.  */
2622 extern const struct rank FLOAT_PROMOTION_BADNESS;
2623 /* * Badness of converting a derived class pointer
2624    to a base class pointer.  */
2625 extern const struct rank BASE_PTR_CONVERSION_BADNESS;
2626 /* * Badness of integral conversion.  */
2627 extern const struct rank INTEGER_CONVERSION_BADNESS;
2628 /* * Badness of floating conversion.  */
2629 extern const struct rank FLOAT_CONVERSION_BADNESS;
2630 /* * Badness of integer<->floating conversions.  */
2631 extern const struct rank INT_FLOAT_CONVERSION_BADNESS;
2632 /* * Badness of conversion of pointer to void pointer.  */
2633 extern const struct rank VOID_PTR_CONVERSION_BADNESS;
2634 /* * Badness of conversion to boolean.  */
2635 extern const struct rank BOOL_CONVERSION_BADNESS;
2636 /* * Badness of converting derived to base class.  */
2637 extern const struct rank BASE_CONVERSION_BADNESS;
2638 /* * Badness of converting from non-reference to reference.  Subrank
2639    is the type of reference conversion being done.  */
2640 extern const struct rank REFERENCE_CONVERSION_BADNESS;
2641 extern const struct rank REFERENCE_SEE_THROUGH_BADNESS;
2642 /* * Conversion to rvalue reference.  */
2643 #define REFERENCE_CONVERSION_RVALUE 1
2644 /* * Conversion to const lvalue reference.  */
2645 #define REFERENCE_CONVERSION_CONST_LVALUE 2
2646
2647 /* * Badness of converting integer 0 to NULL pointer.  */
2648 extern const struct rank NULL_POINTER_CONVERSION;
2649 /* * Badness of cv-conversion.  Subrank is a flag describing the conversions
2650    being done.  */
2651 extern const struct rank CV_CONVERSION_BADNESS;
2652 #define CV_CONVERSION_CONST 1
2653 #define CV_CONVERSION_VOLATILE 2
2654
2655 /* Non-standard conversions allowed by the debugger */
2656
2657 /* * Converting a pointer to an int is usually OK.  */
2658 extern const struct rank NS_POINTER_CONVERSION_BADNESS;
2659
2660 /* * Badness of converting a (non-zero) integer constant
2661    to a pointer.  */
2662 extern const struct rank NS_INTEGER_POINTER_CONVERSION_BADNESS;
2663
2664 extern struct rank sum_ranks (struct rank a, struct rank b);
2665 extern int compare_ranks (struct rank a, struct rank b);
2666
2667 extern int compare_badness (const badness_vector &,
2668                             const badness_vector &);
2669
2670 extern badness_vector rank_function (gdb::array_view<type *> parms,
2671                                      gdb::array_view<value *> args);
2672
2673 extern struct rank rank_one_type (struct type *, struct type *,
2674                                   struct value *);
2675
2676 extern void recursive_dump_type (struct type *, int);
2677
2678 extern int field_is_static (struct field *);
2679
2680 /* printcmd.c */
2681
2682 extern void print_scalar_formatted (const gdb_byte *, struct type *,
2683                                     const struct value_print_options *,
2684                                     int, struct ui_file *);
2685
2686 extern int can_dereference (struct type *);
2687
2688 extern int is_integral_type (struct type *);
2689
2690 extern int is_floating_type (struct type *);
2691
2692 extern int is_scalar_type (struct type *type);
2693
2694 extern int is_scalar_type_recursive (struct type *);
2695
2696 extern int class_or_union_p (const struct type *);
2697
2698 extern void maintenance_print_type (const char *, int);
2699
2700 extern htab_up create_copied_types_hash (struct objfile *objfile);
2701
2702 extern struct type *copy_type_recursive (struct objfile *objfile,
2703                                          struct type *type,
2704                                          htab_t copied_types);
2705
2706 extern struct type *copy_type (const struct type *type);
2707
2708 extern bool types_equal (struct type *, struct type *);
2709
2710 extern bool types_deeply_equal (struct type *, struct type *);
2711
2712 extern int type_not_allocated (const struct type *type);
2713
2714 extern int type_not_associated (const struct type *type);
2715
2716 /* Return True if TYPE is a TYPE_CODE_FIXED_POINT or if TYPE is
2717    a range type whose base type is a TYPE_CODE_FIXED_POINT.  */
2718 extern bool is_fixed_point_type (struct type *type);
2719
2720 /* Allocate a fixed-point type info for TYPE.  This should only be
2721    called by INIT_FIXED_POINT_SPECIFIC.  */
2722 extern void allocate_fixed_point_type_info (struct type *type);
2723
2724 /* * When the type includes explicit byte ordering, return that.
2725    Otherwise, the byte ordering from gdbarch_byte_order for
2726    the type's arch is returned.  */
2727
2728 extern enum bfd_endian type_byte_order (const struct type *type);
2729
2730 /* A flag to enable printing of debugging information of C++
2731    overloading.  */
2732
2733 extern unsigned int overload_debug;
2734
2735 #endif /* GDBTYPES_H */
This page took 0.180373 seconds and 4 git commands to generate.