Stubbed out the implementation of LCMAP_SORTKEY in LCMapStringW() in

order to allow Windows 9x Perl to start.
This commit is contained in:
Steven Elliott 2000-02-25 21:39:38 +00:00 committed by Alexandre Julliard
parent 6a80c8a260
commit 5e1ea6e51e
1 changed files with 15 additions and 8 deletions

View File

@ -201,6 +201,10 @@ LANG_BEGIN (LANG_ITALIAN, SUBLANG_ITALIAN_SWISS) /*0x0810*/
#include "nls/its.nls"
LANG_END
LANG_BEGIN (LANG_JAPANESE, SUBLANG_DEFAULT) /*0x0411*/
#include "nls/jpn.nls"
LANG_END
LANG_BEGIN (LANG_KOREAN, SUBLANG_KOREAN) /*0x0412*/
#include "nls/kor.nls"
LANG_END
@ -2371,23 +2375,26 @@ INT WINAPI LCMapStringW(
}
if (srclen==-1)
srclen = lstrlenW(srcstr)+1;
if (dstlen==0)
return srclen;
if (dstlen<srclen)
{
SetLastError(ERROR_INSUFFICIENT_BUFFER);
return 0;
}
if (mapflags & LCMAP_SORTKEY)
{
FIXME_(string)("(0x%04lx,0x%08lx,%p,%d,%p,%d): "
"unimplemented flags: 0x%08lx\n",
"unimplemented flags: 0x%08lx. Ignoring LC_COLLATE.\n",
lcid,mapflags,srcstr,srclen,dststr,dstlen,mapflags);
return 0;
memcpy(dststr, srcstr, srclen * sizeof(*srcstr));
return srclen;
}
else
{
int (*f)(int)=identity;
if (dstlen==0)
return srclen;
if (dstlen<srclen) {
SetLastError(ERROR_INSUFFICIENT_BUFFER);
return 0;
}
if (mapflags & LCMAP_UPPERCASE)
f = toupper;
else if (mapflags & LCMAP_LOWERCASE)