From: Ken Raeburn <raeburn@cygnus>
Date: Tue, 19 Apr 1994 01:12:48 +0000 (+0000)
Subject: (VMS_write_object_file): While looking for register mask, skip empty fill frags
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=ad8019e829a3fa34f27434d87e50d991e5649da2;p=binutils-gdb.git

(VMS_write_object_file): While looking for register mask, skip empty fill frags
caused by enabling listing output.
---

diff --git a/gas/config/obj-vms.c b/gas/config/obj-vms.c
index ee3e34cf2ac..10b7fd26ece 100644
--- a/gas/config/obj-vms.c
+++ b/gas/config/obj-vms.c
@@ -4736,6 +4736,11 @@ VMS_write_object_file (text_siz, data_siz, bss_siz, text_frag_root,
 	       If you can find a test case that triggers this, report
 	       it (and tell me what the entry mask field ought to be),
 	       and I'll try to fix it.  KR */
+	    /* First frag might be empty if we're generating listings.
+	       So skip empty rs_fill frags.  */
+	    while (fragP && fragP->fr_type == rs_fill && fragP->fr_fix == 0)
+	      fragP = fragP->fr_next;
+
 	    if (fragP->fr_fix < 2)
 	      abort ();