diff --git a/gnu/packages/make-bootstrap.scm b/gnu/packages/make-bootstrap.scm index bf76d5052f..ef6ea52d6e 100644 --- a/gnu/packages/make-bootstrap.scm +++ b/gnu/packages/make-bootstrap.scm @@ -94,13 +94,13 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." (mlambdaq (glibc) "Return a variant of GCC that uses the bootstrap variant of GLIBC." (package - (inherit gcc-5) + (inherit gcc-7) (outputs '("out")) ;all in one so libgcc_s is easily found (inputs `( ;; Distinguish the name so we can refer to it below. ("bootstrap-libc" ,(glibc-for-bootstrap glibc)) ("libc:static" ,(glibc-for-bootstrap glibc) "static") - ,@(package-inputs gcc-5)))))) + ,@(package-inputs gcc-7)))))) (define (package-with-relocatable-glibc p) "Return a variant of P that uses the libc as defined by @@ -139,7 +139,7 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." (cons (search-path-specification (variable "CROSS_CPLUS_INCLUDE_PATH") (files '("include"))) - (package-search-paths gcc-5))))) + (package-search-paths gcc-7))))) ("cross-binutils" ,(cross-binutils target)) ,@(%final-inputs))) `(("libc" ,(glibc-for-bootstrap glibc)) @@ -461,11 +461,11 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." (define %gcc-static ;; A statically-linked GCC, with stripped-down functionality. (package-with-relocatable-glibc - (package (inherit gcc-5) + (package (inherit gcc-7) (name "gcc-static") (outputs '("out")) ; all in one (arguments - (substitute-keyword-arguments (package-arguments gcc-5) + (substitute-keyword-arguments (package-arguments gcc-7) ((#:modules modules %gnu-build-system-modules) `((srfi srfi-1) (srfi srfi-26) @@ -515,8 +515,8 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." #t)))))) (inputs `(("zlib:static" ,zlib "static") - ("isl:static" ,isl-0.18 "static") - ,@(package-inputs gcc-5))) + ("isl:static" ,isl "static") + ,@(package-inputs gcc-7))) (native-inputs (if (%current-target-system) `(;; When doing a Canadian cross, we need GMP/MPFR/MPC both @@ -529,12 +529,12 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." ("gmp-native" ,gmp) ("mpfr-native" ,mpfr) ("mpc-native" ,mpc) - ,@(package-native-inputs gcc-5)) - (package-native-inputs gcc-5)))))) + ,@(package-native-inputs gcc-7)) + (package-native-inputs gcc-7)))))) (define %gcc-stripped ;; The subset of GCC files needed for bootstrap. - (package (inherit gcc-5) + (package (inherit gcc-7) (name "gcc-stripped") (build-system trivial-build-system) (source #f) @@ -869,6 +869,10 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." ;; A tarball with the statically-linked, relocatable Guile. (tarball-package %guile-static-stripped)) +(define %guile-3.0-bootstrap-tarball + ;; A tarball with the statically-linked, relocatable Guile. + (tarball-package %guile-3.0-static-stripped)) + (define %mescc-tools-bootstrap-tarball ;; A tarball with statically-linked MesCC binary seed. (tarball-package %mescc-tools-static-stripped)) @@ -905,7 +909,7 @@ for `sh' in $PATH, and without nscd, and with static NSS modules." (find-files directory "\\.tar\\.")))) %build-inputs) #t))) - (inputs `(("guile-tarball" ,%guile-bootstrap-tarball) + (inputs `(("guile-tarball" ,%guile-3.0-bootstrap-tarball) ,@(match (or (%current-target-system) (%current-system)) ((or "i686-linux" "x86_64-linux") `(("bootstrap-mescc-tools" ,%mescc-tools-bootstrap-tarball)