Merge pull request #1208 from jbe/shared_mem_stats

added getTotalSharedMem et al.
This commit is contained in:
Andreas Rumpf 2014-05-31 14:33:53 +02:00
commit 2b72e02ecc
2 changed files with 30 additions and 0 deletions

View file

@ -835,4 +835,20 @@ template instantiateForRegion(allocator: expr) =
else:
result = realloc(p, newsize)
when hasThreadSupport:
template sharedMemStatsShared(v: int) {.immediate.} =
acquireSys(heapLock)
result = v
releaseSys(heapLock)
proc getFreeSharedMem(): int =
sharedMemStatsShared(sharedHeap.freeMem)
proc getTotalSharedMem(): int =
sharedMemStatsShared(sharedHeap.currMem)
proc getOccupiedSharedMem(): int =
sharedMemStatsShared(sharedHeap.currMem - sharedHeap.freeMem)
{.pop.}