[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/63: gnu: commencement: Add %bootstrap-guile+guild.
From: |
guix-commits |
Subject: |
03/63: gnu: commencement: Add %bootstrap-guile+guild. |
Date: |
Mon, 17 Feb 2020 16:00:50 -0500 (EST) |
janneke pushed a commit to branch wip-bootstrap
in repository guix.
commit 44615d063931a9c3f9eb104a79e62db83f03c452
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 wip-bootstrap created (now ef7e1b3), guix-commits, 2020/02/17
- 02/63: gnu: bootstrap: Add janneke's guix package url., guix-commits, 2020/02/17
- 01/63: gnu: Add gash-core-utils., guix-commits, 2020/02/17
- 03/63: gnu: commencement: Add %bootstrap-guile+guild.,
guix-commits <=
- 04/63: gnu: commencement: Add gash-boot., guix-commits, 2020/02/17
- 05/63: gnu: commencement: Add gash-core-utils-boot., guix-commits, 2020/02/17
- 08/63: gnu: commencement: tcc-boot0: Use Gash instead of coretutils&co., guix-commits, 2020/02/17
- 11/63: gnu: commencement: Add bzip2-mesboot., guix-commits, 2020/02/17
- 09/63: gnu: commencement: Add gzip-mesboot., guix-commits, 2020/02/17
- 10/63: gnu: commencement: make-mesboot0: Use Gash instead of coreutils&co., guix-commits, 2020/02/17
- 12/63: gnu: commencement: Add bash-mesboot0., guix-commits, 2020/02/17
- 19/63: gnu: commencement: Add gawk-mesboot0., guix-commits, 2020/02/17
- 24/63: gnu: commencement: Add grep-mesboot., guix-commits, 2020/02/17
- 06/63: gnu: commencement: Add %bootstrap-mes-rewired., guix-commits, 2020/02/17