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

added profiler initialization for new dynamic symbols

Browse Source
This commit is contained in:
Antonio Linares
2001-06-30 07:19:31 +00:00
parent 263a9c17b9
commit 87bef70b86
1 changed files with 4 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/source/vm/dynsym.c
View File

@@ -108,6 +108,8 @@ PHB_DYNS hb_dynsymNew( PHB_SYMB pSymbol ) /* creates a new dynamic symbol */
{
pDynSym->pFunPtr = pSymbol->pFunPtr; /* but had no function ptr assigned */
pDynSym->pSymbol = pSymbol;
pDynSym->ulCalls = 0; /* profiler support */
pDynSym->ulTime = 0; /* profiler support */
}
}
pSymbol->pDynSym = pDynSym; /* place a pointer to DynSym */
@@ -137,6 +139,8 @@ PHB_DYNS hb_dynsymNew( PHB_SYMB pSymbol ) /* creates a new dynamic symbol */
pDynSym->pSymbol = pSymbol;
pDynSym->hMemvar = 0;
pDynSym->hArea = 0;
pDynSym->ulCalls = 0; /* profiler support */
pDynSym->ulTime = 0; /* profiler support */
if( ! ( pSymbol->cScope & ( HB_FS_STATIC | HB_FS_INIT | HB_FS_EXIT ) ) ) /* only for HB_FS_PUBLIC */
{