diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 98976ce3a2..383b760171 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,12 @@ The license applies to all entries newer than 2009-04-28. */ +2012-11-17 14:12 UTC+0100 Viktor Szakats (vszakats syenar.net) + * doc/en/lang.txt + * doc/en/var.txt + ! changed docs for non-existent HB_ISBYREF() to HB_PISBYREF() + ! deleted 'include/' references + 2012-11-17 13:52 UTC+0100 Viktor Szakats (vszakats syenar.net) * contrib/hbct/doc/en/charonly.txt * contrib/hbct/doc/en/ctmath2.txt diff --git a/harbour/doc/en/lang.txt b/harbour/doc/en/lang.txt index d8cbe061dc..e5a9432408 100644 --- a/harbour/doc/en/lang.txt +++ b/harbour/doc/en/lang.txt @@ -32,7 +32,7 @@ hb_langErrMsg( ) --> cErrorMessage $ARGUMENTS$ is one of the generic error codes (EG_...) defined - in include/error.ch + in error.ch $RETURNS$ hb_langErrMsg() return the error message string represented by the code . diff --git a/harbour/doc/en/var.txt b/harbour/doc/en/var.txt index e85dc6c646..545b1c4a98 100644 --- a/harbour/doc/en/var.txt +++ b/harbour/doc/en/var.txt @@ -221,7 +221,7 @@ $ARGUMENTS$ = a string with a variable name to check $RETURNS$ - The symbolic values are defined in include/hbmemvar.ch + The symbolic values are defined in hbmemvar.ch HB_MV_NOT_FOUND =variable is not declared (not found in symbol table) HB_MV_UNKNOWN =if variable doesn't exist (but found in symbol table) HB_MV_ERROR =if information cannot be obtained (memory error @@ -237,17 +237,17 @@ PRIVATE mPrivateGlobal CallProc() - ? __mvScope( "mPrivateLocal" ) //HB_MV_UNKNOWN + ? __mvScope( "mPrivateLocal" ) // HB_MV_UNKNOWN RETURN PROCEDURE CallProc() PRIVATE mPrivateLocal - ? __mvScope( "mPublic" ) //HB_MV_PUBLIC - ? __mvScope( "mPrivateGlobal" ) //HB_MV_PRIVATE_GLOBAL - ? __mvScope( "mPrivateLocal" ) //HB_MV_PRIVATE_LOCAL - ? __mvScope( "mFindMe" ) //HB_MV_NOT_FOUND + ? __mvScope( "mPublic" ) // HB_MV_PUBLIC + ? __mvScope( "mPrivateGlobal" ) // HB_MV_PRIVATE_GLOBAL + ? __mvScope( "mPrivateLocal" ) // HB_MV_PRIVATE_LOCAL + ? __mvScope( "mFindMe" ) // HB_MV_NOT_FOUND IF __mvScope( "mPublic" ) > HB_MV_ERROR ? "Variable exists" @@ -868,26 +868,24 @@ $TEMPLATE$ Function $NAME$ - HB_ISBYREF() + hb_PIsByRef() $CATEGORY$ API $SUBCATEGORY$ Variable management $ONELINER$ - Determine if a variable is passed by reference. + Determine if a parameter is passed by reference. $SYNTAX$ - HB_ISBYREF( @ ) --> + hb_PIsByRef( nParam ) --> $ARGUMENTS$ - @ is the variable to test; it must be passed by reference. + is the parameter number to test. $RETURNS$ - a logical value indicating if the variable is passed - by reference to actual function or procedure. + a logical value indicating if the parameter is + passed by reference to actual function or procedure. $DESCRIPTION$ - This function return a logical value indicating if the variable + This function return a logical value indicating if the parameter is passed by reference to actual function or procedure. - ATTENTION: The variable to test must be passed by reference. - If the variable is not passed by reference, the function return NIL. This function is based on the form that Harbour manages to the variables for reference. When a variable is passed by reference, what receives the function or procedure is, a pointer to the @@ -900,16 +898,17 @@ $TESTS$ PROCEDURE Main() LOCAL cVar := "Test local" + MEMVAR m_nVar PRIVATE m_nVar := 0 Test( @cVar, @m_nVar, cVar, m_nVar ) RETURN STATIC PROCEDURE Test( Arg1, Arg2, Arg3, Arg4 ) - ? hb_isbyref( @Arg1 ) // .T. - ? hb_isbyref( @Arg2 ) // .T. - ? hb_isbyref( @Arg3 ) // .F. - ? hb_isbyref( @Arg4 ) // .F. + ? hb_PIsByRef( 1 ) // .T. + ? hb_PIsByRef( 2 ) // .T. + ? hb_PIsByRef( 3 ) // .F. + ? hb_PIsByRef( 4 ) // .F. RETURN $STATUS$ S