[PATCH v15 2/3] vbscript: trying test the compile error

[Francis De Brabandere]

From: Francis De Brabandere

---
 dlls/vbscript/tests/run.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/dlls/vbscript/tests/run.c b/dlls/vbscript/tests/run.c
index 8aaafbedf54..3d2ad2a6e7b 100644
--- a/dlls/vbscript/tests/run.c
+++ b/dlls/vbscript/tests/run.c
@@ -2765,6 +2765,18 @@ static void test_parse_errors(void)
             "    throwInt &h87001234&\n"
             "end if\n",
             2, 1
+        },
+        {
+			/* redim of sub on windows fails with
+               compilation error: Name redefined
+			   TODO how can we validate that this code throws a "compilation error: Name redefined"?
+			   TODO this code fails even without the compile.c redim collision check???
+				 but somehow the commented part in lang.vbs would not fail???
+			*/
+            "sub redimSub\n"
+            "end sub\n"
+            L"redim redimSub(3)\n",
+             2, 0
         }
     };
     HRESULT hres;