oleaut32: Store typeinfo hreftype while saving typelib.

This commit is contained in:
Piotr Caban 2013-07-28 10:05:39 +02:00 committed by Alexandre Julliard
parent f9e73f97a9
commit 00d132ee15
1 changed files with 6 additions and 2 deletions

View File

@ -9409,10 +9409,14 @@ static DWORD WMSFT_compile_typeinfo(ITypeInfoImpl *info, INT16 index, WMSFT_TLBF
else
base->posguid = -1;
base->flags = info->wTypeFlags;
if(info->Name)
if(info->Name) {
base->NameOffset = info->Name->offset;
else
((unsigned char*)file->name_seg.data)[info->Name->offset+9] = 0x38;
*(HREFTYPE*)((unsigned char*)file->name_seg.data+info->Name->offset) = info->hreftype;
}else {
base->NameOffset = -1;
}
base->version = (info->wMinorVerNum << 16) | info->wMajorVerNum;
if(info->DocString)
base->docstringoffs = info->DocString->offset;