diff options
| author | Efraim Flashner <efraim@flashner.co.il> | 2021-07-08 09:39:05 +0300 |
|---|---|---|
| committer | Efraim Flashner <efraim@flashner.co.il> | 2021-07-08 09:39:05 +0300 |
| commit | 49e2e75ced01a821c84eb776cf42a36664eaa834 (patch) | |
| tree | a077a70446fc1070d483a021e97ac59f77dcf7ac | |
| parent | e48cff0965207c1abe2d6a71bd1277d8cc46e7c7 (diff) | |
gnu: %guile-3.0-static-stripped: Rename to %guile-static-stripped.
* gnu/packages/make-bootstrap.scm (%guile-3.0-static-stripped): Rename
to %guile-static-stripped.
(%guile-bootstrap-tarball): Adjust accordingly.
* gnu/system/linux-initrd.scm (expression->initrd): Use
%guile-static-stripped as default guile.
* doc/guix.texi (initial RAM disk)[expression->initrd]: Adjust
documentation accordingly.
| -rw-r--r-- | doc/guix.texi | 2 | ||||
| -rw-r--r-- | gnu/packages/make-bootstrap.scm | 6 | ||||
| -rw-r--r-- | gnu/system/linux-initrd.scm | 4 |
3 files changed, 6 insertions, 6 deletions
diff --git a/doc/guix.texi b/doc/guix.texi index e11f7adebb7..18bc6004401 100644 --- a/doc/guix.texi +++ b/doc/guix.texi | |||
| @@ -32775,7 +32775,7 @@ program. That gives a lot of flexibility. The | |||
| 32775 | program to run in that initrd. | 32775 | program to run in that initrd. |
| 32776 | 32776 | ||
| 32777 | @deffn {Scheme Procedure} expression->initrd @var{exp} @ | 32777 | @deffn {Scheme Procedure} expression->initrd @var{exp} @ |
| 32778 | [#:guile %guile-3.0-static-stripped] [#:name "guile-initrd"] | 32778 | [#:guile %guile-static-stripped] [#:name "guile-initrd"] |
| 32779 | Return as a file-like object a Linux initrd (a gzipped cpio archive) | 32779 | Return as a file-like object a Linux initrd (a gzipped cpio archive) |
| 32780 | containing @var{guile} and that evaluates @var{exp}, a G-expression, | 32780 | containing @var{guile} and that evaluates @var{exp}, a G-expression, |
| 32781 | upon booting. All the derivations referenced by @var{exp} are | 32781 | upon booting. All the derivations referenced by @var{exp} are |
diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scm index d66acc2e705..cdcb1dcaa29 100644 --- a/gnu/packages/make-bootstrap.scm +++ b/gnu/packages/make-bootstrap.scm | |||
| @@ -55,7 +55,7 @@ | |||
| 55 | %mes-bootstrap-tarball | 55 | %mes-bootstrap-tarball |
| 56 | %bootstrap-tarballs | 56 | %bootstrap-tarballs |
| 57 | 57 | ||
| 58 | %guile-3.0-static-stripped)) | 58 | %guile-static-stripped)) |
| 59 | 59 | ||
| 60 | ;;; Commentary: | 60 | ;;; Commentary: |
| 61 | ;;; | 61 | ;;; |
| @@ -798,7 +798,7 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." | |||
| 798 | (outputs '("out")) | 798 | (outputs '("out")) |
| 799 | (synopsis "Minimal statically-linked and relocatable Guile"))) | 799 | (synopsis "Minimal statically-linked and relocatable Guile"))) |
| 800 | 800 | ||
| 801 | (define %guile-3.0-static-stripped | 801 | (define %guile-static-stripped |
| 802 | ;; A stripped static Guile 3.0 binary, for use in initrds | 802 | ;; A stripped static Guile 3.0 binary, for use in initrds |
| 803 | ;; and during bootstrap. | 803 | ;; and during bootstrap. |
| 804 | (make-guile-static-stripped | 804 | (make-guile-static-stripped |
| @@ -863,7 +863,7 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." | |||
| 863 | 863 | ||
| 864 | (define %guile-bootstrap-tarball | 864 | (define %guile-bootstrap-tarball |
| 865 | ;; A tarball with the statically-linked, relocatable Guile. | 865 | ;; A tarball with the statically-linked, relocatable Guile. |
| 866 | (tarball-package %guile-3.0-static-stripped)) | 866 | (tarball-package %guile-static-stripped)) |
| 867 | 867 | ||
| 868 | (define %mescc-tools-bootstrap-tarball | 868 | (define %mescc-tools-bootstrap-tarball |
| 869 | ;; A tarball with statically-linked MesCC binary seed. | 869 | ;; A tarball with statically-linked MesCC binary seed. |
diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm index c6ba9bb5605..8c245b8445d 100644 --- a/gnu/system/linux-initrd.scm +++ b/gnu/system/linux-initrd.scm | |||
| @@ -36,7 +36,7 @@ | |||
| 36 | #:use-module ((gnu packages xorg) | 36 | #:use-module ((gnu packages xorg) |
| 37 | #:select (console-setup xkeyboard-config)) | 37 | #:select (console-setup xkeyboard-config)) |
| 38 | #:use-module ((gnu packages make-bootstrap) | 38 | #:use-module ((gnu packages make-bootstrap) |
| 39 | #:select (%guile-3.0-static-stripped)) | 39 | #:select (%guile-static-stripped)) |
| 40 | #:use-module (gnu system file-systems) | 40 | #:use-module (gnu system file-systems) |
| 41 | #:use-module (gnu system mapped-devices) | 41 | #:use-module (gnu system mapped-devices) |
| 42 | #:use-module (gnu system keyboard) | 42 | #:use-module (gnu system keyboard) |
| @@ -62,7 +62,7 @@ | |||
| 62 | 62 | ||
| 63 | (define* (expression->initrd exp | 63 | (define* (expression->initrd exp |
| 64 | #:key | 64 | #:key |
| 65 | (guile %guile-3.0-static-stripped) | 65 | (guile %guile-static-stripped) |
| 66 | (gzip gzip) | 66 | (gzip gzip) |
| 67 | (name "guile-initrd") | 67 | (name "guile-initrd") |
| 68 | (system (%current-system))) | 68 | (system (%current-system))) |
