/* Definitions and structures for reading debug symbols from the

   native HP C compiler.

   Written by the Center for Software Science at the University of Utah

   and by Cygnus Support.

   Copyright (C) 1994-2018 Free Software Foundation, Inc.

   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

   the Free Software Foundation; either version 3 of the License, or

   (at your option) any later version.

   This program is distributed in the hope that it will be useful,

   but WITHOUT ANY WARRANTY; without even the implied warranty of

   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License

   along with this program; if not, write to the Free Software

   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,

   MA 02110-1301, USA.  */

#ifndef HP_SYMTAB_INCLUDED

#define HP_SYMTAB_INCLUDED

/* General information:

   This header file defines and describes only the data structures

   necessary to read debug symbols produced by the HP C compiler,

   HP ANSI C++ compiler, and HP FORTRAN 90 compiler using the

   SOM object file format.  

   (For a full description of the debug format, ftp hpux-symtab.h from

   jaguar.cs.utah.edu:/dist).

   Additional notes (Rich Title)

   This file is a reverse-engineered version of a file called

   "symtab.h" which exists internal to HP's Computer Languages Organization

   in /CLO/Components/DDE/obj/som/symtab.h. Because HP's version of

   the file is copyrighted and not distributed, it is necessary for

   GDB to use the reverse-engineered version that follows.

   Work was done by Cygnus to reverse-engineer the C subset of symtab.h.

   The WDB project has extended this to also contain the C++ 

   symbol definitions, the F90 symbol definitions, 

   and the DOC (debugging-optimized-code) symbol definitions.

   In some cases (the C++ symbol definitions)

   I have added internal documentation here that

   goes beyond what is supplied in HP's symtab.h. If we someday

   unify these files again, the extra comments should be merged back

   into HP's symtab.h.

   -------------------------------------------------------------------

   Debug symbols are contained entirely within an unloadable space called

   $DEBUG$.  $DEBUG$ contains several subspaces which group related

   debug symbols.

   $GNTT$ contains information for global variables, types and contants.

   $LNTT$ contains information for procedures (including nesting), scoping

   information, local variables, types, and constants.

   $SLT$ contains source line information so that code addresses may be

   mapped to source lines.

   $VT$ contains various strings and constants for named objects (variables,

   typedefs, functions, etc).  Strings are stored as null-terminated character

   lists.  Constants always begin on word boundaries.  The first byte of

   the VT must be zero (a null string).

   $XT$ is not currently used by GDB.

   Many structures within the subspaces point to other structures within

   the same subspace, or to structures within a different subspace.  These

   pointers are represented as a structure index from the beginning of

   the appropriate subspace.  */

/* Used to describe where a constant is stored.  */

enum location_type

{

  LOCATION_IMMEDIATE,

  LOCATION_PTR,

  LOCATION_VT,

};

/* Languages supported by this debug format.  Within the data structures

   this type is limited to 4 bits for a maximum of 16 languages.  */

enum hp_language

{

  HP_LANGUAGE_UNKNOWN,

  HP_LANGUAGE_C,

  HP_LANGUAGE_FORTRAN,

  HP_LANGUAGE_F77 = HP_LANGUAGE_FORTRAN,

  HP_LANGUAGE_PASCAL,

  HP_LANGUAGE_MODCAL,

  HP_LANGUAGE_COBOL,

  HP_LANGUAGE_BASIC,

  HP_LANGUAGE_ADA,

  HP_LANGUAGE_CPLUSPLUS,

  HP_LANGUAGE_DMPASCAL

};

/* Basic data types available in this debug format.  Within the data

   structures this type is limited to 5 bits for a maximum of 32 basic

   data types.  */

enum hp_type

{

  HP_TYPE_UNDEFINED, /* 0 */

  HP_TYPE_BOOLEAN, /* 1 */

  HP_TYPE_CHAR, /* 2 */

  HP_TYPE_INT, /* 3 */

  HP_TYPE_UNSIGNED_INT, /* 4 */

  HP_TYPE_REAL, /* 5 */

