1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-27 12:40:32 +02:00

gnu: gnu-make-mesboot: Improve style.

* gnu/packages/commencement.scm (gnu-make-mesboot)[arguments]: Improve
style, use G-expressions.

Change-Id: Ibfa1658e641be2bfb36b40c2f88c0194bceda470
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Nicolas Graves
2026-02-17 15:31:31 +01:00
committed by Ludovic Courtès
parent 6a73e41b81
commit e01cd762c6

View File

@@ -1263,20 +1263,19 @@ ac_cv_c_float_format='IEEE (little-endian)'
(inputs '())
(propagated-inputs '())
(arguments
`(#:implicit-inputs? #f
#:parallel-build? #f
#:guile ,%bootstrap-guile
#:configure-flags '("LIBS=-lc -lnss_files -lnss_dns -lresolv")
#:phases
(modify-phases %standard-phases
(replace 'check
(lambda _
(invoke "./make" "--version")))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")))
(install-file "make" bin)))))))))
(list
#:implicit-inputs? #f
#:parallel-build? #f
#:guile %bootstrap-guile
#:configure-flags #~(list "LIBS=-lc -lnss_files -lnss_dns -lresolv")
#:phases
#~(modify-phases %standard-phases
(replace 'check
(lambda _
(invoke "./make" "--version")))
(replace 'install
(lambda _
(install-file "make" (string-append #$output "/bin")))))))))
(define (%boot-mesboot1-inputs)
`(("binutils" ,binutils-mesboot1)