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

oleaut32: Add test for HREFTYPE's from inherited methods.

This commit is contained in:
Vincent Povirk 2009-09-16 11:23:47 -05:00 committed by Alexandre Julliard
parent 8b8af9c878
commit 004ad9af10
2 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dlls/oleaut32/tests/tmarshal.idl
View File

@ -285,7 +285,7 @@ library TestTypelib
]
interface ItestIF7 : ItestIF6
{
[id(0x1236)] HRESULT fn6([in] int a);
[id(0x1236)] HRESULT fn6([in] GUID a);
}
[

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

@ -915,6 +915,16 @@ if(use_midl_tlb) {
ok(hr == S_OK, "hr %08x\n", hr);
ok(pFD->memid == 0x1236, "memid %08x\n", pFD->memid);
ok(pFD->oVft == 9 * sizeof(void *), "oVft %d\n", pFD->oVft);
/* first argument to 10th function is an HREFTYPE from the impl type */
ok(pFD->cParams == 1, "cParams %i\n", pFD->cParams);
ok(pFD->lprgelemdescParam[0].tdesc.vt == VT_USERDEFINED,
"vt 0x%x\n", pFD->lprgelemdescParam[0].tdesc.vt);
href = U(pFD->lprgelemdescParam[0].tdesc).hreftype;
ok((href & 0xff000000) == 0x04000000, "href 0x%08x\n", href);
hr = ITypeInfo_GetRefTypeInfo(pTI, href, &pTI_p);
todo_wine ok(SUCCEEDED(hr), "hr %08x\n", hr);
if (SUCCEEDED(hr)) ITypeInfo_Release(pTI_p);
ITypeInfo_ReleaseFuncDesc(pTI, pFD);
}
ITypeInfo_Release(pTI);