OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Sun Oct 6 22:43:06 1996 Jason Merrill <jason@yorick.cygnus.com> 

* dwarf2read.c (read_tag_reference_type): New fn.
	(read_type_die): Call it.
	(dwarf_attr): Also look in the DIEs referred to by specification
 	or abstract_origin attributes.
This commit is contained in:
Jason Merrill 1996-10-07 17:18:24 +00:00
parent 1233f74bc4
commit e61a754e39
2 changed files with 54 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gdb/ChangeLog
View File

@ -1,3 +1,10 @@
Sun Oct 6 22:43:06 1996 Jason Merrill <jason@yorick.cygnus.com>
* dwarf2read.c (read_tag_reference_type): New fn.
(read_type_die): Call it.
(dwarf_attr): Also look in the DIEs referred to by specification
or abstract_origin attributes.
Wed Oct 2 22:07:16 1996 Fred Fish <fnf@cygnus.com>
* inferior.h (IN_SIGTRAMP): Pass pc to SIGTRAMP_START and

47
gdb/dwarf2read.c
View File

@ -1728,6 +1728,43 @@ read_tag_pointer_type (die, objfile)
die->type = type;
}
/* Extract all information from a DW_TAG_reference_type DIE and add to
the user defined type vector. */
static void
read_tag_reference_type (die, objfile)
struct die_info *die;
struct objfile *objfile;
{
struct type *type, *pointed_to_type;
struct attribute *attr;
if (die->type)
{
return;
}
pointed_to_type = die_type (die, objfile);
type = dwarf_alloc_type (objfile);
TYPE_TARGET_TYPE (type) = pointed_to_type;
TYPE_OBJFILE (type) = objfile;
attr = dwarf_attr (die, DW_AT_byte_size);
if (attr)
{
TYPE_LENGTH (type) = DW_UNSND (attr);
}
else
{
TYPE_LENGTH (type) = address_size;
}
TYPE_CODE (type) = TYPE_CODE_REF;
TYPE_FLAGS (type) |= TYPE_FLAG_UNSIGNED;
TYPE_REFERENCE_TYPE (pointed_to_type) = type;
die->type = type;
}
static void
read_tag_const_type (die, objfile)
struct die_info *die;
@ -2637,6 +2674,7 @@ dwarf_attr (die, name)
unsigned int name;
{
unsigned int i;
struct attribute *spec = NULL;
for (i = 0; i < die->num_attrs; ++i)
{
@ -2644,7 +2682,13 @@ dwarf_attr (die, name)
{
return &die->attrs[i];
}
if (die->attrs[i].name == DW_AT_specification
|| die->attrs[i].name == DW_AT_abstract_origin)
spec = &die->attrs[i];
}
if (spec)
return dwarf_attr (follow_die_ref (DW_UNSND (spec)), name);
return NULL;
}
@ -3122,6 +3166,9 @@ read_type_die (die, objfile)
case DW_TAG_pointer_type:
read_tag_pointer_type (die, objfile);
break;
case DW_TAG_reference_type:
read_tag_reference_type (die, objfile);
break;
case DW_TAG_const_type:
read_tag_const_type (die, objfile);
break;