Piotr Caban : oleaut32: Store typeinfo hreftype while saving typelib.
Alexandre Julliard
julliard at winehq.org
Mon Jul 29 14:01:18 CDT 2013
Module: wine
Branch: master
Commit: 00d132ee155f84e344193ce6f7e4401f2f041fc3
URL: http://source.winehq.org/git/wine.git/?a=commit;h=00d132ee155f84e344193ce6f7e4401f2f041fc3
Author: Piotr Caban <piotr at codeweavers.com>
Date: Sun Jul 28 10:05:39 2013 +0200
oleaut32: Store typeinfo hreftype while saving typelib.
---
dlls/oleaut32/typelib.c | 8 ++++++--
1 files changed, 6 insertions(+), 2 deletions(-)
diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
index f566196..1041e1b 100644
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -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;
More information about the wine-cvs
mailing list