  HP_TYPE_COMPLEX, /* 6 */

  HP_TYPE_STRING200, /* 7 */

  HP_TYPE_LONGSTRING200, /* 8 */

  HP_TYPE_TEXT, /* 9 */

  HP_TYPE_FLABEL, /* 10 */

  HP_TYPE_FTN_STRING_SPEC, /* 11 */

  HP_TYPE_MOD_STRING_SPEC, /* 12 */

  HP_TYPE_PACKED_DECIMAL, /* 13 */

  HP_TYPE_REAL_3000, /* 14 */

  HP_TYPE_MOD_STRING_3000, /* 15 */

  HP_TYPE_ANYPOINTER, /* 16 */

  HP_TYPE_GLOBAL_ANYPOINTER, /* 17 */

  HP_TYPE_LOCAL_ANYPOINTER, /* 18 */

  HP_TYPE_COMPLEXS3000, /* 19 */

  HP_TYPE_FTN_STRING_S300_COMPAT, /* 20 */ 

  HP_TYPE_FTN_STRING_VAX_COMPAT, /* 21 */

  HP_TYPE_BOOLEAN_S300_COMPAT, /* 22 */

  HP_TYPE_BOOLEAN_VAX_COMPAT, /* 23 */

  HP_TYPE_WIDE_CHAR, /* 24 */

  HP_TYPE_LONG, /* 25 */

  HP_TYPE_UNSIGNED_LONG, /* 26 */

  HP_TYPE_DOUBLE, /* 27 */

  HP_TYPE_TEMPLATE_ARG, /* 28 */

  HP_TYPE_VOID /* 29 */

};

/* An immediate name and type table entry.

   extension and immediate will always be one.

   global will always be zero.

   hp_type is the basic type this entry describes.

   bitlength is the length in bits for the basic type.  */

struct dnttp_immediate

{

  unsigned int extension:	1;

  unsigned int immediate:	1;

  unsigned int global:		1;

  unsigned int type: 		5;

  unsigned int bitlength:	24;

};

/* A nonimmediate name and type table entry.

   extension will always be one.

   immediate will always be zero.

   if global is zero, this entry points into the LNTT

   if global is one, this entry points into the GNTT

   index is the index within the GNTT or LNTT for this entry.  */

struct dnttp_nonimmediate

{

  unsigned int extension:	1;

  unsigned int immediate:	1;

  unsigned int global:		1;

  unsigned int index:		29;

};

/* A pointer to an entry in the GNTT and LNTT tables.  It has two

   forms depending on the type being described.

   The immediate form is used for simple entries and is one

   word.

   The nonimmediate form is used for complex entries and contains

   an index into the LNTT or GNTT which describes the entire type.

   If a dnttpointer is -1, then it is a NIL entry.  */

#define DNTTNIL (-1)

typedef union dnttpointer

{

  struct dnttp_immediate    dntti;

  struct dnttp_nonimmediate dnttp;

  int word;

} dnttpointer;

/* An index into the source line table.  As with dnttpointers, a sltpointer

   of -1 indicates a NIL entry.  */

#define SLTNIL (-1)

typedef int sltpointer;

/* Index into DOC (= "Debugging Optimized Code") line table.  */

#define LTNIL (-1)

typedef int ltpointer;

/* Index into context table.  */

#define CTXTNIL (-1)

typedef int ctxtpointer;

/* Unsigned byte offset into the VT.  */

typedef unsigned int vtpointer;

/* A DNTT entry (used within the GNTT and LNTT).

   DNTT entries are variable sized objects, but are always a multiple

   of 3 words (we call each group of 3 words a "block").

   The first bit in each block is an extension bit.  This bit is zero

   for the first block of a DNTT entry.  If the entry requires more

   than one block, then this bit is set to one in all blocks after

   the first one.  */

/* Each DNTT entry describes a particular debug symbol (beginning of

   a source file, a function, variables, structures, etc.

   The type of the DNTT entry is stored in the "kind" field within the

   DNTT entry itself.  */

enum dntt_entry_type

{

