make tests green again

This commit is contained in:
Andreas Rumpf 2018-07-05 15:51:04 +02:00
commit 0926754e68
31 changed files with 61 additions and 55 deletions

View file

@ -6,11 +6,11 @@ when defined(GC_setMaxPause):
GC_setMaxPause 2_000
type
TTestObj = object of TObject
TTestObj = object of RootObj
x: string
s: seq[int]
proc MakeObj(): TTestObj =
proc makeObj(): TTestObj =
result.x = "Hello"
result.s = @[1,2,3]
@ -19,7 +19,7 @@ proc inProc() =
when defined(gcMarkAndSweep) or defined(boehmgc):
GC_fullcollect()
var obj: TTestObj
obj = MakeObj()
obj = makeObj()
if getOccupiedMem() > 300_000: quit("still a leak!")
inProc()