globle unsigned long ActualPoolSize(
void *theEnv)
{
#if WIN_BTC
register int i;
struct memoryPtr *memPtr;
unsigned long cnt = 0;
for (i = sizeof(char *) ; i < MEM_TABLE_SIZE ; i++)
{
memPtr = MemoryData(theEnv)->MemoryTable[i];
while (memPtr != NULL)
{
/*==============================================================*/
/* For a block of size n, the Turbo-C Library routines require */
/* a header of size 8 bytes and further require that all memory */
/* allotments be paragraph (16-bytes) aligned. */
/*==============================================================*/
cnt += (((unsigned long) i) + 19L) & 0xfffffff0L;
memPtr = memPtr->next;
}
}
return(cnt);
#else
return(PoolSize(theEnv));
#endif
}
globle unsigned long ActualPoolSize(
void *theEnv)
{
return(PoolSize(theEnv));
}
