Don't timeout when trying to get stats for resource pools

This commit is contained in:
Christopher Baines 2025-06-28 19:42:31 +02:00
parent 53437cff14
commit 00a5a0a404

View file

@ -313,7 +313,7 @@ port. Also, the port used can be changed by passing the --port option.\n"
(spawn-fiber (spawn-fiber
(lambda () (lambda ()
(let* ((pool (resource-pool-timeout-error-pool exn)) (let* ((pool (resource-pool-timeout-error-pool exn))
(stats (resource-pool-stats pool))) (stats (resource-pool-stats pool #:timeout #f)))
(simple-format (current-error-port) (simple-format (current-error-port)
"resource pool timeout error: ~A, ~A\n" "resource pool timeout error: ~A, ~A\n"
pool pool