jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix gc tests for BoehmGC (#7094)

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

3
tests/gc/gcleak.nim
View file

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

4
tests/gc/gcleak2.nim
View file

@ -16,7 +16,7 @@ proc MakeObj(): TTestObj =
proc inProc() = proc inProc() =
for i in 1 .. 1_000_000: for i in 1 .. 1_000_000:
when defined(gcMarkAndSweep): when defined(gcMarkAndSweep) or defined(boehmgc):
GC_fullcollect() GC_fullcollect()
var obj: TTestObj var obj: TTestObj
obj = MakeObj() obj = MakeObj()
@ -24,5 +24,3 @@ proc inProc() =
inProc() inProc()
echo "no leak: ", getOccupiedMem() echo "no leak: ", getOccupiedMem()

2
tests/gc/gcleak4.nim
View file

@ -38,7 +38,7 @@ proc newPlus(a, b: ref TExpr): ref TPlusExpr =
result.b = b result.b = b
result.op2 = $getOccupiedMem() result.op2 = $getOccupiedMem()
const Limit = when compileOption("gc", "markAndSweep"): 5*1024*1024 else: 500_000 const Limit = when compileOption("gc", "markAndSweep") or compileOption("gc", "boehm"): 5*1024*1024 else: 500_000
for i in 0..100_000: for i in 0..100_000:
var s: array[0..11, ref TExpr] var s: array[0..11, ref TExpr]