Respect use-default-io-waiters? for the fixed size thread pools

This commit is contained in:
Christopher Baines 2025-05-25 15:34:07 +01:00
parent 016f37f108
commit cbafdb8668

View file

@ -371,7 +371,11 @@ from there, or #f if that would be an empty string."
(for-each
(lambda (i)
(start-thread i channel))
(if use-default-io-waiters?
(call-with-default-io-waiters
(lambda ()
(start-thread i channel)))
(start-thread i channel)))
(iota size))
(fixed-size-thread-pool channel