From 1d4fd43cb95fed18c9885ba5b30b28eb1f8f713b Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Fri, 13 Feb 2015 09:40:28 +0200 Subject: Improve regexp collection on Solaris, maybe others. --- awkgram.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'awkgram.c') diff --git a/awkgram.c b/awkgram.c index 20d3506a..b3283eb2 100644 --- a/awkgram.c +++ b/awkgram.c @@ -5337,7 +5337,7 @@ yylex(void) if (lasttok == LEX_EOF) /* error earlier in current source, must give up !! */ return 0; - c = nextc(true); + c = nextc(! want_regexp); if (c == END_SRC) return 0; if (c == END_FILE) @@ -5379,12 +5379,12 @@ yylex(void) want_regexp = false; tok = tokstart; for (;;) { - c = nextc(true); + c = nextc(false); if (gawk_mb_cur_max == 1 || nextc_is_1stbyte) switch (c) { case '[': /* one day check for `.' and `=' too */ - if (nextc(true) == ':' || in_brack == 0) + if (nextc(false) == ':' || in_brack == 0) in_brack++; pushback(); break; @@ -5396,7 +5396,7 @@ yylex(void) in_brack--; break; case '\\': - if ((c = nextc(true)) == END_FILE) { + if ((c = nextc(false)) == END_FILE) { pushback(); yyerror(_("unterminated regexp ends with `\\' at end of file")); goto end_regexp; /* kludge */ @@ -5596,7 +5596,7 @@ retry: return lasttok = '*'; case '/': - if (nextc(true) == '=') { + if (nextc(false) == '=') { pushback(); return lasttok = SLASH_BEFORE_EQUAL; } -- cgit v1.2.3