fixes the recently discovered GC memory leaks

This revision is intended as comparison point between the old and the new GC
The used GC can be switched in mmdisp and various statistics will be gathered during
execution (these will be removed/disabled in later revisions)
This commit is contained in:
Zahary Karadjov 2012-12-05 20:42:19 +02:00
commit 083d4f4708
12 changed files with 1939 additions and 364 deletions

View file

@ -25,7 +25,7 @@ type
next*: PIdent # for hash-table chaining
h*: THash # hash value of s
var buckets: array[0..4096 * 2 - 1, PIdent]
var buckets*: array[0..4096 * 2 - 1, PIdent]
proc cmpIgnoreStyle(a, b: cstring, blen: int): int =
var i = 0
@ -102,5 +102,5 @@ proc getIdent*(identifier: string, h: THash): PIdent =
proc IdentEq*(id: PIdent, name: string): bool =
result = id.id == getIdent(name).id
let idAnon* = getIdent":anonymous"
var idAnon* = getIdent":anonymous"