File: tracy_allocator.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-- 478 bytes parent folder | download 
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 """
  disabled: i386
  output: '''true'''
"""

var somethingElse {.threadvar.}: ref string

type MyThread = Thread[void]

proc asyncThread() {.thread.} =
  new somethingElse

var threads = newSeq[ptr Thread[void]](8)

for c in 1..1_000:
  #echo "Test " & $c
  for i in 0..<threads.len:
    var t = cast[ptr Thread[void]](alloc0(sizeof(MyThread)))
    threads[i] = t
    createThread(t[], asyncThread)

  for t in threads:
    joinThread(t[])
    dealloc(t)

echo "true"