ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

oleaut32/tests: Skip some tests on win9x.

This commit is contained in:
Paul Vriens 2008-08-27 21:23:21 +02:00 committed by Alexandre Julliard
parent af8d268a39
commit 1cfb958a2e
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
dlls/oleaut32/tests/typelib.c
View File

@ -585,6 +585,7 @@ static BOOL do_typelib_reg_key(GUID *uid, WORD maj, WORD min, LPCWSTR base, BOOL
WCHAR buf[128]; WCHAR buf[128];
HKEY hkey; HKEY hkey;
BOOL ret = TRUE; BOOL ret = TRUE;
DWORD res;
memcpy(buf, typelibW, sizeof(typelibW)); memcpy(buf, typelibW, sizeof(typelibW));
StringFromGUID2(uid, buf + lstrlenW(buf), 40); StringFromGUID2(uid, buf + lstrlenW(buf), 40);
@ -597,8 +598,16 @@ static BOOL do_typelib_reg_key(GUID *uid, WORD maj, WORD min, LPCWSTR base, BOOL
wsprintfW(buf + lstrlenW(buf), formatW, maj, min ); wsprintfW(buf + lstrlenW(buf), formatW, maj, min );
if (RegCreateKeyExW(HKEY_CLASSES_ROOT, buf, 0, NULL, 0, SetLastError(0xdeadbeef);
KEY_WRITE, NULL, &hkey, NULL) != ERROR_SUCCESS) res = RegCreateKeyExW(HKEY_CLASSES_ROOT, buf, 0, NULL, 0,
KEY_WRITE, NULL, &hkey, NULL);
if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
{
win_skip("W-calls are not implemented\n");
return FALSE;
}
if (res != ERROR_SUCCESS)
{ {
trace("RegCreateKeyExW failed\n"); trace("RegCreateKeyExW failed\n");
return FALSE; return FALSE;