/* Internal type definitions for GDB.
|
/* Internal type definitions for GDB.
|
|
|
Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001,
|
Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001,
|
2002, 2003, 2004, 2006, 2007, 2008, 2009, 2010
|
2002, 2003, 2004, 2006, 2007, 2008, 2009, 2010
|
Free Software Foundation, Inc.
|
Free Software Foundation, Inc.
|
|
|
Contributed by Cygnus Support, using pieces from other GDB modules.
|
Contributed by Cygnus Support, using pieces from other GDB modules.
|
|
|
This file is part of GDB.
|
This file is part of GDB.
|
|
|
This program is free software; you can redistribute it and/or modify
|
This program is free software; you can redistribute it and/or modify
|
it under the terms of the GNU General Public License as published by
|
it under the terms of the GNU General Public License as published by
|
the Free Software Foundation; either version 3 of the License, or
|
the Free Software Foundation; either version 3 of the License, or
|
(at your option) any later version.
|
(at your option) any later version.
|
|
|
This program is distributed in the hope that it will be useful,
|
This program is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
GNU General Public License for more details.
|
GNU General Public License for more details.
|
|
|
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
#if !defined (GDBTYPES_H)
|
#if !defined (GDBTYPES_H)
|
#define GDBTYPES_H 1
|
#define GDBTYPES_H 1
|
|
|
#include "hashtab.h"
|
#include "hashtab.h"
|
|
|
/* Forward declarations for prototypes. */
|
/* Forward declarations for prototypes. */
|
struct field;
|
struct field;
|
struct block;
|
struct block;
|
struct value_print_options;
|
struct value_print_options;
|
struct language_defn;
|
struct language_defn;
|
|
|
/* Some macros for char-based bitfields. */
|
/* Some macros for char-based bitfields. */
|
|
|
#define B_SET(a,x) ((a)[(x)>>3] |= (1 << ((x)&7)))
|
#define B_SET(a,x) ((a)[(x)>>3] |= (1 << ((x)&7)))
|
#define B_CLR(a,x) ((a)[(x)>>3] &= ~(1 << ((x)&7)))
|
#define B_CLR(a,x) ((a)[(x)>>3] &= ~(1 << ((x)&7)))
|
#define B_TST(a,x) ((a)[(x)>>3] & (1 << ((x)&7)))
|
#define B_TST(a,x) ((a)[(x)>>3] & (1 << ((x)&7)))
|
#define B_TYPE unsigned char
|
#define B_TYPE unsigned char
|
#define B_BYTES(x) ( 1 + ((x)>>3) )
|
#define B_BYTES(x) ( 1 + ((x)>>3) )
|
#define B_CLRALL(a,x) memset ((a), 0, B_BYTES(x))
|
#define B_CLRALL(a,x) memset ((a), 0, B_BYTES(x))
|
|
|
/* Different kinds of data types are distinguished by the `code' field. */
|
/* Different kinds of data types are distinguished by the `code' field. */
|
|
|
enum type_code
|
enum type_code
|
{
|
{
|
TYPE_CODE_UNDEF, /* Not used; catches errors */
|
TYPE_CODE_UNDEF, /* Not used; catches errors */
|
TYPE_CODE_PTR, /* Pointer type */
|
TYPE_CODE_PTR, /* Pointer type */
|
|
|
/* Array type with lower & upper bounds.
|
/* Array type with lower & upper bounds.
|
|
|
Regardless of the language, GDB represents multidimensional
|
Regardless of the language, GDB represents multidimensional
|
array types the way C does: as arrays of arrays. So an
|
array types the way C does: as arrays of arrays. So an
|
instance of a GDB array type T can always be seen as a series
|
instance of a GDB array type T can always be seen as a series
|
of instances of TYPE_TARGET_TYPE (T) laid out sequentially in
|
of instances of TYPE_TARGET_TYPE (T) laid out sequentially in
|
memory.
|
memory.
|
|
|
Row-major languages like C lay out multi-dimensional arrays so
|
Row-major languages like C lay out multi-dimensional arrays so
|
that incrementing the rightmost index in a subscripting
|
that incrementing the rightmost index in a subscripting
|
expression results in the smallest change in the address of the
|
expression results in the smallest change in the address of the
|
element referred to. Column-major languages like Fortran lay
|
element referred to. Column-major languages like Fortran lay
|
them out so that incrementing the leftmost index results in the
|
them out so that incrementing the leftmost index results in the
|
smallest change.
|
smallest change.
|
|
|
This means that, in column-major languages, working our way
|
This means that, in column-major languages, working our way
|
from type to target type corresponds to working through indices
|
from type to target type corresponds to working through indices
|
from right to left, not left to right. */
|
from right to left, not left to right. */
|
TYPE_CODE_ARRAY,
|
TYPE_CODE_ARRAY,
|
|
|
TYPE_CODE_STRUCT, /* C struct or Pascal record */
|
TYPE_CODE_STRUCT, /* C struct or Pascal record */
|
TYPE_CODE_UNION, /* C union or Pascal variant part */
|
TYPE_CODE_UNION, /* C union or Pascal variant part */
|
TYPE_CODE_ENUM, /* Enumeration type */
|
TYPE_CODE_ENUM, /* Enumeration type */
|
TYPE_CODE_FLAGS, /* Bit flags type */
|
TYPE_CODE_FLAGS, /* Bit flags type */
|
TYPE_CODE_FUNC, /* Function type */
|
TYPE_CODE_FUNC, /* Function type */
|
TYPE_CODE_INT, /* Integer type */
|
TYPE_CODE_INT, /* Integer type */
|
|
|
/* Floating type. This is *NOT* a complex type. Beware, there are parts
|
/* Floating type. This is *NOT* a complex type. Beware, there are parts
|
of GDB which bogusly assume that TYPE_CODE_FLT can mean complex. */
|
of GDB which bogusly assume that TYPE_CODE_FLT can mean complex. */
|
TYPE_CODE_FLT,
|
TYPE_CODE_FLT,
|
|
|
/* Void type. The length field specifies the length (probably always
|
/* Void type. The length field specifies the length (probably always
|
one) which is used in pointer arithmetic involving pointers to
|
one) which is used in pointer arithmetic involving pointers to
|
this type, but actually dereferencing such a pointer is invalid;
|
this type, but actually dereferencing such a pointer is invalid;
|
a void type has no length and no actual representation in memory
|
a void type has no length and no actual representation in memory
|
or registers. A pointer to a void type is a generic pointer. */
|
or registers. A pointer to a void type is a generic pointer. */
|
TYPE_CODE_VOID,
|
TYPE_CODE_VOID,
|
|
|
TYPE_CODE_SET, /* Pascal sets */
|
TYPE_CODE_SET, /* Pascal sets */
|
TYPE_CODE_RANGE, /* Range (integers within spec'd bounds) */
|
TYPE_CODE_RANGE, /* Range (integers within spec'd bounds) */
|
|
|
/* A string type which is like an array of character but prints
|
/* A string type which is like an array of character but prints
|
differently (at least for (the deleted) CHILL). It does not
|
differently (at least for (the deleted) CHILL). It does not
|
contain a length field as Pascal strings (for many Pascals,
|
contain a length field as Pascal strings (for many Pascals,
|
anyway) do; if we want to deal with such strings, we should use
|
anyway) do; if we want to deal with such strings, we should use
|
a new type code. */
|
a new type code. */
|
TYPE_CODE_STRING,
|
TYPE_CODE_STRING,
|
|
|
/* String of bits; like TYPE_CODE_SET but prints differently (at
|
/* String of bits; like TYPE_CODE_SET but prints differently (at
|
least for (the deleted) CHILL). */
|
least for (the deleted) CHILL). */
|
TYPE_CODE_BITSTRING,
|
TYPE_CODE_BITSTRING,
|
|
|
/* Unknown type. The length field is valid if we were able to
|
/* Unknown type. The length field is valid if we were able to
|
deduce that much about the type, or 0 if we don't even know that. */
|
deduce that much about the type, or 0 if we don't even know that. */
|
TYPE_CODE_ERROR,
|
TYPE_CODE_ERROR,
|
|
|
/* C++ */
|
/* C++ */
|
TYPE_CODE_METHOD, /* Method type */
|
TYPE_CODE_METHOD, /* Method type */
|
|
|
/* Pointer-to-member-function type. This describes how to access a
|
/* Pointer-to-member-function type. This describes how to access a
|
particular member function of a class (possibly a virtual
|
particular member function of a class (possibly a virtual
|
member function). The representation may vary between different
|
member function). The representation may vary between different
|
C++ ABIs. */
|
C++ ABIs. */
|
TYPE_CODE_METHODPTR,
|
TYPE_CODE_METHODPTR,
|
|
|
/* Pointer-to-member type. This is the offset within a class to some
|
/* Pointer-to-member type. This is the offset within a class to some
|
particular data member. The only currently supported representation
|
particular data member. The only currently supported representation
|
uses an unbiased offset, with -1 representing NULL; this is used
|
uses an unbiased offset, with -1 representing NULL; this is used
|
by the Itanium C++ ABI (used by GCC on all platforms). */
|
by the Itanium C++ ABI (used by GCC on all platforms). */
|
TYPE_CODE_MEMBERPTR,
|
TYPE_CODE_MEMBERPTR,
|
|
|
TYPE_CODE_REF, /* C++ Reference types */
|
TYPE_CODE_REF, /* C++ Reference types */
|
|
|
TYPE_CODE_CHAR, /* *real* character type */
|
TYPE_CODE_CHAR, /* *real* character type */
|
|
|
/* Boolean type. 0 is false, 1 is true, and other values are non-boolean
|
/* Boolean type. 0 is false, 1 is true, and other values are non-boolean
|
(e.g. FORTRAN "logical" used as unsigned int). */
|
(e.g. FORTRAN "logical" used as unsigned int). */
|
TYPE_CODE_BOOL,
|
TYPE_CODE_BOOL,
|
|
|
/* Fortran */
|
/* Fortran */
|
TYPE_CODE_COMPLEX, /* Complex float */
|
TYPE_CODE_COMPLEX, /* Complex float */
|
|
|
TYPE_CODE_TYPEDEF,
|
TYPE_CODE_TYPEDEF,
|
TYPE_CODE_TEMPLATE, /* C++ template */
|
TYPE_CODE_TEMPLATE, /* C++ template */
|
TYPE_CODE_TEMPLATE_ARG, /* C++ template arg */
|
TYPE_CODE_TEMPLATE_ARG, /* C++ template arg */
|
|
|
TYPE_CODE_NAMESPACE, /* C++ namespace. */
|
TYPE_CODE_NAMESPACE, /* C++ namespace. */
|
|
|
TYPE_CODE_DECFLOAT, /* Decimal floating point. */
|
TYPE_CODE_DECFLOAT, /* Decimal floating point. */
|
|
|
/* Internal function type. */
|
/* Internal function type. */
|
TYPE_CODE_INTERNAL_FUNCTION
|
TYPE_CODE_INTERNAL_FUNCTION
|
};
|
};
|
|
|
/* For now allow source to use TYPE_CODE_CLASS for C++ classes, as an
|
/* For now allow source to use TYPE_CODE_CLASS for C++ classes, as an
|
alias for TYPE_CODE_STRUCT. This is for DWARF, which has a distinct
|
alias for TYPE_CODE_STRUCT. This is for DWARF, which has a distinct
|
"class" attribute. Perhaps we should actually have a separate TYPE_CODE
|
"class" attribute. Perhaps we should actually have a separate TYPE_CODE
|
so that we can print "class" or "struct" depending on what the debug
|
so that we can print "class" or "struct" depending on what the debug
|
info said. It's not clear we should bother. */
|
info said. It's not clear we should bother. */
|
|
|
#define TYPE_CODE_CLASS TYPE_CODE_STRUCT
|
#define TYPE_CODE_CLASS TYPE_CODE_STRUCT
|
|
|
/* Some constants representing each bit field in the main_type. See
|
/* Some constants representing each bit field in the main_type. See
|
the bit-field-specific macros, below, for documentation of each
|
the bit-field-specific macros, below, for documentation of each
|
constant in this enum. These enum values are only used with
|
constant in this enum. These enum values are only used with
|
init_type. Note that the values are chosen not to conflict with
|
init_type. Note that the values are chosen not to conflict with
|
type_instance_flag_value; this lets init_type error-check its
|
type_instance_flag_value; this lets init_type error-check its
|
input. */
|
input. */
|
|
|
enum type_flag_value
|
enum type_flag_value
|
{
|
{
|
TYPE_FLAG_UNSIGNED = (1 << 6),
|
TYPE_FLAG_UNSIGNED = (1 << 6),
|
TYPE_FLAG_NOSIGN = (1 << 7),
|
TYPE_FLAG_NOSIGN = (1 << 7),
|
TYPE_FLAG_STUB = (1 << 8),
|
TYPE_FLAG_STUB = (1 << 8),
|
TYPE_FLAG_TARGET_STUB = (1 << 9),
|
TYPE_FLAG_TARGET_STUB = (1 << 9),
|
TYPE_FLAG_STATIC = (1 << 10),
|
TYPE_FLAG_STATIC = (1 << 10),
|
TYPE_FLAG_PROTOTYPED = (1 << 11),
|
TYPE_FLAG_PROTOTYPED = (1 << 11),
|
TYPE_FLAG_INCOMPLETE = (1 << 12),
|
TYPE_FLAG_INCOMPLETE = (1 << 12),
|
TYPE_FLAG_VARARGS = (1 << 13),
|
TYPE_FLAG_VARARGS = (1 << 13),
|
TYPE_FLAG_VECTOR = (1 << 14),
|
TYPE_FLAG_VECTOR = (1 << 14),
|
TYPE_FLAG_FIXED_INSTANCE = (1 << 15),
|
TYPE_FLAG_FIXED_INSTANCE = (1 << 15),
|
TYPE_FLAG_STUB_SUPPORTED = (1 << 16),
|
TYPE_FLAG_STUB_SUPPORTED = (1 << 16),
|
TYPE_FLAG_NOTTEXT = (1 << 17),
|
TYPE_FLAG_NOTTEXT = (1 << 17),
|
|
|
/* Used for error-checking. */
|
/* Used for error-checking. */
|
TYPE_FLAG_MIN = TYPE_FLAG_UNSIGNED
|
TYPE_FLAG_MIN = TYPE_FLAG_UNSIGNED
|
};
|
};
|
|
|
/* Some bits for the type's instance_flags word. See the macros below
|
/* Some bits for the type's instance_flags word. See the macros below
|
for documentation on each bit. Note that if you add a value here,
|
for documentation on each bit. Note that if you add a value here,
|
you must update the enum type_flag_value as well. */
|
you must update the enum type_flag_value as well. */
|
enum type_instance_flag_value
|
enum type_instance_flag_value
|
{
|
{
|
TYPE_INSTANCE_FLAG_CONST = (1 << 0),
|
TYPE_INSTANCE_FLAG_CONST = (1 << 0),
|
TYPE_INSTANCE_FLAG_VOLATILE = (1 << 1),
|
TYPE_INSTANCE_FLAG_VOLATILE = (1 << 1),
|
TYPE_INSTANCE_FLAG_CODE_SPACE = (1 << 2),
|
TYPE_INSTANCE_FLAG_CODE_SPACE = (1 << 2),
|
TYPE_INSTANCE_FLAG_DATA_SPACE = (1 << 3),
|
TYPE_INSTANCE_FLAG_DATA_SPACE = (1 << 3),
|
TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 = (1 << 4),
|
TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 = (1 << 4),
|
TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2 = (1 << 5)
|
TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2 = (1 << 5)
|
};
|
};
|
|
|
/* Unsigned integer type. If this is not set for a TYPE_CODE_INT, the
|
/* Unsigned integer type. If this is not set for a TYPE_CODE_INT, the
|
type is signed (unless TYPE_FLAG_NOSIGN (below) is set). */
|
type is signed (unless TYPE_FLAG_NOSIGN (below) is set). */
|
|
|
#define TYPE_UNSIGNED(t) (TYPE_MAIN_TYPE (t)->flag_unsigned)
|
#define TYPE_UNSIGNED(t) (TYPE_MAIN_TYPE (t)->flag_unsigned)
|
|
|
/* No sign for this type. In C++, "char", "signed char", and "unsigned
|
/* No sign for this type. In C++, "char", "signed char", and "unsigned
|
char" are distinct types; so we need an extra flag to indicate the
|
char" are distinct types; so we need an extra flag to indicate the
|
absence of a sign! */
|
absence of a sign! */
|
|
|
#define TYPE_NOSIGN(t) (TYPE_MAIN_TYPE (t)->flag_nosign)
|
#define TYPE_NOSIGN(t) (TYPE_MAIN_TYPE (t)->flag_nosign)
|
|
|
/* This appears in a type's flags word if it is a stub type (e.g., if
|
/* This appears in a type's flags word if it is a stub type (e.g., if
|
someone referenced a type that wasn't defined in a source file
|
someone referenced a type that wasn't defined in a source file
|
via (struct sir_not_appearing_in_this_film *)). */
|
via (struct sir_not_appearing_in_this_film *)). */
|
|
|
#define TYPE_STUB(t) (TYPE_MAIN_TYPE (t)->flag_stub)
|
#define TYPE_STUB(t) (TYPE_MAIN_TYPE (t)->flag_stub)
|
|
|
/* The target type of this type is a stub type, and this type needs to
|
/* The target type of this type is a stub type, and this type needs to
|
be updated if it gets un-stubbed in check_typedef.
|
be updated if it gets un-stubbed in check_typedef.
|
Used for arrays and ranges, in which TYPE_LENGTH of the array/range
|
Used for arrays and ranges, in which TYPE_LENGTH of the array/range
|
gets set based on the TYPE_LENGTH of the target type.
|
gets set based on the TYPE_LENGTH of the target type.
|
Also, set for TYPE_CODE_TYPEDEF. */
|
Also, set for TYPE_CODE_TYPEDEF. */
|
|
|
#define TYPE_TARGET_STUB(t) (TYPE_MAIN_TYPE (t)->flag_target_stub)
|
#define TYPE_TARGET_STUB(t) (TYPE_MAIN_TYPE (t)->flag_target_stub)
|
|
|
/* Static type. If this is set, the corresponding type had
|
/* Static type. If this is set, the corresponding type had
|
* a static modifier.
|
* a static modifier.
|
* Note: This may be unnecessary, since static data members
|
* Note: This may be unnecessary, since static data members
|
* are indicated by other means (bitpos == -1)
|
* are indicated by other means (bitpos == -1)
|
*/
|
*/
|
|
|
#define TYPE_STATIC(t) (TYPE_MAIN_TYPE (t)->flag_static)
|
#define TYPE_STATIC(t) (TYPE_MAIN_TYPE (t)->flag_static)
|
|
|
/* This is a function type which appears to have a prototype. We need this
|
/* This is a function type which appears to have a prototype. We need this
|
for function calls in order to tell us if it's necessary to coerce the args,
|
for function calls in order to tell us if it's necessary to coerce the args,
|
or to just do the standard conversions. This is used with a short field. */
|
or to just do the standard conversions. This is used with a short field. */
|
|
|
#define TYPE_PROTOTYPED(t) (TYPE_MAIN_TYPE (t)->flag_prototyped)
|
#define TYPE_PROTOTYPED(t) (TYPE_MAIN_TYPE (t)->flag_prototyped)
|
|
|
/* This flag is used to indicate that processing for this type
|
/* This flag is used to indicate that processing for this type
|
is incomplete.
|
is incomplete.
|
|
|
(Mostly intended for HP platforms, where class methods, for
|
(Mostly intended for HP platforms, where class methods, for
|
instance, can be encountered before their classes in the debug
|
instance, can be encountered before their classes in the debug
|
info; the incomplete type has to be marked so that the class and
|
info; the incomplete type has to be marked so that the class and
|
the method can be assigned correct types.) */
|
the method can be assigned correct types.) */
|
|
|
#define TYPE_INCOMPLETE(t) (TYPE_MAIN_TYPE (t)->flag_incomplete)
|
#define TYPE_INCOMPLETE(t) (TYPE_MAIN_TYPE (t)->flag_incomplete)
|
|
|
/* FIXME drow/2002-06-03: Only used for methods, but applies as well
|
/* FIXME drow/2002-06-03: Only used for methods, but applies as well
|
to functions. */
|
to functions. */
|
|
|
#define TYPE_VARARGS(t) (TYPE_MAIN_TYPE (t)->flag_varargs)
|
#define TYPE_VARARGS(t) (TYPE_MAIN_TYPE (t)->flag_varargs)
|
|
|
/* Identify a vector type. Gcc is handling this by adding an extra
|
/* Identify a vector type. Gcc is handling this by adding an extra
|
attribute to the array type. We slurp that in as a new flag of a
|
attribute to the array type. We slurp that in as a new flag of a
|
type. This is used only in dwarf2read.c. */
|
type. This is used only in dwarf2read.c. */
|
#define TYPE_VECTOR(t) (TYPE_MAIN_TYPE (t)->flag_vector)
|
#define TYPE_VECTOR(t) (TYPE_MAIN_TYPE (t)->flag_vector)
|
|
|
/* The debugging formats (especially STABS) do not contain enough information
|
/* The debugging formats (especially STABS) do not contain enough information
|
to represent all Ada types---especially those whose size depends on
|
to represent all Ada types---especially those whose size depends on
|
dynamic quantities. Therefore, the GNAT Ada compiler includes
|
dynamic quantities. Therefore, the GNAT Ada compiler includes
|
extra information in the form of additional type definitions
|
extra information in the form of additional type definitions
|
connected by naming conventions. This flag indicates that the
|
connected by naming conventions. This flag indicates that the
|
type is an ordinary (unencoded) GDB type that has been created from
|
type is an ordinary (unencoded) GDB type that has been created from
|
the necessary run-time information, and does not need further
|
the necessary run-time information, and does not need further
|
interpretation. Optionally marks ordinary, fixed-size GDB type. */
|
interpretation. Optionally marks ordinary, fixed-size GDB type. */
|
|
|
#define TYPE_FIXED_INSTANCE(t) (TYPE_MAIN_TYPE (t)->flag_fixed_instance)
|
#define TYPE_FIXED_INSTANCE(t) (TYPE_MAIN_TYPE (t)->flag_fixed_instance)
|
|
|
/* This debug target supports TYPE_STUB(t). In the unsupported case we have to
|
/* This debug target supports TYPE_STUB(t). In the unsupported case we have to
|
rely on NFIELDS to be zero etc., see TYPE_IS_OPAQUE ().
|
rely on NFIELDS to be zero etc., see TYPE_IS_OPAQUE ().
|
TYPE_STUB(t) with !TYPE_STUB_SUPPORTED(t) may exist if we only guessed
|
TYPE_STUB(t) with !TYPE_STUB_SUPPORTED(t) may exist if we only guessed
|
the TYPE_STUB(t) value (see dwarfread.c). */
|
the TYPE_STUB(t) value (see dwarfread.c). */
|
|
|
#define TYPE_STUB_SUPPORTED(t) (TYPE_MAIN_TYPE (t)->flag_stub_supported)
|
#define TYPE_STUB_SUPPORTED(t) (TYPE_MAIN_TYPE (t)->flag_stub_supported)
|
|
|
/* Not textual. By default, GDB treats all single byte integers as
|
/* Not textual. By default, GDB treats all single byte integers as
|
characters (or elements of strings) unless this flag is set. */
|
characters (or elements of strings) unless this flag is set. */
|
|
|
#define TYPE_NOTTEXT(t) (TYPE_MAIN_TYPE (t)->flag_nottext)
|
#define TYPE_NOTTEXT(t) (TYPE_MAIN_TYPE (t)->flag_nottext)
|
|
|
/* Type owner. If TYPE_OBJFILE_OWNED is true, the type is owned by
|
/* Type owner. If TYPE_OBJFILE_OWNED is true, the type is owned by
|
the objfile retrieved as TYPE_OBJFILE. Otherweise, the type is
|
the objfile retrieved as TYPE_OBJFILE. Otherweise, the type is
|
owned by an architecture; TYPE_OBJFILE is NULL in this case. */
|
owned by an architecture; TYPE_OBJFILE is NULL in this case. */
|
|
|
#define TYPE_OBJFILE_OWNED(t) (TYPE_MAIN_TYPE (t)->flag_objfile_owned)
|
#define TYPE_OBJFILE_OWNED(t) (TYPE_MAIN_TYPE (t)->flag_objfile_owned)
|
#define TYPE_OWNER(t) TYPE_MAIN_TYPE(t)->owner
|
#define TYPE_OWNER(t) TYPE_MAIN_TYPE(t)->owner
|
#define TYPE_OBJFILE(t) (TYPE_OBJFILE_OWNED(t)? TYPE_OWNER(t).objfile : NULL)
|
#define TYPE_OBJFILE(t) (TYPE_OBJFILE_OWNED(t)? TYPE_OWNER(t).objfile : NULL)
|
|
|
/* True if this type was declared using the "class" keyword. This is
|
/* True if this type was declared using the "class" keyword. This is
|
only valid for C++ structure types, and only used for displaying
|
only valid for C++ structure types, and only used for displaying
|
the type. If false, the structure was declared as a "struct". */
|
the type. If false, the structure was declared as a "struct". */
|
|
|
#define TYPE_DECLARED_CLASS(t) (TYPE_MAIN_TYPE (t)->flag_declared_class)
|
#define TYPE_DECLARED_CLASS(t) (TYPE_MAIN_TYPE (t)->flag_declared_class)
|
|
|
/* Constant type. If this is set, the corresponding type has a
|
/* Constant type. If this is set, the corresponding type has a
|
* const modifier.
|
* const modifier.
|
*/
|
*/
|
|
|
#define TYPE_CONST(t) (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_CONST)
|
#define TYPE_CONST(t) (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_CONST)
|
|
|
/* Volatile type. If this is set, the corresponding type has a
|
/* Volatile type. If this is set, the corresponding type has a
|
* volatile modifier.
|
* volatile modifier.
|
*/
|
*/
|
|
|
#define TYPE_VOLATILE(t) (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_VOLATILE)
|
#define TYPE_VOLATILE(t) (TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_VOLATILE)
|
|
|
/* Instruction-space delimited type. This is for Harvard architectures
|
/* Instruction-space delimited type. This is for Harvard architectures
|
which have separate instruction and data address spaces (and perhaps
|
which have separate instruction and data address spaces (and perhaps
|
others).
|
others).
|
|
|
GDB usually defines a flat address space that is a superset of the
|
GDB usually defines a flat address space that is a superset of the
|
architecture's two (or more) address spaces, but this is an extension
|
architecture's two (or more) address spaces, but this is an extension
|
of the architecture's model.
|
of the architecture's model.
|
|
|
If TYPE_FLAG_INST is set, an object of the corresponding type
|
If TYPE_FLAG_INST is set, an object of the corresponding type
|
resides in instruction memory, even if its address (in the extended
|
resides in instruction memory, even if its address (in the extended
|
flat address space) does not reflect this.
|
flat address space) does not reflect this.
|
|
|
Similarly, if TYPE_FLAG_DATA is set, then an object of the
|
Similarly, if TYPE_FLAG_DATA is set, then an object of the
|
corresponding type resides in the data memory space, even if
|
corresponding type resides in the data memory space, even if
|
this is not indicated by its (flat address space) address.
|
this is not indicated by its (flat address space) address.
|
|
|
If neither flag is set, the default space for functions / methods
|
If neither flag is set, the default space for functions / methods
|
is instruction space, and for data objects is data memory. */
|
is instruction space, and for data objects is data memory. */
|
|
|
#define TYPE_CODE_SPACE(t) \
|
#define TYPE_CODE_SPACE(t) \
|
(TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_CODE_SPACE)
|
(TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_CODE_SPACE)
|
|
|
#define TYPE_DATA_SPACE(t) \
|
#define TYPE_DATA_SPACE(t) \
|
(TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_DATA_SPACE)
|
(TYPE_INSTANCE_FLAGS (t) & TYPE_INSTANCE_FLAG_DATA_SPACE)
|
|
|
/* Address class flags. Some environments provide for pointers whose
|
/* Address class flags. Some environments provide for pointers whose
|
size is different from that of a normal pointer or address types
|
size is different from that of a normal pointer or address types
|
where the bits are interpreted differently than normal addresses. The
|
where the bits are interpreted differently than normal addresses. The
|
TYPE_FLAG_ADDRESS_CLASS_n flags may be used in target specific
|
TYPE_FLAG_ADDRESS_CLASS_n flags may be used in target specific
|
ways to represent these different types of address classes. */
|
ways to represent these different types of address classes. */
|
#define TYPE_ADDRESS_CLASS_1(t) (TYPE_INSTANCE_FLAGS(t) \
|
#define TYPE_ADDRESS_CLASS_1(t) (TYPE_INSTANCE_FLAGS(t) \
|
& TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1)
|
& TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1)
|
#define TYPE_ADDRESS_CLASS_2(t) (TYPE_INSTANCE_FLAGS(t) \
|
#define TYPE_ADDRESS_CLASS_2(t) (TYPE_INSTANCE_FLAGS(t) \
|
& TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
|
& TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
|
#define TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL \
|
#define TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL \
|
(TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 | TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
|
(TYPE_INSTANCE_FLAG_ADDRESS_CLASS_1 | TYPE_INSTANCE_FLAG_ADDRESS_CLASS_2)
|
#define TYPE_ADDRESS_CLASS_ALL(t) (TYPE_INSTANCE_FLAGS(t) \
|
#define TYPE_ADDRESS_CLASS_ALL(t) (TYPE_INSTANCE_FLAGS(t) \
|
& TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL)
|
& TYPE_INSTANCE_FLAG_ADDRESS_CLASS_ALL)
|
|
|
/* Determine which field of the union main_type.fields[x].loc is used. */
|
/* Determine which field of the union main_type.fields[x].loc is used. */
|
|
|
enum field_loc_kind
|
enum field_loc_kind
|
{
|
{
|
FIELD_LOC_KIND_BITPOS, /* bitpos */
|
FIELD_LOC_KIND_BITPOS, /* bitpos */
|
FIELD_LOC_KIND_PHYSADDR, /* physaddr */
|
FIELD_LOC_KIND_PHYSADDR, /* physaddr */
|
FIELD_LOC_KIND_PHYSNAME, /* physname */
|
FIELD_LOC_KIND_PHYSNAME, /* physname */
|
FIELD_LOC_KIND_DWARF_BLOCK /* dwarf_block */
|
FIELD_LOC_KIND_DWARF_BLOCK /* dwarf_block */
|
};
|
};
|
|
|
/* A discriminant to determine which field in the main_type.type_specific
|
/* A discriminant to determine which field in the main_type.type_specific
|
union is being used, if any.
|
union is being used, if any.
|
|
|
For types such as TYPE_CODE_FLT or TYPE_CODE_FUNC, the use of this
|
For types such as TYPE_CODE_FLT or TYPE_CODE_FUNC, the use of this
|
discriminant is really redundant, as we know from the type code
|
discriminant is really redundant, as we know from the type code
|
which field is going to be used. As such, it would be possible to
|
which field is going to be used. As such, it would be possible to
|
reduce the size of this enum in order to save a bit or two for
|
reduce the size of this enum in order to save a bit or two for
|
other fields of struct main_type. But, since we still have extra
|
other fields of struct main_type. But, since we still have extra
|
room , and for the sake of clarity and consistency, we treat all fields
|
room , and for the sake of clarity and consistency, we treat all fields
|
of the union the same way. */
|
of the union the same way. */
|
|
|
enum type_specific_kind
|
enum type_specific_kind
|
{
|
{
|
TYPE_SPECIFIC_NONE,
|
TYPE_SPECIFIC_NONE,
|
TYPE_SPECIFIC_CPLUS_STUFF,
|
TYPE_SPECIFIC_CPLUS_STUFF,
|
TYPE_SPECIFIC_GNAT_STUFF,
|
TYPE_SPECIFIC_GNAT_STUFF,
|
TYPE_SPECIFIC_FLOATFORMAT,
|
TYPE_SPECIFIC_FLOATFORMAT,
|
TYPE_SPECIFIC_CALLING_CONVENTION
|
TYPE_SPECIFIC_CALLING_CONVENTION
|
};
|
};
|
|
|
/* This structure is space-critical.
|
/* This structure is space-critical.
|
Its layout has been tweaked to reduce the space used. */
|
Its layout has been tweaked to reduce the space used. */
|
|
|
struct main_type
|
struct main_type
|
{
|
{
|
/* Code for kind of type */
|
/* Code for kind of type */
|
|
|
ENUM_BITFIELD(type_code) code : 8;
|
ENUM_BITFIELD(type_code) code : 8;
|
|
|
/* Flags about this type. These fields appear at this location
|
/* Flags about this type. These fields appear at this location
|
because they packs nicely here. See the TYPE_* macros for
|
because they packs nicely here. See the TYPE_* macros for
|
documentation about these fields. */
|
documentation about these fields. */
|
|
|
unsigned int flag_unsigned : 1;
|
unsigned int flag_unsigned : 1;
|
unsigned int flag_nosign : 1;
|
unsigned int flag_nosign : 1;
|
unsigned int flag_stub : 1;
|
unsigned int flag_stub : 1;
|
unsigned int flag_target_stub : 1;
|
unsigned int flag_target_stub : 1;
|
unsigned int flag_static : 1;
|
unsigned int flag_static : 1;
|
unsigned int flag_prototyped : 1;
|
unsigned int flag_prototyped : 1;
|
unsigned int flag_incomplete : 1;
|
unsigned int flag_incomplete : 1;
|
unsigned int flag_varargs : 1;
|
unsigned int flag_varargs : 1;
|
unsigned int flag_vector : 1;
|
unsigned int flag_vector : 1;
|
unsigned int flag_stub_supported : 1;
|
unsigned int flag_stub_supported : 1;
|
unsigned int flag_nottext : 1;
|
unsigned int flag_nottext : 1;
|
unsigned int flag_fixed_instance : 1;
|
unsigned int flag_fixed_instance : 1;
|
unsigned int flag_objfile_owned : 1;
|
unsigned int flag_objfile_owned : 1;
|
/* True if this type was declared with "class" rather than
|
/* True if this type was declared with "class" rather than
|
"struct". */
|
"struct". */
|
unsigned int flag_declared_class : 1;
|
unsigned int flag_declared_class : 1;
|
|
|
/* A discriminant telling us which field of the type_specific union
|
/* A discriminant telling us which field of the type_specific union
|
is being used for this type, if any. */
|
is being used for this type, if any. */
|
ENUM_BITFIELD(type_specific_kind) type_specific_field : 3;
|
ENUM_BITFIELD(type_specific_kind) type_specific_field : 3;
|
|
|
/* Number of fields described for this type. This field appears at
|
/* Number of fields described for this type. This field appears at
|
this location because it packs nicely here. */
|
this location because it packs nicely here. */
|
|
|
short nfields;
|
short nfields;
|
|
|
/* Field number of the virtual function table pointer in
|
/* Field number of the virtual function table pointer in
|
VPTR_BASETYPE. If -1, we were unable to find the virtual
|
VPTR_BASETYPE. If -1, we were unable to find the virtual
|
function table pointer in initial symbol reading, and
|
function table pointer in initial symbol reading, and
|
get_vptr_fieldno should be called to find it if possible.
|
get_vptr_fieldno should be called to find it if possible.
|
get_vptr_fieldno will update this field if possible.
|
get_vptr_fieldno will update this field if possible.
|
Otherwise the value is left at -1.
|
Otherwise the value is left at -1.
|
|
|
Unused if this type does not have virtual functions.
|
Unused if this type does not have virtual functions.
|
|
|
This field appears at this location because it packs nicely here. */
|
This field appears at this location because it packs nicely here. */
|
|
|
short vptr_fieldno;
|
short vptr_fieldno;
|
|
|
/* Name of this type, or NULL if none.
|
/* Name of this type, or NULL if none.
|
|
|
This is used for printing only, except by poorly designed C++ code.
|
This is used for printing only, except by poorly designed C++ code.
|
For looking up a name, look for a symbol in the VAR_DOMAIN. */
|
For looking up a name, look for a symbol in the VAR_DOMAIN. */
|
|
|
char *name;
|
char *name;
|
|
|
/* Tag name for this type, or NULL if none. This means that the
|
/* Tag name for this type, or NULL if none. This means that the
|
name of the type consists of a keyword followed by the tag name.
|
name of the type consists of a keyword followed by the tag name.
|
Which keyword is determined by the type code ("struct" for
|
Which keyword is determined by the type code ("struct" for
|
TYPE_CODE_STRUCT, etc.). As far as I know C/C++ are the only languages
|
TYPE_CODE_STRUCT, etc.). As far as I know C/C++ are the only languages
|
with this feature.
|
with this feature.
|
|
|
This is used for printing only, except by poorly designed C++ code.
|
This is used for printing only, except by poorly designed C++ code.
|
For looking up a name, look for a symbol in the STRUCT_DOMAIN.
|
For looking up a name, look for a symbol in the STRUCT_DOMAIN.
|
One more legitimate use is that if TYPE_FLAG_STUB is set, this is
|
One more legitimate use is that if TYPE_FLAG_STUB is set, this is
|
the name to use to look for definitions in other files. */
|
the name to use to look for definitions in other files. */
|
|
|
char *tag_name;
|
char *tag_name;
|
|
|
/* Every type is now associated with a particular objfile, and the
|
/* Every type is now associated with a particular objfile, and the
|
type is allocated on the objfile_obstack for that objfile. One problem
|
type is allocated on the objfile_obstack for that objfile. One problem
|
however, is that there are times when gdb allocates new types while
|
however, is that there are times when gdb allocates new types while
|
it is not in the process of reading symbols from a particular objfile.
|
it is not in the process of reading symbols from a particular objfile.
|
Fortunately, these happen when the type being created is a derived
|
Fortunately, these happen when the type being created is a derived
|
type of an existing type, such as in lookup_pointer_type(). So
|
type of an existing type, such as in lookup_pointer_type(). So
|
we can just allocate the new type using the same objfile as the
|
we can just allocate the new type using the same objfile as the
|
existing type, but to do this we need a backpointer to the objfile
|
existing type, but to do this we need a backpointer to the objfile
|
from the existing type. Yes this is somewhat ugly, but without
|
from the existing type. Yes this is somewhat ugly, but without
|
major overhaul of the internal type system, it can't be avoided
|
major overhaul of the internal type system, it can't be avoided
|
for now. */
|
for now. */
|
|
|
union type_owner
|
union type_owner
|
{
|
{
|
struct objfile *objfile;
|
struct objfile *objfile;
|
struct gdbarch *gdbarch;
|
struct gdbarch *gdbarch;
|
} owner;
|
} owner;
|
|
|
/* For a pointer type, describes the type of object pointed to.
|
/* For a pointer type, describes the type of object pointed to.
|
For an array type, describes the type of the elements.
|
For an array type, describes the type of the elements.
|
For a function or method type, describes the type of the return value.
|
For a function or method type, describes the type of the return value.
|
For a range type, describes the type of the full range.
|
For a range type, describes the type of the full range.
|
For a complex type, describes the type of each coordinate.
|
For a complex type, describes the type of each coordinate.
|
Unused otherwise. */
|
Unused otherwise. */
|
|
|
struct type *target_type;
|
struct type *target_type;
|
|
|
/* For structure and union types, a description of each field.
|
/* For structure and union types, a description of each field.
|
For set and pascal array types, there is one "field",
|
For set and pascal array types, there is one "field",
|
whose type is the domain type of the set or array.
|
whose type is the domain type of the set or array.
|
For range types, there are two "fields",
|
For range types, there are two "fields",
|
the minimum and maximum values (both inclusive).
|
the minimum and maximum values (both inclusive).
|
For enum types, each possible value is described by one "field".
|
For enum types, each possible value is described by one "field".
|
For a function or method type, a "field" for each parameter.
|
For a function or method type, a "field" for each parameter.
|
For C++ classes, there is one field for each base class (if it is
|
For C++ classes, there is one field for each base class (if it is
|
a derived class) plus one field for each class data member. Member
|
a derived class) plus one field for each class data member. Member
|
functions are recorded elsewhere.
|
functions are recorded elsewhere.
|
|
|
Using a pointer to a separate array of fields
|
Using a pointer to a separate array of fields
|
allows all types to have the same size, which is useful
|
allows all types to have the same size, which is useful
|
because we can allocate the space for a type before
|
because we can allocate the space for a type before
|
we know what to put in it. */
|
we know what to put in it. */
|
|
|
union
|
union
|
{
|
{
|
struct field
|
struct field
|
{
|
{
|
union field_location
|
union field_location
|
{
|
{
|
/* Position of this field, counting in bits from start of
|
/* Position of this field, counting in bits from start of
|
containing structure.
|
containing structure.
|
For gdbarch_bits_big_endian=1 targets, it is the bit offset to the MSB.
|
For gdbarch_bits_big_endian=1 targets, it is the bit offset to the MSB.
|
For gdbarch_bits_big_endian=0 targets, it is the bit offset to the LSB.
|
For gdbarch_bits_big_endian=0 targets, it is the bit offset to the LSB.
|
For a range bound or enum value, this is the value itself. */
|
For a range bound or enum value, this is the value itself. */
|
|
|
int bitpos;
|
int bitpos;
|
|
|
/* For a static field, if TYPE_FIELD_STATIC_HAS_ADDR then physaddr
|
/* For a static field, if TYPE_FIELD_STATIC_HAS_ADDR then physaddr
|
is the location (in the target) of the static field.
|
is the location (in the target) of the static field.
|
Otherwise, physname is the mangled label of the static field. */
|
Otherwise, physname is the mangled label of the static field. */
|
|
|
CORE_ADDR physaddr;
|
CORE_ADDR physaddr;
|
char *physname;
|
char *physname;
|
|
|
/* The field location can be computed by evaluating the following DWARF
|
/* The field location can be computed by evaluating the following DWARF
|
block. This can be used in Fortran variable-length arrays, for
|
block. This can be used in Fortran variable-length arrays, for
|
instance. */
|
instance. */
|
|
|
struct dwarf2_locexpr_baton *dwarf_block;
|
struct dwarf2_locexpr_baton *dwarf_block;
|
}
|
}
|
loc;
|
loc;
|
|
|
/* For a function or member type, this is 1 if the argument is marked
|
/* For a function or member type, this is 1 if the argument is marked
|
artificial. Artificial arguments should not be shown to the
|
artificial. Artificial arguments should not be shown to the
|
user. For TYPE_CODE_RANGE it is set if the specific bound is not
|
user. For TYPE_CODE_RANGE it is set if the specific bound is not
|
defined. */
|
defined. */
|
unsigned int artificial : 1;
|
unsigned int artificial : 1;
|
|
|
/* Discriminant for union field_location. */
|
/* Discriminant for union field_location. */
|
ENUM_BITFIELD(field_loc_kind) loc_kind : 2;
|
ENUM_BITFIELD(field_loc_kind) loc_kind : 2;
|
|
|
/* Size of this field, in bits, or zero if not packed.
|
/* Size of this field, in bits, or zero if not packed.
|
If non-zero in an array type, indicates the element size in
|
If non-zero in an array type, indicates the element size in
|
bits (used only in Ada at the moment).
|
bits (used only in Ada at the moment).
|
For an unpacked field, the field's type's length
|
For an unpacked field, the field's type's length
|
says how many bytes the field occupies. */
|
says how many bytes the field occupies. */
|
|
|
unsigned int bitsize : 29;
|
unsigned int bitsize : 29;
|
|
|
/* In a struct or union type, type of this field.
|
/* In a struct or union type, type of this field.
|
In a function or member type, type of this argument.
|
In a function or member type, type of this argument.
|
In an array type, the domain-type of the array. */
|
In an array type, the domain-type of the array. */
|
|
|
struct type *type;
|
struct type *type;
|
|
|
/* Name of field, value or argument.
|
/* Name of field, value or argument.
|
NULL for range bounds, array domains, and member function
|
NULL for range bounds, array domains, and member function
|
arguments. */
|
arguments. */
|
|
|
char *name;
|
char *name;
|
} *fields;
|
} *fields;
|
|
|
/* Union member used for range types. */
|
/* Union member used for range types. */
|
|
|
struct range_bounds
|
struct range_bounds
|
{
|
{
|
/* Low bound of range. */
|
/* Low bound of range. */
|
|
|
LONGEST low;
|
LONGEST low;
|
|
|
/* High bound of range. */
|
/* High bound of range. */
|
|
|
LONGEST high;
|
LONGEST high;
|
|
|
/* Flags indicating whether the values of low and high are
|
/* Flags indicating whether the values of low and high are
|
valid. When true, the respective range value is
|
valid. When true, the respective range value is
|
undefined. Currently used only for FORTRAN arrays. */
|
undefined. Currently used only for FORTRAN arrays. */
|
|
|
char low_undefined;
|
char low_undefined;
|
char high_undefined;
|
char high_undefined;
|
|
|
} *bounds;
|
} *bounds;
|
|
|
} flds_bnds;
|
} flds_bnds;
|
|
|
/* For types with virtual functions (TYPE_CODE_STRUCT), VPTR_BASETYPE
|
/* For types with virtual functions (TYPE_CODE_STRUCT), VPTR_BASETYPE
|
is the base class which defined the virtual function table pointer.
|
is the base class which defined the virtual function table pointer.
|
|
|
For types that are pointer to member types (TYPE_CODE_METHODPTR,
|
For types that are pointer to member types (TYPE_CODE_METHODPTR,
|
TYPE_CODE_MEMBERPTR), VPTR_BASETYPE is the type that this pointer
|
TYPE_CODE_MEMBERPTR), VPTR_BASETYPE is the type that this pointer
|
is a member of.
|
is a member of.
|
|
|
For method types (TYPE_CODE_METHOD), VPTR_BASETYPE is the aggregate
|
For method types (TYPE_CODE_METHOD), VPTR_BASETYPE is the aggregate
|
type that contains the method.
|
type that contains the method.
|
|
|
Unused otherwise. */
|
Unused otherwise. */
|
|
|
struct type *vptr_basetype;
|
struct type *vptr_basetype;
|
|
|
/* Slot to point to additional language-specific fields of this type. */
|
/* Slot to point to additional language-specific fields of this type. */
|
|
|
union type_specific
|
union type_specific
|
{
|
{
|
/* CPLUS_STUFF is for TYPE_CODE_STRUCT. It is initialized to point to
|
/* CPLUS_STUFF is for TYPE_CODE_STRUCT. It is initialized to point to
|
cplus_struct_default, a default static instance of a struct
|
cplus_struct_default, a default static instance of a struct
|
cplus_struct_type. */
|
cplus_struct_type. */
|
|
|
struct cplus_struct_type *cplus_stuff;
|
struct cplus_struct_type *cplus_stuff;
|
|
|
/* GNAT_STUFF is for types for which the GNAT Ada compiler
|
/* GNAT_STUFF is for types for which the GNAT Ada compiler
|
provides additional information. */
|
provides additional information. */
|
struct gnat_aux_type *gnat_stuff;
|
struct gnat_aux_type *gnat_stuff;
|
|
|
/* FLOATFORMAT is for TYPE_CODE_FLT. It is a pointer to two
|
/* FLOATFORMAT is for TYPE_CODE_FLT. It is a pointer to two
|
floatformat objects that describe the floating-point value
|
floatformat objects that describe the floating-point value
|
that resides within the type. The first is for big endian
|
that resides within the type. The first is for big endian
|
targets and the second is for little endian targets. */
|
targets and the second is for little endian targets. */
|
|
|
const struct floatformat **floatformat;
|
const struct floatformat **floatformat;
|
|
|
/* For TYPE_CODE_FUNC types, the calling convention for targets
|
/* For TYPE_CODE_FUNC types, the calling convention for targets
|
supporting multiple ABIs. Right now this is only fetched from
|
supporting multiple ABIs. Right now this is only fetched from
|
the Dwarf-2 DW_AT_calling_convention attribute. */
|
the Dwarf-2 DW_AT_calling_convention attribute. */
|
unsigned calling_convention;
|
unsigned calling_convention;
|
} type_specific;
|
} type_specific;
|
};
|
};
|
|
|
/* A ``struct type'' describes a particular instance of a type, with
|
/* A ``struct type'' describes a particular instance of a type, with
|
some particular qualification. */
|
some particular qualification. */
|
struct type
|
struct type
|
{
|
{
|
/* Type that is a pointer to this type.
|
/* Type that is a pointer to this type.
|
NULL if no such pointer-to type is known yet.
|
NULL if no such pointer-to type is known yet.
|
The debugger may add the address of such a type
|
The debugger may add the address of such a type
|
if it has to construct one later. */
|
if it has to construct one later. */
|
|
|
struct type *pointer_type;
|
struct type *pointer_type;
|
|
|
/* C++: also need a reference type. */
|
/* C++: also need a reference type. */
|
|
|
struct type *reference_type;
|
struct type *reference_type;
|
|
|
/* Variant chain. This points to a type that differs from this one only
|
/* Variant chain. This points to a type that differs from this one only
|
in qualifiers and length. Currently, the possible qualifiers are
|
in qualifiers and length. Currently, the possible qualifiers are
|
const, volatile, code-space, data-space, and address class. The
|
const, volatile, code-space, data-space, and address class. The
|
length may differ only when one of the address class flags are set.
|
length may differ only when one of the address class flags are set.
|
The variants are linked in a circular ring and share MAIN_TYPE. */
|
The variants are linked in a circular ring and share MAIN_TYPE. */
|
struct type *chain;
|
struct type *chain;
|
|
|
/* Flags specific to this instance of the type, indicating where
|
/* Flags specific to this instance of the type, indicating where
|
on the ring we are. */
|
on the ring we are. */
|
int instance_flags;
|
int instance_flags;
|
|
|
/* Length of storage for a value of this type. This is what
|
/* Length of storage for a value of this type. This is what
|
sizeof(type) would return; use it for address arithmetic,
|
sizeof(type) would return; use it for address arithmetic,
|
memory reads and writes, etc. This size includes padding. For
|
memory reads and writes, etc. This size includes padding. For
|
example, an i386 extended-precision floating point value really
|
example, an i386 extended-precision floating point value really
|
only occupies ten bytes, but most ABI's declare its size to be
|
only occupies ten bytes, but most ABI's declare its size to be
|
12 bytes, to preserve alignment. A `struct type' representing
|
12 bytes, to preserve alignment. A `struct type' representing
|
such a floating-point type would have a `length' value of 12,
|
such a floating-point type would have a `length' value of 12,
|
even though the last two bytes are unused.
|
even though the last two bytes are unused.
|
|
|
There's a bit of a host/target mess here, if you're concerned
|
There's a bit of a host/target mess here, if you're concerned
|
about machines whose bytes aren't eight bits long, or who don't
|
about machines whose bytes aren't eight bits long, or who don't
|
have byte-addressed memory. Various places pass this to memcpy
|
have byte-addressed memory. Various places pass this to memcpy
|
and such, meaning it must be in units of host bytes. Various
|
and such, meaning it must be in units of host bytes. Various
|
other places expect they can calculate addresses by adding it
|
other places expect they can calculate addresses by adding it
|
and such, meaning it must be in units of target bytes. For
|
and such, meaning it must be in units of target bytes. For
|
some DSP targets, in which HOST_CHAR_BIT will (presumably) be 8
|
some DSP targets, in which HOST_CHAR_BIT will (presumably) be 8
|
and TARGET_CHAR_BIT will be (say) 32, this is a problem.
|
and TARGET_CHAR_BIT will be (say) 32, this is a problem.
|
|
|
One fix would be to make this field in bits (requiring that it
|
One fix would be to make this field in bits (requiring that it
|
always be a multiple of HOST_CHAR_BIT and TARGET_CHAR_BIT) ---
|
always be a multiple of HOST_CHAR_BIT and TARGET_CHAR_BIT) ---
|
the other choice would be to make it consistently in units of
|
the other choice would be to make it consistently in units of
|
HOST_CHAR_BIT. However, this would still fail to address
|
HOST_CHAR_BIT. However, this would still fail to address
|
machines based on a ternary or decimal representation. */
|
machines based on a ternary or decimal representation. */
|
|
|
unsigned length;
|
unsigned length;
|
|
|
/* Core type, shared by a group of qualified types. */
|
/* Core type, shared by a group of qualified types. */
|
struct main_type *main_type;
|
struct main_type *main_type;
|
};
|
};
|
|
|
#define NULL_TYPE ((struct type *) 0)
|
#define NULL_TYPE ((struct type *) 0)
|
|
|
/* C++ language-specific information for TYPE_CODE_STRUCT and TYPE_CODE_UNION
|
/* C++ language-specific information for TYPE_CODE_STRUCT and TYPE_CODE_UNION
|
nodes. */
|
nodes. */
|
|
|
struct cplus_struct_type
|
struct cplus_struct_type
|
{
|
{
|
/* Number of base classes this type derives from. The baseclasses are
|
/* Number of base classes this type derives from. The baseclasses are
|
stored in the first N_BASECLASSES fields (i.e. the `fields' field of
|
stored in the first N_BASECLASSES fields (i.e. the `fields' field of
|
the struct type). I think only the `type' field of such a field has
|
the struct type). I think only the `type' field of such a field has
|
any meaning. */
|
any meaning. */
|
|
|
short n_baseclasses;
|
short n_baseclasses;
|
|
|
/* Number of methods with unique names. All overloaded methods with
|
/* Number of methods with unique names. All overloaded methods with
|
the same name count only once. */
|
the same name count only once. */
|
|
|
short nfn_fields;
|
short nfn_fields;
|
|
|
/* Number of methods described for this type, not including the
|
/* Number of methods described for this type, not including the
|
methods that it derives from. */
|
methods that it derives from. */
|
|
|
short nfn_fields_total;
|
short nfn_fields_total;
|
|
|
/* Number of template arguments, placed here for better struct
|
/* Number of template arguments, placed here for better struct
|
packing. */
|
packing. */
|
|
|
short ntemplate_args;
|
short ntemplate_args;
|
|
|
/* For derived classes, the number of base classes is given by n_baseclasses
|
/* For derived classes, the number of base classes is given by n_baseclasses
|
and virtual_field_bits is a bit vector containing one bit per base class.
|
and virtual_field_bits is a bit vector containing one bit per base class.
|
If the base class is virtual, the corresponding bit will be set.
|
If the base class is virtual, the corresponding bit will be set.
|
I.E, given:
|
I.E, given:
|
|
|
class A{};
|
class A{};
|
class B{};
|
class B{};
|
class C : public B, public virtual A {};
|
class C : public B, public virtual A {};
|
|
|
B is a baseclass of C; A is a virtual baseclass for C.
|
B is a baseclass of C; A is a virtual baseclass for C.
|
This is a C++ 2.0 language feature. */
|
This is a C++ 2.0 language feature. */
|
|
|
B_TYPE *virtual_field_bits;
|
B_TYPE *virtual_field_bits;
|
|
|
/* For classes with private fields, the number of fields is given by
|
/* For classes with private fields, the number of fields is given by
|
nfields and private_field_bits is a bit vector containing one bit
|
nfields and private_field_bits is a bit vector containing one bit
|
per field.
|
per field.
|
If the field is private, the corresponding bit will be set. */
|
If the field is private, the corresponding bit will be set. */
|
|
|
B_TYPE *private_field_bits;
|
B_TYPE *private_field_bits;
|
|
|
/* For classes with protected fields, the number of fields is given by
|
/* For classes with protected fields, the number of fields is given by
|
nfields and protected_field_bits is a bit vector containing one bit
|
nfields and protected_field_bits is a bit vector containing one bit
|
per field.
|
per field.
|
If the field is private, the corresponding bit will be set. */
|
If the field is private, the corresponding bit will be set. */
|
|
|
B_TYPE *protected_field_bits;
|
B_TYPE *protected_field_bits;
|
|
|
/* for classes with fields to be ignored, either this is optimized out
|
/* for classes with fields to be ignored, either this is optimized out
|
or this field has length 0 */
|
or this field has length 0 */
|
|
|
B_TYPE *ignore_field_bits;
|
B_TYPE *ignore_field_bits;
|
|
|
/* For classes, structures, and unions, a description of each field,
|
/* For classes, structures, and unions, a description of each field,
|
which consists of an overloaded name, followed by the types of
|
which consists of an overloaded name, followed by the types of
|
arguments that the method expects, and then the name after it
|
arguments that the method expects, and then the name after it
|
has been renamed to make it distinct.
|
has been renamed to make it distinct.
|
|
|
fn_fieldlists points to an array of nfn_fields of these. */
|
fn_fieldlists points to an array of nfn_fields of these. */
|
|
|
struct fn_fieldlist
|
struct fn_fieldlist
|
{
|
{
|
|
|
/* The overloaded name. */
|
/* The overloaded name. */
|
|
|
char *name;
|
char *name;
|
|
|
/* The number of methods with this name. */
|
/* The number of methods with this name. */
|
|
|
int length;
|
int length;
|
|
|
/* The list of methods. */
|
/* The list of methods. */
|
|
|
struct fn_field
|
struct fn_field
|
{
|
{
|
|
|
/* If is_stub is clear, this is the mangled name which we can
|
/* If is_stub is clear, this is the mangled name which we can
|
look up to find the address of the method (FIXME: it would
|
look up to find the address of the method (FIXME: it would
|
be cleaner to have a pointer to the struct symbol here
|
be cleaner to have a pointer to the struct symbol here
|
instead). */
|
instead). */
|
|
|
/* If is_stub is set, this is the portion of the mangled
|
/* If is_stub is set, this is the portion of the mangled
|
name which specifies the arguments. For example, "ii",
|
name which specifies the arguments. For example, "ii",
|
if there are two int arguments, or "" if there are no
|
if there are two int arguments, or "" if there are no
|
arguments. See gdb_mangle_name for the conversion from this
|
arguments. See gdb_mangle_name for the conversion from this
|
format to the one used if is_stub is clear. */
|
format to the one used if is_stub is clear. */
|
|
|
char *physname;
|
char *physname;
|
|
|
/* The function type for the method.
|
/* The function type for the method.
|
(This comment used to say "The return value of the method",
|
(This comment used to say "The return value of the method",
|
but that's wrong. The function type
|
but that's wrong. The function type
|
is expected here, i.e. something with TYPE_CODE_FUNC,
|
is expected here, i.e. something with TYPE_CODE_FUNC,
|
and *not* the return-value type). */
|
and *not* the return-value type). */
|
|
|
struct type *type;
|
struct type *type;
|
|
|
/* For virtual functions.
|
/* For virtual functions.
|
First baseclass that defines this virtual function. */
|
First baseclass that defines this virtual function. */
|
|
|
struct type *fcontext;
|
struct type *fcontext;
|
|
|
/* Attributes. */
|
/* Attributes. */
|
|
|
unsigned int is_const:1;
|
unsigned int is_const:1;
|
unsigned int is_volatile:1;
|
unsigned int is_volatile:1;
|
unsigned int is_private:1;
|
unsigned int is_private:1;
|
unsigned int is_protected:1;
|
unsigned int is_protected:1;
|
unsigned int is_public:1;
|
unsigned int is_public:1;
|
unsigned int is_abstract:1;
|
unsigned int is_abstract:1;
|
unsigned int is_static:1;
|
unsigned int is_static:1;
|
unsigned int is_final:1;
|
unsigned int is_final:1;
|
unsigned int is_synchronized:1;
|
unsigned int is_synchronized:1;
|
unsigned int is_native:1;
|
unsigned int is_native:1;
|
unsigned int is_artificial:1;
|
unsigned int is_artificial:1;
|
|
|
/* A stub method only has some fields valid (but they are enough
|
/* A stub method only has some fields valid (but they are enough
|
to reconstruct the rest of the fields). */
|
to reconstruct the rest of the fields). */
|
unsigned int is_stub:1;
|
unsigned int is_stub:1;
|
|
|
/* Unused. */
|
/* Unused. */
|
unsigned int dummy:4;
|
unsigned int dummy:4;
|
|
|
/* Index into that baseclass's virtual function table,
|
/* Index into that baseclass's virtual function table,
|
minus 2; else if static: VOFFSET_STATIC; else: 0. */
|
minus 2; else if static: VOFFSET_STATIC; else: 0. */
|
|
|
unsigned int voffset:16;
|
unsigned int voffset:16;
|
|
|
#define VOFFSET_STATIC 1
|
#define VOFFSET_STATIC 1
|
|
|
}
|
}
|
*fn_fields;
|
*fn_fields;
|
|
|
}
|
}
|
*fn_fieldlists;
|
*fn_fieldlists;
|
|
|
/* If this "struct type" describes a template, then it
|
/* If this "struct type" describes a template, then it
|
* has arguments. "template_args" points to an array of
|
* has arguments. "template_args" points to an array of
|
* template arg descriptors, of length "ntemplate_args".
|
* template arg descriptors, of length "ntemplate_args".
|
* The only real information in each of these template arg descriptors
|
* The only real information in each of these template arg descriptors
|
* is a name. "type" will typically just point to a "struct type" with
|
* is a name. "type" will typically just point to a "struct type" with
|
* the placeholder TYPE_CODE_TEMPLATE_ARG type.
|
* the placeholder TYPE_CODE_TEMPLATE_ARG type.
|
*/
|
*/
|
struct template_arg
|
struct template_arg
|
{
|
{
|
char *name;
|
char *name;
|
struct type *type;
|
struct type *type;
|
}
|
}
|
*template_args;
|
*template_args;
|
|
|
/* Pointer to information about enclosing scope, if this is a
|
/* Pointer to information about enclosing scope, if this is a
|
* local type. If it is not a local type, this is NULL
|
* local type. If it is not a local type, this is NULL
|
*/
|
*/
|
struct local_type_info
|
struct local_type_info
|
{
|
{
|
char *file;
|
char *file;
|
int line;
|
int line;
|
}
|
}
|
*localtype_ptr;
|
*localtype_ptr;
|
|
|
/* One if this struct is a dynamic class, as defined by the
|
/* One if this struct is a dynamic class, as defined by the
|
Itanium C++ ABI: if it requires a virtual table pointer,
|
Itanium C++ ABI: if it requires a virtual table pointer,
|
because it or any of its base classes have one or more virtual
|
because it or any of its base classes have one or more virtual
|
member functions or virtual base classes. Minus one if not
|
member functions or virtual base classes. Minus one if not
|
dynamic. Zero if not yet computed. */
|
dynamic. Zero if not yet computed. */
|
int is_dynamic : 2;
|
int is_dynamic : 2;
|
};
|
};
|
|
|
/* Struct used in computing virtual base list */
|
/* Struct used in computing virtual base list */
|
struct vbase
|
struct vbase
|
{
|
{
|
struct type *vbasetype; /* pointer to virtual base */
|
struct type *vbasetype; /* pointer to virtual base */
|
struct vbase *next; /* next in chain */
|
struct vbase *next; /* next in chain */
|
};
|
};
|
|
|
/* Struct used for ranking a function for overload resolution */
|
/* Struct used for ranking a function for overload resolution */
|
struct badness_vector
|
struct badness_vector
|
{
|
{
|
int length;
|
int length;
|
int *rank;
|
int *rank;
|
};
|
};
|
|
|
/* GNAT Ada-specific information for various Ada types. */
|
/* GNAT Ada-specific information for various Ada types. */
|
struct gnat_aux_type
|
struct gnat_aux_type
|
{
|
{
|
/* Parallel type used to encode information about dynamic types
|
/* Parallel type used to encode information about dynamic types
|
used in Ada (such as variant records, variable-size array,
|
used in Ada (such as variant records, variable-size array,
|
etc). */
|
etc). */
|
struct type* descriptive_type;
|
struct type* descriptive_type;
|
};
|
};
|
|
|
/* The default value of TYPE_CPLUS_SPECIFIC(T) points to the
|
/* The default value of TYPE_CPLUS_SPECIFIC(T) points to the
|
this shared static structure. */
|
this shared static structure. */
|
|
|
extern const struct cplus_struct_type cplus_struct_default;
|
extern const struct cplus_struct_type cplus_struct_default;
|
|
|
extern void allocate_cplus_struct_type (struct type *);
|
extern void allocate_cplus_struct_type (struct type *);
|
|
|
#define INIT_CPLUS_SPECIFIC(type) \
|
#define INIT_CPLUS_SPECIFIC(type) \
|
(TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_CPLUS_STUFF, \
|
(TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_CPLUS_STUFF, \
|
TYPE_RAW_CPLUS_SPECIFIC (type) = (struct cplus_struct_type*) &cplus_struct_default)
|
TYPE_RAW_CPLUS_SPECIFIC (type) = (struct cplus_struct_type*) &cplus_struct_default)
|
|
|
#define ALLOCATE_CPLUS_STRUCT_TYPE(type) allocate_cplus_struct_type (type)
|
#define ALLOCATE_CPLUS_STRUCT_TYPE(type) allocate_cplus_struct_type (type)
|
|
|
#define HAVE_CPLUS_STRUCT(type) \
|
#define HAVE_CPLUS_STRUCT(type) \
|
(TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_CPLUS_STUFF \
|
(TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_CPLUS_STUFF \
|
&& TYPE_RAW_CPLUS_SPECIFIC (type) != &cplus_struct_default)
|
&& TYPE_RAW_CPLUS_SPECIFIC (type) != &cplus_struct_default)
|
|
|
extern const struct gnat_aux_type gnat_aux_default;
|
extern const struct gnat_aux_type gnat_aux_default;
|
|
|
extern void allocate_gnat_aux_type (struct type *);
|
extern void allocate_gnat_aux_type (struct type *);
|
|
|
#define INIT_GNAT_SPECIFIC(type) \
|
#define INIT_GNAT_SPECIFIC(type) \
|
(TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_GNAT_STUFF, \
|
(TYPE_SPECIFIC_FIELD (type) = TYPE_SPECIFIC_GNAT_STUFF, \
|
TYPE_GNAT_SPECIFIC (type) = (struct gnat_aux_type *) &gnat_aux_default)
|
TYPE_GNAT_SPECIFIC (type) = (struct gnat_aux_type *) &gnat_aux_default)
|
#define ALLOCATE_GNAT_AUX_TYPE(type) allocate_gnat_aux_type (type)
|
#define ALLOCATE_GNAT_AUX_TYPE(type) allocate_gnat_aux_type (type)
|
/* A macro that returns non-zero if the type-specific data should be
|
/* A macro that returns non-zero if the type-specific data should be
|
read as "gnat-stuff". */
|
read as "gnat-stuff". */
|
#define HAVE_GNAT_AUX_INFO(type) \
|
#define HAVE_GNAT_AUX_INFO(type) \
|
(TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF)
|
(TYPE_SPECIFIC_FIELD (type) == TYPE_SPECIFIC_GNAT_STUFF)
|
|
|
#define TYPE_INSTANCE_FLAGS(thistype) (thistype)->instance_flags
|
#define TYPE_INSTANCE_FLAGS(thistype) (thistype)->instance_flags
|
#define TYPE_MAIN_TYPE(thistype) (thistype)->main_type
|
#define TYPE_MAIN_TYPE(thistype) (thistype)->main_type
|
#define TYPE_NAME(thistype) TYPE_MAIN_TYPE(thistype)->name
|
#define TYPE_NAME(thistype) TYPE_MAIN_TYPE(thistype)->name
|
#define TYPE_TAG_NAME(type) TYPE_MAIN_TYPE(type)->tag_name
|
#define TYPE_TAG_NAME(type) TYPE_MAIN_TYPE(type)->tag_name
|
#define TYPE_TARGET_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->target_type
|
#define TYPE_TARGET_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->target_type
|
#define TYPE_POINTER_TYPE(thistype) (thistype)->pointer_type
|
#define TYPE_POINTER_TYPE(thistype) (thistype)->pointer_type
|
#define TYPE_REFERENCE_TYPE(thistype) (thistype)->reference_type
|
#define TYPE_REFERENCE_TYPE(thistype) (thistype)->reference_type
|
#define TYPE_CHAIN(thistype) (thistype)->chain
|
#define TYPE_CHAIN(thistype) (thistype)->chain
|
/* Note that if thistype is a TYPEDEF type, you have to call check_typedef.
|
/* Note that if thistype is a TYPEDEF type, you have to call check_typedef.
|
But check_typedef does set the TYPE_LENGTH of the TYPEDEF type,
|
But check_typedef does set the TYPE_LENGTH of the TYPEDEF type,
|
so you only have to call check_typedef once. Since allocate_value
|
so you only have to call check_typedef once. Since allocate_value
|
calls check_typedef, TYPE_LENGTH (VALUE_TYPE (X)) is safe. */
|
calls check_typedef, TYPE_LENGTH (VALUE_TYPE (X)) is safe. */
|
#define TYPE_LENGTH(thistype) (thistype)->length
|
#define TYPE_LENGTH(thistype) (thistype)->length
|
/* Note that TYPE_CODE can be TYPE_CODE_TYPEDEF, so if you want the real
|
/* Note that TYPE_CODE can be TYPE_CODE_TYPEDEF, so if you want the real
|
type, you need to do TYPE_CODE (check_type (this_type)). */
|
type, you need to do TYPE_CODE (check_type (this_type)). */
|
#define TYPE_CODE(thistype) TYPE_MAIN_TYPE(thistype)->code
|
#define TYPE_CODE(thistype) TYPE_MAIN_TYPE(thistype)->code
|
#define TYPE_NFIELDS(thistype) TYPE_MAIN_TYPE(thistype)->nfields
|
#define TYPE_NFIELDS(thistype) TYPE_MAIN_TYPE(thistype)->nfields
|
#define TYPE_FIELDS(thistype) TYPE_MAIN_TYPE(thistype)->flds_bnds.fields
|
#define TYPE_FIELDS(thistype) TYPE_MAIN_TYPE(thistype)->flds_bnds.fields
|
#define TYPE_TEMPLATE_ARGS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->template_args
|
#define TYPE_TEMPLATE_ARGS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->template_args
|
|
|
#define TYPE_INDEX_TYPE(type) TYPE_FIELD_TYPE (type, 0)
|
#define TYPE_INDEX_TYPE(type) TYPE_FIELD_TYPE (type, 0)
|
#define TYPE_RANGE_DATA(thistype) TYPE_MAIN_TYPE(thistype)->flds_bnds.bounds
|
#define TYPE_RANGE_DATA(thistype) TYPE_MAIN_TYPE(thistype)->flds_bnds.bounds
|
#define TYPE_LOW_BOUND(range_type) TYPE_RANGE_DATA(range_type)->low
|
#define TYPE_LOW_BOUND(range_type) TYPE_RANGE_DATA(range_type)->low
|
#define TYPE_HIGH_BOUND(range_type) TYPE_RANGE_DATA(range_type)->high
|
#define TYPE_HIGH_BOUND(range_type) TYPE_RANGE_DATA(range_type)->high
|
#define TYPE_LOW_BOUND_UNDEFINED(range_type) \
|
#define TYPE_LOW_BOUND_UNDEFINED(range_type) \
|
TYPE_RANGE_DATA(range_type)->low_undefined
|
TYPE_RANGE_DATA(range_type)->low_undefined
|
#define TYPE_HIGH_BOUND_UNDEFINED(range_type) \
|
#define TYPE_HIGH_BOUND_UNDEFINED(range_type) \
|
TYPE_RANGE_DATA(range_type)->high_undefined
|
TYPE_RANGE_DATA(range_type)->high_undefined
|
|
|
/* Moto-specific stuff for FORTRAN arrays */
|
/* Moto-specific stuff for FORTRAN arrays */
|
|
|
#define TYPE_ARRAY_UPPER_BOUND_IS_UNDEFINED(arraytype) \
|
#define TYPE_ARRAY_UPPER_BOUND_IS_UNDEFINED(arraytype) \
|
TYPE_HIGH_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
|
TYPE_HIGH_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
|
#define TYPE_ARRAY_LOWER_BOUND_IS_UNDEFINED(arraytype) \
|
#define TYPE_ARRAY_LOWER_BOUND_IS_UNDEFINED(arraytype) \
|
TYPE_LOW_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
|
TYPE_LOW_BOUND_UNDEFINED(TYPE_INDEX_TYPE(arraytype))
|
|
|
#define TYPE_ARRAY_UPPER_BOUND_VALUE(arraytype) \
|
#define TYPE_ARRAY_UPPER_BOUND_VALUE(arraytype) \
|
(TYPE_HIGH_BOUND(TYPE_INDEX_TYPE((arraytype))))
|
(TYPE_HIGH_BOUND(TYPE_INDEX_TYPE((arraytype))))
|
|
|
#define TYPE_ARRAY_LOWER_BOUND_VALUE(arraytype) \
|
#define TYPE_ARRAY_LOWER_BOUND_VALUE(arraytype) \
|
(TYPE_LOW_BOUND(TYPE_INDEX_TYPE((arraytype))))
|
(TYPE_LOW_BOUND(TYPE_INDEX_TYPE((arraytype))))
|
|
|
/* C++ */
|
/* C++ */
|
|
|
#define TYPE_VPTR_BASETYPE(thistype) TYPE_MAIN_TYPE(thistype)->vptr_basetype
|
#define TYPE_VPTR_BASETYPE(thistype) TYPE_MAIN_TYPE(thistype)->vptr_basetype
|
#define TYPE_DOMAIN_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->vptr_basetype
|
#define TYPE_DOMAIN_TYPE(thistype) TYPE_MAIN_TYPE(thistype)->vptr_basetype
|
#define TYPE_VPTR_FIELDNO(thistype) TYPE_MAIN_TYPE(thistype)->vptr_fieldno
|
#define TYPE_VPTR_FIELDNO(thistype) TYPE_MAIN_TYPE(thistype)->vptr_fieldno
|
#define TYPE_FN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fields
|
#define TYPE_FN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fields
|
#define TYPE_NFN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields
|
#define TYPE_NFN_FIELDS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields
|
#define TYPE_NFN_FIELDS_TOTAL(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields_total
|
#define TYPE_NFN_FIELDS_TOTAL(thistype) TYPE_CPLUS_SPECIFIC(thistype)->nfn_fields_total
|
#define TYPE_NTEMPLATE_ARGS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->ntemplate_args
|
#define TYPE_NTEMPLATE_ARGS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->ntemplate_args
|
#define TYPE_SPECIFIC_FIELD(thistype) \
|
#define TYPE_SPECIFIC_FIELD(thistype) \
|
TYPE_MAIN_TYPE(thistype)->type_specific_field
|
TYPE_MAIN_TYPE(thistype)->type_specific_field
|
#define TYPE_TYPE_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific
|
#define TYPE_TYPE_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific
|
/* We need this tap-dance with the TYPE_RAW_SPECIFIC because of the case
|
/* We need this tap-dance with the TYPE_RAW_SPECIFIC because of the case
|
where we're trying to print an Ada array using the C language.
|
where we're trying to print an Ada array using the C language.
|
In that case, there is no "cplus_stuff", but the C language assumes
|
In that case, there is no "cplus_stuff", but the C language assumes
|
that there is. What we do, in that case, is pretend that there is
|
that there is. What we do, in that case, is pretend that there is
|
an implicit one which is the default cplus stuff. */
|
an implicit one which is the default cplus stuff. */
|
#define TYPE_CPLUS_SPECIFIC(thistype) \
|
#define TYPE_CPLUS_SPECIFIC(thistype) \
|
(!HAVE_CPLUS_STRUCT(thistype) \
|
(!HAVE_CPLUS_STRUCT(thistype) \
|
? (struct cplus_struct_type*)&cplus_struct_default \
|
? (struct cplus_struct_type*)&cplus_struct_default \
|
: TYPE_RAW_CPLUS_SPECIFIC(thistype))
|
: TYPE_RAW_CPLUS_SPECIFIC(thistype))
|
#define TYPE_RAW_CPLUS_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff
|
#define TYPE_RAW_CPLUS_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.cplus_stuff
|
#define TYPE_FLOATFORMAT(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.floatformat
|
#define TYPE_FLOATFORMAT(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.floatformat
|
#define TYPE_GNAT_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.gnat_stuff
|
#define TYPE_GNAT_SPECIFIC(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.gnat_stuff
|
#define TYPE_DESCRIPTIVE_TYPE(thistype) TYPE_GNAT_SPECIFIC(thistype)->descriptive_type
|
#define TYPE_DESCRIPTIVE_TYPE(thistype) TYPE_GNAT_SPECIFIC(thistype)->descriptive_type
|
#define TYPE_CALLING_CONVENTION(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.calling_convention
|
#define TYPE_CALLING_CONVENTION(thistype) TYPE_MAIN_TYPE(thistype)->type_specific.calling_convention
|
#define TYPE_BASECLASS(thistype,index) TYPE_FIELD_TYPE(thistype, index)
|
#define TYPE_BASECLASS(thistype,index) TYPE_FIELD_TYPE(thistype, index)
|
#define TYPE_N_BASECLASSES(thistype) TYPE_CPLUS_SPECIFIC(thistype)->n_baseclasses
|
#define TYPE_N_BASECLASSES(thistype) TYPE_CPLUS_SPECIFIC(thistype)->n_baseclasses
|
#define TYPE_BASECLASS_NAME(thistype,index) TYPE_FIELD_NAME(thistype, index)
|
#define TYPE_BASECLASS_NAME(thistype,index) TYPE_FIELD_NAME(thistype, index)
|
#define TYPE_BASECLASS_BITPOS(thistype,index) TYPE_FIELD_BITPOS(thistype,index)
|
#define TYPE_BASECLASS_BITPOS(thistype,index) TYPE_FIELD_BITPOS(thistype,index)
|
#define BASETYPE_VIA_PUBLIC(thistype, index) \
|
#define BASETYPE_VIA_PUBLIC(thistype, index) \
|
((!TYPE_FIELD_PRIVATE(thistype, index)) && (!TYPE_FIELD_PROTECTED(thistype, index)))
|
((!TYPE_FIELD_PRIVATE(thistype, index)) && (!TYPE_FIELD_PROTECTED(thistype, index)))
|
#define TYPE_CPLUS_DYNAMIC(thistype) TYPE_CPLUS_SPECIFIC (thistype)->is_dynamic
|
#define TYPE_CPLUS_DYNAMIC(thistype) TYPE_CPLUS_SPECIFIC (thistype)->is_dynamic
|
|
|
#define BASETYPE_VIA_VIRTUAL(thistype, index) \
|
#define BASETYPE_VIA_VIRTUAL(thistype, index) \
|
(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
|
(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (index)))
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (index)))
|
|
|
#define FIELD_TYPE(thisfld) ((thisfld).type)
|
#define FIELD_TYPE(thisfld) ((thisfld).type)
|
#define FIELD_NAME(thisfld) ((thisfld).name)
|
#define FIELD_NAME(thisfld) ((thisfld).name)
|
#define FIELD_LOC_KIND(thisfld) ((thisfld).loc_kind)
|
#define FIELD_LOC_KIND(thisfld) ((thisfld).loc_kind)
|
#define FIELD_BITPOS(thisfld) ((thisfld).loc.bitpos)
|
#define FIELD_BITPOS(thisfld) ((thisfld).loc.bitpos)
|
#define FIELD_STATIC_PHYSNAME(thisfld) ((thisfld).loc.physname)
|
#define FIELD_STATIC_PHYSNAME(thisfld) ((thisfld).loc.physname)
|
#define FIELD_STATIC_PHYSADDR(thisfld) ((thisfld).loc.physaddr)
|
#define FIELD_STATIC_PHYSADDR(thisfld) ((thisfld).loc.physaddr)
|
#define FIELD_DWARF_BLOCK(thisfld) ((thisfld).loc.dwarf_block)
|
#define FIELD_DWARF_BLOCK(thisfld) ((thisfld).loc.dwarf_block)
|
#define SET_FIELD_BITPOS(thisfld, bitpos) \
|
#define SET_FIELD_BITPOS(thisfld, bitpos) \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_BITPOS, \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_BITPOS, \
|
FIELD_BITPOS (thisfld) = (bitpos))
|
FIELD_BITPOS (thisfld) = (bitpos))
|
#define SET_FIELD_PHYSNAME(thisfld, name) \
|
#define SET_FIELD_PHYSNAME(thisfld, name) \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSNAME, \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSNAME, \
|
FIELD_STATIC_PHYSNAME (thisfld) = (name))
|
FIELD_STATIC_PHYSNAME (thisfld) = (name))
|
#define SET_FIELD_PHYSADDR(thisfld, addr) \
|
#define SET_FIELD_PHYSADDR(thisfld, addr) \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSADDR, \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSADDR, \
|
FIELD_STATIC_PHYSADDR (thisfld) = (addr))
|
FIELD_STATIC_PHYSADDR (thisfld) = (addr))
|
#define SET_FIELD_DWARF_BLOCK(thisfld, addr) \
|
#define SET_FIELD_DWARF_BLOCK(thisfld, addr) \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_DWARF_BLOCK, \
|
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_DWARF_BLOCK, \
|
FIELD_DWARF_BLOCK (thisfld) = (addr))
|
FIELD_DWARF_BLOCK (thisfld) = (addr))
|
#define FIELD_ARTIFICIAL(thisfld) ((thisfld).artificial)
|
#define FIELD_ARTIFICIAL(thisfld) ((thisfld).artificial)
|
#define FIELD_BITSIZE(thisfld) ((thisfld).bitsize)
|
#define FIELD_BITSIZE(thisfld) ((thisfld).bitsize)
|
|
|
#define TYPE_FIELD(thistype, n) TYPE_MAIN_TYPE(thistype)->flds_bnds.fields[n]
|
#define TYPE_FIELD(thistype, n) TYPE_MAIN_TYPE(thistype)->flds_bnds.fields[n]
|
#define TYPE_FIELD_TYPE(thistype, n) FIELD_TYPE(TYPE_FIELD(thistype, n))
|
#define TYPE_FIELD_TYPE(thistype, n) FIELD_TYPE(TYPE_FIELD(thistype, n))
|
#define TYPE_FIELD_NAME(thistype, n) FIELD_NAME(TYPE_FIELD(thistype, n))
|
#define TYPE_FIELD_NAME(thistype, n) FIELD_NAME(TYPE_FIELD(thistype, n))
|
#define TYPE_FIELD_LOC_KIND(thistype, n) FIELD_LOC_KIND (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_LOC_KIND(thistype, n) FIELD_LOC_KIND (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_BITPOS(thistype, n) FIELD_BITPOS (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_BITPOS(thistype, n) FIELD_BITPOS (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_STATIC_PHYSNAME(thistype, n) FIELD_STATIC_PHYSNAME (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_STATIC_PHYSNAME(thistype, n) FIELD_STATIC_PHYSNAME (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_STATIC_PHYSADDR(thistype, n) FIELD_STATIC_PHYSADDR (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_STATIC_PHYSADDR(thistype, n) FIELD_STATIC_PHYSADDR (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_DWARF_BLOCK(thistype, n) FIELD_DWARF_BLOCK (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_DWARF_BLOCK(thistype, n) FIELD_DWARF_BLOCK (TYPE_FIELD (thistype, n))
|
#define TYPE_FIELD_ARTIFICIAL(thistype, n) FIELD_ARTIFICIAL(TYPE_FIELD(thistype,n))
|
#define TYPE_FIELD_ARTIFICIAL(thistype, n) FIELD_ARTIFICIAL(TYPE_FIELD(thistype,n))
|
#define TYPE_FIELD_BITSIZE(thistype, n) FIELD_BITSIZE(TYPE_FIELD(thistype,n))
|
#define TYPE_FIELD_BITSIZE(thistype, n) FIELD_BITSIZE(TYPE_FIELD(thistype,n))
|
#define TYPE_FIELD_PACKED(thistype, n) (FIELD_BITSIZE(TYPE_FIELD(thistype,n))!=0)
|
#define TYPE_FIELD_PACKED(thistype, n) (FIELD_BITSIZE(TYPE_FIELD(thistype,n))!=0)
|
#define TYPE_TEMPLATE_ARG(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->template_args[n]
|
#define TYPE_TEMPLATE_ARG(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->template_args[n]
|
|
|
#define TYPE_FIELD_PRIVATE_BITS(thistype) \
|
#define TYPE_FIELD_PRIVATE_BITS(thistype) \
|
TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits
|
TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits
|
#define TYPE_FIELD_PROTECTED_BITS(thistype) \
|
#define TYPE_FIELD_PROTECTED_BITS(thistype) \
|
TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits
|
TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits
|
#define TYPE_FIELD_IGNORE_BITS(thistype) \
|
#define TYPE_FIELD_IGNORE_BITS(thistype) \
|
TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits
|
TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits
|
#define TYPE_FIELD_VIRTUAL_BITS(thistype) \
|
#define TYPE_FIELD_VIRTUAL_BITS(thistype) \
|
TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits
|
TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits
|
#define SET_TYPE_FIELD_PRIVATE(thistype, n) \
|
#define SET_TYPE_FIELD_PRIVATE(thistype, n) \
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n))
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n))
|
#define SET_TYPE_FIELD_PROTECTED(thistype, n) \
|
#define SET_TYPE_FIELD_PROTECTED(thistype, n) \
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n))
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n))
|
#define SET_TYPE_FIELD_IGNORE(thistype, n) \
|
#define SET_TYPE_FIELD_IGNORE(thistype, n) \
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n))
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n))
|
#define SET_TYPE_FIELD_VIRTUAL(thistype, n) \
|
#define SET_TYPE_FIELD_VIRTUAL(thistype, n) \
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n))
|
B_SET (TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n))
|
#define TYPE_FIELD_PRIVATE(thistype, n) \
|
#define TYPE_FIELD_PRIVATE(thistype, n) \
|
(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits == NULL ? 0 \
|
(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits == NULL ? 0 \
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n)))
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->private_field_bits, (n)))
|
#define TYPE_FIELD_PROTECTED(thistype, n) \
|
#define TYPE_FIELD_PROTECTED(thistype, n) \
|
(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits == NULL ? 0 \
|
(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits == NULL ? 0 \
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n)))
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->protected_field_bits, (n)))
|
#define TYPE_FIELD_IGNORE(thistype, n) \
|
#define TYPE_FIELD_IGNORE(thistype, n) \
|
(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits == NULL ? 0 \
|
(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits == NULL ? 0 \
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n)))
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->ignore_field_bits, (n)))
|
#define TYPE_FIELD_VIRTUAL(thistype, n) \
|
#define TYPE_FIELD_VIRTUAL(thistype, n) \
|
(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
|
(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits == NULL ? 0 \
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n)))
|
: B_TST(TYPE_CPLUS_SPECIFIC(thistype)->virtual_field_bits, (n)))
|
|
|
#define TYPE_FN_FIELDLISTS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists
|
#define TYPE_FN_FIELDLISTS(thistype) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists
|
#define TYPE_FN_FIELDLIST(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n]
|
#define TYPE_FN_FIELDLIST(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n]
|
#define TYPE_FN_FIELDLIST1(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].fn_fields
|
#define TYPE_FN_FIELDLIST1(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].fn_fields
|
#define TYPE_FN_FIELDLIST_NAME(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].name
|
#define TYPE_FN_FIELDLIST_NAME(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].name
|
#define TYPE_FN_FIELDLIST_LENGTH(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].length
|
#define TYPE_FN_FIELDLIST_LENGTH(thistype, n) TYPE_CPLUS_SPECIFIC(thistype)->fn_fieldlists[n].length
|
|
|
#define TYPE_FN_FIELD(thisfn, n) (thisfn)[n]
|
#define TYPE_FN_FIELD(thisfn, n) (thisfn)[n]
|
#define TYPE_FN_FIELD_PHYSNAME(thisfn, n) (thisfn)[n].physname
|
#define TYPE_FN_FIELD_PHYSNAME(thisfn, n) (thisfn)[n].physname
|
#define TYPE_FN_FIELD_TYPE(thisfn, n) (thisfn)[n].type
|
#define TYPE_FN_FIELD_TYPE(thisfn, n) (thisfn)[n].type
|
#define TYPE_FN_FIELD_ARGS(thisfn, n) TYPE_FIELDS ((thisfn)[n].type)
|
#define TYPE_FN_FIELD_ARGS(thisfn, n) TYPE_FIELDS ((thisfn)[n].type)
|
#define TYPE_FN_FIELD_CONST(thisfn, n) ((thisfn)[n].is_const)
|
#define TYPE_FN_FIELD_CONST(thisfn, n) ((thisfn)[n].is_const)
|
#define TYPE_FN_FIELD_VOLATILE(thisfn, n) ((thisfn)[n].is_volatile)
|
#define TYPE_FN_FIELD_VOLATILE(thisfn, n) ((thisfn)[n].is_volatile)
|
#define TYPE_FN_FIELD_PRIVATE(thisfn, n) ((thisfn)[n].is_private)
|
#define TYPE_FN_FIELD_PRIVATE(thisfn, n) ((thisfn)[n].is_private)
|
#define TYPE_FN_FIELD_PROTECTED(thisfn, n) ((thisfn)[n].is_protected)
|
#define TYPE_FN_FIELD_PROTECTED(thisfn, n) ((thisfn)[n].is_protected)
|
#define TYPE_FN_FIELD_PUBLIC(thisfn, n) ((thisfn)[n].is_public)
|
#define TYPE_FN_FIELD_PUBLIC(thisfn, n) ((thisfn)[n].is_public)
|
#define TYPE_FN_FIELD_STATIC(thisfn, n) ((thisfn)[n].is_static)
|
#define TYPE_FN_FIELD_STATIC(thisfn, n) ((thisfn)[n].is_static)
|
#define TYPE_FN_FIELD_FINAL(thisfn, n) ((thisfn)[n].is_final)
|
#define TYPE_FN_FIELD_FINAL(thisfn, n) ((thisfn)[n].is_final)
|
#define TYPE_FN_FIELD_SYNCHRONIZED(thisfn, n) ((thisfn)[n].is_synchronized)
|
#define TYPE_FN_FIELD_SYNCHRONIZED(thisfn, n) ((thisfn)[n].is_synchronized)
|
#define TYPE_FN_FIELD_NATIVE(thisfn, n) ((thisfn)[n].is_native)
|
#define TYPE_FN_FIELD_NATIVE(thisfn, n) ((thisfn)[n].is_native)
|
#define TYPE_FN_FIELD_ARTIFICIAL(thisfn, n) ((thisfn)[n].is_artificial)
|
#define TYPE_FN_FIELD_ARTIFICIAL(thisfn, n) ((thisfn)[n].is_artificial)
|
#define TYPE_FN_FIELD_ABSTRACT(thisfn, n) ((thisfn)[n].is_abstract)
|
#define TYPE_FN_FIELD_ABSTRACT(thisfn, n) ((thisfn)[n].is_abstract)
|
#define TYPE_FN_FIELD_STUB(thisfn, n) ((thisfn)[n].is_stub)
|
#define TYPE_FN_FIELD_STUB(thisfn, n) ((thisfn)[n].is_stub)
|
#define TYPE_FN_FIELD_FCONTEXT(thisfn, n) ((thisfn)[n].fcontext)
|
#define TYPE_FN_FIELD_FCONTEXT(thisfn, n) ((thisfn)[n].fcontext)
|
#define TYPE_FN_FIELD_VOFFSET(thisfn, n) ((thisfn)[n].voffset-2)
|
#define TYPE_FN_FIELD_VOFFSET(thisfn, n) ((thisfn)[n].voffset-2)
|
#define TYPE_FN_FIELD_VIRTUAL_P(thisfn, n) ((thisfn)[n].voffset > 1)
|
#define TYPE_FN_FIELD_VIRTUAL_P(thisfn, n) ((thisfn)[n].voffset > 1)
|
#define TYPE_FN_FIELD_STATIC_P(thisfn, n) ((thisfn)[n].voffset == VOFFSET_STATIC)
|
#define TYPE_FN_FIELD_STATIC_P(thisfn, n) ((thisfn)[n].voffset == VOFFSET_STATIC)
|
|
|
#define TYPE_LOCALTYPE_PTR(thistype) (TYPE_CPLUS_SPECIFIC(thistype)->localtype_ptr)
|
#define TYPE_LOCALTYPE_PTR(thistype) (TYPE_CPLUS_SPECIFIC(thistype)->localtype_ptr)
|
#define TYPE_LOCALTYPE_FILE(thistype) (TYPE_CPLUS_SPECIFIC(thistype)->localtype_ptr->file)
|
#define TYPE_LOCALTYPE_FILE(thistype) (TYPE_CPLUS_SPECIFIC(thistype)->localtype_ptr->file)
|
#define TYPE_LOCALTYPE_LINE(thistype) (TYPE_CPLUS_SPECIFIC(thistype)->localtype_ptr->line)
|
#define TYPE_LOCALTYPE_LINE(thistype) (TYPE_CPLUS_SPECIFIC(thistype)->localtype_ptr->line)
|
|
|
#define TYPE_IS_OPAQUE(thistype) (((TYPE_CODE (thistype) == TYPE_CODE_STRUCT) || \
|
#define TYPE_IS_OPAQUE(thistype) (((TYPE_CODE (thistype) == TYPE_CODE_STRUCT) || \
|
(TYPE_CODE (thistype) == TYPE_CODE_UNION)) && \
|
(TYPE_CODE (thistype) == TYPE_CODE_UNION)) && \
|
(TYPE_NFIELDS (thistype) == 0) && \
|
(TYPE_NFIELDS (thistype) == 0) && \
|
(HAVE_CPLUS_STRUCT (thistype) && (TYPE_NFN_FIELDS (thistype) == 0)) && \
|
(HAVE_CPLUS_STRUCT (thistype) && (TYPE_NFN_FIELDS (thistype) == 0)) && \
|
(TYPE_STUB (thistype) || !TYPE_STUB_SUPPORTED (thistype)))
|
(TYPE_STUB (thistype) || !TYPE_STUB_SUPPORTED (thistype)))
|
|
|
struct builtin_type
|
struct builtin_type
|
{
|
{
|
/* Integral types. */
|
/* Integral types. */
|
|
|
/* Implicit size/sign (based on the the architecture's ABI). */
|
/* Implicit size/sign (based on the the architecture's ABI). */
|
struct type *builtin_void;
|
struct type *builtin_void;
|
struct type *builtin_char;
|
struct type *builtin_char;
|
struct type *builtin_short;
|
struct type *builtin_short;
|
struct type *builtin_int;
|
struct type *builtin_int;
|
struct type *builtin_long;
|
struct type *builtin_long;
|
struct type *builtin_signed_char;
|
struct type *builtin_signed_char;
|
struct type *builtin_unsigned_char;
|
struct type *builtin_unsigned_char;
|
struct type *builtin_unsigned_short;
|
struct type *builtin_unsigned_short;
|
struct type *builtin_unsigned_int;
|
struct type *builtin_unsigned_int;
|
struct type *builtin_unsigned_long;
|
struct type *builtin_unsigned_long;
|
struct type *builtin_float;
|
struct type *builtin_float;
|
struct type *builtin_double;
|
struct type *builtin_double;
|
struct type *builtin_long_double;
|
struct type *builtin_long_double;
|
struct type *builtin_complex;
|
struct type *builtin_complex;
|
struct type *builtin_double_complex;
|
struct type *builtin_double_complex;
|
struct type *builtin_string;
|
struct type *builtin_string;
|
struct type *builtin_bool;
|
struct type *builtin_bool;
|
struct type *builtin_long_long;
|
struct type *builtin_long_long;
|
struct type *builtin_unsigned_long_long;
|
struct type *builtin_unsigned_long_long;
|
struct type *builtin_decfloat;
|
struct type *builtin_decfloat;
|
struct type *builtin_decdouble;
|
struct type *builtin_decdouble;
|
struct type *builtin_declong;
|
struct type *builtin_declong;
|
|
|
/* "True" character types.
|
/* "True" character types.
|
We use these for the '/c' print format, because c_char is just a
|
We use these for the '/c' print format, because c_char is just a
|
one-byte integral type, which languages less laid back than C
|
one-byte integral type, which languages less laid back than C
|
will print as ... well, a one-byte integral type. */
|
will print as ... well, a one-byte integral type. */
|
struct type *builtin_true_char;
|
struct type *builtin_true_char;
|
struct type *builtin_true_unsigned_char;
|
struct type *builtin_true_unsigned_char;
|
|
|
/* Explicit sizes - see C9X <intypes.h> for naming scheme. The "int0"
|
/* Explicit sizes - see C9X <intypes.h> for naming scheme. The "int0"
|
is for when an architecture needs to describe a register that has
|
is for when an architecture needs to describe a register that has
|
no size. */
|
no size. */
|
struct type *builtin_int0;
|
struct type *builtin_int0;
|
struct type *builtin_int8;
|
struct type *builtin_int8;
|
struct type *builtin_uint8;
|
struct type *builtin_uint8;
|
struct type *builtin_int16;
|
struct type *builtin_int16;
|
struct type *builtin_uint16;
|
struct type *builtin_uint16;
|
struct type *builtin_int32;
|
struct type *builtin_int32;
|
struct type *builtin_uint32;
|
struct type *builtin_uint32;
|
struct type *builtin_int64;
|
struct type *builtin_int64;
|
struct type *builtin_uint64;
|
struct type *builtin_uint64;
|
struct type *builtin_int128;
|
struct type *builtin_int128;
|
struct type *builtin_uint128;
|
struct type *builtin_uint128;
|
|
|
|
|
/* Pointer types. */
|
/* Pointer types. */
|
|
|
/* `pointer to data' type. Some target platforms use an implicitly
|
/* `pointer to data' type. Some target platforms use an implicitly
|
{sign,zero} -extended 32-bit ABI pointer on a 64-bit ISA. */
|
{sign,zero} -extended 32-bit ABI pointer on a 64-bit ISA. */
|
struct type *builtin_data_ptr;
|
struct type *builtin_data_ptr;
|
|
|
/* `pointer to function (returning void)' type. Harvard
|
/* `pointer to function (returning void)' type. Harvard
|
architectures mean that ABI function and code pointers are not
|
architectures mean that ABI function and code pointers are not
|
interconvertible. Similarly, since ANSI, C standards have
|
interconvertible. Similarly, since ANSI, C standards have
|
explicitly said that pointers to functions and pointers to data
|
explicitly said that pointers to functions and pointers to data
|
are not interconvertible --- that is, you can't cast a function
|
are not interconvertible --- that is, you can't cast a function
|
pointer to void * and back, and expect to get the same value.
|
pointer to void * and back, and expect to get the same value.
|
However, all function pointer types are interconvertible, so void
|
However, all function pointer types are interconvertible, so void
|
(*) () can server as a generic function pointer. */
|
(*) () can server as a generic function pointer. */
|
struct type *builtin_func_ptr;
|
struct type *builtin_func_ptr;
|
|
|
|
|
/* Special-purpose types. */
|
/* Special-purpose types. */
|
|
|
/* This type is used to represent a GDB internal function. */
|
/* This type is used to represent a GDB internal function. */
|
struct type *internal_fn;
|
struct type *internal_fn;
|
};
|
};
|
|
|
/* Return the type table for the specified architecture. */
|
/* Return the type table for the specified architecture. */
|
extern const struct builtin_type *builtin_type (struct gdbarch *gdbarch);
|
extern const struct builtin_type *builtin_type (struct gdbarch *gdbarch);
|
|
|
|
|
/* Per-objfile types used by symbol readers. */
|
/* Per-objfile types used by symbol readers. */
|
|
|
struct objfile_type
|
struct objfile_type
|
{
|
{
|
/* Basic types based on the objfile architecture. */
|
/* Basic types based on the objfile architecture. */
|
struct type *builtin_void;
|
struct type *builtin_void;
|
struct type *builtin_char;
|
struct type *builtin_char;
|
struct type *builtin_short;
|
struct type *builtin_short;
|
struct type *builtin_int;
|
struct type *builtin_int;
|
struct type *builtin_long;
|
struct type *builtin_long;
|
struct type *builtin_long_long;
|
struct type *builtin_long_long;
|
struct type *builtin_signed_char;
|
struct type *builtin_signed_char;
|
struct type *builtin_unsigned_char;
|
struct type *builtin_unsigned_char;
|
struct type *builtin_unsigned_short;
|
struct type *builtin_unsigned_short;
|
struct type *builtin_unsigned_int;
|
struct type *builtin_unsigned_int;
|
struct type *builtin_unsigned_long;
|
struct type *builtin_unsigned_long;
|
struct type *builtin_unsigned_long_long;
|
struct type *builtin_unsigned_long_long;
|
struct type *builtin_float;
|
struct type *builtin_float;
|
struct type *builtin_double;
|
struct type *builtin_double;
|
struct type *builtin_long_double;
|
struct type *builtin_long_double;
|
|
|
/* This type is used to represent symbol addresses. */
|
/* This type is used to represent symbol addresses. */
|
struct type *builtin_core_addr;
|
struct type *builtin_core_addr;
|
|
|
/* This type represents a type that was unrecognized in symbol read-in. */
|
/* This type represents a type that was unrecognized in symbol read-in. */
|
struct type *builtin_error;
|
struct type *builtin_error;
|
|
|
/* Types used for symbols with no debug information. */
|
/* Types used for symbols with no debug information. */
|
struct type *nodebug_text_symbol;
|
struct type *nodebug_text_symbol;
|
struct type *nodebug_data_symbol;
|
struct type *nodebug_data_symbol;
|
struct type *nodebug_unknown_symbol;
|
struct type *nodebug_unknown_symbol;
|
struct type *nodebug_tls_symbol;
|
struct type *nodebug_tls_symbol;
|
};
|
};
|
|
|
/* Return the type table for the specified objfile. */
|
/* Return the type table for the specified objfile. */
|
extern const struct objfile_type *objfile_type (struct objfile *objfile);
|
extern const struct objfile_type *objfile_type (struct objfile *objfile);
|
|
|
|
|
/* Explicit floating-point formats. See "floatformat.h". */
|
/* Explicit floating-point formats. See "floatformat.h". */
|
extern const struct floatformat *floatformats_ieee_single[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ieee_single[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ieee_double[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ieee_double[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ieee_double_littlebyte_bigword[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ieee_double_littlebyte_bigword[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_i387_ext[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_i387_ext[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_m68881_ext[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_m68881_ext[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_arm_ext[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_arm_ext[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ia64_spill[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ia64_spill[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ia64_quad[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ia64_quad[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_vax_f[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_vax_f[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_vax_d[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_vax_d[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ibm_long_double[BFD_ENDIAN_UNKNOWN];
|
extern const struct floatformat *floatformats_ibm_long_double[BFD_ENDIAN_UNKNOWN];
|
|
|
|
|
/* Maximum and minimum values of built-in types */
|
/* Maximum and minimum values of built-in types */
|
|
|
#define MAX_OF_TYPE(t) \
|
#define MAX_OF_TYPE(t) \
|
(TYPE_UNSIGNED(t) ? UMAX_OF_SIZE(TYPE_LENGTH(t)) \
|
(TYPE_UNSIGNED(t) ? UMAX_OF_SIZE(TYPE_LENGTH(t)) \
|
: MAX_OF_SIZE(TYPE_LENGTH(t)))
|
: MAX_OF_SIZE(TYPE_LENGTH(t)))
|
|
|
#define MIN_OF_TYPE(t) \
|
#define MIN_OF_TYPE(t) \
|
(TYPE_UNSIGNED(t) ? UMIN_OF_SIZE(TYPE_LENGTH(t)) \
|
(TYPE_UNSIGNED(t) ? UMIN_OF_SIZE(TYPE_LENGTH(t)) \
|
: MIN_OF_SIZE(TYPE_LENGTH(t)))
|
: MIN_OF_SIZE(TYPE_LENGTH(t)))
|
|
|
/* Allocate space for storing data associated with a particular type.
|
/* Allocate space for storing data associated with a particular type.
|
We ensure that the space is allocated using the same mechanism that
|
We ensure that the space is allocated using the same mechanism that
|
was used to allocate the space for the type structure itself. I.E.
|
was used to allocate the space for the type structure itself. I.E.
|
if the type is on an objfile's objfile_obstack, then the space for data
|
if the type is on an objfile's objfile_obstack, then the space for data
|
associated with that type will also be allocated on the objfile_obstack.
|
associated with that type will also be allocated on the objfile_obstack.
|
If the type is not associated with any particular objfile (such as
|
If the type is not associated with any particular objfile (such as
|
builtin types), then the data space will be allocated with xmalloc,
|
builtin types), then the data space will be allocated with xmalloc,
|
the same as for the type structure. */
|
the same as for the type structure. */
|
|
|
#define TYPE_ALLOC(t,size) \
|
#define TYPE_ALLOC(t,size) \
|
(TYPE_OBJFILE_OWNED (t) \
|
(TYPE_OBJFILE_OWNED (t) \
|
? obstack_alloc (&TYPE_OBJFILE (t) -> objfile_obstack, size) \
|
? obstack_alloc (&TYPE_OBJFILE (t) -> objfile_obstack, size) \
|
: xmalloc (size))
|
: xmalloc (size))
|
|
|
#define TYPE_ZALLOC(t,size) \
|
#define TYPE_ZALLOC(t,size) \
|
(TYPE_OBJFILE_OWNED (t) \
|
(TYPE_OBJFILE_OWNED (t) \
|
? memset (obstack_alloc (&TYPE_OBJFILE (t)->objfile_obstack, size), \
|
? memset (obstack_alloc (&TYPE_OBJFILE (t)->objfile_obstack, size), \
|
0, size) \
|
0, size) \
|
: xzalloc (size))
|
: xzalloc (size))
|
|
|
/* Use alloc_type to allocate a type owned by an objfile.
|
/* Use alloc_type to allocate a type owned by an objfile.
|
Use alloc_type_arch to allocate a type owned by an architecture.
|
Use alloc_type_arch to allocate a type owned by an architecture.
|
Use alloc_type_copy to allocate a type with the same owner as a
|
Use alloc_type_copy to allocate a type with the same owner as a
|
pre-existing template type, no matter whether objfile or gdbarch. */
|
pre-existing template type, no matter whether objfile or gdbarch. */
|
extern struct type *alloc_type (struct objfile *);
|
extern struct type *alloc_type (struct objfile *);
|
extern struct type *alloc_type_arch (struct gdbarch *);
|
extern struct type *alloc_type_arch (struct gdbarch *);
|
extern struct type *alloc_type_copy (const struct type *);
|
extern struct type *alloc_type_copy (const struct type *);
|
|
|
/* Return the type's architecture. For types owned by an architecture,
|
/* Return the type's architecture. For types owned by an architecture,
|
that architecture is returned. For types owned by an objfile, that
|
that architecture is returned. For types owned by an objfile, that
|
objfile's architecture is returned. */
|
objfile's architecture is returned. */
|
extern struct gdbarch *get_type_arch (const struct type *);
|
extern struct gdbarch *get_type_arch (const struct type *);
|
|
|
/* Helper function to construct objfile-owned types. */
|
/* Helper function to construct objfile-owned types. */
|
extern struct type *init_type (enum type_code, int, int, char *,
|
extern struct type *init_type (enum type_code, int, int, char *,
|
struct objfile *);
|
struct objfile *);
|
|
|
/* Helper functions to construct architecture-owned types. */
|
/* Helper functions to construct architecture-owned types. */
|
extern struct type *arch_type (struct gdbarch *, enum type_code, int, char *);
|
extern struct type *arch_type (struct gdbarch *, enum type_code, int, char *);
|
extern struct type *arch_integer_type (struct gdbarch *, int, int, char *);
|
extern struct type *arch_integer_type (struct gdbarch *, int, int, char *);
|
extern struct type *arch_character_type (struct gdbarch *, int, int, char *);
|
extern struct type *arch_character_type (struct gdbarch *, int, int, char *);
|
extern struct type *arch_boolean_type (struct gdbarch *, int, int, char *);
|
extern struct type *arch_boolean_type (struct gdbarch *, int, int, char *);
|
extern struct type *arch_float_type (struct gdbarch *, int, char *,
|
extern struct type *arch_float_type (struct gdbarch *, int, char *,
|
const struct floatformat **);
|
const struct floatformat **);
|
extern struct type *arch_complex_type (struct gdbarch *, char *,
|
extern struct type *arch_complex_type (struct gdbarch *, char *,
|
struct type *);
|
struct type *);
|
|
|
/* Helper functions to construct a struct or record type. An
|
/* Helper functions to construct a struct or record type. An
|
initially empty type is created using arch_composite_type().
|
initially empty type is created using arch_composite_type().
|
Fields are then added using append_composite_type_field*(). A union
|
Fields are then added using append_composite_type_field*(). A union
|
type has its size set to the largest field. A struct type has each
|
type has its size set to the largest field. A struct type has each
|
field packed against the previous. */
|
field packed against the previous. */
|
|
|
extern struct type *arch_composite_type (struct gdbarch *gdbarch,
|
extern struct type *arch_composite_type (struct gdbarch *gdbarch,
|
char *name, enum type_code code);
|
char *name, enum type_code code);
|
extern void append_composite_type_field (struct type *t, char *name,
|
extern void append_composite_type_field (struct type *t, char *name,
|
struct type *field);
|
struct type *field);
|
extern void append_composite_type_field_aligned (struct type *t,
|
extern void append_composite_type_field_aligned (struct type *t,
|
char *name,
|
char *name,
|
struct type *field,
|
struct type *field,
|
int alignment);
|
int alignment);
|
|
|
/* Helper functions to construct a bit flags type. An initially empty
|
/* Helper functions to construct a bit flags type. An initially empty
|
type is created using arch_flag_type(). Flags are then added using
|
type is created using arch_flag_type(). Flags are then added using
|
append_flag_type_flag(). */
|
append_flag_type_flag(). */
|
extern struct type *arch_flags_type (struct gdbarch *gdbarch,
|
extern struct type *arch_flags_type (struct gdbarch *gdbarch,
|
char *name, int length);
|
char *name, int length);
|
extern void append_flags_type_flag (struct type *type, int bitpos, char *name);
|
extern void append_flags_type_flag (struct type *type, int bitpos, char *name);
|
|
|
extern void make_vector_type (struct type *array_type);
|
extern void make_vector_type (struct type *array_type);
|
extern struct type *init_vector_type (struct type *elt_type, int n);
|
extern struct type *init_vector_type (struct type *elt_type, int n);
|
|
|
extern struct type *lookup_reference_type (struct type *);
|
extern struct type *lookup_reference_type (struct type *);
|
|
|
extern struct type *make_reference_type (struct type *, struct type **);
|
extern struct type *make_reference_type (struct type *, struct type **);
|
|
|
extern struct type *make_cv_type (int, int, struct type *, struct type **);
|
extern struct type *make_cv_type (int, int, struct type *, struct type **);
|
|
|
extern void replace_type (struct type *, struct type *);
|
extern void replace_type (struct type *, struct type *);
|
|
|
extern int address_space_name_to_int (struct gdbarch *, char *);
|
extern int address_space_name_to_int (struct gdbarch *, char *);
|
|
|
extern const char *address_space_int_to_name (struct gdbarch *, int);
|
extern const char *address_space_int_to_name (struct gdbarch *, int);
|
|
|
extern struct type *make_type_with_address_space (struct type *type,
|
extern struct type *make_type_with_address_space (struct type *type,
|
int space_identifier);
|
int space_identifier);
|
|
|
extern struct type *lookup_memberptr_type (struct type *, struct type *);
|
extern struct type *lookup_memberptr_type (struct type *, struct type *);
|
|
|
extern struct type *lookup_methodptr_type (struct type *);
|
extern struct type *lookup_methodptr_type (struct type *);
|
|
|
extern void smash_to_method_type (struct type *type, struct type *domain,
|
extern void smash_to_method_type (struct type *type, struct type *domain,
|
struct type *to_type, struct field *args,
|
struct type *to_type, struct field *args,
|
int nargs, int varargs);
|
int nargs, int varargs);
|
|
|
extern void smash_to_memberptr_type (struct type *, struct type *,
|
extern void smash_to_memberptr_type (struct type *, struct type *,
|
struct type *);
|
struct type *);
|
|
|
extern void smash_to_methodptr_type (struct type *, struct type *);
|
extern void smash_to_methodptr_type (struct type *, struct type *);
|
|
|
extern struct type *allocate_stub_method (struct type *);
|
extern struct type *allocate_stub_method (struct type *);
|
|
|
extern char *type_name_no_tag (const struct type *);
|
extern char *type_name_no_tag (const struct type *);
|
|
|
extern struct type *lookup_struct_elt_type (struct type *, char *, int);
|
extern struct type *lookup_struct_elt_type (struct type *, char *, int);
|
|
|
extern struct type *make_pointer_type (struct type *, struct type **);
|
extern struct type *make_pointer_type (struct type *, struct type **);
|
|
|
extern struct type *lookup_pointer_type (struct type *);
|
extern struct type *lookup_pointer_type (struct type *);
|
|
|
extern struct type *make_function_type (struct type *, struct type **);
|
extern struct type *make_function_type (struct type *, struct type **);
|
|
|
extern struct type *lookup_function_type (struct type *);
|
extern struct type *lookup_function_type (struct type *);
|
|
|
extern struct type *create_range_type (struct type *, struct type *, LONGEST,
|
extern struct type *create_range_type (struct type *, struct type *, LONGEST,
|
LONGEST);
|
LONGEST);
|
|
|
extern struct type *create_array_type (struct type *, struct type *,
|
extern struct type *create_array_type (struct type *, struct type *,
|
struct type *);
|
struct type *);
|
extern struct type *lookup_array_range_type (struct type *, int, int);
|
extern struct type *lookup_array_range_type (struct type *, int, int);
|
|
|
extern struct type *create_string_type (struct type *, struct type *,
|
extern struct type *create_string_type (struct type *, struct type *,
|
struct type *);
|
struct type *);
|
extern struct type *lookup_string_range_type (struct type *, int, int);
|
extern struct type *lookup_string_range_type (struct type *, int, int);
|
|
|
extern struct type *create_set_type (struct type *, struct type *);
|
extern struct type *create_set_type (struct type *, struct type *);
|
|
|
extern struct type *lookup_unsigned_typename (const struct language_defn *,
|
extern struct type *lookup_unsigned_typename (const struct language_defn *,
|
struct gdbarch *,char *);
|
struct gdbarch *,char *);
|
|
|
extern struct type *lookup_signed_typename (const struct language_defn *,
|
extern struct type *lookup_signed_typename (const struct language_defn *,
|
struct gdbarch *,char *);
|
struct gdbarch *,char *);
|
|
|
extern struct type *check_typedef (struct type *);
|
extern struct type *check_typedef (struct type *);
|
|
|
#define CHECK_TYPEDEF(TYPE) \
|
#define CHECK_TYPEDEF(TYPE) \
|
do { \
|
do { \
|
(TYPE) = check_typedef (TYPE); \
|
(TYPE) = check_typedef (TYPE); \
|
} while (0)
|
} while (0)
|
|
|
extern void check_stub_method_group (struct type *, int);
|
extern void check_stub_method_group (struct type *, int);
|
|
|
extern char *gdb_mangle_name (struct type *, int, int);
|
extern char *gdb_mangle_name (struct type *, int, int);
|
|
|
extern struct type *lookup_typename (const struct language_defn *,
|
extern struct type *lookup_typename (const struct language_defn *,
|
struct gdbarch *, char *,
|
struct gdbarch *, char *,
|
struct block *, int);
|
struct block *, int);
|
|
|
extern struct type *lookup_template_type (char *, struct type *,
|
extern struct type *lookup_template_type (char *, struct type *,
|
struct block *);
|
struct block *);
|
|
|
extern int get_vptr_fieldno (struct type *, struct type **);
|
extern int get_vptr_fieldno (struct type *, struct type **);
|
|
|
extern int get_discrete_bounds (struct type *, LONGEST *, LONGEST *);
|
extern int get_discrete_bounds (struct type *, LONGEST *, LONGEST *);
|
|
|
extern int class_types_same_p (const struct type *, const struct type *);
|
extern int class_types_same_p (const struct type *, const struct type *);
|
|
|
extern int is_ancestor (struct type *, struct type *);
|
extern int is_ancestor (struct type *, struct type *);
|
|
|
extern int is_public_ancestor (struct type *, struct type *);
|
extern int is_public_ancestor (struct type *, struct type *);
|
|
|
extern int is_unique_ancestor (struct type *, struct value *);
|
extern int is_unique_ancestor (struct type *, struct value *);
|
|
|
/* Overload resolution */
|
/* Overload resolution */
|
|
|
#define LENGTH_MATCH(bv) ((bv)->rank[0])
|
#define LENGTH_MATCH(bv) ((bv)->rank[0])
|
|
|
/* Badness if parameter list length doesn't match arg list length */
|
/* Badness if parameter list length doesn't match arg list length */
|
#define LENGTH_MISMATCH_BADNESS 100
|
#define LENGTH_MISMATCH_BADNESS 100
|
/* Dummy badness value for nonexistent parameter positions */
|
/* Dummy badness value for nonexistent parameter positions */
|
#define TOO_FEW_PARAMS_BADNESS 100
|
#define TOO_FEW_PARAMS_BADNESS 100
|
/* Badness if no conversion among types */
|
/* Badness if no conversion among types */
|
#define INCOMPATIBLE_TYPE_BADNESS 100
|
#define INCOMPATIBLE_TYPE_BADNESS 100
|
|
|
/* Badness of integral promotion */
|
/* Badness of integral promotion */
|
#define INTEGER_PROMOTION_BADNESS 1
|
#define INTEGER_PROMOTION_BADNESS 1
|
/* Badness of floating promotion */
|
/* Badness of floating promotion */
|
#define FLOAT_PROMOTION_BADNESS 1
|
#define FLOAT_PROMOTION_BADNESS 1
|
/* Badness of integral conversion */
|
/* Badness of integral conversion */
|
#define INTEGER_CONVERSION_BADNESS 2
|
#define INTEGER_CONVERSION_BADNESS 2
|
/* Badness of floating conversion */
|
/* Badness of floating conversion */
|
#define FLOAT_CONVERSION_BADNESS 2
|
#define FLOAT_CONVERSION_BADNESS 2
|
/* Badness of integer<->floating conversions */
|
/* Badness of integer<->floating conversions */
|
#define INT_FLOAT_CONVERSION_BADNESS 2
|
#define INT_FLOAT_CONVERSION_BADNESS 2
|
/* Badness of converting to a boolean */
|
/* Badness of converting to a boolean */
|
#define BOOLEAN_CONVERSION_BADNESS 2
|
#define BOOLEAN_CONVERSION_BADNESS 2
|
/* Badness of pointer conversion */
|
/* Badness of pointer conversion */
|
#define POINTER_CONVERSION_BADNESS 2
|
#define POINTER_CONVERSION_BADNESS 2
|
/* Badness of conversion of pointer to void pointer */
|
/* Badness of conversion of pointer to void pointer */
|
#define VOID_PTR_CONVERSION_BADNESS 2
|
#define VOID_PTR_CONVERSION_BADNESS 2
|
/* Badness of converting derived to base class */
|
/* Badness of converting derived to base class */
|
#define BASE_CONVERSION_BADNESS 2
|
#define BASE_CONVERSION_BADNESS 2
|
/* Badness of converting from non-reference to reference */
|
/* Badness of converting from non-reference to reference */
|
#define REFERENCE_CONVERSION_BADNESS 2
|
#define REFERENCE_CONVERSION_BADNESS 2
|
|
|
/* Non-standard conversions allowed by the debugger */
|
/* Non-standard conversions allowed by the debugger */
|
/* Converting a pointer to an int is usually OK */
|
/* Converting a pointer to an int is usually OK */
|
#define NS_POINTER_CONVERSION_BADNESS 10
|
#define NS_POINTER_CONVERSION_BADNESS 10
|
|
|
|
|
extern int compare_badness (struct badness_vector *, struct badness_vector *);
|
extern int compare_badness (struct badness_vector *, struct badness_vector *);
|
|
|
extern struct badness_vector *rank_function (struct type **, int,
|
extern struct badness_vector *rank_function (struct type **, int,
|
struct type **, int);
|
struct type **, int);
|
|
|
extern int rank_one_type (struct type *, struct type *);
|
extern int rank_one_type (struct type *, struct type *);
|
|
|
extern void recursive_dump_type (struct type *, int);
|
extern void recursive_dump_type (struct type *, int);
|
|
|
extern int field_is_static (struct field *);
|
extern int field_is_static (struct field *);
|
|
|
/* printcmd.c */
|
/* printcmd.c */
|
|
|
extern void print_scalar_formatted (const void *, struct type *,
|
extern void print_scalar_formatted (const void *, struct type *,
|
const struct value_print_options *,
|
const struct value_print_options *,
|
int, struct ui_file *);
|
int, struct ui_file *);
|
|
|
extern int can_dereference (struct type *);
|
extern int can_dereference (struct type *);
|
|
|
extern int is_integral_type (struct type *);
|
extern int is_integral_type (struct type *);
|
|
|
extern void maintenance_print_type (char *, int);
|
extern void maintenance_print_type (char *, int);
|
|
|
extern htab_t create_copied_types_hash (struct objfile *objfile);
|
extern htab_t create_copied_types_hash (struct objfile *objfile);
|
|
|
extern struct type *copy_type_recursive (struct objfile *objfile,
|
extern struct type *copy_type_recursive (struct objfile *objfile,
|
struct type *type,
|
struct type *type,
|
htab_t copied_types);
|
htab_t copied_types);
|
|
|
extern struct type *copy_type (const struct type *type);
|
extern struct type *copy_type (const struct type *type);
|
|
|
#endif /* GDBTYPES_H */
|
#endif /* GDBTYPES_H */
|
|
|
