aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-06-25 00:37:17 +0100
committerChristopher Baines <mail@cbaines.net>2020-06-25 00:37:17 +0100
commit677d2b8821d9bbb1ab2fb1a05cddd35b3786afa3 (patch)
tree3b1919d6beeba061dbcd388c1c886a4b8aa88278 /guix-build-coordinator
parent8e0bb453df7e15fccb6316be703d4196cd18f34d (diff)
downloadbuild-coordinator-677d2b8821d9bbb1ab2fb1a05cddd35b3786afa3.tar
build-coordinator-677d2b8821d9bbb1ab2fb1a05cddd35b3786afa3.tar.gz
Add a timeout for allocations
As I think the allocation process could be hanging for some reason.
Diffstat (limited to 'guix-build-coordinator')
-rw-r--r--guix-build-coordinator/coordinator.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm
index f76c783..9677e74 100644
--- a/guix-build-coordinator/coordinator.scm
+++ b/guix-build-coordinator/coordinator.scm
@@ -239,7 +239,10 @@
(force-output)))
(raise-exception exn))
(lambda ()
- (allocate-builds build-coordinator)
+ (with-timeout (* 1000 60 10) ; 10 minutes
+ (raise-exception
+ (make-exception-with-message "timeout allocating builds"))
+ (allocate-builds build-coordinator))
(metric-increment success-counter-metric))))
#:unwind? #t))))))