Alistair Leslie-Hughes : shdocvw: Add test to show IServiceProvider is supported.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 0a9a1bc99c4d9e5a88c63812e23a99a3cb0482d6
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=0a9a1bc99c4d9e5a88c63812e23a99a3cb0482d6

Author: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
Date:   Fri Jan 23 20:50:36 2009 +1100

shdocvw: Add test to show IServiceProvider is supported.

---

 dlls/shdocvw/tests/webbrowser.c |   14 ++++++++++++++
 1 files changed, 14 insertions(+), 0 deletions(-)

diff --git a/dlls/shdocvw/tests/webbrowser.c b/dlls/shdocvw/tests/webbrowser.c
index dc8b6b2..6002292 100644
--- a/dlls/shdocvw/tests/webbrowser.c
+++ b/dlls/shdocvw/tests/webbrowser.c
@@ -1990,6 +1990,19 @@ static void test_Navigate2(IUnknown *unk)
     IWebBrowser2_Release(webbrowser);
 }
 
+static void test_IServiceProvider(IUnknown *unk)
+{
+    IServiceProvider *servprov = (void*)0xdeadbeef;
+    HRESULT hres;
+
+    hres = IUnknown_QueryInterface(unk, &IID_IServiceProvider, (void**)&servprov);
+    todo_wine ok(hres == S_OK, "QueryInterface returned %08x, expected S_OK\n", hres);
+    if(FAILED(hres))
+        return;
+
+    IServiceProvider_Release(servprov);
+}
+
 static void test_QueryInterface(IUnknown *unk)
 {
     IQuickActivate *qa = (IQuickActivate*)0xdeadbeef;
@@ -2060,6 +2073,7 @@ static void test_WebBrowser(void)
     test_GetControlInfo(unk);
     test_wb_funcs(unk, FALSE);
     test_ConnectionPoint(unk, FALSE);
+    test_IServiceProvider(unk);
 
     IWebBrowser2_Release(wb);
     ref = IUnknown_Release(unk);