[Bug 54493] New: vbscript fails to compile concat when used without space and expression begins with H

[WineHQ Bugzilla]

https://bugs.winehq.org/show_bug.cgi?id=54493

Bug ID: 54493
           Summary: vbscript fails to compile concat when used without
                    space and expression begins with H
           Product: Wine
           Version: 7.21
          Hardware: x86-64
                OS: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: vbscript
          Assignee: [e-mail]
          Reporter: [e-mail]
      Distribution: ---

While porting Visual Pinball to cross platform, I ran into a script with the
following:

DMD CL(0, "HIGHSCORES"), "1> " &HighScoreName(0) & " "
&FormatScore(HighScore(0)), "", eNone, eScrollLeft, eNone, 2000, False, ""

This is valid in vbscript and knows that &HighScoreName is not a hex number.

In lex.c I see:

case '&':
        if(*++ctx->ptr == 'h' || *ctx->ptr == 'H')
            return parse_hex_literal(ctx, lval);
        return '&';

Is there a way we could advance to make sure it's really a hex value instead of
a variable?