From d75e4f63dcfa544935765b4b324629c1675f78fd Mon Sep 17 00:00:00 2001 From: Walter Negro Date: Tue, 5 Nov 2002 22:02:03 +0000 Subject: [PATCH] 2002-11-05 19:01 UTC-0300 Walter Negro * source/rtl/strcase.c ! Fix call to toupper() and tolower(), forcing unsigned char. For the correct working with DJGPP compiler. --- harbour/source/rtl/strcase.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/harbour/source/rtl/strcase.c b/harbour/source/rtl/strcase.c index 3597e5eeaf..f903b1953c 100644 --- a/harbour/source/rtl/strcase.c +++ b/harbour/source/rtl/strcase.c @@ -71,7 +71,7 @@ char * hb_strLower( char * szText, ULONG ulLen ) szText[ i ] = (char) s_cdpage->s_lower[szText[i]&255]; else for( i = 0; i < ulLen; i++ ) - szText[ i ] = tolower( szText[ i ] ); + szText[ i ] = tolower( (unsigned char) szText[ i ] ); return szText; } @@ -88,7 +88,7 @@ char * hb_strUpper( char * szText, ULONG ulLen ) szText[ i ] = (char) s_cdpage->s_upper[szText[i]&255]; else for( i = 0; i < ulLen; i++ ) - szText[ i ] = toupper( szText[ i ] ); + szText[ i ] = toupper( (unsigned char) szText[ i ] ); return szText; } @@ -104,7 +104,7 @@ char * hb_strncpyUpper( char * pDest, const char * pSource, ULONG ulLen ) { /* some compilers impliment toupper as a macro, and this has side effects! */ /* *pDest++ = toupper( *pSource++ ); */ - pDest[ ulLen ] = toupper( pSource[ ulLen ] ); + pDest[ ulLen ] = toupper( (unsigned char) pSource[ ulLen ] ); } return pDest; @@ -126,7 +126,7 @@ char * hb_strncpyUpperTrim( char * pDest, const char * pSource, ULONG ulLen ) { /* some compilers impliment toupper as a macro, and this has side effects! */ /* *pDest++ = toupper( *pSource++ ); */ - pDest[ ulLen ] = toupper( pSource[ ulLen ] ); + pDest[ ulLen ] = toupper( (unsigned char) pSource[ ulLen ] ); } return pDest; @@ -163,4 +163,4 @@ HB_FUNC( UPPER ) } else hb_errRT_BASE_SubstR( EG_ARG, 1102, NULL, "UPPER", 1, hb_paramError( 1 ) ); -} \ No newline at end of file +}