fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

19990904-15:20 GMT+1

Browse Source
This commit is contained in:
Viktor Szakats
1999-09-04 13:30:33 +00:00
parent f7b9fc4ae6
commit 4225a4f2dd
2 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
19990904-15:20 GMT+1 Victor Szel <info@szelvesz.hu>
* source/rtl/arrays.c
! hb_arrayScan() fixed. (Thanks Antonio)
19990903-19:35 EDT David G. Holm <dholm@jsd-llc.com>
* source/rtl/console.c
! Added #ifdef HARBOUR_USE_GTAPI/#endif around use of GT API

2
harbour/source/rtl/arrays.c
View File

@@ -393,7 +393,7 @@ BOOL hb_arrayFill( PHB_ITEM pArray, PHB_ITEM pValue, ULONG ulStart, ULONG ulCoun
ULONG hb_arrayScan( PHB_ITEM pArray, PHB_ITEM pValue, ULONG ulStart, ULONG ulCount )
{
if( IS_ARRAY( pArray ) && IS_NIL( pValue ) )
if( IS_ARRAY( pArray ) && ! IS_NIL( pValue ) )
{
PBASEARRAY pBaseArray = pArray->item.asArray.value;
ULONG ulLen = pBaseArray->ulLen;