vbscript: Remove overzealous check in parse_hex_literal.

is_identifier_char also triggers on logical operators like "or".

Wine-Bug: https://bugs.winehq.org/show_bug.cgi?id=50179
Signed-off-by: Robert Wilhelm <robert.wilhelm@gmx.net>
Signed-off-by: Jacek Caban <jacek@codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Robert Wilhelm 2020-11-27 17:33:21 +01:00 committed by Alexandre Julliard
parent 9591dec386
commit 9821da5546
2 changed files with 2 additions and 1 deletions

View File

@ -315,7 +315,7 @@ static int parse_hex_literal(parser_ctx_t *ctx, LONG *ret)
while((d = hex_to_int(*++ctx->ptr)) != -1) while((d = hex_to_int(*++ctx->ptr)) != -1)
l = l*16 + d; l = l*16 + d;
if(begin + 9 /* max digits+1 */ < ctx->ptr || (*ctx->ptr != '&' && is_identifier_char(*ctx->ptr))) { if(begin + 9 /* max digits+1 */ < ctx->ptr) {
FIXME("invalid literal\n"); FIXME("invalid literal\n");
return 0; return 0;
} }

View File

@ -60,6 +60,7 @@ Call ok(&hfffe = -2, "&hfffe <> -2")
Call ok(&hffff& = 65535, "&hffff& <> -1") Call ok(&hffff& = 65535, "&hffff& <> -1")
Call ok(&hfffe& = 65534, "&hfffe& <> -2") Call ok(&hfffe& = 65534, "&hfffe& <> -2")
Call ok(&hffffffff& = -1, "&hffffffff& <> -1") Call ok(&hffffffff& = -1, "&hffffffff& <> -1")
Call ok((&h01or&h02)=3,"&h01or&h02 <> 3")
W = 5 W = 5
Call ok(W = 5, "W = " & W & " expected " & 5) Call ok(W = 5, "W = " & W & " expected " & 5)