me/guix
Archived
1
0
Fork 0
Code Activity

services: guix-build-coordinator: Support extra environment vars.

Browse source 
I'm looking at this because I need to do some debugging of Guile's GC, and
there are some useful environment variables for that, but it should be
generally useful.

* gnu/services/guix.scm (guix-build-coordinator-configuration-extra-environment-variables):
New procedure.
(guix-build-coordinator-shepherd-services): Pass the environment variables to
the shepherd.
* doc/guix.texi (Guix Services): Document it.
This commit is contained in:
Christopher Baines 2023-05-09 16:16:54 +01:00
parent c1ffe2f21b
commit a759cbffaf
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
2 changed files with 12 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
doc/guix.texi
View file

@ -37222,6 +37222,9 @@ for the hook and the value is the number of threads to run.
@item @code{guile} (default: @code{guile-3.0-latest}) @item @code{guile} (default: @code{guile-3.0-latest})
The Guile package with which to run the Guix Build Coordinator. The Guile package with which to run the Guix Build Coordinator.
@item @code{extra-environment-variables} (default: @var{'()})
Extra environment variables to set via the shepherd service.
@end table @end table
@end deftp @end deftp

12
gnu/services/guix.scm
View file

@ -48,6 +48,7 @@
guix-build-coordinator-configuration-hooks guix-build-coordinator-configuration-hooks
guix-build-coordinator-configuration-parallel-hooks guix-build-coordinator-configuration-parallel-hooks
guix-build-coordinator-configuration-guile guix-build-coordinator-configuration-guile
guix-build-coordinator-configuration-extra-environment-variables
guix-build-coordinator-service-type guix-build-coordinator-service-type
@ -171,7 +172,10 @@
(parallel-hooks guix-build-coordinator-configuration-parallel-hooks (parallel-hooks guix-build-coordinator-configuration-parallel-hooks
(default '())) (default '()))
(guile guix-build-coordinator-configuration-guile (guile guix-build-coordinator-configuration-guile
(default guile-3.0-latest))) (default guile-3.0-latest))
(extra-environment-variables
guix-build-coordinator-configuration-extra-environment-variables
(default '())))
(define-record-type* <guix-build-coordinator-agent-configuration> (define-record-type* <guix-build-coordinator-agent-configuration>
guix-build-coordinator-agent-configuration guix-build-coordinator-agent-configuration
@ -331,7 +335,8 @@
allocation-strategy allocation-strategy
hooks hooks
parallel-hooks parallel-hooks
guile) guile
extra-environment-variables)
(list (list
(shepherd-service (shepherd-service
(documentation "Guix Build Coordinator") (documentation "Guix Build Coordinator")
@ -362,7 +367,8 @@
`(,(string-append `(,(string-append
"GUIX_LOCPATH=" #$glibc-utf8-locales "/lib/locale") "GUIX_LOCPATH=" #$glibc-utf8-locales "/lib/locale")
"LC_ALL=en_US.utf8" "LC_ALL=en_US.utf8"
"PATH=/run/current-system/profile/bin") ; for hooks "PATH=/run/current-system/profile/bin" ; for hooks
#$@extra-environment-variables)
#:log-file "/var/log/guix-build-coordinator/coordinator.log") #:log-file "/var/log/guix-build-coordinator/coordinator.log")
args)))) args))))
(stop #~(make-kill-destructor)) (stop #~(make-kill-destructor))