tests/gc/gcleak5.nim


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

discard """
  output: "success"
"""

import os, times

proc main =
  var i = 0
  for ii in 0..50_000:
    #while true:
    var t = getTime()
    var g = t.getGMTime()
    #echo isOnStack(addr g)
    
    if i mod 100 == 0:
      let om = getOccupiedMem()
      #echo "memory: ", om
      if om > 100_000: quit "leak"
     
    inc(i)
    sleep(1)

  echo "success"

main()