marko10_000
/
wine-wine
forked from Mirrors/wine-wine
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vbscript: Added parameterized member assignment statement implementation.

oldstable
Jacek Caban 2012-03-26 11:54:54 +02:00 committed by Alexandre Julliard
parent 1bc8db6005
commit d0be36213a
2 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
dlls/vbscript/interp.c
View File

@ -682,11 +682,6 @@ static HRESULT interp_assign_member(exec_ctx_t *ctx)
TRACE("%s\n", debugstr_w(identifier));
if(arg_cnt) {
FIXME("arguments not supported\n");
return E_NOTIMPL;
}
hres = stack_assume_disp(ctx, arg_cnt+1, &obj);
if(FAILED(hres))
return hres;
@ -708,7 +703,7 @@ static HRESULT interp_assign_member(exec_ctx_t *ctx)
if(FAILED(hres))
return hres;
stack_popn(ctx, 2);
stack_popn(ctx, arg_cnt+2);
return S_OK;
}

6
dlls/vbscript/tests/run.c
View File

@ -1288,6 +1288,12 @@ static void run_tests(void)
CHECK_CALLED(global_propargput_d);
CHECK_CALLED(global_propargput_i);
SET_EXPECT(global_propargput_d);
SET_EXPECT(global_propargput_i);
parse_script_a("test.propargput(counter(), counter()) = counter()");
CHECK_CALLED(global_propargput_d);
CHECK_CALLED(global_propargput_i);
parse_script_a("x = 1\n Call ok(x = 1, \"x = \" & x)");
parse_script_a("x = _ \n3");