Merge pull request #3243 from yglukhov/gctest-fix

Don't access GCed field in finalizer. Fixes #2305
This commit is contained in:
Andreas Rumpf 2015-08-25 11:06:53 +02:00
commit 0a1c5727ee

View file

@ -63,12 +63,11 @@ proc caseTree(lvl: int = 0): PCaseNode =
if lvl == 3: result = newCaseNode("data item")
else: result = newCaseNode(caseTree(lvl+1), caseTree(lvl+1))
proc finalizeBNode(n: TBNode) = writeLine(stdout, n.data)
proc finalizeNode(n: PNode) =
assert(n != nil)
write(stdout, "finalizing: ")
if isNil(n.data): writeLine(stdout, "nil!")
else: writeLine(stdout, n.data)
else: writeLine(stdout, "not nil")
var
id: int = 1