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

2014-01-09 02:01 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* src/vm/itemapi.c
    ! clear destination item in hb_itemParamStore*() functions if passed
      source item is NULL
This commit is contained in:
Przemysław Czerpak
2014-01-09 02:01:38 +01:00
parent 8c2721100b
commit e842b7f788
2 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog.txt
View File

@@ -10,6 +10,11 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2014-01-09 02:01 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* src/vm/itemapi.c
! clear destination item in hb_itemParamStore*() functions if passed
source item is NULL
2014-01-07 13:15 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* contrib/hbfoxpro/hbfoxpro.hbp
* contrib/hbfoxpro/misc.prg

6
src/vm/itemapi.c
View File

@@ -130,7 +130,7 @@ HB_BOOL hb_itemParamStore( HB_USHORT uiParam, PHB_ITEM pItem )
if( pItem )
hb_itemCopyToRef( pDest, pItem );
else
hb_itemSetNil( pDest );
hb_itemSetNil( hb_itemUnRef( pDest ) );
return HB_TRUE;
}
@@ -149,7 +149,7 @@ HB_BOOL hb_itemParamStoreForward( HB_USHORT uiParam, PHB_ITEM pItem )
if( pItem )
hb_itemMoveToRef( pDest, pItem );
else
hb_itemSetNil( pDest );
hb_itemSetNil( hb_itemUnRef( pDest ) );
return HB_TRUE;
}
@@ -171,7 +171,7 @@ HB_BOOL hb_itemParamStoreRelease( HB_USHORT uiParam, PHB_ITEM pItem )
hb_itemRelease( pItem );
}
else
hb_itemSetNil( pDest );
hb_itemSetNil( hb_itemUnRef( pDest ) );
return HB_TRUE;
}