summaryrefslogtreecommitdiff
path: root/awkgram.y
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2022-03-27 08:07:51 +0300
committerArnold D. Robbins <arnold@skeeve.com>2022-03-27 08:07:51 +0300
commitc2f6af30f602aa1a28e59491cbbfcf9145350f78 (patch)
tree0ce9863bebfb4e8b925f16b741a6d793dee1395f /awkgram.y
parent0cdb4a0e28663cde0937601d26789ba5a6697848 (diff)
parent656b5bbec59a3094ae13f3bdac7ae2ef1e2fb5e9 (diff)
downloadgawk-c2f6af30f602aa1a28e59491cbbfcf9145350f78.tar.gz
Merge branch 'gawk-5.1-stable'
Diffstat (limited to 'awkgram.y')
-rw-r--r--awkgram.y14
1 files changed, 7 insertions, 7 deletions
diff --git a/awkgram.y b/awkgram.y
index 6f66fb53..08ee381c 100644
--- a/awkgram.y
+++ b/awkgram.y
@@ -111,7 +111,7 @@ static void merge_comments(INSTRUCTION *c1, INSTRUCTION *c2);
static INSTRUCTION *make_braced_statements(INSTRUCTION *lbrace, INSTRUCTION *stmts, INSTRUCTION *rbrace);
static void add_sign_to_num(NODE *n, char sign);
-static bool at_seen = false;
+static int at_seen = 0;
static bool want_source = false;
static bool want_namespace = false;
static bool want_regexp = false; /* lexical scanning kludge */
@@ -300,7 +300,7 @@ rule
| '@' LEX_INCLUDE source statement_term
{
want_source = false;
- at_seen = false;
+ at_seen--;
if ($3 != NULL && $4 != NULL) {
SRCFILE *s = (SRCFILE *) $3;
s->comment = $4;
@@ -310,7 +310,7 @@ rule
| '@' LEX_LOAD library statement_term
{
want_source = false;
- at_seen = false;
+ at_seen--;
if ($3 != NULL && $4 != NULL) {
SRCFILE *s = (SRCFILE *) $3;
s->comment = $4;
@@ -333,7 +333,7 @@ rule
want_source = false;
want_namespace = false;
- at_seen = false;
+ at_seen--;
// this frees $3 storage in all cases
set_namespace($3, $4);
@@ -504,7 +504,7 @@ func_name
| '@' LEX_EVAL
{
$$ = $2;
- at_seen = false;
+ at_seen--;
}
;
@@ -2041,7 +2041,7 @@ func_call
*/
$$ = list_prepend($2, t);
- at_seen = false;
+ at_seen--;
}
;
@@ -3791,7 +3791,7 @@ retry:
goto collect_regexp;
}
pushback();
- at_seen = true;
+ at_seen++;
return lasttok = '@';
case '\\':