File: gcleak3.nim

package info (click to toggle)
nim 2.2.0-1
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 1,911,644 kB
  • sloc: sh: 24,603; ansic: 1,761; python: 1,492; makefile: 1,013; sql: 298; asm: 141; xml: 13
file content (26 lines) | stat: -rw-r--r-- 441 bytes parent folder | download | duplicates (3) 
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()