reactos/wine
1
0
Fork 0
mirror of https://github.com/reactos/wine.git synced 2024-11-25 20:59:54 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Partially implement oleaut32.VarBstrCmp.

Browse Source
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)
438 stub VarAnd # 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)
442 stub VarCmp # stdcall (ptr ptr long long)
443 stub VarCyAbs

32
dlls/oleaut32/variant.c
View File

@ -4640,3 +4640,35 @@ HRESULT WINAPI VarDateFromUdate(UDATE *pudateout,
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;
}