version 1.45, 2021/04/19 14:08:55 |
version 1.46, 2021/06/10 21:01:43 |
|
|
} |
} |
if (found) |
if (found) |
setptr(patbeg, '\0'); |
setptr(patbeg, '\0'); |
|
isrec = (found == 0 && *buf == '\0') ? 0 : 1; |
} else { |
} else { |
if ((sep = *rs) == 0) { |
if ((sep = *rs) == 0) { |
sep = '\n'; |
sep = '\n'; |
|
|
if (!adjbuf(&buf, &bufsize, 1+rr-buf, recsize, &rr, "readrec 3")) |
if (!adjbuf(&buf, &bufsize, 1+rr-buf, recsize, &rr, "readrec 3")) |
FATAL("input record `%.30s...' too long", buf); |
FATAL("input record `%.30s...' too long", buf); |
*rr = 0; |
*rr = 0; |
|
isrec = (c == EOF && rr == buf) ? 0 : 1; |
} |
} |
*pbuf = buf; |
*pbuf = buf; |
*pbufsize = bufsize; |
*pbufsize = bufsize; |
isrec = *buf || !feof(inf); |
|
DPRINTF("readrec saw <%s>, returns %d\n", buf, isrec); |
DPRINTF("readrec saw <%s>, returns %d\n", buf, isrec); |
return isrec; |
return isrec; |
} |
} |