[PATCH] vbscript: Implement StrComp()

[Dmitry Timoshkov]

Nikolay Sivov <nsivov at codeweavers.com> wrote:

> +    TRACE("(%s %s ...)\n", debugstr_variant(args), debugstr_variant(args+1));
> +
> +    assert(args_cnt == 2 || args_cnt == 3);
> +
> +    if(V_VT(args) != VT_BSTR || V_VT(args+1) != VT_BSTR) {
> +        FIXME("args[0] = %s, args[1] = %s\n", debugstr_variant(args), debugstr_variant(args+1));
> +        return E_NOTIMPL;
> +    }
> +
> +    if (args_cnt == 3) {
> +        hres = to_int(args+2, &mode);
> +        if(FAILED(hres))
> +            return hres;
> +
> +        if (mode != 0 && mode != 1) {
> +            FIXME("unknown compare mode = %d\n", mode);
> +            return E_FAIL;
> +        }
> +    }
> +    else
> +        mode = 0;
> +
> +    left = V_BSTR(args);
> +    right = V_BSTR(args+1);

Is it possible to consistently use single way of accessing the args array,
for instance the indexed args[i] form?

-- 
Dmitry.