Andrew Eikum : oleaut32: When loading typelibs, skip over function default parameters as well.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 09d787d2d552baa184f72ed86a02ba98081e66b7
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=09d787d2d552baa184f72ed86a...

Author: Andrew Eikum <aeikum(a)codeweavers.com>
Date:   Tue Jun  4 08:18:55 2013 -0500

oleaut32: When loading typelibs, skip over function default parameters as well.

---

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

diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
index 295cac3..725bf2f 100644
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -2310,6 +2310,8 @@ MSFT_DoFuncs(TLBContext*     pcx,
 
         /* size without argument data */
         optional = reclength - pFuncRec->nrargs*sizeof(MSFT_ParameterInfo);
+        if (pFuncRec->FKCCIC & 0x1000)
+            optional -= pFuncRec->nrargs * sizeof(INT);
 
         if (optional > FIELD_OFFSET(MSFT_FuncRecord, HelpContext))
             ptfd->helpcontext = pFuncRec->HelpContext;