* listing.c (calc_hex): Offset by fr_fix when examining fr_var.

	From <uddeborg@carmen.se>.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 45cd69ac1c4c8809b5a6ac5a7c63dcf7a009b5e6..130613febd7e372f349f888eca056ed1a57f2b08 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+Thu Jun 27 12:18:26 1996  Ian Lance Taylor  <ian@cygnus.com>
+
+       * listing.c (calc_hex): Offset by fr_fix when examining fr_var.
+       From <uddeborg@carmen.se>.
+
 Wed Jun 26 13:21:34 1996  Ian Lance Taylor  <ian@cygnus.com>
 
        * configure.in (mips-*-osf*): New target.

diff --git a/gas/listing.c b/gas/listing.c
index f37c987934026145c8b6efd55f31e7667648fde1..b42f146de59ff42d254425ac792903487cf7986f 100644 (file)
--- a/gas/listing.c
+++ b/gas/listing.c
@@ -180,8 +180,6 @@ list_info_type;
 static struct list_info_struct *head;
 struct list_info_struct *listing_tail;
 extern int listing;
-extern fragS *frag_now;
-
 
 static int paper_width = 200;
 static int paper_height = 60;
@@ -304,6 +302,12 @@ listing_newline (ps)
   static char *last_file = NULL;
   list_info_type *new;
 
+  if (listing == 0)
+    return;
+
+  if (now_seg == absolute_section)
+    return;
+
   as_where (&file, &line);
   if (line != last_line || (last_file && file && strcmp(file, last_file)))
     {
@@ -514,7 +518,8 @@ calc_hex (list)
        unsigned int var_rep_idx = byte_in_frag;
 
        /* Print as many bytes from the variable part as is sensible */
-       while (byte_in_frag < frag_ptr->fr_var * frag_ptr->fr_offset
+       while ((byte_in_frag
+               < frag_ptr->fr_fix + frag_ptr->fr_var * frag_ptr->fr_offset)
               && data_buffer_size < sizeof (data_buffer) - 10)
          {
            if (address == ~0)
@@ -533,7 +538,7 @@ calc_hex (list)
            var_rep_idx++;
            byte_in_frag++;
 
-           if (var_rep_idx >= frag_ptr->fr_var)
+           if (var_rep_idx >= frag_ptr->fr_fix + frag_ptr->fr_var)
              var_rep_idx = var_rep_max;
          }
       }
@@ -967,7 +972,8 @@ void
 listing_eject (ignore)
      int ignore;
 {
-  listing_tail->edict = EDICT_EJECT;
+  if (listing)
+    listing_tail->edict = EDICT_EJECT;
 }
 
 void
@@ -983,7 +989,8 @@ void
 listing_list (on)
      int on;
 {
-  listing_tail->edict = on ? EDICT_LIST : EDICT_NOLIST;
+  if (listing)
+    listing_tail->edict = on ? EDICT_LIST : EDICT_NOLIST;
 }
 
 
@@ -1015,23 +1022,40 @@ listing_psize (width_only)
   demand_empty_rest_of_line ();
 }
 
+void
+listing_nopage (ignore)
+     int ignore;
+{
+  paper_height = 0;
+}
+
 void
 listing_title (depth)
      int depth;
 {
+  int quoted;
   char *start;
   char *ttl;
   unsigned int length;
 
   SKIP_WHITESPACE ();
-  if (*input_line_pointer == '\"')
+  if (*input_line_pointer != '\"')
+    quoted = 0;
+  else
     {
-      input_line_pointer++;
-      start = input_line_pointer;
+      quoted = 1;
+      ++input_line_pointer;
+    }
+
+  start = input_line_pointer;
 
-      while (*input_line_pointer)
+  while (*input_line_pointer)
+    {
+      if (quoted
+         ? *input_line_pointer == '\"'
+         : is_end_of_line[(unsigned char) *input_line_pointer])
        {
-         if (*input_line_pointer == '\"')
+         if (listing)
            {
              length = input_line_pointer - start;
              ttl = xmalloc (length + 1);
@@ -1039,25 +1063,22 @@ listing_title (depth)
              ttl[length] = 0;
              listing_tail->edict = depth ? EDICT_SBTTL : EDICT_TITLE;
              listing_tail->edict_arg = ttl;
-             input_line_pointer++;
-             demand_empty_rest_of_line ();
-             return;
-           }
-         else if (*input_line_pointer == '\n')
-           {
-             as_bad ("New line in title");
-             demand_empty_rest_of_line ();
-             return;
-           }
-         else
-           {
-             input_line_pointer++;
            }
+         if (quoted)
+           input_line_pointer++;
+         demand_empty_rest_of_line ();
+         return;
+       }
+      else if (*input_line_pointer == '\n')
+       {
+         as_bad ("New line in title");
+         demand_empty_rest_of_line ();
+         return;
+       }
+      else
+       {
+         input_line_pointer++;
        }
-    }
-  else
-    {
-      as_bad ("expecting title in quotes");
     }
 }
 
@@ -1067,17 +1088,19 @@ void
 listing_source_line (line)
      unsigned int line;
 {
-  new_frag ();
-  listing_tail->hll_line = line;
-  new_frag ();
-
+  if (listing)
+    {
+      new_frag ();
+      listing_tail->hll_line = line;
+      new_frag ();
+    }
 }
 
 void
 listing_source_file (file)
      const char *file;
 {
-  if (listing_tail)
+  if (listing)
     listing_tail->hll_file = file_info (file);
 }
 
@@ -1116,6 +1139,13 @@ listing_psize (ignore)
   s_ignore (0);
 }
 
+void
+listing_nopage (ignore)
+     int ignore;
+{
+  s_ignore (0);
+}
+
 void 
 listing_title (depth)
      int depth;