aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/coordinator.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-build-coordinator/coordinator.scm')
-rw-r--r--guix-build-coordinator/coordinator.scm10
1 files changed, 8 insertions, 2 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm
index b39c4d1..edfc1ef 100644
--- a/guix-build-coordinator/coordinator.scm
+++ b/guix-build-coordinator/coordinator.scm
@@ -68,6 +68,7 @@
build-coordinator-metrics-registry
build-coordinator-allocation-strategy
build-coordinator-logger
+ build-coordinator-scheduler
build-coordinator-listen-for-events
build-coordinator-get-state-id
@@ -476,7 +477,11 @@
(format
(current-error-port)
"warning: substitutes channel delayed by ~1,2f seconds~%"
- seconds-delayed))))))
+ seconds-delayed)))))
+
+ (output-hash-channel
+ (make-output-hash-channel
+ build-coordinator)))
(let ((finished? (make-condition)))
(call-with-sigint
@@ -521,7 +526,8 @@
host
secret-key-base
build-coordinator
- chunked-request-channel)
+ chunked-request-channel
+ output-hash-channel)
(log-msg 'INFO "listening on " host ":" port))))
;; Start the client messaging server