[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/64: gnu: commencement: Add %bootstrap-guile+guild.
From: |
guix-commits |
Subject: |
03/64: gnu: commencement: Add %bootstrap-guile+guild. |
Date: |
Tue, 18 Feb 2020 01:17:58 -0500 (EST) |
janneke pushed a commit to branch core-updates
in repository guix.
commit 899c8f3afa6453ff250c6527ff439f536cd0aef1
Author: Jan Nieuwenhuizen <address@hidden>
AuthorDate: Mon Dec 2 19:11:23 2019 +0100
gnu: commencement: Add %bootstrap-guile+guild.
* gnu/packages/commencement.scm (%bootstrap-guile+guild): New variable.
---
gnu/packages/commencement.scm | 51 +++++++++++++++++++++++++++++++++++++++++++
1 file changed, 51 insertions(+)
diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index 89f9305..04502a4 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -81,6 +81,57 @@
;;;
;;; Code:
+(define %bootstrap-guile+guild
+ ;; This package combines %bootstrap-guile with guild, which is not included
+ ;; in %bootstrap-guile. Guild is needed to build gash-boot and
+ ;; gash-core-utils-boot because it is dependency of the Guile build system.
+ (package
+ (name "guile-bootstrap+guild")
+ (version "2.0")
+ (source (bootstrap-origin (package-source guile-2.0)))
+ (native-inputs `(("bash" ,(bootstrap-executable "bash" (%current-system)))
+ ("tar" ,(bootstrap-executable "tar" (%current-system)))
+ ("xz" ,(bootstrap-executable "xz" (%current-system)))
+ ("guile" ,%bootstrap-guile)))
+ (build-system trivial-build-system)
+ (arguments
+ `(#:guile ,%bootstrap-guile
+ #:modules ((guix build utils))
+ #:builder (begin
+ (use-modules (guix build utils))
+ (let ((guile-source (assoc-ref %build-inputs "source"))
+ (bin (string-append (getcwd) "/bin"))
+ (tar (assoc-ref %build-inputs "tar"))
+ (xz (assoc-ref %build-inputs "xz")))
+ (mkdir-p bin)
+ (setenv "PATH" bin)
+ (with-directory-excursion bin
+ (copy-file tar "tar")
+ (copy-file xz "xz")
+ (setenv "PATH" bin))
+ (let* ((out (assoc-ref %outputs "out"))
+ (out-bin (string-append out "/bin"))
+ (guile (assoc-ref %build-inputs "guile"))
+ (bash (assoc-ref %build-inputs "bash")))
+ (mkdir-p out-bin)
+ (with-directory-excursion out-bin
+ (symlink (string-append guile "/bin/guile")
+ "guile")
+ (invoke "tar" "--strip-components=2"
+ "-xvf" guile-source
+ (string-append "guile-"
+ ,(package-version guile-2.0)
+ "/meta/guild.in"))
+ (copy-file "guild.in" "guild")
+ (substitute* "guild"
+ (("#!/bin/sh") (string-append "#! " bash))
+ (("@installed_guile@") (string-append out-bin
"/guile")))
+ (chmod "guild" #o555)))))))
+ (synopsis "Bootstrap Guile plus Guild")
+ (description "Bootstrap Guile with added Guild")
+ (home-page #f)
+ (license (package-license guile-2.0))))
+
(define mes-boot
(package
(inherit mes)
- branch core-updates updated (ac83dc8 -> e157ed7), guix-commits, 2020/02/18
- 01/64: gnu: Add gash-core-utils., guix-commits, 2020/02/18
- 03/64: gnu: commencement: Add %bootstrap-guile+guild.,
guix-commits <=
- 02/64: gnu: bootstrap: Add janneke's guix package url., guix-commits, 2020/02/18
- 04/64: gnu: commencement: Add gash-boot., guix-commits, 2020/02/18
- 06/64: gnu: commencement: Add %bootstrap-mes-rewired., guix-commits, 2020/02/18
- 05/64: gnu: commencement: Add gash-core-utils-boot., guix-commits, 2020/02/18
- 07/64: gnu: commencement: mes-boot: Use Gash instead of coretutils&co., guix-commits, 2020/02/18
- 09/64: gnu: commencement: Add gzip-mesboot., guix-commits, 2020/02/18
- 12/64: gnu: commencement: Add bash-mesboot0., guix-commits, 2020/02/18
- 08/64: gnu: commencement: tcc-boot0: Use Gash instead of coretutils&co., guix-commits, 2020/02/18
- 10/64: gnu: commencement: make-mesboot0: Use Gash instead of coreutils&co., guix-commits, 2020/02/18
- 11/64: gnu: commencement: Add bzip2-mesboot., guix-commits, 2020/02/18