[Bug 57883] New: vbscript:Script compilation error when for each with array

[WineHQ Bugzilla]

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

Bug ID: 57883
           Summary: vbscript:Script compilation error when for each with
                    array
           Product: Wine
           Version: unspecified
          Hardware: x86-64
                OS: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: vbscript
          Assignee: [e-mail]
          Reporter: [e-mail]
      Distribution: ---

Dim d: d = Array(1,2,3,4,5)
Dim i
For each i In d

Next

when running above script, compilation error.

[Bug 57883] vbscript:Script compilation error when for each with array

[WineHQ Bugzilla]

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

--- Comment #1 from Nikolay Sivov  ---
Which wine version are you using? This example works fine for me. I used this:

Dim d: d = Array(1,2,3,4,5)
Dim i, ret
For each i In d
    ret = ret + i
Next
WScript.Echo ret

[Bug 57883] vbscript:Script compilation error when for each with array

[WineHQ Bugzilla]

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

--- Comment #2 from Jiali Fang  ---
I used the latest wine version 10.2.

And we used the example code which you provide,
it still failed, and it shows "Variable uses an Automation type not supported
in VBScript" error info.

According to debugging,
there is a exception in IEnumVARIANT_Next of interp_enumnext().

[Bug 57883] vbscript:Script compilation error when for each with array

[WineHQ Bugzilla]

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

--- Comment #3 from Nikolay Sivov  ---
I don't know, it works fine for me. Could you attach a full log complete with a
crash backtrace when this happens? And also exact vbs file you're using.

[Bug 57883] vbscript:Script compilation error when for each with array

[WineHQ Bugzilla]

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

--- Comment #4 from Nikolay Sivov  ---
And the log should be with +vbscript,+seh.