ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Partially implement oleaut32.VarBstrCmp.

This commit is contained in:
Mike McCormack 2001-08-16 18:01:41 +00:00 committed by Alexandre Julliard
parent 658cdb4412
commit 06abe79037
2 changed files with 33 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dlls/oleaut32/oleaut32.spec
View File

@ -318,7 +318,7 @@ debug_channels (ole typelib)
437 stub VarAdd # stdcall (ptr ptr ptr) 437 stub VarAdd # stdcall (ptr ptr ptr)
438 stub VarAnd # stdcall (ptr ptr ptr) 438 stub VarAnd # stdcall (ptr ptr ptr)
439 stub VarBstrCat # stdcall (ptr ptr ptr) 439 stub VarBstrCat # stdcall (ptr ptr ptr)
440 stub VarBstrCmp # stdcall (ptr ptr long long) 440 stdcall VarBstrCmp(ptr ptr long long) VarBstrCmp
441 stub VarCat # stdcall (ptr ptr ptr) 441 stub VarCat # stdcall (ptr ptr ptr)
442 stub VarCmp # stdcall (ptr ptr long long) 442 stub VarCmp # stdcall (ptr ptr long long)
443 stub VarCyAbs 443 stub VarCyAbs

32
dlls/oleaut32/variant.c
View File

@ -4640,3 +4640,35 @@ HRESULT WINAPI VarDateFromUdate(UDATE *pudateout,
return i; return i;
} }
/**********************************************************************
* VarBstrCmp [OLEAUT32.440]
*
* flags can be:
* NORM_IGNORECASE, NORM_IGNORENONSPACE, NORM_IGNORESYMBOLS
* NORM_IGNORESTRINGWIDTH, NORM_IGNOREKANATYPE, NORM_IGNOREKASHIDA
*
*/
HRESULT WINAPI VarBstrCmp(BSTR left, BSTR right, LCID lcid, DWORD flags)
{
DWORD r;
FIXME("( %s %s %ld %lx ) partial stub\n", debugstr_w(left), debugstr_w(right), lcid, flags);
if((!left) || (!right))
return VARCMP_NULL;
if(flags&NORM_IGNORECASE)
r = lstrcmpiW(left,right);
else
r = lstrcmpW(left,right);
if(r<0)
return VARCMP_LT;
if(r>0)
return VARCMP_GT;
return VARCMP_EQ;
}