make generic tests green again

This commit is contained in:
Andreas Rumpf
2018-08-13 12:54:02 +02:00
parent 9f31096870
commit 96e0b56a55

View File

@@ -103,7 +103,7 @@ proc DeleteItem[T,D] (n: PNode[T,D], x: int): PNode[T,D] {.inline.} =
else :
result = n.left
n.slots = nil
n.slots = @[]
n.left = nil
proc internalDelete[T,D] (ANode: PNode[T,D], key: T, Avalue: var D): PNode[T,D] =
@@ -200,7 +200,7 @@ proc traceTree[T,D](root: PNode[T,D]) =
traceln(space)
write stdout, "left: "
doTrace(n.left, level+1)
for i, el in n.slots :
for i, el in n.slots:
if el != nil and not isClean(el):
traceln(space)
traceX(i)