From a03714dc32fc18b1914aa7f506d2826715e2e48b Mon Sep 17 00:00:00 2001
From: ceriel <devnull@localhost>
Date: Thu, 12 Mar 1987 19:18:59 +0000
Subject: [PATCH] Bug fixes

---
 util/led/extract.c | 1 +
 util/led/scan.c    | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/util/led/extract.c b/util/led/extract.c
index f599996d..b03380be 100644
--- a/util/led/extract.c
+++ b/util/led/extract.c
@@ -114,6 +114,7 @@ process(head)
 	while (nsect--) {
 		if (sects->os_flen) {
 			/* contains non-zero stuff */
+			outhead.oh_nemit += outsp->os_size - outsp->os_flen;
 			outsp->os_flen = outsp->os_size + sects->os_flen;
 		}
 		else {
diff --git a/util/led/scan.c b/util/led/scan.c
index 3e3dd101..e6987e64 100644
--- a/util/led/scan.c
+++ b/util/led/scan.c
@@ -302,9 +302,10 @@ putemitindex(sectindex, emitoff, allopiece)
 			while (zero--) *p++ = 0;
 		}
 		else	 return FALSE;
+		zero = 0;
 	}
 	zeros[allopiece - ALLOEMIT] =
-		((struct outsect *) modulptr(sectindex))->os_size - flen;
+	 zero + ((struct outsect *) modulptr(sectindex))->os_size - flen;
 	if ((emitindex = alloc(allopiece, flen)) != BADOFF) {
 		*(ind_t *)modulptr(emitoff) = emitindex;
 		return TRUE;