system/wine
system/wine
1
0
Fork 0
mirror of git://source.winehq.org/git/wine.git synced 2024-10-06 09:35:52 +00:00
Code Issues Packages Projects Releases Wiki Activity

vbscript: Accept "><" as inequality operator.

Browse source 
Signed-off-by: Nikolay Sivov <nsivov@codeweavers.com>
This commit is contained in:
Nikolay Sivov 2022-11-24 08:26:28 +03:00 committed by Alexandre Julliard
parent 6f1d38bdba
commit 9f77009aa5
2 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
dlls/vbscript/lex.c
View file

@ -500,9 +500,13 @@ static int parse_next_token(void *lval, unsigned *loc, parser_ctx_t *ctx)
}
return '<';
case '>':
if(*++ctx->ptr == '=') {
switch(*++ctx->ptr) {
case '=':
ctx->ptr++;
return tGTEQ;
case '<':
ctx->ptr++;
return tNEQ;
}
return '>';
default:

4
dlls/vbscript/tests/lang.vbs
View file

@ -181,6 +181,10 @@ Call ok(1 <= 2, "! 1 <= 2")
Call ok(2 <= 2, "! 2 <= 2")
Call ok(1 =< 2, "! 1 =< 2")
Call ok(2 =< 2, "! 2 =< 2")
Call ok(not (2 >< 2), "2 >< 2")
Call ok(2 >< 1, "! 2 >< 1")
Call ok(not (2 <> 2), "2 <> 2")
Call ok(2 <> 1, "! 2 <> 1")
Call ok(isNull(0 = null), "'(0 = null)' is not null")
Call ok(isNull(null = 1), "'(null = 1)' is not null")