tng 2003/01/10 10:43:51 Modified: c/src/xercesc/util/Transcoders/Iconv390 Iconv390TransService.cpp Log: [Bug 13909] Use of non standard mbstowcs feature. Revision Changes Path 1.5 +8 -23 xml-xerces/c/src/xercesc/util/Transcoders/Iconv390/Iconv390TransService.cpp Index: Iconv390TransService.cpp =================================================================== RCS file: /home/cvs/xml-xerces/c/src/xercesc/util/Transcoders/Iconv390/Iconv390TransService.cpp,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- Iconv390TransService.cpp 6 Jan 2003 21:46:08 -0000 1.4 +++ Iconv390TransService.cpp 10 Jan 2003 18:43:51 -0000 1.5 @@ -350,33 +350,18 @@ // --------------------------------------------------------------------------- unsigned int Iconv390LCPTranscoder::calcRequiredSize(const char* const srcText) { - unsigned int retVal; - if (!srcText) return 0; -#ifdef OS390BATCH - // - // Cannot use mbstowcs in a non-POSIX environment(???). - // - if (!__isPosixOn()) { - const unsigned charLen = mblen(srcText, MB_CUR_MAX); - if (charLen == -1) - return 0; - else { - if (charLen != 0) - retVal = strlen(srcText)/charLen; - else - retVal = charLen; - } - } - else -#endif - retVal = ::mbstowcs(NULL, srcText, 0); + unsigned charLen = ::mblen(srcText, MB_CUR_MAX); + if (charLen == -1) + return 0; + else if (charLen != 0) + charLen = strlen(srcText)/charLen; - if (retVal == -1) + if (charLen == -1) return 0; - return retVal; + return charLen; }
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]