OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR debug/45124 (No DW_AT_accessibility for public DIEs in DW_TAG_class_type)

Browse Source 
PR debug/45124
	* dwarf2out.c (add_accessibility_attribute): Assume
	DW_ACCESS_private as the default for dwarf_version > 2
	and DW_TAG_class_type parent.
	(gen_inheritance_die): Assume DW_ACCESS_public as the default
	for dwarf_version > 2 and parent other than DW_TAG_class_type.

From-SVN: r164442
This commit is contained in:
Jakub Jelinek 2010-09-20 18:48:29 +02:00 committed by Jakub Jelinek
parent cce470f93d
commit fbbe0995b8
2 changed files with 33 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gcc/ChangeLog
View File

@ -1,3 +1,12 @@
2010-09-20 Jakub Jelinek <jakub@redhat.com>
PR debug/45124
* dwarf2out.c (add_accessibility_attribute): Assume
DW_ACCESS_private as the default for dwarf_version > 2
and DW_TAG_class_type parent.
(gen_inheritance_die): Assume DW_ACCESS_public as the default
for dwarf_version > 2 and parent other than DW_TAG_class_type.
2010-09-20 Rafael Carre <rafael.carre@gmail.com>
PR target/45726

26
gcc/dwarf2out.c
View File

@ -15921,10 +15921,22 @@ add_AT_location_description (dw_die_ref die, enum dwarf_attribute attr_kind,
static void
add_accessibility_attribute (dw_die_ref die, tree decl)
{
/* In DWARF3+ the default is DW_ACCESS_private only in DW_TAG_class_type
children, otherwise the default is DW_ACCESS_public. In DWARF2
the default has always been DW_ACCESS_public. */
if (TREE_PROTECTED (decl))
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_protected);
else if (TREE_PRIVATE (decl))
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_private);
{
if (dwarf_version == 2
|| die->die_parent == NULL
|| die->die_parent->die_tag != DW_TAG_class_type)
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_private);
}
else if (dwarf_version > 2
&& die->die_parent
&& die->die_parent->die_tag == DW_TAG_class_type)
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_public);
}
/* Attach the specialized form of location attribute used for data members of
@ -19643,10 +19655,20 @@ gen_inheritance_die (tree binfo, tree access, dw_die_ref context_die)
if (BINFO_VIRTUAL_P (binfo))
add_AT_unsigned (die, DW_AT_virtuality, DW_VIRTUALITY_virtual);
/* In DWARF3+ the default is DW_ACCESS_private only in DW_TAG_class_type
children, otherwise the default is DW_ACCESS_public. In DWARF2
the default has always been DW_ACCESS_private. */
if (access == access_public_node)
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_public);
{
if (dwarf_version == 2
|| context_die->die_tag == DW_TAG_class_type)
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_public);
}
else if (access == access_protected_node)
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_protected);
else if (dwarf_version > 2
&& context_die->die_tag != DW_TAG_class_type)
add_AT_unsigned (die, DW_AT_accessibility, DW_ACCESS_private);
}
/* Generate a DIE for a class member. */