[PATCH] vbscript: Implemented Asc(try 3)
Nikolay Sivov
bunglehead at gmail.com
Wed Mar 4 01:48:15 CST 2015
On 04.03.2015 9:19, Shuai Meng wrote:
> + switch(V_VT(arg)) {
> + case VT_NULL:
> + return MAKE_VBSERROR(VBSE_ILLEGAL_NULL_USE);
> + case VT_BSTR:
> + bstr = V_BSTR(arg);
> + break;
> + default:
> + hres = to_string(arg, &bstr);
> + if(FAILED(hres))
> + return hres;
> + }
> +
> + ret = bstr[0];
> + SysFreeString(bstr);
> +
> + if(ret == 0)
> + return MAKE_VBSERROR(VBSE_ILLEGAL_FUNC_CALL);
> + return return_short(res, ret);
This is wrong too. You can't always free it like that, please look
carefully at where 'bstr' comes from.
More information about the wine-devel
mailing list