tests repaired; serious typo in the allocator fixed; fixes #32

This commit is contained in:
Araq
2011-07-22 23:58:19 +02:00
parent 569c1ce5ec
commit 246b8d18a1
9 changed files with 380 additions and 324 deletions

View File

@@ -561,7 +561,7 @@ proc alloc(allocator: var TMemRegion, size: int): pointer =
result = cast[pointer](cast[TAddress](result) +% sizeof(TFreeCell))
proc alloc0(allocator: var TMemRegion, size: int): pointer =
result = alloc(size)
result = alloc(allocator, size)
zeroMem(result, size)
proc dealloc(allocator: var TMemRegion, p: pointer) =