vbscript: Use correct integral type.

Signed-off-by: Eric Pouech <eric.pouech@gmail.com>
Signed-off-by: Jacek Caban <jacek@codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Eric Pouech 2022-02-02 12:03:15 +01:00 committed by Alexandre Julliard
parent 98c0f3dac4
commit 32deecbca1
2 changed files with 2 additions and 2 deletions

View File

@ -563,7 +563,7 @@ static HRESULT array_access(exec_ctx_t *ctx, SAFEARRAY *array, DISPPARAMS *dp, V
}
for(i=0; i<argc; i++) {
hres = to_int(get_arg(dp, i), indices+i);
hres = to_int(get_arg(dp, i), (int *)(indices+i));
if(FAILED(hres)) {
heap_free(indices);
SafeArrayUnlock(array);

View File

@ -1683,7 +1683,7 @@ HRESULT disp_propput(script_ctx_t *ctx, IDispatch *disp, DISPID id, WORD flags,
hres = IDispatchEx_InvokeEx(dispex, id, ctx->lcid, flags, dp, NULL, &ei, NULL /* FIXME! */);
IDispatchEx_Release(dispex);
}else {
ULONG err = 0;
UINT err = 0;
TRACE("using IDispatch\n");
hres = IDispatch_Invoke(disp, id, &IID_NULL, ctx->lcid, flags, dp, NULL, &ei, &err);