version 1.27, 2020/12/09 20:00:11 |
version 1.28, 2022/09/01 15:21:28 |
|
|
char *bp, *cstart; |
char *bp, *cstart; |
|
|
if (buf == NULL && (buf = (char *) malloc(bufsz)) == NULL) |
if (buf == NULL && (buf = (char *) malloc(bufsz)) == NULL) |
FATAL("out of space for rex expr"); |
FATAL("out of space for reg expr"); |
bp = buf; |
bp = buf; |
for ( ; ((c = input()) != '/' || openclass > 0) && c != 0; ) { |
for ( ; ((c = input()) != '/' || openclass > 0) && c != 0; ) { |
if (!adjbuf(&buf, &bufsz, bp-buf+3, 500, &bp, "regexpr")) |
if (!adjbuf(&buf, &bufsz, bp-buf+3, 500, &bp, "regexpr")) |
|
|
*bp = 0; |
*bp = 0; |
if (c == 0) |
if (c == 0) |
SYNTAX("non-terminated regular expression %.10s...", buf); |
SYNTAX("non-terminated regular expression %.10s...", buf); |
yylval.s = tostring(buf); |
yylval.s = buf; |
unput('/'); |
unput('/'); |
RET(REGEXPR); |
RET(REGEXPR); |
} |
} |