From 7bb567d30d7ea7aa8dbe305c9c7c39a6a1e0c5e5 Mon Sep 17 00:00:00 2001 From: Przemyslaw Czerpak Date: Mon, 26 Sep 2005 10:08:47 +0000 Subject: [PATCH] 2005-09-25 21:40 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/harbour.spec * harbour/make_tgz.sh * harbour/bin/hb-func.sh * harbour/bin/pack_src.sh * harbour/config/global.cf * harbour/include/hbapiitm.h * harbour/include/hbdate.h * harbour/include/hbextern.ch * harbour/source/rdd/dbcmd.c * harbour/source/rdd/dbf1.c * harbour/source/rdd/workarea.c * harbour/source/rdd/dbfntx/dbfntx1.c * harbour/source/rtl/dates.c * harbour/source/vm/itemapi.c * updated for proper RDD synchronization with xHarbour * harbour/source/vm/hvm.c ! fixed bug in divide by 0 substitution * harbour/contrib/rdd_ads/ads0.prg * harbour/contrib/rdd_ads/ads1.c * harbour/contrib/rdd_ads/adsfunc.c * harbour/contrib/rdd_ads/rddads.h * synced base of ADS RDD with xHarbour - old code cannot be compiled without it - external ADS*() functions not synced - I do not use them and I do not want to break sth - Harbour ADS developers should check it --- harbour/ChangeLog | 4 ++++ harbour/source/rdd/dbcmd.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 618afae05c..c765a09793 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2002-12-01 23:12 UTC+0100 Foo Bar */ +2005-09-26 12:10 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * xharbour/source/rdd/dbcmd.c + ! fixed bug I introduced in RDDLIST() + 2005-09-25 21:40 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) - harbour/source/codepage/cdpsrwin.c * harbour/make_tgz.sh diff --git a/harbour/source/rdd/dbcmd.c b/harbour/source/rdd/dbcmd.c index 95b8243052..2e5db0bc67 100644 --- a/harbour/source/rdd/dbcmd.c +++ b/harbour/source/rdd/dbcmd.c @@ -3253,7 +3253,7 @@ HB_FUNC( RDDLIST ) { if( ( uiType == 0 ) || ( s_RddList[ uiCount ]->uiType == uiType ) ) { - hb_itemPutC( hb_arrayGetItemPtr( pRddArray, uiIndex++ ), s_RddList[ uiCount ]->szName ); + hb_itemPutC( hb_arrayGetItemPtr( pRddArray, ++uiIndex ), s_RddList[ uiCount ]->szName ); } } hb_itemReturnForward( pRddArray );