vbscript/tests: Add more function call tests with array arguments.
Signed-off-by: Piotr Caban <piotr@codeweavers.com> Signed-off-by: Jacek Caban <jacek@codeweavers.com> Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
parent
2c6c5e0d05
commit
8f0d12e261
|
@ -1250,6 +1250,20 @@ Call testarrarg(1, "VT_I2*")
|
||||||
Call testarrarg(false, "VT_BOOL*")
|
Call testarrarg(false, "VT_BOOL*")
|
||||||
Call testarrarg(Empty, "VT_EMPTY*")
|
Call testarrarg(Empty, "VT_EMPTY*")
|
||||||
|
|
||||||
|
Sub modifyarr(arr)
|
||||||
|
'Following test crashes on wine
|
||||||
|
'Call ok(arr(0) = "not modified", "arr(0) = " & arr(0))
|
||||||
|
arr(0) = "modified"
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
arr(0) = "not modified"
|
||||||
|
Call modifyarr(arr)
|
||||||
|
Call ok(arr(0) = "modified", "arr(0) = " & arr(0))
|
||||||
|
|
||||||
|
arr(0) = "not modified"
|
||||||
|
modifyarr(arr)
|
||||||
|
Call todo_wine_ok(arr(0) = "not modified", "arr(0) = " & arr(0))
|
||||||
|
|
||||||
' It's allowed to declare non-builtin RegExp class...
|
' It's allowed to declare non-builtin RegExp class...
|
||||||
class RegExp
|
class RegExp
|
||||||
public property get Global()
|
public property get Global()
|
||||||
|
|
Loading…
Reference in New Issue