Add addresses of DIEs to debug_dwarf_die

gcc/
	* dwarf2out.c (print_die): Print the address of the current DIE or
	of any DIE referenced by the current one.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@167247 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 09fc957b2266d2f0977d8da10364c9e4a2d29882..ac49adc074cc3923eb8d45dcbd08c256a68c5231 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2010-11-29  Dodji Seketeli  <dodji@redhat.com>
+
+       * dwarf2out.c (print_die): Print the address of the current DIE or
+       of any DIE referenced by the current one.
+
 2010-11-29  Dodji Seketeli  <dodji@redhat.com>
 
        PR debug/46101

diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c
index 7e788a44bcd7b869b13b3d1aeca80a45ac9c4a68..04764ba7dfb945400d3a818525532a958ba43b38 100644 (file)
--- a/gcc/dwarf2out.c
+++ b/gcc/dwarf2out.c
@@ -8450,11 +8450,14 @@ print_die (dw_die_ref die, FILE *outfile)
   unsigned ix;
 
   print_spaces (outfile);
-  fprintf (outfile, "DIE %4ld: %s\n",
-          die->die_offset, dwarf_tag_name (die->die_tag));
+  fprintf (outfile, "DIE %4ld: %s (%p)\n",
+          die->die_offset, dwarf_tag_name (die->die_tag),
+          (void*) die);
   print_spaces (outfile);
   fprintf (outfile, "  abbrev id: %lu", die->die_abbrev);
-  fprintf (outfile, " offset: %ld\n", die->die_offset);
+  fprintf (outfile, " offset: %ld", die->die_offset);
+  fprintf (outfile, " mark: %d\n", die->die_mark);
+
   if (dwarf_version >= 4 && die->die_id.die_type_node)
     {
       print_spaces (outfile);
@@ -8518,6 +8521,7 @@ print_die (dw_die_ref die, FILE *outfile)
                         AT_ref (a)->die_id.die_symbol);
              else
                fprintf (outfile, "die -> %ld", AT_ref (a)->die_offset);
+             fprintf (outfile, " (%p)", (void *) AT_ref (a));
            }
          else
            fprintf (outfile, "die -> <null>");