mirrors/Nim
1
0
Fork 0
mirror of https://github.com/nim-lang/Nim.git synced 2026-04-20 14:25:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

first version of 'spawn'

Browse Source
This commit is contained in:
Araq
2014-04-16 08:44:57 +02:00
parent b961e47bfe
commit 8e08ff559f
9 changed files with 188 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/system/alloc.nim
View File

@@ -722,10 +722,13 @@ proc alloc0(allocator: var TMemRegion, size: int): pointer =
zeroMem(result, size)
proc dealloc(allocator: var TMemRegion, p: pointer) =
sysAssert(p != nil, "dealloc 0")
var x = cast[pointer](cast[TAddress](p) -% sizeof(TFreeCell))
sysAssert(cast[ptr TFreeCell](x).zeroField == 1, "dealloc 1")
sysAssert(x != nil, "dealloc 1")
sysAssert(isAccessible(allocator, x), "is not accessible")
sysAssert(cast[ptr TFreeCell](x).zeroField == 1, "dealloc 2")
rawDealloc(allocator, x)
sysAssert(not isAllocatedPtr(allocator, x), "dealloc 2")
sysAssert(not isAllocatedPtr(allocator, x), "dealloc 3")
proc realloc(allocator: var TMemRegion, p: pointer, newsize: int): pointer =
if newsize > 0: