aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2025-02-16 16:00:29 +0000
committerChristopher Baines <mail@cbaines.net>2025-02-16 16:02:27 +0000
commit841673840991287c79f7c73c7d693164b3e89ad7 (patch)
tree651713cbdc5666ea07dff630007daa1c10b539f2
parent796bc02b47318aafe00d8e8e56609afbb626408c (diff)
downloadguix-841673840991287c79f7c73c7d693164b3e89ad7.tar.gz
guix-841673840991287c79f7c73c7d693164b3e89ad7.zip
gnu: guix-build-coordinator: Add the listen-repl configuration.
* gnu/services/guix.scm (<guix-build-coordinator-configuration>): Add listen-repl. (guix-build-coordinator-configuration-listen-repl): New procedure. (make-guix-build-coordinator-start-script, guix-build-coordinator-shepherd-services): Use listen-repl. * doc/guix.texi (Guix Services): Document listen-repl. Change-Id: I49cac7cd3c4675f6ffed71320bb61dc7b008179a
-rw-r--r--doc/guix.texi4
-rw-r--r--gnu/services/guix.scm11
2 files changed, 13 insertions, 2 deletions
diff --git a/doc/guix.texi b/doc/guix.texi
index f8b3022ccf..93b0ad113b 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -40612,6 +40612,10 @@ Hooks can be configured to run in parallel. This parameter is an
association list of hooks to do in parallel, where the key is the symbol
for the hook and the value is the number of threads to run.
+@item @code{listen-repl} (default: @var{#f})
+Port or filename to spawn a REPL listening on, pass @code{#t} to listen
+on the default port or @code{#f} to disable.
+
@item @code{guile} (default: @code{guile-3.0-latest})
The Guile package with which to run the Guix Build Coordinator.
diff --git a/gnu/services/guix.scm b/gnu/services/guix.scm
index b6011bd3dc..86a1e1bf52 100644
--- a/gnu/services/guix.scm
+++ b/gnu/services/guix.scm
@@ -48,6 +48,7 @@
guix-build-coordinator-configuration-allocation-strategy
guix-build-coordinator-configuration-hooks
guix-build-coordinator-configuration-parallel-hooks
+ guix-build-coordinator-configuration-listen-repl
guix-build-coordinator-configuration-guile
guix-build-coordinator-configuration-extra-environment-variables
@@ -176,6 +177,8 @@
(default '()))
(parallel-hooks guix-build-coordinator-configuration-parallel-hooks
(default '()))
+ (listen-repl guix-build-coordinator-configuration-listen-repl
+ (default #f))
(guile guix-build-coordinator-configuration-guile
(default guile-next))
(extra-environment-variables
@@ -255,7 +258,8 @@
client-communication-uri-string
(hooks '())
(parallel-hooks '())
- (guile guile-next))
+ (guile guile-next)
+ listen-repl)
(program-file
"start-guix-build-coordinator"
(with-extensions (cons guix-build-coordinator-package
@@ -311,7 +315,8 @@
#:parallel-hooks (list #$@(map (match-lambda
((name . val)
#~(cons '#$name #$val)))
- parallel-hooks))))))
+ parallel-hooks))
+ #:listen-repl #$listen-repl))))
#:guile guile))
(define (guix-build-coordinator-shepherd-services config)
@@ -322,6 +327,7 @@
allocation-strategy
hooks
parallel-hooks
+ listen-repl
guile
extra-environment-variables)
(list
@@ -344,6 +350,7 @@
client-communication-uri-string
#:hooks hooks
#:parallel-hooks parallel-hooks
+ #:listen-repl listen-repl
#:guile guile))
#:user #$user
#:group #$group