ole2disp: Add a stub for VariantChangeTypeEx.

dlls/ole2disp.dll16/ole2disp.c

@@ -260,6 +260,15 @@ HRESULT WINAPI RegisterActiveObject16(
 }
 
 /******************************************************************************
+ * VariantChangeTypeEx [OLE2DISP.108]
+ */
+HRESULT WINAPI VariantChangeTypeEx16(VARIANTARG *dest, const VARIANTARG *src, LCID lcid, USHORT flags, VARTYPE vt)
+{
+        FIXME("stub: %p %p %d %d %d\n", dest, src, lcid, flags, vt);
+        return E_INVALIDARG;
+}
+
+/******************************************************************************
  * SetErrorInfo [OLE2DISP.110]
  */
 HRESULT WINAPI SetErrorInfo16(ULONG dwReserved, IErrorInfo *perrinfo)

dlls/ole2disp.dll16/ole2disp.dll16.spec

@@ -9,7 +9,7 @@
 9 stub VARIANTCLEAR
 10 stub VARIANTCOPY
 11 stub VARIANTCOPYIND
-12 pascal VARIANTCHANGETYPE(ptr ptr long long) VariantChangeType16
+12 pascal VariantChangeType(ptr ptr word word) VariantChangeType16
 13 stub VARIANTTIMETODOSDATETIME
 14 stub DOSDATETIMETOVARIANTTIME
 15 stub SAFEARRAYCREATE
@@ -105,7 +105,7 @@
 105 stub VARBOOLFROMSTR
 106 stub VARBOOLFROMDISP
 107 stub DOINVOKEMETHOD
-108 stub VARIANTCHANGETYPEEX
+108 pascal VariantChangeTypeEx(ptr ptr long word word) VariantChangeTypeEx16
 109 stub SAFEARRAYPTROFINDEX
 110 pascal SetErrorInfo(long ptr) SetErrorInfo16
 111 stub GETERRORINFO