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

ChangeLog 2000-06-22 19:30 UTC+0100

Browse Source
This commit is contained in:
Ryszard Glab
2000-06-22 17:24:48 +00:00
parent 2180b7ef20
commit a1ee5280fc
2 changed files with 12 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -1,3 +1,8 @@
2000-06-22 19:30 UTC+0100 Ryszard Glab <rglab@imid.med.pl>
*source/vm/memvars.c
*removed #if 0
2000-06-22 18:15 UTC+0100 Ryszard Glab <rglab@imid.med.pl>
*source/rtl/gtcrs/kbdcrs.c

34
harbour/source/vm/memvars.c
View File

@@ -278,15 +278,6 @@ void hb_memvarValueIncRef( HB_HANDLE hValue )
{
HB_TRACE(HB_TR_DEBUG, ("hb_memvarValueIncRef(%p)", hValue));
#if 0
/* Debug */
if( hValue < 1 || hValue > s_globalTableSize )
{
HB_TRACE(HB_TR_INFO, ("Invalid memvar handle %i (max %li)", hValue, s_globalTableSize));
exit( 1 );
}
#endif
s_globalTable[ hValue ].counter++;
HB_TRACE(HB_TR_INFO, ("Memvar item (%i) increment refCounter=%li", hValue, s_globalTable[ hValue ].counter));
@@ -303,20 +294,19 @@ void hb_memvarValueDecRef( HB_HANDLE hValue )
HB_TRACE(HB_TR_DEBUG, ("hb_memvarValueDecRef(%p)", hValue));
#if 0
if( hValue < 1 || hValue > s_globalTableSize )
{
HB_TRACE(HB_TR_INFO, ("Invalid memvar handle %i (max %li)", hValue, s_globalTableSize));
exit( 1 );
}
#endif
pValue = s_globalTable + hValue;
HB_TRACE(HB_TR_INFO, ("Memvar item (%i) decrement refCounter=%li", hValue, pValue->counter-1));
if( pValue->counter > 0 )
{
/* Notice that Counter can be equal to 0.
* This can happen if for example PUBLIC variable holds a codeblock
* with detached variable. When hb_memvarsRelease() is called then
* detached variable can be released before the codeblock. So if
* the codeblock will be released later then it will try to release
* again this detached variable.
*/
if( --pValue->counter == 0 )
{
hb_itemClear( &pValue->item );
@@ -342,16 +332,6 @@ void hb_memvarValueDecRef( HB_HANDLE hValue )
HB_TRACE(HB_TR_INFO, ("Memvar item (%i) deleted", hValue));
}
}
/* This can happen if for example PUBLIC variable holds a codeblock
* with detached variable. When hb_memvarsRelease() is called then
* detached variable can be released before the codeblock. So if
* the codeblock will be released later then it will try to release
* again this detached variable.
*/
#if 0
else
HB_TRACE(HB_TR_INFO, ("Attempt to release released item"));
#endif
}
/*