* config/tc-hppa.c (md_assemble): Fix dwarf2 line handling.

        (pa_ip): Handle 'fX'.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index e4bc208cdfd1b6f2a1d8a4b25ac01976eeadd3ac..5db60d9b8bce91059e52a651ef9486267a4b0efd 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,13 @@
+at Sep 18 12:13:28 1999  Jeffrey A Law  (law@cygnus.com)
+
+       * config/tc-hppa.c (md_assemble): Fix dwarf2 line handling.
+       (pa_ip): Handle 'fX'.
+
+Sat Sep 18 12:13:28 1999  Jeffrey A Law  (law@cygnus.com)
+
+        * config/tc-hppa.c (md_assemble): Fix dwarf2 line handling.
+        (pa_ip): Handle 'fX'.
+
 Fri Sep 17 11:57:34 1999  Jeffrey A Law  (law@cygnus.com)
 
        * config/tc-hppa.c (pa_build_unwind_subspace): Do not build

diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c
index 1f42154a047883d058b9fb043983ed6b170aa3e1..c3d09853f478f5ff048a2dd06ddcabfa071a2301 100644 (file)
--- a/gas/config/tc-hppa.c
+++ b/gas/config/tc-hppa.c
@@ -1463,14 +1463,15 @@ md_assemble (str)
     {
       bfd_vma addr;
 
-      /* I haven't got a clue why the -8 is necessary, but this
-        seems to work.  Someone should really document what all
-        the frag nonsense does and more precisely what the dwarf2
-        code needs.  */
+      /* First update the notion of the current source line.  */
+      dwarf2_where (&debug_line);
+
+      /* We want the offset of the start of this instruction within the
+        the current frag.  */
+      addr = frag_now->fr_address + frag_now_fix () - 4;
 
-      addr = frag_now->fr_address + frag_now_fix () - 8;
+      /* And record the information.  */
       dwarf2_gen_line_info (addr, &debug_line);
-      dwarf2_where (&debug_line);
     }
 #endif
 }
@@ -3157,6 +3158,7 @@ pa_ip (str)
                  }
 
                /* Float operand 1 with L/R selection.  */
+               case 'X':
                case 'A':
                  {
                    struct pa_11_fp_reg_struct result;