Vendor import of bwk's 10-Aug-2011 release.
This commit is contained in:
parent
9cb3faa660
commit
0abe4b0321
4
FIXES
4
FIXES
@ -25,6 +25,10 @@ THIS SOFTWARE.
|
||||
This file lists all bug fixes, changes, etc., made since the AWK book
|
||||
was sent to the printers in August, 1987.
|
||||
|
||||
Aug 10, 2011:
|
||||
another fix to avoid core dump with -v; again, many thanks
|
||||
to ruslan ermilov.
|
||||
|
||||
Aug 7, 2011:
|
||||
split(s, a, //) now behaves the same as split(s, a, "")
|
||||
|
||||
|
9
lib.c
9
lib.c
@ -89,8 +89,13 @@ void initgetrec(void)
|
||||
char *p;
|
||||
|
||||
for (i = 1; i < *ARGC; i++) {
|
||||
if (!isclvar(p = getargv(i))) { /* find 1st real filename */
|
||||
setsval(lookup("FILENAME", symtab), getargv(i));
|
||||
p = getargv(i); /* find 1st real filename */
|
||||
if (p == NULL || *p == '\0') { /* deleted or zapped */
|
||||
argno++;
|
||||
continue;
|
||||
}
|
||||
if (!isclvar(p)) {
|
||||
setsval(lookup("FILENAME", symtab), p);
|
||||
return;
|
||||
}
|
||||
setclvar(p); /* a commandline assignment before filename */
|
||||
|
Loading…
x
Reference in New Issue
Block a user