From f12bd8856dd46873729f6f7a75e0cc5eecf05104 Mon Sep 17 00:00:00 2001
From: Kelvin Sherlock <ksherlock@gmail.com>
Date: Sun, 11 Mar 2018 23:47:02 -0400
Subject: [PATCH] extraction was trying to create a version-1 OMF file, which
 is to say, corrupt.

---
 MakeLib.cc | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/MakeLib.cc b/MakeLib.cc
index 374435c..8dcee7f 100644
--- a/MakeLib.cc
+++ b/MakeLib.cc
@@ -1552,14 +1552,7 @@ if (inFile = fopen(*libName, "rb")) {	/* open the library */
       ReadName(name, s[13]);
       if (LibNum(name) == dfile) {	/*   if its in the dfile, delete it */
 	 if (objFile) {
-	    i = (len+511)/512;
-	    if (s[32]) {
-	       s[0] = i>>24; s[1] = i>>16; s[2] = i>>8; s[3] = i;
-               }
-	    else {
-	       s[3] = i>>24; s[2] = i>>16; s[1] = i>>8; s[0] = i;
-               }
-	    fwrite(s, 1, i*512, objFile);
+	    fwrite(s, 1, len, objFile);
 	    }
 	 if (symbol) {			/*     adjust disps for library files */
             p = symbol;