blob: 5e146d69f0ca748a4b040656ef087c5813f3b66e (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
discard """
outputsub: "no leak: "
"""
when defined(GC_setMaxPause):
GC_setMaxPause 2_000
type
TSomething = object
s: string
s1: string
var s: seq[TSomething] = @[]
for i in 0..1024:
var obj: TSomething
obj.s = "blah"
obj.s1 = "asd"
s.add(obj)
proc limit*[t](a: var seq[t]) =
while s.len > 0:
if getOccupiedMem() > 3000_000: quit("still a leak!")
s.delete(0)
s.limit()
echo "no leak: ", getOccupiedMem()
|