diff options
Diffstat (limited to 'tests/osproc/twaitforexit.nim')
-rw-r--r-- | tests/osproc/twaitforexit.nim | 17 |
1 files changed, 16 insertions, 1 deletions
diff --git a/tests/osproc/twaitforexit.nim b/tests/osproc/twaitforexit.nim index 5db8d2566..67caa4165 100644 --- a/tests/osproc/twaitforexit.nim +++ b/tests/osproc/twaitforexit.nim @@ -15,4 +15,19 @@ block: # bug #5091 discard # check that we don't have to wait msWait milliseconds - doAssert(getTime() < atStart + milliseconds(msWait)) \ No newline at end of file + doAssert(getTime() < atStart + milliseconds(msWait)) + +block: # bug #23825 + var thr: array[0..99, Thread[int]] + + proc threadFunc(i: int) {.thread.} = + let sleepTime = float(i) / float(thr.len + 1) + doAssert sleepTime < 1.0 + let p = startProcess("sleep", workingDir = "", args = @[$sleepTime], options = {poUsePath, poParentStreams}) + # timeout = 1_000_000 seconds ~= 278 hours ~= 11.5 days + doAssert p.waitForExit(timeout=1_000_000_000) == 0 + + for i in low(thr)..high(thr): + createThread(thr[i], threadFunc, i) + + joinThreads(thr) |