GC tests: make them take less time to save CI cycles

This commit is contained in:
Andreas Rumpf
2019-01-19 12:47:44 +01:00
parent f7c0360aba
commit 9985706fb8
2 changed files with 5 additions and 7 deletions

View File

@@ -12,7 +12,7 @@ type
proc makeObj(): TTestObj =
result.x = "Hello"
for i in 1 .. 1_000_000:
for i in 1 .. 100_000:
when defined(gcMarkAndSweep) or defined(boehmgc):
GC_fullcollect()
var obj = makeObj()

View File

@@ -10,15 +10,13 @@ import lists
import strutils
proc mkleak() =
# allocate 10 MB via linked lists
# allocate 1 MB via linked lists
let numberOfLists = 100
for i in countUp(1, numberOfLists):
var leakList = initDoublyLinkedList[string]()
let numberOfLeaks = 50000
let numberOfLeaks = 5000
for j in countUp(1, numberOfLeaks):
let leakSize = 200
let leaked = newString(leakSize)
leakList.append(leaked)
leakList.append(newString(200))
proc mkManyLeaks() =
for i in 0..0:
@@ -29,7 +27,7 @@ proc mkManyLeaks() =
# lists and bring the memory usage down to a few MB's.
GC_fullCollect()
when false: echo getOccupiedMem()
if getOccupiedMem() > 8 * 200 * 50_000 * 2:
if getOccupiedMem() > 8 * 200 * 5000 * 2:
echo GC_getStatistics()
quit "leaking"
echo "Success"