Piotr Caban : oleaut32: Store indices in list.
Alexandre Julliard
julliard at winehq.org
Thu Feb 18 12:49:23 CST 2010
Module: wine
Branch: master
Commit: 8354e376282590f602abb9cdfe41acc715e02e49
URL: http://source.winehq.org/git/wine.git/?a=commit;h=8354e376282590f602abb9cdfe41acc715e02e49
Author: Piotr Caban <piotr at codeweavers.com>
Date: Thu Feb 18 03:20:57 2010 +0100
oleaut32: Store indices in list.
---
dlls/oleaut32/typelib2.c | 11 +++++++----
1 files changed, 7 insertions(+), 4 deletions(-)
diff --git a/dlls/oleaut32/typelib2.c b/dlls/oleaut32/typelib2.c
index eb30724..21e9c73 100644
--- a/dlls/oleaut32/typelib2.c
+++ b/dlls/oleaut32/typelib2.c
@@ -119,6 +119,8 @@ WINE_DEFAULT_DEBUG_CHANNEL(typelib2);
/* Used for storing cyclic list. Tail address is kept */
typedef struct tagCyclicList {
struct tagCyclicList *next;
+ int indice;
+
union {
int val;
int *data;
@@ -192,7 +194,6 @@ typedef struct tagICreateTypeInfo2Impl
struct tagCyclicList *typedata; /* tail of cyclic list */
- int indices[42];
int names[42];
int datawidth;
@@ -1445,7 +1446,7 @@ static HRESULT WINAPI ICreateTypeInfo2_fnAddFuncDesc(
}
/* update the index data */
- This->indices[index] = ((0x6000 | This->typeinfo->cImplTypes) << 16) | index;
+ insert->indice = ((0x6000 | This->typeinfo->cImplTypes) << 16) | index;
This->names[index] = -1;
/* ??? */
@@ -1686,7 +1687,7 @@ static HRESULT WINAPI ICreateTypeInfo2_fnAddVarDesc(
typedata[3] = (sizeof(VARDESC) << 16) | 0;
/* update the index data */
- This->indices[index] = 0x40000000 + index;
+ insert->indice = 0x40000000 + index;
This->names[index] = -1;
/* figure out type widths and whatnot */
@@ -3358,7 +3359,9 @@ static void ctl2_write_typeinfos(ICreateTypeLib2Impl *This, HANDLE hFile)
for(iter=iter->next; iter!=typeinfo->typedata->next; iter=iter->next)
ctl2_write_chunk(hFile, iter->u.data, iter->u.data[0] & 0xffff);
- ctl2_write_chunk(hFile, typeinfo->indices, ((typeinfo->typeinfo->cElement & 0xffff) + (typeinfo->typeinfo->cElement >> 16)) * 4);
+ for(iter=typeinfo->typedata->next->next; iter!=typeinfo->typedata->next; iter=iter->next)
+ ctl2_write_chunk(hFile, &iter->indice, sizeof(int));
+
ctl2_write_chunk(hFile, typeinfo->names, ((typeinfo->typeinfo->cElement & 0xffff) + (typeinfo->typeinfo->cElement >> 16)) * 4);
for(iter=typeinfo->typedata->next->next; iter!=typeinfo->typedata->next; iter=iter->next) {
More information about the wine-cvs
mailing list