[PATCH v2 1/2] vbscript/tests: Test 'Get' keyword used as id

[Brendan McGrath]

Wine-Bug: https://bugs.winehq.org/show_bug.cgi?id=46318 
Signed-off-by: Brendan McGrath 
---
 dlls/vbscript/tests/run.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/dlls/vbscript/tests/run.c b/dlls/vbscript/tests/run.c
index 191f5a79a0..bc3e0742df 100644
--- a/dlls/vbscript/tests/run.c
+++ b/dlls/vbscript/tests/run.c
@@ -2406,6 +2406,10 @@ static void run_tests(void)
     CHECK_CALLED(global_success_d);
     CHECK_CALLED(global_success_i);

+    hres = parse_script_ar("Set oLocator = CreateObject("Wbemscripting.SWbemLocator")\r"
+                           "Set oReg = oLocator.ConnectServer("", "root\default", "", "").Get("StdRegProv")");
+    todo_wine ok(hres == S_OK, "parse_script failed: %08x\n", hres);
+
     run_from_res("lang.vbs");
     run_from_res("api.vbs");
     run_from_res("regexp.vbs");