diff --git a/harbour/ChangeLog b/harbour/ChangeLog index db0aef74bd..210f5e81da 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,10 @@ +2001-10-30 00:20 GMT +0700 Andi Jahja + * include/hbexpra.c + ! rename __PVALUE to HB_PVALUE + => Need clean rebuild + * utils/hbmake/hbmutils.prg + ! fix typo "(" + 2001-10-31 11:48 GMT+3 Alexander Kresin * source/rdd/dbcmd.c ! fixed alias name checking in dbUseArea() diff --git a/harbour/include/hbexpra.c b/harbour/include/hbexpra.c index b4a9a5b90d..302e50e3a3 100644 --- a/harbour/include/hbexpra.c +++ b/harbour/include/hbexpra.c @@ -956,10 +956,10 @@ HB_EXPR_PTR hb_compExprSetGetBlock( HB_EXPR_PTR pExpr ) pIIF = hb_compExprAddListExpr( pIIF, pExpr ); /* create HB_PCOUNT(1) */ #ifdef HB_MACRO_SUPPORT - pSet = hb_compExprNewFunCall( hb_compExprNewFunName( hb_strdup("__PVALUE") ), + pSet = hb_compExprNewFunCall( hb_compExprNewFunName( hb_strdup("HB_PVALUE") ), hb_compExprNewArgList( hb_compExprNewLong( 1 ) ), HB_MACRO_PARAM ); #else - pSet = hb_compExprNewFunCall( hb_compExprNewFunName( hb_strdup("__PVALUE") ), + pSet = hb_compExprNewFunCall( hb_compExprNewFunName( hb_strdup("HB_PVALUE") ), hb_compExprNewArgList( hb_compExprNewLong( 1 ) ) ); #endif /* create :=HB_PCOUNT(1) */ diff --git a/harbour/utils/hbmake/hbmutils.prg b/harbour/utils/hbmake/hbmutils.prg index bbd63ee0c9..c3ff7767f0 100644 --- a/harbour/utils/hbmake/hbmutils.prg +++ b/harbour/utils/hbmake/hbmutils.prg @@ -136,7 +136,7 @@ Static Function GetDirsl( cPattern ) Local aDir := {} Aeval( Directory( cPattern + "*.", "D" ), ; { | xItem | If( xItem[ 5 ] = "D" , ; - ( Aadd( aDir, cPattern + xItem[ 1 ] + "/" ), "" ) } ) + Aadd( aDir, cPattern + xItem[ 1 ] + "/" ), "" ) } ) Return ( aDir )