  DNTT_TYPE_NIL = -1,

  DNTT_TYPE_SRCFILE,

  DNTT_TYPE_MODULE,

  DNTT_TYPE_FUNCTION,

  DNTT_TYPE_ENTRY,

  DNTT_TYPE_BEGIN,

  DNTT_TYPE_END,

  DNTT_TYPE_IMPORT,

  DNTT_TYPE_LABEL,

  DNTT_TYPE_FPARAM,

  DNTT_TYPE_SVAR,

  DNTT_TYPE_DVAR,

  DNTT_TYPE_HOLE1,

  DNTT_TYPE_CONST,

  DNTT_TYPE_TYPEDEF,

  DNTT_TYPE_TAGDEF,

  DNTT_TYPE_POINTER,

  DNTT_TYPE_ENUM,

  DNTT_TYPE_MEMENUM,

  DNTT_TYPE_SET,

  DNTT_TYPE_SUBRANGE,

  DNTT_TYPE_ARRAY,

  DNTT_TYPE_STRUCT,

  DNTT_TYPE_UNION,

  DNTT_TYPE_FIELD,

  DNTT_TYPE_VARIANT,

  DNTT_TYPE_FILE,

  DNTT_TYPE_FUNCTYPE,

  DNTT_TYPE_WITH,

  DNTT_TYPE_COMMON,

  DNTT_TYPE_COBSTRUCT,

  DNTT_TYPE_XREF,

  DNTT_TYPE_SA,

  DNTT_TYPE_MACRO,

  DNTT_TYPE_BLOCKDATA,

  DNTT_TYPE_CLASS_SCOPE,

  DNTT_TYPE_REFERENCE,

  DNTT_TYPE_PTRMEM,

  DNTT_TYPE_PTRMEMFUNC,

  DNTT_TYPE_CLASS,

  DNTT_TYPE_GENFIELD,

  DNTT_TYPE_VFUNC,

  DNTT_TYPE_MEMACCESS,

  DNTT_TYPE_INHERITANCE,

  DNTT_TYPE_FRIEND_CLASS,

  DNTT_TYPE_FRIEND_FUNC,

  DNTT_TYPE_MODIFIER,

  DNTT_TYPE_OBJECT_ID,

  DNTT_TYPE_MEMFUNC,

  DNTT_TYPE_TEMPLATE,

  DNTT_TYPE_TEMPLATE_ARG,

  DNTT_TYPE_FUNC_TEMPLATE,

  DNTT_TYPE_LINK,

  DNTT_TYPE_DYN_ARRAY_DESC,

  DNTT_TYPE_DESC_SUBRANGE,

  DNTT_TYPE_BEGIN_EXT,

  DNTT_TYPE_INLN,

  DNTT_TYPE_INLN_LIST,

  DNTT_TYPE_ALIAS,

  DNTT_TYPE_DOC_FUNCTION,

  DNTT_TYPE_DOC_MEMFUNC,

  DNTT_TYPE_MAX

};

/* DNTT_TYPE_SRCFILE:

   One DNTT_TYPE_SRCFILE symbol is output for the start of each source

   file and at the begin and end of an included file.  A DNTT_TYPE_SRCFILE

   entry is also output before each DNTT_TYPE_FUNC symbol so that debuggers

   can determine what file a function was defined in.

   LANGUAGE describes the source file's language.

   NAME points to an VT entry providing the source file's name.

   Note the name used for DNTT_TYPE_SRCFILE entries are exactly as seen

   by the compiler (ie they may be relative or absolute).  C include files

   via <> inclusion must use absolute paths.

   ADDRESS points to an SLT entry from which line number and code locations

   may be determined.  */

struct dntt_type_srcfile

{

  unsigned int extension:	1;

  unsigned int kind:		10;    /* DNTT_TYPE_SRCFILE */

  unsigned int language:	4;

  unsigned int unused:		17;

  vtpointer name;

  sltpointer address;

};

