jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

bugfix: boehm GC improvements

Browse source
This commit is contained in:
Araq 2012-01-16 00:04:56 +01:00
commit 42dad650e0
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/system/mmdisp.nim
View file

@ -96,6 +96,10 @@ when defined(boehmgc):
## Return the total number of bytes allocated in this process. ## Return the total number of bytes allocated in this process.
## Never decreases. ## Never decreases.
proc allocAtomic(size: int): pointer =
result = boehmAllocAtomic(size)
zeroMem(result, size)
when not defined(useNimRtl): when not defined(useNimRtl):
proc alloc(size: int): pointer = proc alloc(size: int): pointer =
@ -109,10 +113,6 @@ when defined(boehmgc):
if result == nil: raiseOutOfMem() if result == nil: raiseOutOfMem()
proc dealloc(p: Pointer) = boehmDealloc(p) proc dealloc(p: Pointer) = boehmDealloc(p)
proc allocAtomic(size: int): pointer =
result = boehmAllocAtomic(size)
zeroMem(result, size)
proc allocShared(size: int): pointer = proc allocShared(size: int): pointer =
result = boehmAlloc(size) result = boehmAlloc(size)
if result == nil: raiseOutOfMem() if result == nil: raiseOutOfMem()