From 1fa85b66887ee3c6eb794bc8cac6d498bda64bb0 Mon Sep 17 00:00:00 2001
From: Przemyslaw Czerpak <druzus@priv.onet.pl>
Date: Wed, 8 Jul 2009 13:39:49 +0000
Subject: [PATCH] 2009-07-08 15:39 UTC+0200 Przemyslaw Czerpak
 (druzus/at/priv.onet.pl)   * harbour/source/vm/fm.c     ! fixed reference
 counter initialization in hb_xrealloc( NULL, size );

---
 harbour/ChangeLog      | 4 ++++
 harbour/source/vm/fm.c | 3 +++
 2 files changed, 7 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 06b902e842..c375680f77 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-07-08 15:39 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/vm/fm.c
+    ! fixed reference counter initialization in hb_xrealloc( NULL, size );
+
 2009-07-08 12:22 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/source/rdd/dbfntx/dbfntx1.c
   * harbour/source/rdd/dbfnsx/dbfnsx1.c
diff --git a/harbour/source/vm/fm.c b/harbour/source/vm/fm.c
index edb80f2835..3697392a98 100644
--- a/harbour/source/vm/fm.c
+++ b/harbour/source/vm/fm.c
@@ -667,6 +667,7 @@ void * hb_xrealloc( void * pMem, ULONG ulSize )       /* reallocates memory */
       pMem = malloc( HB_ALLOC_SIZE( ulSize ) );
       if( pMem )
       {
+         HB_ATOM_SET( HB_COUNTER_PTR( HB_MEM_PTR( pMem ) ), 1 );
          if( ulSize > ulMemSize )
          {
             memcpy( pMem, pMemBlock, HB_ALLOC_SIZE( ulMemSize ) );
@@ -715,6 +716,8 @@ void * hb_xrealloc( void * pMem, ULONG ulSize )       /* reallocates memory */
       if( ulSize == 0 )
          hb_errInternal( HB_EI_XREALLOCNULLSIZE, NULL, NULL, NULL );
       pMem = malloc( HB_ALLOC_SIZE( ulSize ) );
+      if( pMem )
+         HB_ATOM_SET( HB_COUNTER_PTR( HB_MEM_PTR( pMem ) ), 1 );
    }
    else if( ulSize == 0 )
    {