/* DNTT_TYPE_MODULE:

   A DNTT_TYPE_MODULE symbol is emitted for the start of a pascal

   module or C source file. A module indicates a compilation unit

   for name-scoping purposes; in that regard there should be 

   a 1-1 correspondence between GDB "symtab"'s and MODULE symbol records.

   Each DNTT_TYPE_MODULE must have an associated DNTT_TYPE_END symbol.

   NAME points to a VT entry providing the module's name.  Note C

   source files are considered nameless modules.

   ALIAS point to a VT entry providing a secondary name.

   ADDRESS points to an SLT entry from which line number and code locations

   may be determined.  */

struct dntt_type_module

{

  unsigned int extension:	1;

  unsigned int kind:		10; 	/* DNTT_TYPE_MODULE */

  unsigned int unused:		21;

  vtpointer name;

  vtpointer alias;

  dnttpointer unused2;

  sltpointer address;

};

/* DNTT_TYPE_FUNCTION,

   DNTT_TYPE_ENTRY,

   DNTT_TYPE_BLOCKDATA,

   DNTT_TYPE_MEMFUNC:

   A DNTT_TYPE_FUNCTION symbol is emitted for each function definition;

   a DNTT_TYPE_ENTRY symbols is used for secondary entry points.  Both

   symbols used the dntt_type_function structure.

   A DNTT_TYPE_BLOCKDATA symbol is emitted ...?

   A DNTT_TYPE_MEMFUNC symbol is emitted for inlined member functions (C++). 

   Each of DNTT_TYPE_FUNCTION must have a matching DNTT_TYPE_END.

   GLOBAL is nonzero if the function has global scope.

   LANGUAGE describes the function's source language.

   OPT_LEVEL describes the optimization level the function was compiled

   with.

   VARARGS is nonzero if the function uses varargs.

   NAME points to a VT entry providing the function's name.

   ALIAS points to a VT entry providing a secondary name for the function.

   FIRSTPARAM points to a LNTT entry which describes the parameter list.

   ADDRESS points to an SLT entry from which line number and code locations

   may be determined.

   ENTRYADDR is the memory address corresponding the function's entry point

   RETVAL points to a LNTT entry describing the function's return value.

   LOWADDR is the lowest memory address associated with this function.

   HIADDR is the highest memory address associated with this function.  */

struct dntt_type_function

{

  unsigned int extension:	1;

  unsigned int kind:		10;	/* DNTT_TYPE_FUNCTION,

				           DNTT_TYPE_ENTRY,

					   DNTT_TYPE_BLOCKDATA

					   or DNTT_TYPE_MEMFUNC */

  unsigned int global:		1;

  unsigned int language:	4;

  unsigned int nest_level:	5;

  unsigned int opt_level:	2;

  unsigned int varargs:		1;

  unsigned int lang_info:	4;

  unsigned int inlined:		1;

  unsigned int localalloc:	1;

  unsigned int expansion:	1;

  unsigned int unused:		1;

  vtpointer name;

  vtpointer alias;

  dnttpointer firstparam;

  sltpointer address;

  CORE_ADDR entryaddr;

  dnttpointer retval;

  CORE_ADDR lowaddr;

  CORE_ADDR hiaddr;

};

/* DNTT_TYPE_BEGIN:

   A DNTT_TYPE_BEGIN symbol is emitted to begin a new nested scope.

   Every DNTT_TYPE_BEGIN symbol must have a matching DNTT_TYPE_END symbol.

   CLASSFLAG is nonzero if this is the beginning of a c++ class definition.

   ADDRESS points to an SLT entry from which line number and code locations

   may be determined.  */

struct dntt_type_begin

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int classflag:	1;

  unsigned int unused:		20;

  sltpointer address;

};

/* DNTT_TYPE_END:

   A DNTT_TYPE_END symbol is emitted when closing a scope started by

   a DNTT_TYPE_MODULE, DNTT_TYPE_FUNCTION, DNTT_TYPE_WITH,

   DNTT_TYPE_COMMON, DNTT_TYPE_BEGIN, and DNTT_TYPE_CLASS_SCOPE symbols.

   ENDKIND describes what type of scope the DNTT_TYPE_END is closing

   (one of the above 6 kinds).

   CLASSFLAG is nonzero if this is the end of a c++ class definition.

   ADDRESS points to an SLT entry from which line number and code locations

   may be determined.

   BEGINSCOPE points to the LNTT entry which opened the scope.  */

