diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 5424c219f1..ac0ec10018 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,9 @@ +2000-05-31 23:57 UTC+0100 Victor Szakats + + * source/vm/itemapi.c + ! hb_itemNew() fixed for non NULL pNull values. + Thanks go to Janica Lubos for the fix. + 2000-05-31 23:43 UTC+0100 Victor Szakats * contrib/hbclip/make_clp.bat diff --git a/harbour/source/vm/itemapi.c b/harbour/source/vm/itemapi.c index e699ee1e80..20e83b8b4c 100644 --- a/harbour/source/vm/itemapi.c +++ b/harbour/source/vm/itemapi.c @@ -314,7 +314,10 @@ PHB_ITEM hb_itemNew( PHB_ITEM pNull ) pItem = ( PHB_ITEM ) hb_xgrab( sizeof( HB_ITEM ) ); if( pNull ) + { + pItem->type = HB_IT_NIL; hb_itemCopy( pItem, pNull ); + } else { memset( pItem, 0, sizeof( HB_ITEM ) );