Apply Jim Wilson's patch to track current frag for line number changes.
authorNick Clifton <nickc@redhat.com>
Fri, 27 Aug 1999 09:03:18 +0000 (09:03 +0000)
committerNick Clifton <nickc@redhat.com>
Fri, 27 Aug 1999 09:03:18 +0000 (09:03 +0000)
gas/ChangeLog
gas/dwarf2dbg.c

index 7512e93840cb3720daac82b6a47a1daacd6b6f3e..9b2a8eaa5a258ae2802cc653caebc69a5aeb03f5 100644 (file)
@@ -1,3 +1,14 @@
+1999-08-27  Jim Wilson  <wilson@cygnus.com>
+
+       * dwarf2dbg.c (MAX_SPECIAL_ADDR_DELTA): Correct typo in comment.
+       (struct ls): Add frag field.  Initialize it to zero.
+       (out_end_sequence): New local text_frag.  Set it while in text section.
+       Replace address check with frag check.  Set ls.frag to text_frag if
+       out_set_addr called.
+       (dwarf2_gen_line_info): Add explanatory comment.  New local saved_frag.
+       Set it before switching sections.  Replace address check with frag
+       check.  Set ls.frag to saved_frag if out_set_addr called.
+
 1999-08-26  David Mosberger  <davidm@hpl.hp.com>
 
         * dwarf2dbg.c (out_end_sequence): If address changed, directly
index c45d598ffc0486c44920eb70c0ab26e4b9669a84..e735592e73787ceec801198c462d8a704bef94b8 100644 (file)
@@ -78,7 +78,7 @@
    is not made available by the GCC front-end.  */
 #define        DWARF2_LINE_DEFAULT_IS_STMT     1
 
-/* Given a special op, return the line skip amount: */
+/* Given a special op, return the line skip amount */
 #define SPECIAL_LINE(op) \
        (((op) - DWARF2_LINE_OPCODE_BASE)%DWARF2_LINE_RANGE + DWARF2_LINE_BASE)
 
    DWARF2_LINE_MIN_INSN_LENGTH.  */
 #define SPECIAL_ADDR(op) (((op) - DWARF2_LINE_OPCODE_BASE)/DWARF2_LINE_RANGE)
 
-/* The maximum address skip amont that can be encoded with a special op: */
+/* The maximum address skip amount that can be encoded with a special op.  */
 #define MAX_SPECIAL_ADDR_DELTA         SPECIAL_ADDR(255)
 
 #define INITIAL_STATE                                          \
-  /* initialize as per DWARF2.0 standard: */                   \
+  /* Initialize as per DWARF2.0 standard.  */                  \
   0,                                   /* address */           \
   1,                                   /* file */              \
   1,                                   /* line */              \
@@ -118,6 +118,7 @@ static struct
     unsigned int
       any_dwarf2_directives : 1;       /* did we emit any DWARF2 line debug directives? */
 
+    fragS * frag;      /* frag that "addr" is relative to */
     segT text_seg;     /* text segment "addr" is relative to */
     subsegT text_subseg;
     segT line_seg;     /* ".debug_line" segment */
@@ -149,6 +150,7 @@ ls =
     0,
     0,
     0,
+    0,
     NULL,
     { NULL, 0, 0, 0, 0 },
     0,
@@ -324,6 +326,7 @@ static void
 out_end_sequence ()
 {
   addressT addr, delta;
+  fragS *text_frag;
 
   if (ls.text_seg)
     {
@@ -333,11 +336,13 @@ out_end_sequence ()
 #else
       addr = frag_now_fix ();
 #endif
+      text_frag = frag_now;
       subseg_set (ls.line_seg, DL_BODY);
-      if (addr < ls.sm.addr)
+      if (text_frag != ls.frag)
        {
          out_set_addr (addr);
          ls.sm.addr = addr;
+         ls.frag = text_frag;
        }
       else
        {
@@ -407,6 +412,9 @@ get_filenum (filenum, file)
   return ++ls.num_filenames;
 }
 
+/* Emit an entry in the line number table if the address or line has changed.
+   ADDR is relative to the current frag in the text section.  */
+
 void
 dwarf2_gen_line_info (addr, l)
      addressT addr;
@@ -416,6 +424,7 @@ dwarf2_gen_line_info (addr, l)
   unsigned int any_output = 0;
   subsegT saved_subseg;
   segT saved_seg;
+  fragS *saved_frag;
 
   if (flag_debug)
     fprintf (stderr, "line: addr %lx file `%s' line %u col %u flags %x\n",
@@ -438,6 +447,7 @@ dwarf2_gen_line_info (addr, l)
      them.  */
   saved_seg = now_seg;
   saved_subseg = now_subseg;
+  saved_frag = frag_now;
 
   if (!ls.line_seg)
     {
@@ -473,6 +483,7 @@ dwarf2_gen_line_info (addr, l)
       ls.text_subseg = saved_subseg;
       out_set_addr (addr);
       ls.sm.addr = addr;
+      ls.frag = saved_frag;
     }
 
   if (ls.sm.filenum != filenum)
@@ -506,18 +517,15 @@ dwarf2_gen_line_info (addr, l)
   if (ls.sm.line != l->line)
     {
       any_output = 1;
-      if (addr < ls.sm.addr)
+      if (saved_frag != ls.frag)
        {
-         /* This happens when a new frag got allocated (for whatever
-            reason).  Deal with it by generating a reference symbol.
-            Note: no end_sequence needs to be generated because the
-            address did not really decrease (only the reference point
-            changed).
-
-            ??? Perhaps we should directly check for a change of
-            frag_now instead?  */
+         /* If a new frag got allocated (for whatever reason), then
+            deal with it by generating a reference symbol.  Note: no
+            end_sequence needs to be generated because the address did
+            not really decrease (only the reference point changed).  */
          out_set_addr (addr);
          ls.sm.addr = addr;
+         ls.frag = saved_frag;
        }
       gen_addr_line (l->line - ls.sm.line,
                     (addr - ls.sm.addr) / DWARF2_LINE_MIN_INSN_LENGTH);