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

@@ -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)

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;