ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vbscript: Added isObject implementation.

This commit is contained in:
Jacek Caban 2011-09-19 14:08:48 +02:00 committed by Alexandre Julliard
parent 4e9d29907c
commit 8bcd9876d3
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
dlls/vbscript/global.c
View File

@ -25,8 +25,16 @@ WINE_DEFAULT_DEBUG_CHANNEL(vbscript);
static HRESULT Global_IsObject(vbdisp_t *This, VARIANT *arg, unsigned args_cnt, VARIANT *res) static HRESULT Global_IsObject(vbdisp_t *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
{ {
FIXME("\n"); TRACE("(%s)\n", debugstr_variant(arg));
return E_NOTIMPL;
if(V_VT(arg) == (VT_VARIANT|VT_BYREF))
arg = V_VARIANTREF(arg);
if(res) {
V_VT(res) = VT_BOOL;
V_BOOL(res) = V_VT(arg) == VT_DISPATCH ? VARIANT_TRUE : VARIANT_FALSE;
}
return S_OK;
} }
static const builtin_prop_t global_props[] = { static const builtin_prop_t global_props[] = {