jscript: Added '>=' expression implementation.

dlls/jscript/engine.c

@@ -1729,10 +1729,27 @@ HRESULT greater_expression_eval(exec_ctx_t *ctx, expression_t *_expr, DWORD flag
     return return_bool(ret, b);
 }
 
-HRESULT greatereq_expression_eval(exec_ctx_t *ctx, expression_t *expr, DWORD flags, jsexcept_t *ei, exprval_t *ret)
+/* ECMA-262 3rd Edition    11.8.4 */
+HRESULT greatereq_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;
+    VARIANT rval, lval;
+    BOOL b;
+    HRESULT hres;
+
+    TRACE("\n");
+
+    hres = get_binary_expr_values(ctx, expr, ei, &lval, &rval);
+    if(FAILED(hres))
+        return hres;
+
+    hres = less_eval(ctx, &lval, &rval, ei, &b);
+    VariantClear(&lval);
+    VariantClear(&rval);
+    if(FAILED(hres))
+        return hres;
+
+    return return_bool(ret, !b);
 }
 
 HRESULT binary_negation_expression_eval(exec_ctx_t *ctx, expression_t *expr, DWORD flags, jsexcept_t *ei, exprval_t *ret)

dlls/jscript/tests/lang.js

@@ -216,4 +216,11 @@ ok("abce" > "abcd", "abce > abce failed");
 ok("x" > "", "\"x\" > \"\" failed");
 ok(!(0 > 0), "0 > 0");
 
+ok(3.4 >= 1, "3.4 >= 1 failed");
+ok(!(1 >= 3.4), "1 >= 3.4");
+ok("abcd" >= "abc", "abc >= abcd failed");
+ok("abce" >= "abcd", "abce >= abce failed");
+ok("x" >= "", "\"x\" >= \"\" failed");
+ok(0 >= 0, "0 >= 0");
+
 reportSuccess();