Include ')' in non-illegal char set.

This commit is contained in:
Dianne Skoll
2025-11-01 21:09:19 -04:00
parent a2f760fb91
commit d12d327e35

View File

@@ -2230,7 +2230,7 @@ static int set_constant_value(expr_node *atom)
} }
atom->u.value.type = ERR_TYPE; atom->u.value.type = ERR_TYPE;
if (strchr("+-*/%&|=<>!", *s) != NULL) { if (strchr("+-*/%&|=<>!)", *s) != NULL) {
r = E_EXPECTING_ATOM; r = E_EXPECTING_ATOM;
} else { } else {
r = E_ILLEGAL_CHAR; r = E_ILLEGAL_CHAR;
@@ -2352,7 +2352,7 @@ static expr_node *parse_atom(char const **e, int *r, Var *locals, int level)
*s != '$' && *s != '$' &&
*s != '"' && *s != '"' &&
*s != '\'') { *s != '\'') {
if (strchr("+-*/%&|=<>!", *s) != NULL) { if (strchr("+-*/%&|=<>!)", *s) != NULL) {
*r = E_EXPECTING_ATOM; *r = E_EXPECTING_ATOM;
Eprint("%s", GetErr(*r)); Eprint("%s", GetErr(*r));
} else { } else {