[Bug 53767] vbscript fails to handle ReDim when variable is not yet created

[WineHQ Bugzilla]

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

--- Comment #6 from Jason Millard  ---
So that gets past the assert, however, another issue cropped up.

This is the actual code:

Const tnob = 5 ' total number of balls
ReDim rolling(tnob)
InitRolling

Sub InitRolling
    Dim i
    For i = 0 to tnob
        rolling(i) = False
    Next
End Sub

It fails on rolling(i) = False

This was the workaround code:

Const tnob = 5 ' total number of balls
Dim rolling()
ReDim rolling(tnob)
InitRolling

Sub InitRolling
    Dim i
    For i = 0 to tnob
        rolling(i) = False
    Next
End Sub