From 1193c68fa718ff16c47aba23f8532bf1568f294e Mon Sep 17 00:00:00 2001
From: Denys Vlasenko <vda.linux@googlemail.com>
Date: Fri, 2 Jul 2021 14:29:01 +0200
Subject: [PATCH] awk: when parsing length(), simplify eating of LPAREN
function old new delta
parse_expr 945 948 +3
Signed-off-by: Denys Vlasenko <vda.linux@googlemail.com>
---
editors/awk.c | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/editors/awk.c b/editors/awk.c
index 6833c2f0d..f65449a09 100644
--- a/editors/awk.c
+++ b/editors/awk.c
@@ -1453,10 +1453,11 @@ static node *parse_expr(uint32_t term_tc)
| TC_BINOPX /* length <op> NUM */
| TC_COMMA /* print length, 1 */
);
- rollback_token();
- if (tc & TC_LPAREN) {
+ if (tc != TC_LPAREN)
+ rollback_token();
+ else {
/* It was a "(" token. Handle just like TC_BUILTIN */
- cn->l.n = parse_lrparen_list();
+ cn->l.n = parse_expr(TC_RPAREN);
}
break;
}