Jacek Caban : vbscript: Support VT_EMPTY in stack_pop_bool.
Alexandre Julliard
julliard at winehq.org
Thu Oct 31 17:39:29 CDT 2019
Module: wine
Branch: master
Commit: 18117ccbab3232cf0d81219a37d52837e898ab7b
URL: https://source.winehq.org/git/wine.git/?a=commit;h=18117ccbab3232cf0d81219a37d52837e898ab7b
Author: Jacek Caban <jacek at codeweavers.com>
Date: Thu Oct 31 19:16:01 2019 +0100
vbscript: Support VT_EMPTY in stack_pop_bool.
Signed-off-by: Jacek Caban <jacek at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>
---
dlls/vbscript/interp.c | 1 +
dlls/vbscript/tests/lang.vbs | 8 ++++++++
2 files changed, 9 insertions(+)
diff --git a/dlls/vbscript/interp.c b/dlls/vbscript/interp.c
index 2b681a0677..ad6454aa57 100644
--- a/dlls/vbscript/interp.c
+++ b/dlls/vbscript/interp.c
@@ -374,6 +374,7 @@ static int stack_pop_bool(exec_ctx_t *ctx, BOOL *b)
*b = V_BOOL(val.v);
break;
case VT_NULL:
+ case VT_EMPTY:
*b = FALSE;
break;
case VT_I2:
diff --git a/dlls/vbscript/tests/lang.vbs b/dlls/vbscript/tests/lang.vbs
index f7cdc92ec4..0520038a02 100644
--- a/dlls/vbscript/tests/lang.vbs
+++ b/dlls/vbscript/tests/lang.vbs
@@ -329,6 +329,14 @@ end if
while false
wend
+if empty then
+ ok false, "if empty executed"
+end if
+
+while empty
+ ok false, "while empty executed"
+wend
+
x = 0
WHILE x < 3 : x = x + 1
Wend
More information about the wine-cvs
mailing list