diff --git a/harbour/ChangeLog b/harbour/ChangeLog index a5e4424620..b650a9296d 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,22 @@ +2001-04-01 15:46 GMT+6 April White + * doc/en/hb_api.txt + ! removed duplicate copies of: + hb_pcount(), hb_ret(), hb_retc(), hb_retclen(), hb_retds(), + hb_retd(), hb_retdl(), hb_retl(), hb_retnd(), hb_retni(), + hb_retnl(), hb_retnlen(), hb_retndlen(), hb_retnilen(), + hb_retnllen(), hb_reta() + ! added a note to the description of each of the above that explains + what happens when HB_API_MACROS is defined (each is replaced with a + macro expression) + + * hb_pcount() entry + ! corrected typo, + + * source/compiler/genc.c: + ! correct comment 'the the' + ! wrapped assignment within while() loop with brackets to eliminate + a warning in djgpp + 2001-04-01 15:45 GMT+3 Alexander Kresin * source/rtl/gtsln/gtsln.c ! minor fix, provided by Marek Paliwoda diff --git a/harbour/doc/en/hb_api.txt b/harbour/doc/en/hb_api.txt index 6bf6a82e0a..72b3c36223 100644 --- a/harbour/doc/en/hb_api.txt +++ b/harbour/doc/en/hb_api.txt @@ -443,7 +443,7 @@ * $CATEGORY$ * Extend API * $ONELINER$ - * Returns the number of suplied parameters + * Returns the number of supplied parameters * $SYNTAX$ * C Prototype * @@ -454,7 +454,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_pcount() --> ( ( int ) hb_stack.pBase->item.asSymbol.paramcnt ) * $EXAMPLES$ * * $STATUS$ @@ -487,7 +488,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_ret() --> hb_itemClear( &hb_stack.Return ) * $EXAMPLES$ * * $STATUS$ @@ -520,7 +522,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retc( szText ) --> hb_itemPutC( &hb_stack.Return, szText ) * $EXAMPLES$ * * $STATUS$ @@ -555,7 +558,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retclen( szText, ulLen ) --> hb_itemPutCL( &hb_stack.Return, szText, ulLen ) * $EXAMPLES$ * * $STATUS$ @@ -588,7 +592,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retds( szDate ) --> hb_itemPutDS( &hb_stack.Return, szDate ) * $EXAMPLES$ * * $STATUS$ @@ -625,7 +630,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retd( lYear, lMonth, lDay ) --> hb_itemPutD( &hb_stack.Return, lYear, lMonth, lDay ) * $EXAMPLES$ * * $STATUS$ @@ -658,7 +664,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retdl( lJulian ) --> hb_itemPutDL( &hb_stack.Return, lJulian ) * $EXAMPLES$ * * $STATUS$ @@ -691,7 +698,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retl( iLogical ) --> hb_itemPutL( &hb_stack.Return, iLogical ? TRUE : FALSE ) * $EXAMPLES$ * * $STATUS$ @@ -724,7 +732,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retnd( dNumber ) --> hb_itemPutND( &hb_stack.Return, dNumber ) * $EXAMPLES$ * * $STATUS$ @@ -757,7 +766,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retni( iNumber ) --> hb_itemPutNI( &hb_stack.Return, iNumber ) * $EXAMPLES$ * * $STATUS$ @@ -790,7 +800,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retnl( lNumber ) --> hb_itemPutNL( &hb_stack.Return, lNumber ) * $EXAMPLES$ * * $STATUS$ @@ -827,7 +838,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retnlen( dNumber, iWidth, iDec ) --> hb_itemPutNLen( &hb_stack.Return, dNumber, iWidth, iDec ) * $EXAMPLES$ * * $STATUS$ @@ -864,7 +876,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retndlen( dNumber, iWidth, iDec ) --> hb_itemPutNDLen( &hb_stack.Return, dNumber, iWidth, iDec ) * $EXAMPLES$ * * $STATUS$ @@ -899,7 +912,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retnilen( iNumber, iWidth ) --> hb_itemPutNILen( &hb_stack.Return, iNumber, iWidth ) * $EXAMPLES$ * * $STATUS$ @@ -934,7 +948,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_retnllen( lNumber, iWidth ) --> hb_itemPutNLLen( &hb_stack.Return, lNumber, iWidth ) * $EXAMPLES$ * * $STATUS$ @@ -967,7 +982,8 @@ * $RETURNS$ * * $DESCRIPTION$ - * Conditional on: not HB_API_MACROS + * Note that when HB_API_MACROS is defined, this function is replaced with + * a macro: hb_reta( ulLen ) --> hb_arrayNew( &hb_stack.Return, ulLen ) * $EXAMPLES$ * * $STATUS$ @@ -7046,552 +7062,6 @@ * $END$ */ -/* $DOC$ - * $FUNCNAME$ - * hb_pcount() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_pcount( ) --> item.asSymbol.paramcnt )> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_ret() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_ret( ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_reta() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_reta( ulLen ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retc() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retc( szText ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retclen() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retclen( szText, ulLen ) --> - * $ARGUMENTS$ - * - * - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retds() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retds( szDate ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retd() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retd( lYear, lMonth, lDay ) --> - * $ARGUMENTS$ - * - * - * - * - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retdl() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retdl( lJulian ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retl() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retl( iLogical ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retnd() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retnd( dNumber ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retni() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retni( iNumber ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retnl() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retnl( lNumber ) --> - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retnlen() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retnlen( dNumber, iWidth, iDec ) --> - * $ARGUMENTS$ - * - * - * - * - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retndlen() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retndlen( dNumber, iWidth, iDec ) --> - * $ARGUMENTS$ - * - * - * - * - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retnilen() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retnilen( iNumber, iWidth ) --> - * $ARGUMENTS$ - * - * - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_retnllen() - * $CATEGORY$ - * Extend API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * hb_retnllen( lNumber, iWidth ) --> - * $ARGUMENTS$ - * - * - * - * $RETURNS$ - * - * $DESCRIPTION$ - * Conditional on: HB_API_MACROS - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compliance is not applicable to API calls. - * $FILES$ - * Header file is hbapi.h - * $PLATFORMS$ - * All - * $SEEALSO$ - * - * $END$ - */ - /* $DOC$ * $FUNCNAME$ * HB_ISSPACE() diff --git a/harbour/source/compiler/genc.c b/harbour/source/compiler/genc.c index ae91728056..43959f9df3 100644 --- a/harbour/source/compiler/genc.c +++ b/harbour/source/compiler/genc.c @@ -1143,7 +1143,7 @@ static HB_GENC_FUNC( hb_p_pushblock ) pFunc->pCode[ lPCodePos + 1 ] ); /* NOTE: * When a codeblock is used to initialize a static variable - * the the names of local variables cannot be determined + * the names of local variables cannot be determined * because at the time of C code generation we don't know * in which function was defined this local variable */ @@ -1607,7 +1607,7 @@ static HB_GENC_FUNC( hb_p_statics ) i = 0; - while( chr = pVar->szName[ i++ ] ) + while( ( chr = pVar->szName[ i++ ] ) ) { if( chr == '\'' || chr == '\\') fprintf( cargo->yyc, " \'\\%c\',", chr );