system/wine
system/wine
1
0
Fork 0
mirror of git://source.winehq.org/git/wine.git synced 2024-07-21 18:15:52 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

oleaut32: res50 is number of impinfos. Fix its usage.

Browse source
This commit is contained in:
Jacek Caban 2006-05-13 18:06:45 +02:00 committed by Alexandre Julliard
parent 735c434376
commit e8f4fff3ea
2 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
dlls/oleaut32/typelib.h
View file

@ -79,7 +79,7 @@ typedef struct tagMSFT_Header {
INT res44; /* unknown always: 0x20 (guid hash size?) */
INT res48; /* unknown always: 0x80 (name hash size?) */
INT dispatchpos; /* HREFTYPE to IDispatch, or -1 if no IDispatch */
/*0x50*/INT res50; /* is zero becomes one when an interface is derived */
/*0x50*/INT nimpinfos; /* number of impinfos */
} MSFT_Header;
/* segments in the type lib file have a structure like this: */

5
dlls/oleaut32/typelib2.c
View file

@ -232,7 +232,7 @@ static void ctl2_init_header(
This->typelib_header.res44 = 0x20;
This->typelib_header.res48 = 0x80;
This->typelib_header.dispatchpos = -1;
This->typelib_header.res50 = 0;
This->typelib_header.nimpinfos = 0;
}
/****************************************************************************
@ -677,6 +677,8 @@ static int ctl2_alloc_importinfo(
}
}
impinfo->flags |= This->typelib_header.nimpinfos++;
offset = ctl2_alloc_segment(This, MSFT_SEG_IMPORTINFO, sizeof(MSFT_ImpInfo), 0);
if (offset == -1) return -1;
@ -1252,7 +1254,6 @@ static HRESULT WINAPI ICreateTypeInfo2_fnSetTypeFlags(ICreateTypeInfo2 *iface, U
ctl2_alloc_importinfo(This->typelib, &impinfo);
This->typelib->typelib_header.dispatchpos = 1;
This->typelib->typelib_header.res50 = 1;
This->typeinfo->typekind |= 0x10;
This->typeinfo->typekind &= ~0x0f;