threadtests.nim

# createThread then .add -> crash
# .add then createThread -> some threads dont run
# pre .add all threads -> works 100%

import locks

var
  thr: seq[Thread[void]]
  L: Lock

proc threadFunc() {.thread.} =
  acquire(L)
  echo "exit"
  release(L)

initLock(L)

# # crashes:
# for i in 0 ..< 5:
#   var t: Thread[void]
#   createThread(t, threadFunc)
#   thr.add t

# # strange behavior, not all threads run:
# for i in 0 ..< 5:
#   var t: Thread[void]
#   thr.add t
#   createThread(t, threadFunc)

for i in 0 ..< 5:
  var t: Thread[void]
  thr.add t

for i in 0 ..< 5:
  createThread(thr[i], threadFunc)

joinThreads(thr)
echo "exit final"