Robert Wilhelm : vbscript: Handle another variant of LTE/GTE tokens.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 3a578022891714a83d5a981693b945cc0a16b63d
URL:    https://gitlab.winehq.org/wine/wine/-/commit/3a578022891714a83d5a981693b945c...

Author: Robert Wilhelm 
Date:   Thu Nov 24 08:10:58 2022 +0300

vbscript: Handle another variant of LTE/GTE tokens.

Wine-Bug: https://bugs.winehq.org/show_bug.cgi?id=53670
Signed-off-by: Nikolay Sivov

---

dlls/vbscript/lex.c | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/dlls/vbscript/lex.c b/dlls/vbscript/lex.c
index 3374d4eafe1..f425b816cb0 100644
--- a/dlls/vbscript/lex.c
+++ b/dlls/vbscript/lex.c
@@ -422,7 +422,6 @@ static int parse_next_token(void *lval, unsigned *loc, parser_ctx_t *ctx)
     case ':':
     case ')':
     case ',':
-    case '=':
     case '+':
     case '*':
     case '/':
@@ -477,6 +476,16 @@ static int parse_next_token(void *lval, unsigned *loc, parser_ctx_t *ctx)
         if(*++ctx->ptr == 'h' || *ctx->ptr == 'H')
             return parse_hex_literal(ctx, lval);
         return '&';
+    case '=':
+        switch(*++ctx->ptr) {
+        case '<':
+            ctx->ptr++;
+            return tLTEQ;
+        case '>':
+            ctx->ptr++;
+            return tGTEQ;
+        }
+        return '=';
     case '<':
         switch(*++ctx->ptr) {
         case '>':