Piotr Caban : vbscript/tests: Add more function call tests with array arguments.
Alexandre Julliard
julliard at winehq.org
Wed Oct 11 14:22:46 CDT 2017
Module: wine
Branch: master
Commit: 8f0d12e2619e240088b92a05b274eeea5483edf6
URL: http://source.winehq.org/git/wine.git/?a=commit;h=8f0d12e2619e240088b92a05b274eeea5483edf6
Author: Piotr Caban <piotr at codeweavers.com>
Date: Tue Oct 10 17:08:30 2017 +0200
vbscript/tests: Add more function call tests with array arguments.
Signed-off-by: Piotr Caban <piotr at codeweavers.com>
Signed-off-by: Jacek Caban <jacek at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>
---
dlls/vbscript/tests/lang.vbs | 14 ++++++++++++++
1 file changed, 14 insertions(+)
diff --git a/dlls/vbscript/tests/lang.vbs b/dlls/vbscript/tests/lang.vbs
index 7f7c835..a90dfc8 100644
--- a/dlls/vbscript/tests/lang.vbs
+++ b/dlls/vbscript/tests/lang.vbs
@@ -1250,6 +1250,20 @@ Call testarrarg(1, "VT_I2*")
Call testarrarg(false, "VT_BOOL*")
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...
class RegExp
public property get Global()
More information about the wine-cvs
mailing list