shell32: Avoid a crash in testsuite.

This happens on wow32 builds, we try to call a 64bit program via the
generic typelib marshalling and disp is NULL. We still fail, just
do not pop up the crash dialog.

Signed-off-by: Marcus Meissner <meissner@suse.de>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Marcus Meissner 2017-11-13 13:31:31 +01:00 committed by Alexandre Julliard
parent c5a39bd98f
commit 5350eea78d
1 changed files with 4 additions and 0 deletions

View File

@ -1088,6 +1088,9 @@ todo_wine {
IUnknown *unk;
ok(disp != NULL, "got %p\n", disp);
if (disp == NULL) goto skip_disp_tests;
ok(ret != HandleToUlong(hwnd), "got %d\n", ret);
/* IDispatch-related tests */
@ -1165,6 +1168,7 @@ if (hr == S_OK) {
IServiceProvider_Release(sp);
IDispatch_Release(disp);
}
skip_disp_tests:
disp = (void*)0xdeadbeef;
ret = 0xdead;