Bug fixes

This commit is contained in:
ceriel 1987-03-12 19:18:59 +00:00
parent 755ea27d46
commit 9ab7bf2408
2 changed files with 3 additions and 1 deletions

View file

@ -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 {

View file

@ -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;