From 0eab357848cfebe41e99c710ba25bea873ad53c2 Mon Sep 17 00:00:00 2001 From: April White Date: Thu, 24 Dec 2009 03:25:54 +0000 Subject: [PATCH] 2009-12-23 22:26 UTC+0500 April White (april users.sourceforge.net) * contrib/hbbtree/hb_btree.c * bug fix: array access was in bounds but to wrong value [TOMERGE 2.0] --- harbour/ChangeLog | 7 ++++++- harbour/contrib/hbbtree/hb_btree.c | 2 +- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 0fcbb38c68..1b3bd539cd 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,11 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-12-23 22:26 UTC+0500 April White (april users.sourceforge.net) + * contrib/hbbtree/hb_btree.c + * bug fix: array access was in bounds but to wrong value + [TOMERGE 2.0] + 2009-12-23 18:40 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * contrib/hbqt/filelist.mk + contrib/hbqt/hbqt_errorsys.prg @@ -39,7 +44,7 @@ * contrib/hbide/resources/mainwindow.ui * contrib/hbxbp/xbpbrowse.prg * contrib/hbxbp/xbpdialog.prg - + Added an experimental protocol scheduled to be + + Added an experimental protocol scheduled to be polished in next few days. 2009-12-23 13:31 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) diff --git a/harbour/contrib/hbbtree/hb_btree.c b/harbour/contrib/hbbtree/hb_btree.c index 129e428ce6..a1393e453d 100644 --- a/harbour/contrib/hbbtree/hb_btree.c +++ b/harbour/contrib/hbbtree/hb_btree.c @@ -1705,7 +1705,7 @@ static struct hb_BTree *BTree_GetTreeIndex( const char * GetSource ) HB_TRACE( HB_TR_DEBUG, ( SRCLINENO ) ); index = hb_parni( 1 ); - if ( index < 1 || index > s_BTree_List_Count || s_BTree_List[ index ] == NULL ) \ + if ( index < 1 || index > s_BTree_List_Count || s_BTree_List[ index - 1 ] == NULL ) \ { hb_RaiseError( HB_BTree_TreeHandle_EC, "Bad BTree handle", GetSource, 1 ); return NULL;