[v2 PATCH] mshtml/tests: Skip some tests if native XMLHTTP support is missing or disabled
Nikolay Sivov
nsivov at codeweavers.com
Mon Jan 8 08:00:06 CST 2018
Signed-off-by: Nikolay Sivov <nsivov at codeweavers.com>
---
v2: with improvements Jacek suggested
dlls/mshtml/tests/dom.c | 7 ++++++-
dlls/mshtml/tests/jstest.html | 13 ++++++++-----
2 files changed, 14 insertions(+), 6 deletions(-)
diff --git a/dlls/mshtml/tests/dom.c b/dlls/mshtml/tests/dom.c
index b00346759f..2a4ae625bb 100644
--- a/dlls/mshtml/tests/dom.c
+++ b/dlls/mshtml/tests/dom.c
@@ -6683,7 +6683,12 @@ static void test_xmlhttprequest(IHTMLWindow5 *window)
hres = IHTMLWindow5_get_XMLHttpRequest(window, &var);
ok(hres == S_OK, "get_XMLHttpRequest failed: %08x\n", hres);
- ok(V_VT(&var) == VT_DISPATCH, "expect VT_DISPATCH, got %s\n", debugstr_variant(&var));
+ ok(V_VT(&var) == VT_DISPATCH || broken(V_VT(&var) == VT_EMPTY), "expect VT_DISPATCH, got %s\n", debugstr_variant(&var));
+
+ if (V_VT(&var) == VT_EMPTY) {
+ win_skip("Native XMLHTTP support is missing or disabled.\n");
+ return;
+ }
factory = NULL;
hres = IDispatch_QueryInterface(V_DISPATCH(&var), &IID_IHTMLXMLHttpRequestFactory, (void**)&factory);
diff --git a/dlls/mshtml/tests/jstest.html b/dlls/mshtml/tests/jstest.html
index cce805032c..164593ee0d 100644
--- a/dlls/mshtml/tests/jstest.html
+++ b/dlls/mshtml/tests/jstest.html
@@ -1,10 +1,9 @@
<html>
<head>
+<script src="winetest.js" type="text/javascript"></script>
+</head>
+<head>
<script>
-function ok(b,m) {
- return external.ok(b, m);
-}
-
function broken(expr) {
return external.broken(expr);
}
@@ -356,7 +355,11 @@ function test_text_node() {
function test_xhr() {
ok("XMLHttpRequest" in window, "XMLHttpRequest not found in window object\n");
- ok(typeof(XMLHttpRequest) === "object", "typeof(XMLHttpRequest) = " + typeof(XMLHttpRequest));
+
+ if (typeof(XMLHttpRequest) != "object") {
+ win_skip("XMLHTTPRequest is not available or disabled");
+ return;
+ }
var xhr = new XMLHttpRequest();
ok(typeof(xhr) === "object", "typeof(xhr) = " + typeof(xhr));
--
2.15.1
More information about the wine-devel
mailing list