X-Git-Url: https://git.reactos.org/?p=reactos.git;a=blobdiff_plain;f=rostests%2Fwinetests%2Fvbscript%2Ferror.vbs;h=3bf03dfae41a2d1c6d6fb6571bb07dc84bb8f1b6;hp=830344c7fde406cedcb8ab161de8e69ef9064328;hb=f2599b4baafae7413dde6dc05e9a807c446a4447;hpb=1a597e49f133d18693c39a20b3d3ed6152768748

diff --git a/rostests/winetests/vbscript/error.vbs b/rostests/winetests/vbscript/error.vbs
index 830344c7fde..3bf03dfae41 100644
--- a/rostests/winetests/vbscript/error.vbs
+++ b/rostests/winetests/vbscript/error.vbs
@@ -75,6 +75,7 @@ const RPC_S_SERVER_UNAVAILABLE = &h800706BA&
 const CO_E_SERVER_EXEC_FAILURE = &h80080005&
 
 call ok(Err.Number = 0, "Err.Number = " & Err.Number)
+call ok(getVT(Err.Number) = "VT_I4", "getVT(Err.Number) = " & getVT(Err.Number))
 
 dim calledFunc