[Bug 53676] New: vbscript can not exec_script - invalid number of arguments for Randomize

[WineHQ Bugzilla]

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

Bug ID: 53676
           Summary: vbscript can not exec_script - invalid number of
                    arguments for Randomize
           Product: Wine
           Version: 7.16
          Hardware: x86-64
                OS: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: vbscript
          Assignee: [e-mail]
          Reporter: [e-mail]
      Distribution: ---

While working on leveraging the vbscript engine of Wine for a macos port of
Visual Pinball, I've been testing several user made scripts.

I know Global_Randomize is not yet implemented (E_NOTIMPL), but I just came
across a script error with "invalid number of arguments":

Option Explicit
Randomize

On Error Resume Next

==

Randomize [number]

Randomize uses number to initialize the Rnd function's random-number generator,
giving it a new seed value. If you omit number, the value returned by the
system timer is used as the new seed value.

===

In global.c, I think the entry should be:

{L"Randomize",                 Global_Randomize, 0, 0, 1},

instead of

{L"Randomize",                 Global_Randomize, 0, 1},