gdb/gdbtypes.h

   1 /* Internal type definitions for GDB.
   2
   3    Copyright (C) 1992-2014 Free Software Foundation, Inc.
   4
   5    Contributed by Cygnus Support, using pieces from other GDB modules.
   6
   7    This file is part of GDB.
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 3 of the License, or
  12    (at your option) any later version.
  13
  14    This program is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  21
  22 #if !defined (GDBTYPES_H)
  23 #define GDBTYPES_H 1
  24
  25 /* * \page gdbtypes GDB Types
  26
  27    GDB represents all the different kinds of types in programming
  28    languages using a common representation defined in gdbtypes.h.
  29
  30    The main data structure is main_type; it consists of a code (such
  31    as TYPE_CODE_ENUM for enumeration types), a number of
  32    generally-useful fields such as the printable name, and finally a
  33    field type_specific that is a union of info specific to particular
  34    languages or other special cases (such as calling convention).
  35
  36    The available type codes are defined in enum type_code.  The enum
  37    includes codes both for types that are common across a variety
  38    of languages, and for types that are language-specific.
  39
  40    Most accesses to type fields go through macros such as TYPE_CODE
  41    and TYPE_FN_FIELD_CONST.  These are written such that they can be
  42    used as both rvalues and lvalues.
  43  */
  44
  45 #include "hashtab.h"
  46
  47 /* Forward declarations for prototypes.  */
  48 struct field;
  49 struct block;
  50 struct value_print_options;
  51 struct language_defn;
  52
  53 /* These declarations are DWARF-specific as some of the gdbtypes.h data types
  54    are already DWARF-specific.  */
  55
  56 /* * Offset relative to the start of its containing CU (compilation
  57    unit).  */
  58 typedef struct
  59 {
  60   unsigned int cu_off;
  61 } cu_offset;
  62
  63 /* * Offset relative to the start of its .debug_info or .debug_types
  64    section.  */
  65
  66 typedef struct
  67 {
  68   unsigned int sect_off;
  69 } sect_offset;
  70
  71 /* Some macros for char-based bitfields.  */
  72
  73 #define B_SET(a,x)      ((a)[(x)>>3] |= (1 << ((x)&7)))
  74 #define B_CLR(a,x)      ((a)[(x)>>3] &= ~(1 << ((x)&7)))
  75 #define B_TST(a,x)      ((a)[(x)>>3] & (1 << ((x)&7)))
  76 #define B_TYPE          unsigned char
  77 #define B_BYTES(x)      ( 1 + ((x)>>3) )
  78 #define B_CLRALL(a,x)   memset ((a), 0, B_BYTES(x))
  79
  80 /* * Different kinds of data types are distinguished by the `code'
  81    field.  */
  82
  83 enum type_code
  84   {
  85     TYPE_CODE_BITSTRING = -1,   /**< Deprecated  */
  86     TYPE_CODE_UNDEF = 0,        /**< Not used; catches errors */
  87     TYPE_CODE_PTR,              /**< Pointer type */
  88
  89     /* * Array type with lower & upper bounds.
  90
  91        Regardless of the language, GDB represents multidimensional
  92        array types the way C does: as arrays of arrays.  So an
  93        instance of a GDB array type T can always be seen as a series
  94        of instances of TYPE_TARGET_TYPE (T) laid out sequentially in
  95        memory.
  96
  97        Row-major languages like C lay out multi-dimensional arrays so
  98        that incrementing the rightmost index in a subscripting
  99        expression results in the smallest change in the address of the
 100        element referred to.  Column-major languages like Fortran lay
 101        them out so that incrementing the leftmost index results in the
 102        smallest change.
 103
 104        This means that, in column-major languages, working our way
 105        from type to target type corresponds to working through indices
 106        from right to left, not left to right.  */
 107     TYPE_CODE_ARRAY,
 108
 109     TYPE_CODE_STRUCT,           /**< C struct or Pascal record */
 110     TYPE_CODE_UNION,            /**< C union or Pascal variant part */
 111     TYPE_CODE_ENUM,             /**< Enumeration type */
 112     TYPE_CODE_FLAGS,            /**< Bit flags type */
 113     TYPE_CODE_FUNC,             /**< Function type */
 114     TYPE_CODE_INT,              /**< Integer type */
 115
 116     /* * Floating type.  This is *NOT* a complex type.  Beware, there
 117        are parts of GDB which bogusly assume that TYPE_CODE_FLT can
 118        mean complex.  */
 119     TYPE_CODE_FLT,
 120
 121     /* * Void type.  The length field specifies the length (probably
 122        always one) which is used in pointer arithmetic involving
 123        pointers to this type, but actually dereferencing such a
 124        pointer is invalid; a void type has no length and no actual
 125        representation in memory or registers.  A pointer to a void
 126        type is a generic pointer.  */
 127     TYPE_CODE_VOID,
 128
 129     TYPE_CODE_SET,              /**< Pascal sets */
 130     TYPE_CODE_RANGE,            /**< Range (integers within spec'd bounds).  */
 131
 132     /* * A string type which is like an array of character but prints
 133        differently (at least for (the deleted) CHILL).  It does not
 134        contain a length field as Pascal strings (for many Pascals,
 135        anyway) do; if we want to deal with such strings, we should use
 136        a new type code.  */
 137     TYPE_CODE_STRING,
 138
 139     /* * Unknown type.  The length field is valid if we were able to
 140        deduce that much about the type, or 0 if we don't even know
 141        that.  */
 142     TYPE_CODE_ERROR,
 143
 144     /* C++ */
 145     TYPE_CODE_METHOD,           /**< Method type */
 146
 147     /* * Pointer-to-member-function type.  This describes how to access a
 148        particular member function of a class (possibly a virtual
 149        member function).  The representation may vary between different
 150        C++ ABIs.  */
 151     TYPE_CODE_METHODPTR,
 152
 153     /* * Pointer-to-member type.  This is the offset within a class to
 154        some particular data member.  The only currently supported
 155        representation uses an unbiased offset, with -1 representing
 156        NULL; this is used by the Itanium C++ ABI (used by GCC on all
 157        platforms).  */
 158     TYPE_CODE_MEMBERPTR,
 159
 160     TYPE_CODE_REF,              /**< C++ Reference types */
 161
 162     TYPE_CODE_CHAR,             /**< *real* character type */
 163
 164     /* * Boolean type.  0 is false, 1 is true, and other values are
 165        non-boolean (e.g. FORTRAN "logical" used as unsigned int).  */
 166     TYPE_CODE_BOOL,
 167
 168     /* Fortran */
 169     TYPE_CODE_COMPLEX,          /**< Complex float */
 170
 171     TYPE_CODE_TYPEDEF,
 172
 173     TYPE_CODE_NAMESPACE,        /**< C++ namespace.  */
 174
 175     TYPE_CODE_DECFLOAT,         /**< Decimal floating point.  */
 176
 177     TYPE_CODE_MODULE,           /**< Fortran module.  */
 178
 179     /* * Internal function type.  */
 180     TYPE_CODE_INTERNAL_FUNCTION
 181   };
 182
 183 /* * For now allow source to use TYPE_CODE_CLASS for C++ classes, as
 184    an alias for TYPE_CODE_STRUCT.  This is for DWARF, which has a
 185    distinct "class" attribute.  Perhaps we should actually have a
 186    separate TYPE_CODE so that we can print "class" or "struct"
 187    depending on what the debug info said.  It's not clear we should
 188    bother.  */
 189
 190 #define TYPE_CODE_CLASS TYPE_CODE_STRUCT
 191
 192 /* * Some constants representing each bit field in the main_type.  See
 193    the bit-field-specific macros, below, for documentation of each
 194    constant in this enum.  These enum values are only used with
 195    init_type.  Note that the values are chosen not to conflict with
 196    type_instance_flag_value; this lets init_type error-check its
 197    input.  */
 198
 199 enum type_flag_value
 200 {
 201   TYPE_FLAG_UNSIGNED = (1 << 8),
 202   TYPE_FLAG_NOSIGN = (1 << 9),
 203   TYPE_FLAG_STUB = (1 << 10),
 204   TYPE_FLAG_TARGET_STUB = (1 << 11),
 205   TYPE_FLAG_STATIC = (1 << 12),
 206   TYPE_FLAG_PROTOTYPED = (1 << 13),
 207   TYPE_FLAG_INCOMPLETE = (1 << 14),
 208   TYPE_FLAG_VARARGS = (1 << 15),
 209   TYPE_FLAG_VECTOR = (1 << 16),
 210   TYPE_FLAG_FIXED_INSTANCE = (1 << 17),
 211   TYPE_FLAG_STUB_SUPPORTED = (1 << 18),
 212   TYPE_FLAG_GNU_IFUNC = (1 << 19),
 213
 214   /* * Used for error-checking.  */
 215   TYPE_FLAG_MIN = TYPE_FLAG_UNSIGNED
 216 };
 217
 218 /* * Some bits for the type's instance_flags word.  See the macros
 219    below for documentation on each bit.  Note that if you add a value
 220    here, you must update the enum type_flag_value as well.  */
 221
 222 enum type_instance_flag_value
 223 {
 224   TYPE_INSTANCE_FLAG_CONST = (1 << 0),
 225   TYPE_INSTANCE_FLAG_VOLATILE = (1 << 1),
 226   TYPE_INSTANCE_FLAG_CODE_SPACE = (1 << 2),
 227   TYPE_INSTANCE_FLAG_DATA_SPACE = (1 << 3),
 228   TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 = (1 << 4),
 229   TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2 = (1 << 5),
 230   TYPE_INSTANCE_FLAG_NOTTEXT = (1 << 6),
 231   TYPE_INSTANCE_FLAG_RESTRICT = (1 << 7)
 232 };
 233
 234 /* * Unsigned integer type.  If this is not set for a TYPE_CODE_INT,
 235    the type is signed (unless TYPE_FLAG_NOSIGN (below) is set).  */
 236
 237 #define TYPE_UNSIGNED(t)        (TYPE_MAIN_TYPE (t)->flag_unsigned)
 238
 239 /* * No sign for this type.  In C++, "char", "signed char", and
 240    "unsigned char" are distinct types; so we need an extra flag to
 241    indicate the absence of a sign!  */
 242
 243 #define TYPE_NOSIGN(t)          (TYPE_MAIN_TYPE (t)->flag_nosign)
 244
 245 /* * This appears in a type's flags word if it is a stub type (e.g.,
 246    if someone referenced a type that wasn't defined in a source file
 247    via (struct sir_not_appearing_in_this_film *)).  */
 248
 249 #define TYPE_STUB(t)            (TYPE_MAIN_TYPE (t)->flag_stub)
 250
 251 /* * The target type of this type is a stub type, and this type needs
 252    to be updated if it gets un-stubbed in check_typedef.  Used for
 253    arrays and ranges, in which TYPE_LENGTH of the array/range gets set
 254    based on the TYPE_LENGTH of the target type.  Also, set for
 255    TYPE_CODE_TYPEDEF.  */
 256
 257 #define TYPE_TARGET_STUB(t)     (TYPE_MAIN_TYPE (t)->flag_target_stub)
 258
 259 /* * Static type.  If this is set, the corresponding type had
 260    a static modifier.
 261    Note: This may be unnecessary, since static data members
 262    are indicated by other means (bitpos == -1).  */
 263
 264 #define TYPE_STATIC(t)          (TYPE_MAIN_TYPE (t)->flag_static)
 265
 266 /* * This is a function type which appears to have a prototype.  We
 267    need this for function calls in order to tell us if it's necessary
 268    to coerce the args, or to just do the standard conversions.  This
 269    is used with a short field.  */
 270
 271 #define TYPE_PROTOTYPED(t)      (TYPE_MAIN_TYPE (t)->flag_prototyped)
 272
 273 /* * This flag is used to indicate that processing for this type
 274    is incomplete.
 275
 276    (Mostly intended for HP platforms, where class methods, for
 277    instance, can be encountered before their classes in the debug
 278    info; the incomplete type has to be marked so that the class and
 279    the method can be assigned correct types.)  */
 280
 281 #define TYPE_INCOMPLETE(t)      (TYPE_MAIN_TYPE (t)->flag_incomplete)
 282
 283 /* * FIXME drow/2002-06-03:  Only used for methods, but applies as well
 284    to functions.  */
 285
 286 #define TYPE_VARARGS(t)         (TYPE_MAIN_TYPE (t)->flag_varargs)
 287
 288 /* * Identify a vector type.  Gcc is handling this by adding an extra
 289    attribute to the array type.  We slurp that in as a new flag of a
 290    type.  This is used only in dwarf2read.c.  */
 291 #define TYPE_VECTOR(t)          (TYPE_MAIN_TYPE (t)->flag_vector)
 292
 293 /* * The debugging formats (especially STABS) do not contain enough
 294    information to represent all Ada types---especially those whose
 295    size depends on dynamic quantities.  Therefore, the GNAT Ada
 296    compiler includes extra information in the form of additional type
 297    definitions connected by naming conventions.  This flag indicates
 298    that the type is an ordinary (unencoded) GDB type that has been
 299    created from the necessary run-time information, and does not need
 300    further interpretation.  Optionally marks ordinary, fixed-size GDB
 301    type.  */
 302
 303 #define TYPE_FIXED_INSTANCE(t) (TYPE_MAIN_TYPE (t)->flag_fixed_instance)
 304
 305 /* * This debug target supports TYPE_STUB(t).  In the unsupported case
 306    we have to rely on NFIELDS to be zero etc., see TYPE_IS_OPAQUE().
 307    TYPE_STUB(t) with !TYPE_STUB_SUPPORTED(t) may exist if we only
 308    guessed the TYPE_STUB(t) value (see dwarfread.c).  */
 309
 310 #define TYPE_STUB_SUPPORTED(t)   (TYPE_MAIN_TYPE (t)->flag_stub_supported)
 311
 312 /* * Not textual.  By default, GDB treats all single byte integers as
 313    characters (or elements of strings) unless this flag is set.  */
 314
 315 #define TYPE_NOTTEXT(t) (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_NOTTEXT)
 316
 317 /* * Used only for TYPE_CODE_FUNC where it specifies the real function
 318    address is returned by this function call.  TYPE_TARGET_TYPE
 319    determines the final returned function type to be presented to
 320    user.  */
 321
 322 #define TYPE_GNU_IFUNC(t)       (TYPE_MAIN_TYPE (t)->flag_gnu_ifunc)
 323
 324 /* * Type owner.  If TYPE_OBJFILE_OWNED is true, the type is owned by
 325    the objfile retrieved as TYPE_OBJFILE.  Otherweise, the type is
 326    owned by an architecture; TYPE_OBJFILE is NULL in this case.  */
 327
 328 #define TYPE_OBJFILE_OWNED(t) (TYPE_MAIN_TYPE (t)->flag_objfile_owned)
 329 #define TYPE_OWNER(t) TYPE_MAIN_TYPE(t)->owner
 330 #define TYPE_OBJFILE(t) (TYPE_OBJFILE_OWNED(t)? TYPE_OWNER(t).objfile : NULL)
 331
 332 /* * True if this type was declared using the "class" keyword.  This is
 333    only valid for C++ structure types, and only used for displaying
 334    the type.  If false, the structure was declared as a "struct".  */
 335
 336 #define TYPE_DECLARED_CLASS(t) (TYPE_MAIN_TYPE (t)->flag_declared_class)
 337
 338 /* * True if this type is a "flag" enum.  A flag enum is one where all
 339    the values are pairwise disjoint when "and"ed together.  This
 340    affects how enum values are printed.  */
 341
 342 #define TYPE_FLAG_ENUM(t) (TYPE_MAIN_TYPE (t)->flag_flag_enum)
 343
 344 /* * Constant type.  If this is set, the corresponding type has a
 345    const modifier.  */
 346
 347 #define TYPE_CONST(t) (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_CONST)
 348
 349 /* * Volatile type.  If this is set, the corresponding type has a
 350    volatile modifier.  */
 351
 352 #define TYPE_VOLATILE(t) \
 353   (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_VOLATILE)
 354
 355 /* * Restrict type.  If this is set, the corresponding type has a
 356    restrict modifier.  */
 357
 358 #define TYPE_RESTRICT(t) \
 359   (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_RESTRICT)
 360
 361 /* * Instruction-space delimited type.  This is for Harvard architectures
 362    which have separate instruction and data address spaces (and perhaps
 363    others).
 364
 365    GDB usually defines a flat address space that is a superset of the
 366    architecture's two (or more) address spaces, but this is an extension
 367    of the architecture's model.
 368
 369    If TYPE_FLAG_INST is set, an object of the corresponding type
 370    resides in instruction memory, even if its address (in the extended
 371    flat address space) does not reflect this.
 372
 373    Similarly, if TYPE_FLAG_DATA is set, then an object of the
 374    corresponding type resides in the data memory space, even if
 375    this is not indicated by its (flat address space) address.
 376
 377    If neither flag is set, the default space for functions / methods
 378    is instruction space, and for data objects is data memory.  */
 379
 380 #define TYPE_CODE_SPACE(t) \
 381   (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_CODE_SPACE)
 382
 383 #define TYPE_DATA_SPACE(t) \
 384   (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_DATA_SPACE)
 385
 386 /* * Address class flags.  Some environments provide for pointers
 387    whose size is different from that of a normal pointer or address
 388    types where the bits are interpreted differently than normal
 389    addresses.  The TYPE_FLAG_ADDRESS_CLASS_n flags may be used in
 390    target specific ways to represent these different types of address
 391    classes.  */
 392
 393 #define TYPE_ADDRESS_CLASS_1(t) (TYPE_INSTANCE_FLAGS(t) \
 394                                  & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1)
 395 #define TYPE_ADDRESS_CLASS_2(t) (TYPE_INSTANCE_FLAGS(t) \
 396                                  & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
 397 #define TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL \
 398   (TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 | TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
 399 #define TYPE_ADDRESS_CLASS_ALL(t) (TYPE_INSTANCE_FLAGS(t) \
 400                                    & TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL)
 401
 402 /* * Determine which field of the union main_type.fields[x].loc is
 403    used.  */
 404
 405 enum field_loc_kind
 406   {
 407     FIELD_LOC_KIND_BITPOS,      /**< bitpos */
 408     FIELD_LOC_KIND_ENUMVAL,     /**< enumval */
 409     FIELD_LOC_KIND_PHYSADDR,    /**< physaddr */
 410     FIELD_LOC_KIND_PHYSNAME,    /**< physname */
 411     FIELD_LOC_KIND_DWARF_BLOCK  /**< dwarf_block */
 412   };
 413
 414 /* * A discriminant to determine which field in the
 415    main_type.type_specific union is being used, if any.
 416
 417    For types such as TYPE_CODE_FLT or TYPE_CODE_FUNC, the use of this
 418    discriminant is really redundant, as we know from the type code
 419    which field is going to be used.  As such, it would be possible to
 420    reduce the size of this enum in order to save a bit or two for
 421    other fields of struct main_type.  But, since we still have extra
 422    room , and for the sake of clarity and consistency, we treat all fields
 423    of the union the same way.  */
 424
 425 enum type_specific_kind
 426 {
 427   TYPE_SPECIFIC_NONE,
 428   TYPE_SPECIFIC_CPLUS_STUFF,
 429   TYPE_SPECIFIC_GNAT_STUFF,
 430   TYPE_SPECIFIC_FLOATFORMAT,
 431   TYPE_SPECIFIC_FUNC
 432 };
 433
 434 /* * Main structure representing a type in GDB.
 435
 436    This structure is space-critical.  Its layout has been tweaked to
 437    reduce the space used.  */
 438
 439 struct main_type
 440 {
 441   /* * Code for kind of type.  */
 442
 443   ENUM_BITFIELD(type_code) code : 8;
 444
 445   /* * Flags about this type.  These fields appear at this location
 446      because they packs nicely here.  See the TYPE_* macros for
 447      documentation about these fields.  */
 448
 449   unsigned int flag_unsigned : 1;
 450   unsigned int flag_nosign : 1;
 451   unsigned int flag_stub : 1;
 452   unsigned int flag_target_stub : 1;
 453   unsigned int flag_static : 1;
 454   unsigned int flag_prototyped : 1;
 455   unsigned int flag_incomplete : 1;
 456   unsigned int flag_varargs : 1;
 457   unsigned int flag_vector : 1;
 458   unsigned int flag_stub_supported : 1;
 459   unsigned int flag_gnu_ifunc : 1;
 460   unsigned int flag_fixed_instance : 1;
 461   unsigned int flag_objfile_owned : 1;
 462
 463   /* * True if this type was declared with "class" rather than
 464      "struct".  */
 465
 466   unsigned int flag_declared_class : 1;
 467
 468   /* * True if this is an enum type with disjoint values.  This
 469      affects how the enum is printed.  */
 470
 471   unsigned int flag_flag_enum : 1;
 472
 473   /* * A discriminant telling us which field of the type_specific
 474      union is being used for this type, if any.  */
 475
 476   ENUM_BITFIELD(type_specific_kind) type_specific_field : 3;
 477
 478   /* * Number of fields described for this type.  This field appears
 479      at this location because it packs nicely here.  */
 480
 481   short nfields;
 482
 483   /* * Field number of the virtual function table pointer in
 484      VPTR_BASETYPE.  If -1, we were unable to find the virtual
 485      function table pointer in initial symbol reading, and
 486      get_vptr_fieldno should be called to find it if possible.
 487      get_vptr_fieldno will update this field if possible.  Otherwise
 488      the value is left at -1.
 489
 490      Unused if this type does not have virtual functions.
 491
 492      This field appears at this location because it packs nicely here.  */
 493
 494   short vptr_fieldno;
 495
 496   /* * Name of this type, or NULL if none.
 497
 498      This is used for printing only, except by poorly designed C++
 499      code.  For looking up a name, look for a symbol in the
 500      VAR_DOMAIN.  This is generally allocated in the objfile's
 501      obstack.  However coffread.c uses malloc.  */
 502
 503   const char *name;
 504
 505   /* * Tag name for this type, or NULL if none.  This means that the
 506      name of the type consists of a keyword followed by the tag name.
 507      Which keyword is determined by the type code ("struct" for
 508      TYPE_CODE_STRUCT, etc.).  As far as I know C/C++ are the only
 509      languages with this feature.
 510
 511      This is used for printing only, except by poorly designed C++ code.
 512      For looking up a name, look for a symbol in the STRUCT_DOMAIN.
 513      One more legitimate use is that if TYPE_FLAG_STUB is set, this is
 514      the name to use to look for definitions in other files.  */
 515
 516   const char *tag_name;
 517
 518   /* * Every type is now associated with a particular objfile, and the
 519      type is allocated on the objfile_obstack for that objfile.  One
 520      problem however, is that there are times when gdb allocates new
 521      types while it is not in the process of reading symbols from a
 522      particular objfile.  Fortunately, these happen when the type
 523      being created is a derived type of an existing type, such as in
 524      lookup_pointer_type().  So we can just allocate the new type
 525      using the same objfile as the existing type, but to do this we
 526      need a backpointer to the objfile from the existing type.  Yes
 527      this is somewhat ugly, but without major overhaul of the internal
 528      type system, it can't be avoided for now.  */
 529
 530   union type_owner
 531     {
 532       struct objfile *objfile;
 533       struct gdbarch *gdbarch;
 534     } owner;
 535
 536   /* * For a pointer type, describes the type of object pointed to.
 537      - For an array type, describes the type of the elements.
 538      - For a function or method type, describes the type of the return value.
 539      - For a range type, describes the type of the full range.
 540      - For a complex type, describes the type of each coordinate.
 541      - For a special record or union type encoding a dynamic-sized type
 542      in GNAT, a memoized pointer to a corresponding static version of
 543      the type.
 544      - Unused otherwise.  */
 545
 546   struct type *target_type;
 547
 548   /* * For structure and union types, a description of each field.
 549      For set and pascal array types, there is one "field",
 550      whose type is the domain type of the set or array.
 551      For range types, there are two "fields",
 552      the minimum and maximum values (both inclusive).
 553      For enum types, each possible value is described by one "field".
 554      For a function or method type, a "field" for each parameter.
 555      For C++ classes, there is one field for each base class (if it is
 556      a derived class) plus one field for each class data member.  Member
 557      functions are recorded elsewhere.
 558
 559      Using a pointer to a separate array of fields
 560      allows all types to have the same size, which is useful
 561      because we can allocate the space for a type before
 562      we know what to put in it.  */
 563
 564   union
 565   {
 566     struct field
 567     {
 568       union field_location
 569       {
 570         /* * Position of this field, counting in bits from start of
 571            containing structure.  For gdbarch_bits_big_endian=1
 572            targets, it is the bit offset to the MSB.  For
 573            gdbarch_bits_big_endian=0 targets, it is the bit offset to
 574            the LSB.  */
 575
 576         int bitpos;
 577
 578         /* * Enum value.  */
 579         LONGEST enumval;
 580
 581         /* * For a static field, if TYPE_FIELD_STATIC_HAS_ADDR then
 582            physaddr is the location (in the target) of the static
 583            field.  Otherwise, physname is the mangled label of the
 584            static field.  */
 585
 586         CORE_ADDR physaddr;
 587         const char *physname;
 588
 589         /* * The field location can be computed by evaluating the
 590            following DWARF block.  Its DATA is allocated on
 591            objfile_obstack - no CU load is needed to access it.  */
 592
 593         struct dwarf2_locexpr_baton *dwarf_block;
 594       }
 595       loc;
 596
 597       /* * For a function or member type, this is 1 if the argument is
 598          marked artificial.  Artificial arguments should not be shown
 599          to the user.  For TYPE_CODE_RANGE it is set if the specific
 600          bound is not defined.  */
 601       unsigned int artificial : 1;
 602
 603       /* * Discriminant for union field_location.  */
 604       ENUM_BITFIELD(field_loc_kind) loc_kind : 3;
 605
 606       /* * Size of this field, in bits, or zero if not packed.
 607          If non-zero in an array type, indicates the element size in
 608          bits (used only in Ada at the moment).
 609          For an unpacked field, the field's type's length
 610          says how many bytes the field occupies.  */
 611
 612       unsigned int bitsize : 28;
 613
 614       /* * In a struct or union type, type of this field.
 615          - In a function or member type, type of this argument.
 616          - In an array type, the domain-type of the array.  */
 617
 618       struct type *type;
 619
 620       /* * Name of field, value or argument.
 621          NULL for range bounds, array domains, and member function
 622          arguments.  */
 623
 624       const char *name;
 625     } *fields;
 626
 627     /* * Union member used for range types.  */
 628
 629     struct range_bounds
 630     {
 631       /* * Low bound of range.  */
 632
 633       LONGEST low;
 634
 635       /* * High bound of range.  */
 636
 637       LONGEST high;
 638
 639       /* * Flags indicating whether the values of low and high are
 640          valid.  When true, the respective range value is
 641          undefined.  Currently used only for FORTRAN arrays.  */
 642
 643       char low_undefined;
 644       char high_undefined;
 645
 646     } *bounds;
 647
 648   } flds_bnds;
 649
 650   /* * For types with virtual functions (TYPE_CODE_STRUCT),
 651      VPTR_BASETYPE is the base class which defined the virtual
 652      function table pointer.
 653
 654      For types that are pointer to member types (TYPE_CODE_METHODPTR,
 655      TYPE_CODE_MEMBERPTR), VPTR_BASETYPE is the type that this pointer
 656      is a member of.
 657
 658      For method types (TYPE_CODE_METHOD), VPTR_BASETYPE is the aggregate
 659      type that contains the method.
 660
 661      Unused otherwise.  */
 662
 663   struct type *vptr_basetype;
 664
 665   /* * Slot to point to additional language-specific fields of this
 666      type.  */
 667
 668   union type_specific
 669   {
 670     /* * CPLUS_STUFF is for TYPE_CODE_STRUCT.  It is initialized to
 671        point to cplus_struct_default, a default static instance of a
 672        struct cplus_struct_type.  */
 673
 674     struct cplus_struct_type *cplus_stuff;
 675
 676     /* * GNAT_STUFF is for types for which the GNAT Ada compiler
 677        provides additional information.  */
 678
 679     struct gnat_aux_type *gnat_stuff;
 680
 681     /* * FLOATFORMAT is for TYPE_CODE_FLT.  It is a pointer to two
 682        floatformat objects that describe the floating-point value
 683        that resides within the type.  The first is for big endian
 684        targets and the second is for little endian targets.  */
 685
 686     const struct floatformat **floatformat;
 687
 688     /* * For TYPE_CODE_FUNC types,  */
 689
 690     struct func_type *func_stuff;
 691   } type_specific;
 692 };
 693
 694 /* * A ``struct type'' describes a particular instance of a type, with
 695    some particular qualification.  */
 696
 697 struct type
 698 {
 699   /* * Type that is a pointer to this type.
 700      NULL if no such pointer-to type is known yet.
 701      The debugger may add the address of such a type
 702      if it has to construct one later.  */
 703
 704   struct type *pointer_type;
 705
 706   /* * C++: also need a reference type.  */
 707
 708   struct type *reference_type;
 709
 710   /* * Variant chain.  This points to a type that differs from this
 711      one only in qualifiers and length.  Currently, the possible
 712      qualifiers are const, volatile, code-space, data-space, and
 713      address class.  The length may differ only when one of the
 714      address class flags are set.  The variants are linked in a
 715      circular ring and share MAIN_TYPE.  */
 716
 717   struct type *chain;
 718
 719   /* * Flags specific to this instance of the type, indicating where
 720      on the ring we are.
 721
 722      For TYPE_CODE_TYPEDEF the flags of the typedef type should be
 723      binary or-ed with the target type, with a special case for
 724      address class and space class.  For example if this typedef does
 725      not specify any new qualifiers, TYPE_INSTANCE_FLAGS is 0 and the
 726      instance flags are completely inherited from the target type.  No
 727      qualifiers can be cleared by the typedef.  See also
 728      check_typedef.  */
 729   int instance_flags;
 730
 731   /* * Length of storage for a value of this type.  This is what
 732      sizeof(type) would return; use it for address arithmetic, memory
 733      reads and writes, etc.  This size includes padding.  For example,
 734      an i386 extended-precision floating point value really only
 735      occupies ten bytes, but most ABI's declare its size to be 12
 736      bytes, to preserve alignment.  A `struct type' representing such
 737      a floating-point type would have a `length' value of 12, even
 738      though the last two bytes are unused.
 739
 740      There's a bit of a host/target mess here, if you're concerned
 741      about machines whose bytes aren't eight bits long, or who don't
 742      have byte-addressed memory.  Various places pass this to memcpy
 743      and such, meaning it must be in units of host bytes.  Various
 744      other places expect they can calculate addresses by adding it
 745      and such, meaning it must be in units of target bytes.  For
 746      some DSP targets, in which HOST_CHAR_BIT will (presumably) be 8
 747      and TARGET_CHAR_BIT will be (say) 32, this is a problem.
 748
 749      One fix would be to make this field in bits (requiring that it
 750      always be a multiple of HOST_CHAR_BIT and TARGET_CHAR_BIT) ---
 751      the other choice would be to make it consistently in units of
 752      HOST_CHAR_BIT.  However, this would still fail to address
 753      machines based on a ternary or decimal representation.  */
 754
 755   unsigned length;
 756
 757   /* * Core type, shared by a group of qualified types.  */
 758
 759   struct main_type *main_type;
 760 };
 761
 762 #define NULL_TYPE ((struct type *) 0)
 763
 764 /* * C++ language-specific information for TYPE_CODE_STRUCT and
 765    TYPE_CODE_UNION nodes.  */
 766
 767 struct cplus_struct_type
 768   {
 769     /* * Number of base classes this type derives from.  The
 770        baseclasses are stored in the first N_BASECLASSES fields
 771        (i.e. the `fields' field of the struct type).  I think only the
 772        `type' field of such a field has any meaning.  */
 773
 774     short n_baseclasses;
 775
 776     /* * Number of methods with unique names.  All overloaded methods
 777        with the same name count only once.  */
 778
 779     short nfn_fields;
 780
 781     /* * Number of template arguments.  */
 782
 783     unsigned short n_template_arguments;
 784
 785     /* * One if this struct is a dynamic class, as defined by the
 786        Itanium C++ ABI: if it requires a virtual table pointer,
 787        because it or any of its base classes have one or more virtual
 788        member functions or virtual base classes.  Minus one if not
 789        dynamic.  Zero if not yet computed.  */
 790
 791     int is_dynamic : 2;
 792
 793     /* * Non-zero if this type came from a Java CU.  */
 794
 795     unsigned int is_java : 1;
 796
 797     /* * For derived classes, the number of base classes is given by
 798        n_baseclasses and virtual_field_bits is a bit vector containing
 799        one bit per base class.  If the base class is virtual, the
 800        corresponding bit will be set.
 801        I.E, given:
 802
 803        class A{};
 804        class B{};
 805        class C : public B, public virtual A {};
 806
 807        B is a baseclass of C; A is a virtual baseclass for C.
 808        This is a C++ 2.0 language feature.  */
 809
 810     B_TYPE *virtual_field_bits;
 811
 812     /* * For classes with private fields, the number of fields is
 813        given by nfields and private_field_bits is a bit vector
 814        containing one bit per field.
 815
 816        If the field is private, the corresponding bit will be set.  */
 817
 818     B_TYPE *private_field_bits;
 819
 820     /* * For classes with protected fields, the number of fields is
 821        given by nfields and protected_field_bits is a bit vector
 822        containing one bit per field.
 823
 824        If the field is private, the corresponding bit will be set.  */
 825
 826     B_TYPE *protected_field_bits;
 827
 828     /* * For classes with fields to be ignored, either this is
 829        optimized out or this field has length 0.  */
 830
 831     B_TYPE *ignore_field_bits;
 832
 833     /* * For classes, structures, and unions, a description of each
 834        field, which consists of an overloaded name, followed by the
 835        types of arguments that the method expects, and then the name
 836        after it has been renamed to make it distinct.
 837
 838        fn_fieldlists points to an array of nfn_fields of these.  */
 839
 840     struct fn_fieldlist
 841       {
 842
 843         /* * The overloaded name.
 844            This is generally allocated in the objfile's obstack.
 845            However stabsread.c sometimes uses malloc.  */
 846
 847         const char *name;
 848
 849         /* * The number of methods with this name.  */
 850
 851         int length;
 852
 853         /* * The list of methods.  */
 854
 855         struct fn_field
 856           {
 857
 858             /* * If is_stub is clear, this is the mangled name which
 859                we can look up to find the address of the method
 860                (FIXME: it would be cleaner to have a pointer to the
 861                struct symbol here instead).
 862
 863                If is_stub is set, this is the portion of the mangled
 864                name which specifies the arguments.  For example, "ii",
 865                if there are two int arguments, or "" if there are no
 866                arguments.  See gdb_mangle_name for the conversion from
 867                this format to the one used if is_stub is clear.  */
 868
 869             const char *physname;
 870
 871             /* * The function type for the method.
 872
 873                (This comment used to say "The return value of the
 874                method", but that's wrong.  The function type is
 875                expected here, i.e. something with TYPE_CODE_FUNC, and
 876                *not* the return-value type).  */
 877
 878             struct type *type;
 879
 880             /* * For virtual functions.
 881                First baseclass that defines this virtual function.  */
 882
 883             struct type *fcontext;
 884
 885             /* Attributes.  */
 886
 887             unsigned int is_const:1;
 888             unsigned int is_volatile:1;
 889             unsigned int is_private:1;
 890             unsigned int is_protected:1;
 891             unsigned int is_public:1;
 892             unsigned int is_abstract:1;
 893             unsigned int is_static:1;
 894             unsigned int is_final:1;
 895             unsigned int is_synchronized:1;
 896             unsigned int is_native:1;
 897             unsigned int is_artificial:1;
 898
 899             /* * A stub method only has some fields valid (but they
 900                are enough to reconstruct the rest of the fields).  */
 901
 902             unsigned int is_stub:1;
 903
 904             /* * True if this function is a constructor, false
 905                otherwise.  */
 906
 907             unsigned int is_constructor : 1;
 908
 909             /* * Unused.  */
 910
 911             unsigned int dummy:3;
 912
 913             /* * Index into that baseclass's virtual function table,
 914                minus 2; else if static: VOFFSET_STATIC; else: 0.  */
 915
 916             unsigned int voffset:16;
 917
 918 #define VOFFSET_STATIC 1
 919
 920           }
 921          *fn_fields;
 922
 923       }
 924      *fn_fieldlists;
 925
 926     /* * typedefs defined inside this class.  typedef_field points to
 927        an array of typedef_field_count elements.  */
 928
 929     struct typedef_field
 930       {
 931         /* * Unqualified name to be prefixed by owning class qualified
 932            name.  */
 933
 934         const char *name;
 935
 936         /* * Type this typedef named NAME represents.  */
 937
 938         struct type *type;
 939       }
 940     *typedef_field;
 941     unsigned typedef_field_count;
 942
 943     /* * The template arguments.  This is an array with
 944        N_TEMPLATE_ARGUMENTS elements.  This is NULL for non-template
 945        classes.  */
 946
 947     struct symbol **template_arguments;
 948   };
 949
 950 /* * Struct used to store conversion rankings.  */
 951
 952 struct rank
 953   {
 954     short rank;
 955
 956     /* * When two conversions are of the same type and therefore have
 957        the same rank, subrank is used to differentiate the two.
 958
 959        Eg: Two derived-class-pointer to base-class-pointer conversions
 960        would both have base pointer conversion rank, but the
 961        conversion with the shorter distance to the ancestor is
 962        preferable.  'subrank' would be used to reflect that.  */
 963
 964     short subrank;
 965   };
 966
 967 /* * Struct used for ranking a function for overload resolution.  */
 968
 969 struct badness_vector
 970   {
 971     int length;
 972     struct rank *rank;
 973   };
 974
 975 /* * GNAT Ada-specific information for various Ada types.  */
 976
 977 struct gnat_aux_type
 978   {
 979     /* * Parallel type used to encode information about dynamic types
 980        used in Ada (such as variant records, variable-size array,
 981        etc).  */
 982     struct type* descriptive_type;
 983   };
 984
 985 /* * For TYPE_CODE_FUNC types.  */
 986
 987 struct func_type
 988   {
 989     /* * The calling convention for targets supporting multiple ABIs.
 990        Right now this is only fetched from the Dwarf-2
 991        DW_AT_calling_convention attribute.  */
 992
 993     unsigned calling_convention;
 994
 995     /* * Only those DW_TAG_GNU_call_site's in this function that have
 996        DW_AT_GNU_tail_call set are linked in this list.  Function
 997        without its tail call list complete
 998        (DW_AT_GNU_all_tail_call_sites or its superset
 999        DW_AT_GNU_all_call_sites) has TAIL_CALL_LIST NULL, even if some
1000        DW_TAG_GNU_call_site's exist in such function. */
1001
1002     struct call_site *tail_call_list;
1003   };
1004
1005 /* struct call_site_parameter can be referenced in callees by several ways.  */
1006
1007 enum call_site_parameter_kind
1008 {
1009   /* * Use field call_site_parameter.u.dwarf_reg.  */
1010   CALL_SITE_PARAMETER_DWARF_REG,
1011
1012   /* * Use field call_site_parameter.u.fb_offset.  */
1013   CALL_SITE_PARAMETER_FB_OFFSET,
1014
1015   /* * Use field call_site_parameter.u.param_offset.  */
1016   CALL_SITE_PARAMETER_PARAM_OFFSET
1017 };
1018
1019 /* * A place where a function gets called from, represented by
1020    DW_TAG_GNU_call_site.  It can be looked up from
1021    symtab->call_site_htab.  */
1022
1023 struct call_site
1024   {
1025     /* * Address of the first instruction after this call.  It must be
1026        the first field as we overload core_addr_hash and core_addr_eq
1027        for it.  */
1028
1029     CORE_ADDR pc;
1030
1031     /* * List successor with head in FUNC_TYPE.TAIL_CALL_LIST.  */
1032
1033     struct call_site *tail_call_next;
1034
1035     /* * Describe DW_AT_GNU_call_site_target.  Missing attribute uses
1036        FIELD_LOC_KIND_DWARF_BLOCK with FIELD_DWARF_BLOCK == NULL.  */
1037
1038     struct
1039       {
1040         union field_location loc;
1041
1042         /* * Discriminant for union field_location.  */
1043
1044         ENUM_BITFIELD(field_loc_kind) loc_kind : 3;
1045       }
1046     target;
1047
1048     /* * Size of the PARAMETER array.  */
1049
1050     unsigned parameter_count;
1051
1052     /* * CU of the function where the call is located.  It gets used
1053        for DWARF blocks execution in the parameter array below.  */
1054
1055     struct dwarf2_per_cu_data *per_cu;
1056
1057     /* * Describe DW_TAG_GNU_call_site's DW_TAG_formal_parameter.  */
1058
1059     struct call_site_parameter
1060       {
1061         ENUM_BITFIELD (call_site_parameter_kind) kind : 2;
1062
1063         union call_site_parameter_u
1064           {
1065             /* * DW_TAG_formal_parameter's DW_AT_location's DW_OP_regX
1066                as DWARF register number, for register passed
1067                parameters.  */
1068
1069             int dwarf_reg;
1070
1071             /* * Offset from the callee's frame base, for stack passed
1072                parameters.  This equals offset from the caller's stack
1073                pointer.  */
1074
1075             CORE_ADDR fb_offset;
1076
1077             /* * Offset relative to the start of this PER_CU to
1078                DW_TAG_formal_parameter which is referenced by both
1079                caller and the callee.  */
1080
1081             cu_offset param_offset;
1082           }
1083         u;
1084
1085         /* * DW_TAG_formal_parameter's DW_AT_GNU_call_site_value.  It
1086            is never NULL.  */
1087
1088         const gdb_byte *value;
1089         size_t value_size;
1090
1091         /* * DW_TAG_formal_parameter's DW_AT_GNU_call_site_data_value.
1092            It may be NULL if not provided by DWARF.  */
1093
1094         const gdb_byte *data_value;
1095         size_t data_value_size;
1096       }
1097     parameter[1];
1098   };
1099
1100 /* * The default value of TYPE_CPLUS_SPECIFIC(T) points to this shared
1101    static structure.  */
1102
1103 extern const struct cplus_struct_type cplus_struct_default;
1104
1105 extern void allocate_cplus_struct_type (struct type *);
1106
1107 #define INIT_CPLUS_SPECIFIC(type) \
1108   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_CPLUS_STUFF, \
1109    TYPE_RAW_CPLUS_SPECIFIC (type) = (struct cplus_struct_type*) \
1110    &cplus_struct_default)
1111
1112 #define ALLOCATE_CPLUS_STRUCT_TYPE(type) allocate_cplus_struct_type (type)
1113
1114 #define HAVE_CPLUS_STRUCT(type) \
1115   (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_CPLUS_STUFF \
1116    && TYPE_RAW_CPLUS_SPECIFIC (type) !=  &cplus_struct_default)
1117
1118 extern const struct gnat_aux_type gnat_aux_default;
1119
1120 extern void allocate_gnat_aux_type (struct type *);
1121
1122 #define INIT_GNAT_SPECIFIC(type) \
1123   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_GNAT_STUFF, \
1124    TYPE_GNAT_SPECIFIC (type) = (struct gnat_aux_type *) &gnat_aux_default)
1125 #define ALLOCATE_GNAT_AUX_TYPE(type) allocate_gnat_aux_type (type)
1126 /* * A macro that returns non-zero if the type-specific data should be
1127    read as "gnat-stuff".  */
1128 #define HAVE_GNAT_AUX_INFO(type) \
1129   (TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF)
1130
1131 #define INIT_FUNC_SPECIFIC(type)                                               \
1132   (TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_FUNC,                            \
1133    TYPE_MAIN_TYPE (type)->type_specific.func_stuff                             \
1134      = TYPE_ZALLOC (type,                                                      \
1135                     sizeof (*TYPE_MAIN_TYPE (type)->type_specific.func_stuff)))
1136
1137 #define TYPE_INSTANCE_FLAGS(thistype) (thistype)->instance_flags
1138 #define TYPE_MAIN_TYPE(thistype) (thistype)->main_type
1139 #define TYPE_NAME(thistype) TYPE_MAIN_TYPE(thistype)->name
1140 #define TYPE_TAG_NAME(type) TYPE_MAIN_TYPE(type)->tag_name
1141 #define TYPE_TARGET_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->target_type
1142 #define TYPE_POINTER_TYPE(thistype) (thistype)->pointer_type
1143 #define TYPE_REFERENCE_TYPE(thistype) (thistype)->reference_type
1144 #define TYPE_CHAIN(thistype) (thistype)->chain
1145 /* * Note that if thistype is a TYPEDEF type, you have to call check_typedef.
1146    But check_typedef does set the TYPE_LENGTH of the TYPEDEF type,
1147    so you only have to call check_typedef once.  Since allocate_value
1148    calls check_typedef, TYPE_LENGTH (VALUE_TYPE (X)) is safe.  */
1149 #define TYPE_LENGTH(thistype) (thistype)->length
1150 /* * Note that TYPE_CODE can be TYPE_CODE_TYPEDEF, so if you want the real
1151    type, you need to do TYPE_CODE (check_type (this_type)).  */
1152 #define TYPE_CODE(thistype) TYPE_MAIN_TYPE(thistype)->code
1153 #define TYPE_NFIELDS(thistype) TYPE_MAIN_TYPE(thistype)->nfields
1154 #define TYPE_FIELDS(thistype) TYPE_MAIN_TYPE(thistype)->flds_bnds.fields
1155
1156 #define TYPE_INDEX_TYPE(type) TYPE_FIELD_TYPE (type, 0)
1157 #define TYPE_RANGE_DATA(thistype) TYPE_MAIN_TYPE(thistype)->flds_bnds.bounds
1158 #define TYPE_LOW_BOUND(range_type) TYPE_RANGE_DATA(range_type)->low
1159 #define TYPE_HIGH_BOUND(range_type) TYPE_RANGE_DATA(range_type)->high
1160 #define TYPE_LOW_BOUND_UNDEFINED(range_type) \
1161    TYPE_RANGE_DATA(range_type)->low_undefined
1162 #define TYPE_HIGH_BOUND_UNDEFINED(range_type) \
1163    TYPE_RANGE_DATA(range_type)->high_undefined
1164
1165 /* Moto-specific stuff for FORTRAN arrays.  */
1166
1167 #define TYPE_ARRAY_UPPER_BOUND_IS_UNDEFINED(arraytype) \
1168    TYPE_HIGH_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
1169 #define TYPE_ARRAY_LOWER_BOUND_IS_UNDEFINED(arraytype) \
1170    TYPE_LOW_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
1171
1172 #define TYPE_ARRAY_UPPER_BOUND_VALUE(arraytype) \
1173    (TYPE_HIGH_BOUND(TYPE_INDEX_TYPE((arraytype))))
1174
1175 #define TYPE_ARRAY_LOWER_BOUND_VALUE(arraytype) \
1176    (TYPE_LOW_BOUND(TYPE_INDEX_TYPE((arraytype))))
1177
1178 /* C++ */
1179
1180 #define TYPE_VPTR_BASETYPE(thistype) TYPE_MAIN_TYPE(thistype)->vptr_basetype
1181 #define TYPE_DOMAIN_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->vptr_basetype
1182 #define TYPE_VPTR_FIELDNO(thistype) TYPE_MAIN_TYPE(thistype)->vptr_fieldno
1183 #define TYPE_FN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fields
1184 #define TYPE_NFN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields
1185 #define TYPE_SPECIFIC_FIELD(thistype) \
1186   TYPE_MAIN_TYPE(thistype)->type_specific_field
1187 #define TYPE_TYPE_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific
1188 /* We need this tap-dance with the TYPE_RAW_SPECIFIC because of the case
1189    where we're trying to print an Ada array using the C language.
1190    In that case, there is no "cplus_stuff", but the C language assumes
1191    that there is.  What we do, in that case, is pretend that there is
1192    an implicit one which is the default cplus stuff.  */
1193 #define TYPE_CPLUS_SPECIFIC(thistype) \
1194    (!HAVE_CPLUS_STRUCT(thistype) \
1195     ? (struct cplus_struct_type*)&cplus_struct_default \
1196     : TYPE_RAW_CPLUS_SPECIFIC(thistype))
1197 #define TYPE_RAW_CPLUS_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff
1198 #define TYPE_FLOATFORMAT(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.floatformat
1199 #define TYPE_GNAT_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.gnat_stuff
1200 #define TYPE_DESCRIPTIVE_TYPE(thistype) TYPE_GNAT_SPECIFIC(thistype)->descriptive_type
1201 #define TYPE_CALLING_CONVENTION(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->calling_convention
1202 #define TYPE_TAIL_CALL_LIST(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.func_stuff->tail_call_list
1203 #define TYPE_BASECLASS(thistype,index) TYPE_FIELD_TYPE(thistype, index)
1204 #define TYPE_N_BASECLASSES(thistype) TYPE_CPLUS_SPECIFIC(thistype)->n_baseclasses
1205 #define TYPE_BASECLASS_NAME(thistype,index) TYPE_FIELD_NAME(thistype, index)
1206 #define TYPE_BASECLASS_BITPOS(thistype,index) TYPE_FIELD_BITPOS(thistype,index)
1207 #define BASETYPE_VIA_PUBLIC(thistype, index) \
1208   ((!TYPE_FIELD_PRIVATE(thistype, index)) && (!TYPE_FIELD_PROTECTED(thistype, index)))
1209 #define TYPE_CPLUS_DYNAMIC(thistype) TYPE_CPLUS_SPECIFIC (thistype)->is_dynamic
1210 #define TYPE_CPLUS_REALLY_JAVA(thistype) TYPE_CPLUS_SPECIFIC (thistype)->is_java
1211
1212 #define BASETYPE_VIA_VIRTUAL(thistype, index) \
1213   (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
1214     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (index)))
1215
1216 #define FIELD_TYPE(thisfld) ((thisfld).type)
1217 #define FIELD_NAME(thisfld) ((thisfld).name)
1218 #define FIELD_LOC_KIND(thisfld) ((thisfld).loc_kind)
1219 #define FIELD_BITPOS_LVAL(thisfld) ((thisfld).loc.bitpos)
1220 #define FIELD_BITPOS(thisfld) (FIELD_BITPOS_LVAL (thisfld) + 0)
1221 #define FIELD_ENUMVAL_LVAL(thisfld) ((thisfld).loc.enumval)
1222 #define FIELD_ENUMVAL(thisfld) (FIELD_ENUMVAL_LVAL (thisfld) + 0)
1223 #define FIELD_STATIC_PHYSNAME(thisfld) ((thisfld).loc.physname)
1224 #define FIELD_STATIC_PHYSADDR(thisfld) ((thisfld).loc.physaddr)
1225 #define FIELD_DWARF_BLOCK(thisfld) ((thisfld).loc.dwarf_block)
1226 #define SET_FIELD_BITPOS(thisfld, bitpos)                       \
1227   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_BITPOS,            \
1228    FIELD_BITPOS_LVAL (thisfld) = (bitpos))
1229 #define SET_FIELD_ENUMVAL(thisfld, enumval)                     \
1230   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_ENUMVAL,           \
1231    FIELD_ENUMVAL_LVAL (thisfld) = (enumval))
1232 #define SET_FIELD_PHYSNAME(thisfld, name)                       \
1233   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSNAME,          \
1234    FIELD_STATIC_PHYSNAME (thisfld) = (name))
1235 #define SET_FIELD_PHYSADDR(thisfld, addr)                       \
1236   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSADDR,          \
1237    FIELD_STATIC_PHYSADDR (thisfld) = (addr))
1238 #define SET_FIELD_DWARF_BLOCK(thisfld, addr)                    \
1239   (FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_DWARF_BLOCK,       \
1240    FIELD_DWARF_BLOCK (thisfld) = (addr))
1241 #define FIELD_ARTIFICIAL(thisfld) ((thisfld).artificial)
1242 #define FIELD_BITSIZE(thisfld) ((thisfld).bitsize)
1243
1244 #define TYPE_FIELD(thistype, n) TYPE_MAIN_TYPE(thistype)->flds_bnds.fields[n]
1245 #define TYPE_FIELD_TYPE(thistype, n) FIELD_TYPE(TYPE_FIELD(thistype, n))
1246 #define TYPE_FIELD_NAME(thistype, n) FIELD_NAME(TYPE_FIELD(thistype, n))
1247 #define TYPE_FIELD_LOC_KIND(thistype, n) FIELD_LOC_KIND (TYPE_FIELD (thistype, n))
1248 #define TYPE_FIELD_BITPOS(thistype, n) FIELD_BITPOS (TYPE_FIELD (thistype, n))
1249 #define TYPE_FIELD_ENUMVAL(thistype, n) FIELD_ENUMVAL (TYPE_FIELD (thistype, n))
1250 #define TYPE_FIELD_STATIC_PHYSNAME(thistype, n) FIELD_STATIC_PHYSNAME (TYPE_FIELD (thistype, n))
1251 #define TYPE_FIELD_STATIC_PHYSADDR(thistype, n) FIELD_STATIC_PHYSADDR (TYPE_FIELD (thistype, n))
1252 #define TYPE_FIELD_DWARF_BLOCK(thistype, n) FIELD_DWARF_BLOCK (TYPE_FIELD (thistype, n))
1253 #define TYPE_FIELD_ARTIFICIAL(thistype, n) FIELD_ARTIFICIAL(TYPE_FIELD(thistype,n))
1254 #define TYPE_FIELD_BITSIZE(thistype, n) FIELD_BITSIZE(TYPE_FIELD(thistype,n))
1255 #define TYPE_FIELD_PACKED(thistype, n) (FIELD_BITSIZE(TYPE_FIELD(thistype,n))!=0)
1256
1257 #define TYPE_FIELD_PRIVATE_BITS(thistype) \
1258   TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits
1259 #define TYPE_FIELD_PROTECTED_BITS(thistype) \
1260   TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits
1261 #define TYPE_FIELD_IGNORE_BITS(thistype) \
1262   TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits
1263 #define TYPE_FIELD_VIRTUAL_BITS(thistype) \
1264   TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits
1265 #define SET_TYPE_FIELD_PRIVATE(thistype, n) \
1266   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n))
1267 #define SET_TYPE_FIELD_PROTECTED(thistype, n) \
1268   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n))
1269 #define SET_TYPE_FIELD_IGNORE(thistype, n) \
1270   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n))
1271 #define SET_TYPE_FIELD_VIRTUAL(thistype, n) \
1272   B_SET (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n))
1273 #define TYPE_FIELD_PRIVATE(thistype, n) \
1274   (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits == NULL ? 0 \
1275     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n)))
1276 #define TYPE_FIELD_PROTECTED(thistype, n) \
1277   (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits == NULL ? 0 \
1278     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n)))
1279 #define TYPE_FIELD_IGNORE(thistype, n) \
1280   (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits == NULL ? 0 \
1281     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n)))
1282 #define TYPE_FIELD_VIRTUAL(thistype, n) \
1283   (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
1284     : B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n)))
1285
1286 #define TYPE_FN_FIELDLISTS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists
1287 #define TYPE_FN_FIELDLIST(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n]
1288 #define TYPE_FN_FIELDLIST1(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].fn_fields
1289 #define TYPE_FN_FIELDLIST_NAME(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].name
1290 #define TYPE_FN_FIELDLIST_LENGTH(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].length
1291
1292 #define TYPE_N_TEMPLATE_ARGUMENTS(thistype) \
1293   TYPE_CPLUS_SPECIFIC (thistype)->n_template_arguments
1294 #define TYPE_TEMPLATE_ARGUMENTS(thistype) \
1295   TYPE_CPLUS_SPECIFIC (thistype)->template_arguments
1296 #define TYPE_TEMPLATE_ARGUMENT(thistype, n) \
1297   TYPE_CPLUS_SPECIFIC (thistype)->template_arguments[n]
1298
1299 #define TYPE_FN_FIELD(thisfn, n) (thisfn)[n]
1300 #define TYPE_FN_FIELD_PHYSNAME(thisfn, n) (thisfn)[n].physname
1301 #define TYPE_FN_FIELD_TYPE(thisfn, n) (thisfn)[n].type
1302 #define TYPE_FN_FIELD_ARGS(thisfn, n) TYPE_FIELDS ((thisfn)[n].type)
1303 #define TYPE_FN_FIELD_CONST(thisfn, n) ((thisfn)[n].is_const)
1304 #define TYPE_FN_FIELD_VOLATILE(thisfn, n) ((thisfn)[n].is_volatile)
1305 #define TYPE_FN_FIELD_PRIVATE(thisfn, n) ((thisfn)[n].is_private)
1306 #define TYPE_FN_FIELD_PROTECTED(thisfn, n) ((thisfn)[n].is_protected)
1307 #define TYPE_FN_FIELD_PUBLIC(thisfn, n) ((thisfn)[n].is_public)
1308 #define TYPE_FN_FIELD_STATIC(thisfn, n) ((thisfn)[n].is_static)
1309 #define TYPE_FN_FIELD_FINAL(thisfn, n) ((thisfn)[n].is_final)
1310 #define TYPE_FN_FIELD_SYNCHRONIZED(thisfn, n) ((thisfn)[n].is_synchronized)
1311 #define TYPE_FN_FIELD_NATIVE(thisfn, n) ((thisfn)[n].is_native)
1312 #define TYPE_FN_FIELD_ARTIFICIAL(thisfn, n) ((thisfn)[n].is_artificial)
1313 #define TYPE_FN_FIELD_ABSTRACT(thisfn, n) ((thisfn)[n].is_abstract)
1314 #define TYPE_FN_FIELD_STUB(thisfn, n) ((thisfn)[n].is_stub)
1315 #define TYPE_FN_FIELD_CONSTRUCTOR(thisfn, n) ((thisfn)[n].is_constructor)
1316 #define TYPE_FN_FIELD_FCONTEXT(thisfn, n) ((thisfn)[n].fcontext)
1317 #define TYPE_FN_FIELD_VOFFSET(thisfn, n) ((thisfn)[n].voffset-2)
1318 #define TYPE_FN_FIELD_VIRTUAL_P(thisfn, n) ((thisfn)[n].voffset > 1)
1319 #define TYPE_FN_FIELD_STATIC_P(thisfn, n) ((thisfn)[n].voffset == VOFFSET_STATIC)
1320
1321 #define TYPE_TYPEDEF_FIELD_ARRAY(thistype) \
1322   TYPE_CPLUS_SPECIFIC (thistype)->typedef_field
1323 #define TYPE_TYPEDEF_FIELD(thistype, n) \
1324   TYPE_CPLUS_SPECIFIC (thistype)->typedef_field[n]
1325 #define TYPE_TYPEDEF_FIELD_NAME(thistype, n) \
1326   TYPE_TYPEDEF_FIELD (thistype, n).name
1327 #define TYPE_TYPEDEF_FIELD_TYPE(thistype, n) \
1328   TYPE_TYPEDEF_FIELD (thistype, n).type
1329 #define TYPE_TYPEDEF_FIELD_COUNT(thistype) \
1330   TYPE_CPLUS_SPECIFIC (thistype)->typedef_field_count
1331
1332 #define TYPE_IS_OPAQUE(thistype) \
1333   (((TYPE_CODE (thistype) == TYPE_CODE_STRUCT) \
1334     || (TYPE_CODE (thistype) == TYPE_CODE_UNION)) \
1335    && (TYPE_NFIELDS (thistype) == 0) \
1336    && (!HAVE_CPLUS_STRUCT (thistype) \
1337        || TYPE_NFN_FIELDS (thistype) == 0) \
1338    && (TYPE_STUB (thistype) || !TYPE_STUB_SUPPORTED (thistype)))
1339
1340 /* * A helper macro that returns the name of a type or "unnamed type"
1341    if the type has no name.  */
1342
1343 #define TYPE_SAFE_NAME(type) \
1344   (TYPE_NAME (type) ? TYPE_NAME (type) : _("<unnamed type>"))
1345
1346 /* * A helper macro that returns the name of an error type.  If the
1347    type has a name, it is used; otherwise, a default is used.  */
1348
1349 #define TYPE_ERROR_NAME(type) \
1350   (TYPE_NAME (type) ? TYPE_NAME (type) : _("<error type>"))
1351
1352 struct builtin_type
1353 {
1354   /* Integral types.  */
1355
1356   /* Implicit size/sign (based on the architecture's ABI).  */
1357   struct type *builtin_void;
1358   struct type *builtin_char;
1359   struct type *builtin_short;
1360   struct type *builtin_int;
1361   struct type *builtin_long;
1362   struct type *builtin_signed_char;
1363   struct type *builtin_unsigned_char;
1364   struct type *builtin_unsigned_short;
1365   struct type *builtin_unsigned_int;
1366   struct type *builtin_unsigned_long;
1367   struct type *builtin_float;
1368   struct type *builtin_double;
1369   struct type *builtin_long_double;
1370   struct type *builtin_complex;
1371   struct type *builtin_double_complex;
1372   struct type *builtin_string;
1373   struct type *builtin_bool;
1374   struct type *builtin_long_long;
1375   struct type *builtin_unsigned_long_long;
1376   struct type *builtin_decfloat;
1377   struct type *builtin_decdouble;
1378   struct type *builtin_declong;
1379
1380   /* "True" character types.
1381       We use these for the '/c' print format, because c_char is just a
1382       one-byte integral type, which languages less laid back than C
1383       will print as ... well, a one-byte integral type.  */
1384   struct type *builtin_true_char;
1385   struct type *builtin_true_unsigned_char;
1386
1387   /* Explicit sizes - see C9X <intypes.h> for naming scheme.  The "int0"
1388      is for when an architecture needs to describe a register that has
1389      no size.  */
1390   struct type *builtin_int0;
1391   struct type *builtin_int8;
1392   struct type *builtin_uint8;
1393   struct type *builtin_int16;
1394   struct type *builtin_uint16;
1395   struct type *builtin_int32;
1396   struct type *builtin_uint32;
1397   struct type *builtin_int64;
1398   struct type *builtin_uint64;
1399   struct type *builtin_int128;
1400   struct type *builtin_uint128;
1401
1402   /* Wide character types.  */
1403   struct type *builtin_char16;
1404   struct type *builtin_char32;
1405
1406   /* Pointer types.  */
1407
1408   /* * `pointer to data' type.  Some target platforms use an implicitly
1409      {sign,zero} -extended 32-bit ABI pointer on a 64-bit ISA.  */
1410   struct type *builtin_data_ptr;
1411
1412   /* * `pointer to function (returning void)' type.  Harvard
1413      architectures mean that ABI function and code pointers are not
1414      interconvertible.  Similarly, since ANSI, C standards have
1415      explicitly said that pointers to functions and pointers to data
1416      are not interconvertible --- that is, you can't cast a function
1417      pointer to void * and back, and expect to get the same value.
1418      However, all function pointer types are interconvertible, so void
1419      (*) () can server as a generic function pointer.  */
1420
1421   struct type *builtin_func_ptr;
1422
1423   /* * `function returning pointer to function (returning void)' type.
1424      The final void return type is not significant for it.  */
1425
1426   struct type *builtin_func_func;
1427
1428   /* Special-purpose types.  */
1429
1430   /* * This type is used to represent a GDB internal function.  */
1431
1432   struct type *internal_fn;
1433 };
1434
1435 /* * Return the type table for the specified architecture.  */
1436
1437 extern const struct builtin_type *builtin_type (struct gdbarch *gdbarch);
1438
1439 /* * Per-objfile types used by symbol readers.  */
1440
1441 struct objfile_type
1442 {
1443   /* Basic types based on the objfile architecture.  */
1444   struct type *builtin_void;
1445   struct type *builtin_char;
1446   struct type *builtin_short;
1447   struct type *builtin_int;
1448   struct type *builtin_long;
1449   struct type *builtin_long_long;
1450   struct type *builtin_signed_char;
1451   struct type *builtin_unsigned_char;
1452   struct type *builtin_unsigned_short;
1453   struct type *builtin_unsigned_int;
1454   struct type *builtin_unsigned_long;
1455   struct type *builtin_unsigned_long_long;
1456   struct type *builtin_float;
1457   struct type *builtin_double;
1458   struct type *builtin_long_double;
1459
1460   /* * This type is used to represent symbol addresses.  */
1461   struct type *builtin_core_addr;
1462
1463   /* * This type represents a type that was unrecognized in symbol
1464      read-in.  */
1465   struct type *builtin_error;
1466
1467   /* * Types used for symbols with no debug information.  */
1468   struct type *nodebug_text_symbol;
1469   struct type *nodebug_text_gnu_ifunc_symbol;
1470   struct type *nodebug_got_plt_symbol;
1471   struct type *nodebug_data_symbol;
1472   struct type *nodebug_unknown_symbol;
1473   struct type *nodebug_tls_symbol;
1474 };
1475
1476 /* * Return the type table for the specified objfile.  */
1477
1478 extern const struct objfile_type *objfile_type (struct objfile *objfile);
1479
1480 /* Explicit floating-point formats.  See "floatformat.h".  */
1481 extern const struct floatformat *floatformats_ieee_half[BFD_ENDIAN_UNKNOWN];
1482 extern const struct floatformat *floatformats_ieee_single[BFD_ENDIAN_UNKNOWN];
1483 extern const struct floatformat *floatformats_ieee_double[BFD_ENDIAN_UNKNOWN];
1484 extern const struct floatformat *floatformats_ieee_double_littlebyte_bigword[BFD_ENDIAN_UNKNOWN];
1485 extern const struct floatformat *floatformats_i387_ext[BFD_ENDIAN_UNKNOWN];
1486 extern const struct floatformat *floatformats_m68881_ext[BFD_ENDIAN_UNKNOWN];
1487 extern const struct floatformat *floatformats_arm_ext[BFD_ENDIAN_UNKNOWN];
1488 extern const struct floatformat *floatformats_ia64_spill[BFD_ENDIAN_UNKNOWN];
1489 extern const struct floatformat *floatformats_ia64_quad[BFD_ENDIAN_UNKNOWN];
1490 extern const struct floatformat *floatformats_vax_f[BFD_ENDIAN_UNKNOWN];
1491 extern const struct floatformat *floatformats_vax_d[BFD_ENDIAN_UNKNOWN];
1492 extern const struct floatformat *floatformats_ibm_long_double[BFD_ENDIAN_UNKNOWN];
1493
1494
1495 /* * Allocate space for storing data associated with a particular
1496    type.  We ensure that the space is allocated using the same
1497    mechanism that was used to allocate the space for the type
1498    structure itself.  I.e.  if the type is on an objfile's
1499    objfile_obstack, then the space for data associated with that type
1500    will also be allocated on the objfile_obstack.  If the type is not
1501    associated with any particular objfile (such as builtin types),
1502    then the data space will be allocated with xmalloc, the same as for
1503    the type structure.  */
1504
1505 #define TYPE_ALLOC(t,size)  \
1506    (TYPE_OBJFILE_OWNED (t) \
1507     ? obstack_alloc (&TYPE_OBJFILE (t) -> objfile_obstack, size) \
1508     : xmalloc (size))
1509
1510 #define TYPE_ZALLOC(t,size)  \
1511    (TYPE_OBJFILE_OWNED (t) \
1512     ? memset (obstack_alloc (&TYPE_OBJFILE (t)->objfile_obstack, size),  \
1513               0, size)  \
1514     : xzalloc (size))
1515
1516 /* Use alloc_type to allocate a type owned by an objfile.  Use
1517    alloc_type_arch to allocate a type owned by an architecture.  Use
1518    alloc_type_copy to allocate a type with the same owner as a
1519    pre-existing template type, no matter whether objfile or
1520    gdbarch.  */
1521 extern struct type *alloc_type (struct objfile *);
1522 extern struct type *alloc_type_arch (struct gdbarch *);
1523 extern struct type *alloc_type_copy (const struct type *);
1524
1525 /* * Return the type's architecture.  For types owned by an
1526    architecture, that architecture is returned.  For types owned by an
1527    objfile, that objfile's architecture is returned.  */
1528
1529 extern struct gdbarch *get_type_arch (const struct type *);
1530
1531 /* * This returns the target type (or NULL) of TYPE, also skipping
1532    past typedefs.  */
1533
1534 extern struct type *get_target_type (struct type *type);
1535
1536 /* * Helper function to construct objfile-owned types.  */
1537
1538 extern struct type *init_type (enum type_code, int, int, const char *,
1539                                struct objfile *);
1540
1541 /* Helper functions to construct architecture-owned types.  */
1542 extern struct type *arch_type (struct gdbarch *, enum type_code, int, char *);
1543 extern struct type *arch_integer_type (struct gdbarch *, int, int, char *);
1544 extern struct type *arch_character_type (struct gdbarch *, int, int, char *);
1545 extern struct type *arch_boolean_type (struct gdbarch *, int, int, char *);
1546 extern struct type *arch_float_type (struct gdbarch *, int, char *,
1547                                      const struct floatformat **);
1548 extern struct type *arch_complex_type (struct gdbarch *, char *,
1549                                        struct type *);
1550
1551 /* Helper functions to construct a struct or record type.  An
1552    initially empty type is created using arch_composite_type().
1553    Fields are then added using append_composite_type_field*().  A union
1554    type has its size set to the largest field.  A struct type has each
1555    field packed against the previous.  */
1556
1557 extern struct type *arch_composite_type (struct gdbarch *gdbarch,
1558                                          char *name, enum type_code code);
1559 extern void append_composite_type_field (struct type *t, char *name,
1560                                          struct type *field);
1561 extern void append_composite_type_field_aligned (struct type *t,
1562                                                  char *name,
1563                                                  struct type *field,
1564                                                  int alignment);
1565 struct field *append_composite_type_field_raw (struct type *t, char *name,
1566                                                struct type *field);
1567
1568 /* Helper functions to construct a bit flags type.  An initially empty
1569    type is created using arch_flag_type().  Flags are then added using
1570    append_flag_type_flag().  */
1571 extern struct type *arch_flags_type (struct gdbarch *gdbarch,
1572                                      char *name, int length);
1573 extern void append_flags_type_flag (struct type *type, int bitpos, char *name);
1574
1575 extern void make_vector_type (struct type *array_type);
1576 extern struct type *init_vector_type (struct type *elt_type, int n);
1577
1578 extern struct type *lookup_reference_type (struct type *);
1579
1580 extern struct type *make_reference_type (struct type *, struct type **);
1581
1582 extern struct type *make_cv_type (int, int, struct type *, struct type **);
1583
1584 extern struct type *make_restrict_type (struct type *);
1585
1586 extern void replace_type (struct type *, struct type *);
1587
1588 extern int address_space_name_to_int (struct gdbarch *, char *);
1589
1590 extern const char *address_space_int_to_name (struct gdbarch *, int);
1591
1592 extern struct type *make_type_with_address_space (struct type *type,
1593                                                   int space_identifier);
1594
1595 extern struct type *lookup_memberptr_type (struct type *, struct type *);
1596
1597 extern struct type *lookup_methodptr_type (struct type *);
1598
1599 extern void smash_to_method_type (struct type *type, struct type *domain,
1600                                   struct type *to_type, struct field *args,
1601                                   int nargs, int varargs);
1602
1603 extern void smash_to_memberptr_type (struct type *, struct type *,
1604                                      struct type *);
1605
1606 extern void smash_to_methodptr_type (struct type *, struct type *);
1607
1608 extern struct type *allocate_stub_method (struct type *);
1609
1610 extern const char *type_name_no_tag (const struct type *);
1611
1612 extern const char *type_name_no_tag_or_error (struct type *type);
1613
1614 extern struct type *lookup_struct_elt_type (struct type *, const char *, int);
1615
1616 extern struct type *make_pointer_type (struct type *, struct type **);
1617
1618 extern struct type *lookup_pointer_type (struct type *);
1619
1620 extern struct type *make_function_type (struct type *, struct type **);
1621
1622 extern struct type *lookup_function_type (struct type *);
1623
1624 extern struct type *lookup_function_type_with_arguments (struct type *,
1625                                                          int,
1626                                                          struct type **);
1627
1628 extern struct type *create_range_type (struct type *, struct type *, LONGEST,
1629                                        LONGEST);
1630
1631 extern struct type *create_array_type_with_stride
1632   (struct type *, struct type *, struct type *, unsigned int);
1633
1634 extern struct type *create_array_type (struct type *, struct type *,
1635                                        struct type *);
1636
1637 extern struct type *lookup_array_range_type (struct type *, LONGEST, LONGEST);
1638
1639 extern struct type *create_string_type (struct type *, struct type *,
1640                                         struct type *);
1641 extern struct type *lookup_string_range_type (struct type *, LONGEST, LONGEST);
1642
1643 extern struct type *create_set_type (struct type *, struct type *);
1644
1645 extern struct type *lookup_unsigned_typename (const struct language_defn *,
1646                                               struct gdbarch *, const char *);
1647
1648 extern struct type *lookup_signed_typename (const struct language_defn *,
1649                                             struct gdbarch *, const char *);
1650
1651 extern void get_unsigned_type_max (struct type *, ULONGEST *);
1652
1653 extern void get_signed_type_minmax (struct type *, LONGEST *, LONGEST *);
1654
1655 extern struct type *check_typedef (struct type *);
1656
1657 #define CHECK_TYPEDEF(TYPE)                     \
1658   do {                                          \
1659     (TYPE) = check_typedef (TYPE);              \
1660   } while (0)
1661
1662 extern void check_stub_method_group (struct type *, int);
1663
1664 extern char *gdb_mangle_name (struct type *, int, int);
1665
1666 extern struct type *lookup_typename (const struct language_defn *,
1667                                      struct gdbarch *, const char *,
1668                                      const struct block *, int);
1669
1670 extern struct type *lookup_template_type (char *, struct type *,
1671                                           const struct block *);
1672
1673 extern int get_vptr_fieldno (struct type *, struct type **);
1674
1675 extern int get_discrete_bounds (struct type *, LONGEST *, LONGEST *);
1676
1677 extern int get_array_bounds (struct type *type, LONGEST *low_bound,
1678                              LONGEST *high_bound);
1679
1680 extern int class_types_same_p (const struct type *, const struct type *);
1681
1682 extern int is_ancestor (struct type *, struct type *);
1683
1684 extern int is_public_ancestor (struct type *, struct type *);
1685
1686 extern int is_unique_ancestor (struct type *, struct value *);
1687
1688 /* Overload resolution */
1689
1690 #define LENGTH_MATCH(bv) ((bv)->rank[0])
1691
1692 /* * Badness if parameter list length doesn't match arg list length.  */
1693 extern const struct rank LENGTH_MISMATCH_BADNESS;
1694
1695 /* * Dummy badness value for nonexistent parameter positions.  */
1696 extern const struct rank TOO_FEW_PARAMS_BADNESS;
1697 /* * Badness if no conversion among types.  */
1698 extern const struct rank INCOMPATIBLE_TYPE_BADNESS;
1699
1700 /* * Badness of an exact match.  */
1701 extern const struct rank EXACT_MATCH_BADNESS;
1702
1703 /* * Badness of integral promotion.  */
1704 extern const struct rank INTEGER_PROMOTION_BADNESS;
1705 /* * Badness of floating promotion.  */
1706 extern const struct rank FLOAT_PROMOTION_BADNESS;
1707 /* * Badness of converting a derived class pointer
1708    to a base class pointer.  */
1709 extern const struct rank BASE_PTR_CONVERSION_BADNESS;
1710 /* * Badness of integral conversion.  */
1711 extern const struct rank INTEGER_CONVERSION_BADNESS;
1712 /* * Badness of floating conversion.  */
1713 extern const struct rank FLOAT_CONVERSION_BADNESS;
1714 /* * Badness of integer<->floating conversions.  */
1715 extern const struct rank INT_FLOAT_CONVERSION_BADNESS;
1716 /* * Badness of conversion of pointer to void pointer.  */
1717 extern const struct rank VOID_PTR_CONVERSION_BADNESS;
1718 /* * Badness of conversion to boolean.  */
1719 extern const struct rank BOOL_CONVERSION_BADNESS;
1720 /* * Badness of converting derived to base class.  */
1721 extern const struct rank BASE_CONVERSION_BADNESS;
1722 /* * Badness of converting from non-reference to reference.  */
1723 extern const struct rank REFERENCE_CONVERSION_BADNESS;
1724 /* * Badness of converting integer 0 to NULL pointer.  */
1725 extern const struct rank NULL_POINTER_CONVERSION;
1726
1727 /* Non-standard conversions allowed by the debugger */
1728
1729 /* * Converting a pointer to an int is usually OK.  */
1730 extern const struct rank NS_POINTER_CONVERSION_BADNESS;
1731
1732 /* * Badness of converting a (non-zero) integer constant
1733    to a pointer.  */
1734 extern const struct rank NS_INTEGER_POINTER_CONVERSION_BADNESS;
1735
1736 extern struct rank sum_ranks (struct rank a, struct rank b);
1737 extern int compare_ranks (struct rank a, struct rank b);
1738
1739 extern int compare_badness (struct badness_vector *, struct badness_vector *);
1740
1741 extern struct badness_vector *rank_function (struct type **, int,
1742                                              struct value **, int);
1743
1744 extern struct rank rank_one_type (struct type *, struct type *,
1745                                   struct value *);
1746
1747 extern void recursive_dump_type (struct type *, int);
1748
1749 extern int field_is_static (struct field *);
1750
1751 /* printcmd.c */
1752
1753 extern void print_scalar_formatted (const void *, struct type *,
1754                                     const struct value_print_options *,
1755                                     int, struct ui_file *);
1756
1757 extern int can_dereference (struct type *);
1758
1759 extern int is_integral_type (struct type *);
1760
1761 extern int is_scalar_type_recursive (struct type *);
1762
1763 extern void maintenance_print_type (char *, int);
1764
1765 extern htab_t create_copied_types_hash (struct objfile *objfile);
1766
1767 extern struct type *copy_type_recursive (struct objfile *objfile,
1768                                          struct type *type,
1769                                          htab_t copied_types);
1770
1771 extern struct type *copy_type (const struct type *type);
1772
1773 extern int types_equal (struct type *, struct type *);
1774
1775 extern int types_deeply_equal (struct type *, struct type *);
1776
1777 #endif /* GDBTYPES_H */