Robert Shearman : oleaut: Process references for SLTG dispatch types.

[Alexandre Julliard]

Module: wine
Branch: refs/heads/master
Commit: 92b468e810f4350572c5bafe92b6f397661e1b41
URL:    http://source.winehq.org/git/?p=wine.git;a=commit;h=92b468e810f4350572c5bafe...

Author: Robert Shearman 
Date:   Mon Jul  3 13:54:16 2006 +0100

oleaut: Process references for SLTG dispatch types.

---

dlls/oleaut32/typelib.c |    6 +++++-
 1 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
index aff6c24..35dd770 100644
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -3057,10 +3057,14 @@ static void SLTG_ProcessDispatch(char *p
    			 char *pNameTable, SLTG_TypeInfoHeader *pTIHeader,
    			 SLTG_TypeInfoTail *pTITail)
 {
+  if (pTIHeader->href_table != 0xffffffff)
+      SLTG_DoRefs((SLTG_RefInfo*)((char *)pTIHeader + pTIHeader->href_table), pTI,
+                                  pNameTable);
+
   if (pTITail->vars_off != 0xffff)
     SLTG_DoVars(pBlk + pTITail->vars_off, pTI, pTITail->cVars, pNameTable);

-  FIXME_(typelib)("process refs and funcs\n");
+  FIXME_(typelib)("process funcs\n");
 }

static void SLTG_ProcessEnum(char *pBlk, ITypeInfoImpl *pTI,