vbscript: Implement ScriptTypeInfo_GetRefTypeOfImplType.
Signed-off-by: Gabriel Ivăncescu <gabrielopcode@gmail.com> Signed-off-by: Jacek Caban <jacek@codeweavers.com> Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
parent
c4819437da
commit
8ce9855256
|
@ -780,9 +780,14 @@ static HRESULT WINAPI ScriptTypeInfo_GetRefTypeOfImplType(ITypeInfo *iface, UINT
|
||||||
{
|
{
|
||||||
ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
|
ScriptTypeInfo *This = ScriptTypeInfo_from_ITypeInfo(iface);
|
||||||
|
|
||||||
FIXME("(%p)->(%u %p)\n", This, index, pRefType);
|
TRACE("(%p)->(%u %p)\n", This, index, pRefType);
|
||||||
|
|
||||||
return E_NOTIMPL;
|
/* We only inherit from IDispatch */
|
||||||
|
if (!pRefType) return E_INVALIDARG;
|
||||||
|
if (index != 0) return TYPE_E_ELEMENTNOTFOUND;
|
||||||
|
|
||||||
|
*pRefType = 1;
|
||||||
|
return S_OK;
|
||||||
}
|
}
|
||||||
|
|
||||||
static HRESULT WINAPI ScriptTypeInfo_GetImplTypeFlags(ITypeInfo *iface, UINT index, INT *pImplTypeFlags)
|
static HRESULT WINAPI ScriptTypeInfo_GetImplTypeFlags(ITypeInfo *iface, UINT index, INT *pImplTypeFlags)
|
||||||
|
|
Loading…
Reference in New Issue