https://bugs.documentfoundation.org/show_bug.cgi?id=158976

Rafael Lima <[email protected]> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
     Ever confirmed|0                           |1
             Status|UNCONFIRMED                 |NEW
                 CC|                            |[email protected]

--- Comment #3 from Rafael Lima <[email protected]> ---
I can reproduce the error. Running the following script returns zero.

Sub TestSuffle
  GlobalScope.BasicLibraries.LoadLibrary("ScriptForge")
  Dim cont4 As Integer
  ' Try 1000 times
  For i = 1 To 1000
    arr = SF_Array.Shuffle(Array(1, 2, 3, 4))
    If arr(3) = 4 Then
      cont4 = cont4 + 1
    End If
  Next i
  MsgBox cont4
End Sub

The script above should return some number around 250.

@JPL can you please take a look?

-- 
You are receiving this mail because:
You are the assignee for the bug.

Reply via email to