struct dntt_type_end

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int endkind:		10;

  unsigned int classflag:	1;

  unsigned int unused:		10;

  sltpointer address;

  dnttpointer beginscope;

};

/* DNTT_TYPE_IMPORT is unused by GDB.  */

/* DNTT_TYPE_LABEL is unused by GDB.  */

/* DNTT_TYPE_FPARAM:

   A DNTT_TYPE_FPARAM symbol is emitted for a function argument.  When

   chained together the symbols represent an argument list for a function.

   REGPARAM is nonzero if this parameter was passed in a register.

   INDIRECT is nonzero if this parameter is a pointer to the parameter

   (pass by reference or pass by value for large items).

   LONGADDR is nonzero if the parameter is a 64bit pointer.

   NAME is a pointer into the VT for the parameter's name.

   LOCATION describes where the parameter is stored.  Depending on the

   parameter type LOCATION could be a register number, or an offset

   from the stack pointer.

   TYPE points to a NTT entry describing the type of this parameter.

   NEXTPARAM points to the LNTT entry describing the next parameter.  */

struct dntt_type_fparam

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int regparam:	1;

  unsigned int indirect:	1;

  unsigned int longaddr:	1;

  unsigned int copyparam:	1;

  unsigned int dflt:		1;

  unsigned int doc_ranges:	1;

  unsigned int misc_kind:       1;

  unsigned int unused:		14;

  vtpointer name;

  CORE_ADDR location;

  dnttpointer type;

  dnttpointer nextparam;

  int misc;

};

/* DNTT_TYPE_SVAR:

   A DNTT_TYPE_SVAR is emitted to describe a variable in static storage.

   GLOBAL is nonzero if the variable has global scope.

   INDIRECT is nonzero if the variable is a pointer to an object.

   LONGADDR is nonzero if the variable is in long pointer space.

   STATICMEM is nonzero if the variable is a member of a class.

   A_UNION is nonzero if the variable is an anonymous union member.

   NAME is a pointer into the VT for the variable's name.

   LOCATION provides the memory address for the variable.

   TYPE is a pointer into either the GNTT or LNTT which describes

   the type of this variable.  */

struct dntt_type_svar

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int global:		1;

  unsigned int indirect:	1;

  unsigned int longaddr:	1;

  unsigned int staticmem:	1;

  unsigned int a_union:		1;

  unsigned int unused1:         1;

  unsigned int thread_specific: 1;

  unsigned int unused2:         14;

  vtpointer name;

  CORE_ADDR location;

  dnttpointer type;

  unsigned int offset;

  unsigned int displacement;

};

/* DNTT_TYPE_DVAR:

   A DNTT_TYPE_DVAR is emitted to describe automatic variables and variables

   held in registers.

   GLOBAL is nonzero if the variable has global scope.

   INDIRECT is nonzero if the variable is a pointer to an object.

   REGVAR is nonzero if the variable is in a register.

   A_UNION is nonzero if the variable is an anonymous union member.

   NAME is a pointer into the VT for the variable's name.

   LOCATION provides the memory address or register number for the variable.

   TYPE is a pointer into either the GNTT or LNTT which describes

   the type of this variable.  */

struct dntt_type_dvar

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int global:		1;

  unsigned int indirect:	1;

  unsigned int regvar:		1;

  unsigned int a_union:		1;

  unsigned int unused:		17;

  vtpointer name;

  int location;

  dnttpointer type;

  unsigned int offset;

};

