oleaut32: Fix SLTG parser so that dual interfaces are returned as IDispatch first.

This commit is contained in:
Sunil Mohan Adapa 2009-11-10 10:10:54 +05:30 committed by Alexandre Julliard
parent 05b2426031
commit 926b884cd6
1 changed files with 3 additions and 0 deletions

View File

@ -3938,6 +3938,9 @@ static ITypeLib2* ITypeLib2_Constructor_SLTG(LPVOID pLib, DWORD dwTLBLength)
(*ppTypeInfoImpl)->TypeAttr.wTypeFlags =
(pTIHeader->typeflags1 >> 3) | (pTIHeader->typeflags2 << 5);
if((*ppTypeInfoImpl)->TypeAttr.wTypeFlags & TYPEFLAG_FDUAL)
(*ppTypeInfoImpl)->TypeAttr.typekind = TKIND_DISPATCH;
if((pTIHeader->typeflags1 & 7) != 2)
FIXME_(typelib)("typeflags1 = %02x\n", pTIHeader->typeflags1);
if(pTIHeader->typeflags3 != 2)