diff options
author | Christopher Baines <mail@cbaines.net> | 2025-02-16 16:00:29 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2025-02-16 16:02:27 +0000 |
commit | 841673840991287c79f7c73c7d693164b3e89ad7 (patch) | |
tree | 651713cbdc5666ea07dff630007daa1c10b539f2 | |
parent | 796bc02b47318aafe00d8e8e56609afbb626408c (diff) | |
download | guix-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.texi | 4 | ||||
-rw-r--r-- | gnu/services/guix.scm | 11 |
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 |