JSONArray wrong behavior

[poshu]

Code: Select all

Global Dim Test(5,5)

Test(2,3) = #True
Test(4,3) = #True
Test(2,5) = #True

CreateJSON(0)
InsertJSONArray(JSONValue(0),Test())

Debug Test(2,3)
Debug Test(4,3)
Debug Test(2,5)

Test(2,3) = #False
Test(4,3) = #False
Test(2,5) = #False

ExtractJSONArray(JSONValue(0),Test())

Debug Test(2,3)
Debug Test(4,3)
Debug Test(2,5)