/* DNTT_TYPE_CONST:

   A DNTT_TYPE_CONST symbol is emitted for program constants.

   GLOBAL is nonzero if the constant has global scope.

   INDIRECT is nonzero if the constant is a pointer to an object.

   LOCATION_TYPE describes where to find the constant's value

   (in the VT, memory, or embedded in an instruction).

   CLASSMEM is nonzero if the constant is a member of a class.

   NAME is a pointer into the VT for the constant's name.

   LOCATION provides the memory address, register number or pointer

   into the VT for the constant's value.

   TYPE is a pointer into either the GNTT or LNTT which describes

   the type of this variable.  */

struct dntt_type_const

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int global:		1;

  unsigned int indirect:	1;

  unsigned int location_type:	3;

  unsigned int classmem:	1;

  unsigned int unused:		15;

  vtpointer name;

  CORE_ADDR location;

  dnttpointer type;

  unsigned int offset;

  unsigned int displacement;

};

/* DNTT_TYPE_TYPEDEF and DNTT_TYPE_TAGDEF:

   The same structure is used to describe typedefs and tagdefs.

   DNTT_TYPE_TYPEDEFS are associated with C "typedefs".

   DNTT_TYPE_TAGDEFs are associated with C "struct", "union", and "enum"

   tags, which may have the same name as a typedef in the same scope.

   Also they are associated with C++ "class" tags, which implicitly have 

   the same name as the class type.

   GLOBAL is nonzero if the typedef/tagdef has global scope.

   TYPEINFO is used to determine if full type information is available

   for a tag.  (usually 1, but can be zero for opaque types in C).

   NAME is a pointer into the VT for the constant's name.

   TYPE points to the underlying type for the typedef/tagdef in the

   GNTT or LNTT.  */

struct dntt_type_type

{

  unsigned int extension:	1;

  unsigned int kind:		10;    /* DNTT_TYPE_TYPEDEF or 

                                          DNTT_TYPE_TAGDEF.  */

  unsigned int global:		1;

  unsigned int typeinfo:	1;

  unsigned int unused:		19;

  vtpointer name;

  dnttpointer type;                    /* Underlying type, which for TAGDEF's may be

                                          DNTT_TYPE_STRUCT, DNTT_TYPE_UNION,

                                          DNTT_TYPE_ENUM, or DNTT_TYPE_CLASS. 

                                          For TYPEDEF's other underlying types

                                          are also possible.  */

};

/* DNTT_TYPE_POINTER:

   Used to describe a pointer to an underlying type.

   POINTSTO is a pointer into the GNTT or LNTT for the type which this

   pointer points to.

   BITLENGTH is the length of the pointer (not the underlying type). */

struct dntt_type_pointer

{

  unsigned int extension:	1;

  unsigned int kind:		10;

  unsigned int unused:		21;

  dnttpointer pointsto;

  unsigned int bitlength;

};

/* DNTT_TYPE_ENUM:

   Used to describe enumerated types.

   FIRSTMEM is a pointer to a DNTT_TYPE_MEMENUM in the GNTT/LNTT which

   describes the first member (and contains a pointer to the chain of

   members).

   BITLENGTH is the number of bits used to hold the values of the enum's

   members.  */

struct dntt_type_enum

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int unused:		21;

  dnttpointer firstmem;

  unsigned int bitlength;

};

/* DNTT_TYPE_MEMENUM

   Used to describe members of an enumerated type.

   CLASSMEM is nonzero if this member is part of a class.

   NAME points into the VT for the name of this member.

   VALUE is the value of this enumeration member.

   NEXTMEM points to the next DNTT_TYPE_MEMENUM in the chain.  */

struct dntt_type_memenum

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int classmem:	1;

  unsigned int unused:		20;

  vtpointer name;

  unsigned int value;

  dnttpointer nextmem;

};

/* DNTT_TYPE_SET

   Used to describe PASCAL "set" type.

   DECLARATION describes the bitpacking of the set.

   SUBTYPE points to a DNTT entry describing the type of the members.

   BITLENGTH is the size of the set.  */ 

struct dntt_type_set

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int declaration:	2;

  unsigned int unused:		19;

  dnttpointer subtype;

  unsigned int bitlength;

};

