Re: [PATCH] Re: Section .debug_info in object file

[Richard Henderson <rth@redhat.com>]

On Thu, Sep 12, 2002 at 10:03:03PM +0300, Elias Athanasopoulos wrote:
> 	* dwarf2dbg.c (out_debug_abbrev): Add support for the DW_AT_name field.
> 	(out_debug_info): Likewise.

I committed the following variant.


r~



Index: dwarf2dbg.c
===================================================================
RCS file: /cvs/src/src/gas/dwarf2dbg.c,v
retrieving revision 1.53
diff -c -p -d -r1.53 dwarf2dbg.c
*** dwarf2dbg.c	27 Aug 2002 11:09:42 -0000	1.53
--- dwarf2dbg.c	17 Sep 2002 02:32:00 -0000
*************** out_debug_abbrev (abbrev_seg)
*** 1149,1154 ****
--- 1149,1155 ----
        out_abbrev (DW_AT_low_pc, DW_FORM_addr);
        out_abbrev (DW_AT_high_pc, DW_FORM_addr);
      }
+   out_abbrev (DW_AT_name, DW_FORM_string);
    out_abbrev (DW_AT_comp_dir, DW_FORM_string);
    out_abbrev (DW_AT_producer, DW_FORM_string);
    out_abbrev (DW_AT_language, DW_FORM_data2);
*************** out_debug_info (info_seg, abbrev_seg, li
*** 1223,1228 ****
--- 1224,1239 ----
        expr.X_add_number = 0;
        emit_expr (&expr, sizeof_address);
      }
+ 
+   /* DW_AT_name.  We don't have the actual file name that was present
+      on the command line, so assume files[1] is the main input file.
+      We're not supposed to get called unless at least one line number
+      entry was emitted, so this should always be defined.  */
+   if (!files || files_in_use < 1)
+     abort ();
+   len = strlen (files[1].filename) + 1;
+   p = frag_more (len);
+   memcpy (p, files[1].filename, len);
  
    /* DW_AT_comp_dir */
    comp_dir = getpwd ();