From 8f4b5fc7b957ae82455be9f0c1ad7d7a8686a7bf Mon Sep 17 00:00:00 2001 From: Przemyslaw Czerpak Date: Tue, 5 Apr 2011 13:33:12 +0000 Subject: [PATCH] 2011-04-05 15:33 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/src/vm/hvm.c ! fixed missing write unreferencing in my last modification --- harbour/ChangeLog | 4 ++++ harbour/src/vm/hvm.c | 3 +-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 39a0d73217..0c841f714b 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,10 @@ The license applies to all entries newer than 2009-04-28. */ +2011-04-05 15:33 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * harbour/src/vm/hvm.c + ! fixed missing write unreferencing in my last modification + 2011-04-05 08:41 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/src/vm/hvm.c * extended item references created by hb_vmPushItemRef() so they diff --git a/harbour/src/vm/hvm.c b/harbour/src/vm/hvm.c index e3857a90b4..5f9640229d 100644 --- a/harbour/src/vm/hvm.c +++ b/harbour/src/vm/hvm.c @@ -8240,8 +8240,7 @@ static PHB_ITEM hb_vmItemRefRead( PHB_ITEM pRefer ) static PHB_ITEM hb_vmItemRefWrite( PHB_ITEM pRefer, PHB_ITEM pSource ) { - HB_SYMBOL_UNUSED( pSource ); - return ( ( PHB_ITMREF ) pRefer->item.asExtRef.value )->value; + return hb_itemUnRefWrite( ( ( PHB_ITMREF ) pRefer->item.asExtRef.value )->value, pSource ); } static void hb_vmItemRefCopy( PHB_ITEM pDest )