/* DNTT_TYPE_SUBRANGE

   Used to describe subrange type.

   DYN_LOW describes the lower bound of the subrange:

     00 for a constant lower bound (found in LOWBOUND).

     01 for a dynamic lower bound with the lower bound found in the

     memory address pointed to by LOWBOUND.

     10 for a dynamic lower bound described by an variable found in the

     DNTT/LNTT (LOWBOUND would be a pointer into the DNTT/LNTT).

   DYN_HIGH is similar to DYN_LOW, except it describes the upper bound.

   SUBTYPE points to the type of the subrange.

   BITLENGTH is the length in bits needed to describe the subrange's

   values.  */

struct dntt_type_subrange

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int dyn_low:		2;

  unsigned int dyn_high:	2;

  unsigned int unused:		17;

  int lowbound;

  int highbound;

  dnttpointer subtype;

  unsigned int bitlength;

};

/* DNTT_TYPE_ARRAY

   Used to describe an array type.

   DECLARATION describes the bit packing used in the array.

   ARRAYISBYTES is nonzero if the field in arraylength describes the

   length in bytes rather than in bits.  A value of zero is used to

   describe an array with size 2**32.

   ELEMISBYTES is nonzero if the length if each element in the array

   is describes in bytes rather than bits.  A value of zero is used

   to an element with size 2**32.

   ELEMORDER is nonzero if the elements are indexed in increasing order.

   JUSTIFIED if the elements are left justified to index zero.

   ARRAYLENGTH is the length of the array.

   INDEXTYPE is a DNTT pointer to the type used to index the array.

   ELEMTYPE is a DNTT pointer to the type for the array elements.

   ELEMLENGTH is the length of each element in the array (including

   any padding).

   Multi-dimensional arrays are represented by ELEMTYPE pointing to

   another DNTT_TYPE_ARRAY.  */

struct dntt_type_array

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int declaration:	2;

  unsigned int dyn_low:		2;

  unsigned int dyn_high:	2;

  unsigned int arrayisbytes:	1;

  unsigned int elemisbytes:	1;

  unsigned int elemorder:	1;

  unsigned int justified:	1;

  unsigned int unused:		11;

  unsigned int arraylength;

  dnttpointer indextype;

  dnttpointer elemtype;

  unsigned int elemlength;

};

/* DNTT_TYPE_STRUCT

   DNTT_TYPE_STRUCT is used to describe a C structure.

   DECLARATION describes the bitpacking used.

   FIRSTFIELD is a DNTT pointer to the first field of the structure

   (each field contains a pointer to the next field, walk the list

   to access all fields of the structure).

   VARTAGFIELD and VARLIST are used for Pascal variant records.

   BITLENGTH is the size of the structure in bits.  */

struct dntt_type_struct

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int declaration:	2;

  unsigned int unused:		19;

  dnttpointer firstfield;

  dnttpointer vartagfield;

  dnttpointer varlist;

  unsigned int bitlength;

};

/* DNTT_TYPE_UNION

   DNTT_TYPE_UNION is used to describe a C union.

   FIRSTFIELD is a DNTT pointer to the beginning of the field chain.

   BITLENGTH is the size of the union in bits.  */

struct dntt_type_union

{

  unsigned int extension:	1;

  unsigned int kind:	10;

  unsigned int unused:		21;

  dnttpointer firstfield;

  unsigned int bitlength;

};

/* DNTT_TYPE_FIELD

   DNTT_TYPE_FIELD describes one field in a structure or union

   or C++ class.

   VISIBILITY is used to describe the visibility of the field

   (for c++.  public = 0, protected = 1, private = 2).

   A_UNION is nonzero if this field is a member of an anonymous union.

   STATICMEM is nonzero if this field is a static member of a template.

   NAME is a pointer into the VT for the name of the field.

   BITOFFSET gives the offset of this field in bits from the beginning

   of the structure or union this field is a member of.

   TYPE is a DNTT pointer to the type describing this field.

   BITLENGTH is the size of the entry in bits.

   NEXTFIELD is a DNTT pointer to the next field in the chain.  */

struct dntt_type_field

{