🚀 go-pugleaf

Here is my attempt to fix the "strip" bug reported in the UNIX System V
Known Problem List as Problem ID 474.  I don't much use this command,
but I'm fairly sure this bug fix will work.  (The symptom was that
"strip" couldn't strip more than 17 files at one time, assuming MAX_OPEN
or equivalent is 20.)  The following is from the DMD SGS Release 1.3;
your COFF "strip" may differ slightly.  Source file name "main.c":

...
    /*  The SDS/UNIX Strip Command (a.k.a. b16strip or n3bstrip)
...
		    } else { /* not an archive */
			process(*argv);
			}
		/* DAG -- added to fix bug reported as KPL 474: */
		ldaclose(ldptr);
		}
	} else {
	    fprintf(stderr, "%sstrip:  %s:  cannot open\n", SGS, *argv);
	} /* if ! ldopen */
...
/*
 *	static char ID[] = "@(#) main.c: 1.2 1/22/82";
 */