jscript: Added '<<' expression implementation.
This commit is contained in:
parent
dfb867af56
commit
ef78010df4
|
@ -2747,10 +2747,34 @@ HRESULT logical_negation_expression_eval(exec_ctx_t *ctx, expression_t *_expr, D
|
|||
return return_bool(ret, !b);
|
||||
}
|
||||
|
||||
/* ECMA-262 3rd Edition 11.7.1 */
|
||||
static HRESULT lshift_eval(exec_ctx_t *ctx, VARIANT *lval, VARIANT *rval, jsexcept_t *ei, VARIANT *retv)
|
||||
{
|
||||
DWORD ri;
|
||||
INT li;
|
||||
HRESULT hres;
|
||||
|
||||
hres = to_int32(ctx->parser->script, lval, ei, &li);
|
||||
if(FAILED(hres))
|
||||
return hres;
|
||||
|
||||
hres = to_uint32(ctx->parser->script, rval, ei, &ri);
|
||||
if(FAILED(hres))
|
||||
return hres;
|
||||
|
||||
V_VT(retv) = VT_I4;
|
||||
V_I4(retv) = li << (ri&0x1f);
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
/* ECMA-262 3rd Edition 11.7.1 */
|
||||
HRESULT left_shift_expression_eval(exec_ctx_t *ctx, expression_t *_expr, DWORD flags, jsexcept_t *ei, exprval_t *ret)
|
||||
{
|
||||
FIXME("\n");
|
||||
return E_NOTIMPL;
|
||||
binary_expression_t *expr = (binary_expression_t*)_expr;
|
||||
|
||||
TRACE("\n");
|
||||
|
||||
return binary_expr_eval(ctx, expr, lshift_eval, ei, ret);
|
||||
}
|
||||
|
||||
HRESULT right_shift_expression_eval(exec_ctx_t *ctx, expression_t *_expr, DWORD flags, jsexcept_t *ei, exprval_t *ret)
|
||||
|
|
|
@ -142,6 +142,7 @@ HRESULT to_boolean(VARIANT*,VARIANT_BOOL*);
|
|||
HRESULT to_number(script_ctx_t*,VARIANT*,jsexcept_t*,VARIANT*);
|
||||
HRESULT to_integer(script_ctx_t*,VARIANT*,jsexcept_t*,VARIANT*);
|
||||
HRESULT to_int32(script_ctx_t*,VARIANT*,jsexcept_t*,INT*);
|
||||
HRESULT to_uint32(script_ctx_t*,VARIANT*,jsexcept_t*,DWORD*);
|
||||
HRESULT to_string(script_ctx_t*,VARIANT*,jsexcept_t*,BSTR*);
|
||||
HRESULT to_object(exec_ctx_t*,VARIANT*,IDispatch**);
|
||||
|
||||
|
|
|
@ -273,6 +273,20 @@ HRESULT to_int32(script_ctx_t *ctx, VARIANT *v, jsexcept_t *ei, INT *ret)
|
|||
return S_OK;
|
||||
}
|
||||
|
||||
/* ECMA-262 3rd Edition 9.6 */
|
||||
HRESULT to_uint32(script_ctx_t *ctx, VARIANT *v, jsexcept_t *ei, DWORD *ret)
|
||||
{
|
||||
VARIANT num;
|
||||
HRESULT hres;
|
||||
|
||||
hres = to_number(ctx, v, ei, &num);
|
||||
if(FAILED(hres))
|
||||
return hres;
|
||||
|
||||
*ret = V_VT(&num) == VT_I4 ? V_I4(&num) : (DWORD)V_R8(&num);
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
static BSTR int_to_bstr(INT i)
|
||||
{
|
||||
WCHAR buf[12], *p;
|
||||
|
|
|
@ -289,6 +289,12 @@ tmp = (-3.5) & 0xffffffff;
|
|||
ok(tmp === -3, "-3.5 & 0xffff !== -3");
|
||||
ok(getVT(tmp) === "VT_I4", "getVT(3.5&0xffff) = " + getVT(tmp));
|
||||
|
||||
tmp = 2 << 3;
|
||||
ok(tmp === 16, "2 << 3 = " + tmp);
|
||||
|
||||
tmp = 2 << 35;
|
||||
ok(tmp === 16, "2 << 35 = " + tmp);
|
||||
|
||||
tmp = 10;
|
||||
ok((tmp &= 8) === 8, "tmp(10) &= 8 !== 8");
|
||||
ok(getVT(tmp) === "VT_I4", "getVT(tmp &= 8) = " + getVT(tmp));
|
||||
|
|
Loading…
Reference in New Issue