Fix gc tests for BoehmGC (#7094)

This commit is contained in:
Sergey Avseyev 2018-01-18 11:04:32 +03:00 • committed by Andreas Rumpf
commit d9c922fc70
3 changed files with 3 additions and 6 deletions

View file

@ -13,11 +13,10 @@ proc MakeObj(): TTestObj =
result.x = "Hello"
for i in 1 .. 1_000_000:
when defined(gcMarkAndSweep):
when defined(gcMarkAndSweep) or defined(boehmgc):
GC_fullcollect()
var obj = MakeObj()
if getOccupiedMem() > 300_000: quit("still a leak!")
# echo GC_getstatistics()
echo "no leak: ", getOccupiedMem()