From 4ac4141741214fe6e97fb2ebe405d36228aea596 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Wed, 17 Apr 2024 09:34:07 +0100 Subject: Guard against signaling the error condition not working As this seems to happen when the process runs out of file descriptors.q --- guix-build-coordinator/utils/fibers.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/guix-build-coordinator/utils/fibers.scm b/guix-build-coordinator/utils/fibers.scm index a89f9ab..5362b18 100644 --- a/guix-build-coordinator/utils/fibers.scm +++ b/guix-build-coordinator/utils/fibers.scm @@ -298,7 +298,11 @@ If already in the worker thread, call PROC immediately." (simple-format (current-error-port) "port monitoring fiber failed to connect to ~A: ~A\n" port exn) - (signal-condition! error-condition)) + (signal-condition! error-condition) + (sleep 10) + (simple-format (current-error-port) + "port monitoring fiber error-condition unresponsive") + (primitive-exit 1)) (lambda () (with-fibers-port-timeouts (lambda () -- cgit v1.2.3