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

2008-07-07 20:16 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* contrib/xhb/xhbfunc.c
     ! Changed hb_ArrayID() to be in sync with xhb, and at the 
       same time fixing the Win64 compatibility issue.
       Thanks Przemek.

   * ChangeLog
     ! Typo.
This commit is contained in:
Viktor Szakats
2008-07-07 18:17:21 +00:00
parent 48d11d426d
commit 2a774d62e8
2 changed files with 11 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
harbour/ChangeLog
View File

@@ -8,11 +8,20 @@
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2008-07-07 20:16 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* contrib/xhb/xhbfunc.c
! Changed hb_ArrayID() to be in sync with xhb, and at the
same time fixing the Win64 compatibility issue.
Thanks Przemek.
* ChangeLog
! Typo.
2008-07-07 19:32 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* source/vm/arrayshb.c
* contrib/xhb/xhbfunc.c
! Moved hb_ArrayID() Harbour level function to xhb.lib.
; NOTE: This function is not compatible with x64 architecture.
; NOTE: This function is not compatible with Win64 architecture.
2008-07-07 19:00 UTC+0100 Marek Paliwoda (mpaliwoda at interia pl)
* make_xmingwce.mak

5
harbour/contrib/xhb/xhbfunc.c
View File

@@ -126,10 +126,7 @@ HB_FUNC( HB_ARRAYID ) /* for debugging: returns the array's "address" so dual r
{
PHB_ITEM pArray = hb_param( 1, HB_IT_ARRAY );
if( pArray )
hb_retnl( ( long ) hb_arrayId( pArray ) );
else
hb_retnl( -1 );
hb_retptr( pArray ? hb_arrayId( pArray ) : NULL );
}
/* Hash utem functions */