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

2010-06-22 11:23 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* src/vm/itemapi.c
    % Changed to use hb_itemPutNS() instead of hb_itemPutNInt() to
      push enum offset/value to RTE param.
This commit is contained in:
Viktor Szakats
2010-06-22 09:24:00 +00:00
parent 6a91dc422d
commit d5d1e56b33
2 changed files with 10 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
harbour/ChangeLog
View File

@@ -16,6 +16,11 @@
The license applies to all entries newer than 2009-04-28.
*/
2010-06-22 11:23 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* src/vm/itemapi.c
% Changed to use hb_itemPutNS() instead of hb_itemPutNInt() to
push enum offset/value to RTE param.
2010-06-22 11:14 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbdefs.h
+ added HB_VMUINT_MAX macro
@@ -177,7 +182,7 @@
! Using size API after above change.
; QUESTION: In itemapi asEnum.offset is stored using
hb_itemPutNInt(). Should this be changed to
hb_itemPutNS()?
hb_itemPutNS()? [DONE]
* contrib/hbct/ctstr.c
+ Cleaned away some HB_ULONG casts and using HB_PFS format
@@ -729,7 +734,7 @@
* src/vm/extend.c
+ Added hb_storvns().
+ Added hb_parvns().
; TOFIX: hb_itemPutNS() gives these (not quite unexpected) mingw warnings:
; TOFIX: hb_itemPutNS() gives these (not quite unexpected) mingw warnings: [DONE]
---
itemapi.c:993:8: warning: comparison between signed and unsigned integer expressions
itemapi.c:998:38: warning: comparison between signed and unsigned integer expressions
@@ -825,7 +830,7 @@
! Applied fixed from Przemek to hb_fsReadAt()/hb_fsWriteAt()
code to be MT safe plus fix other problems.
; QUESTION: Shouls the same applied to hb_fsWriteLarge()/hb_fsReadLarge()
loops? (BTW inactive in 32-bit Harbour builds) [YES]
loops? (BTW inactive in 32-bit Harbour builds) [DONE]
* contrib/hbct/screen2.c
! Type cleanup.

4
harbour/src/vm/itemapi.c
View File

@@ -1831,7 +1831,7 @@ PHB_ITEM hb_itemUnRefOnce( PHB_ITEM pItem )
if( hb_vmRequestQuery() == 0 )
{
HB_STACK_TLS_PRELOAD
hb_itemPutNInt( hb_stackAllocItem(), pItem->item.asEnum.offset );
hb_itemPutNS( hb_stackAllocItem(), pItem->item.asEnum.offset );
hb_errRT_BASE( EG_BOUND, 1132, NULL, hb_langDGetErrorDesc( EG_ARRACCESS ),
2, pItem->item.asEnum.basePtr, hb_stackItemFromTop( -1 ) );
hb_stackPop();
@@ -1860,7 +1860,7 @@ PHB_ITEM hb_itemUnRefOnce( PHB_ITEM pItem )
{
HB_STACK_TLS_PRELOAD
hb_arrayPushBase( pItem->item.asRefer.BasePtr.array );
hb_itemPutNInt( hb_stackAllocItem(), pItem->item.asRefer.value + 1 );
hb_itemPutNS( hb_stackAllocItem(), pItem->item.asRefer.value + 1 );
hb_errRT_BASE( EG_BOUND, 1132, NULL, hb_langDGetErrorDesc( EG_ARRACCESS ),
2, hb_stackItemFromTop( -2 ), hb_stackItemFromTop( -1 ) );
hb_stackPop();