[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: sbcl: Update to 1.5.9.
From: |
guix-commits |
Subject: |
01/01: gnu: sbcl: Update to 1.5.9. |
Date: |
Thu, 19 Dec 2019 13:12:49 -0500 (EST) |
ambrevar pushed a commit to branch master
in repository guix.
commit edf8152563a898438708ec9b2b17284a9d55d271
Author: Pierre Neidhardt <address@hidden>
Date: Thu Dec 19 19:09:34 2019 +0100
gnu: sbcl: Update to 1.5.9.
* gnu/packages/lisp.scm (sbcl-boot0): New variable.
Build 1.5.8 against CLISP.
(sbcl): Build versions >= 1.5.9 against sbcl-boot0.
---
gnu/packages/lisp.scm | 60 +++++++++++++++++++++++++++++++++++++++------------
1 file changed, 46 insertions(+), 14 deletions(-)
diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index e2732a4..79721d5 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -74,6 +74,7 @@
#:use-module (gnu packages texinfo)
#:use-module (gnu packages version-control)
#:use-module (gnu packages xorg)
+ #:use-module (srfi srfi-1)
#:use-module (ice-9 match))
(define (asdf-substitutions lisp)
@@ -318,9 +319,9 @@ high-level, object-oriented functional programming
language. CLISP includes
an interpreter, a compiler, a debugger, and much more.")
(license license:gpl2+)))
-(define-public sbcl
+(define sbcl-boot0
(package
- (name "sbcl")
+ (name "sbcl-boot0")
(version "1.5.8")
(source
(origin
@@ -357,13 +358,8 @@ an interpreter, a compiler, a debugger, and much more.")
;; 2019-09-05, ECL was last updated in 2016 while CLISP was last updated
;; in 2010.
;;
- ;; For now we stick to CLISP for all systems. We keep the `match' here to
- ;; make it easier to change the host compiler for various architectures.
- `(,@(match (%current-system)
- ((or "x86_64-linux" "i686-linux")
- `(("clisp" ,clisp)))
- (_
- `(("clisp" ,clisp))))
+ ;; For now we stick to CLISP for all systems.
+ `(("clisp" ,clisp)
("which" ,which)
("inetutils" ,inetutils) ;for hostname(1)
("ed" ,ed)
@@ -431,11 +427,7 @@ an interpreter, a compiler, a debugger, and much more.")
(replace 'build
(lambda* (#:key outputs #:allow-other-keys)
(setenv "CC" "gcc")
- (invoke "sh" "make.sh" ,@(match (%current-system)
- ((or "x86_64-linux" "i686-linux")
- `("clisp"))
- (_
- `("clisp")))
+ (invoke "sh" "make.sh" "clisp"
(string-append "--prefix="
(assoc-ref outputs "out"))
"--with-sb-core-compression"
@@ -493,6 +485,46 @@ statistical profiler, a code coverage tool, and many other
extensions.")
(license (list license:public-domain license:bsd-2
(license:x11-style "file://src/code/loop.lisp")))))
+(define-public sbcl
+ ;; Since 1.5.9, SBCL requires itself to build.
+ ;; See https://bugs.launchpad.net/sbcl/+bug/1855272.
+ (package
+ (inherit sbcl-boot0)
+ (name "sbcl")
+ (version "1.5.9")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "mirror://sourceforge/sbcl/sbcl/" version "/sbcl-"
+ version "-source.tar.bz2"))
+ (sha256
+ (base32 "1dmrlklil7x3j68mwmjfpd71vkphr24s4rx6d61jpc54x0jhvnyb"))
+ (modules '((guix build utils)))
+ (snippet
+ ;; Add sbcl-bundle-systems to 'default-system-source-registry'.
+ `(begin
+ (substitute* "contrib/asdf/asdf.lisp"
+ ,@(asdf-substitutions name))
+ #t))))
+ (build-system gnu-build-system)
+ (outputs '("out" "doc"))
+ (native-inputs
+ `(("sbcl" ,sbcl-boot0)
+ ,@(fold alist-delete (package-native-inputs sbcl-boot0)
+ '("clisp"))))
+ (arguments
+ (substitute-keyword-arguments (package-arguments sbcl-boot0)
+ ((#:phases phases)
+ `(modify-phases ,phases
+ (replace 'build
+ (lambda* (#:key outputs #:allow-other-keys)
+ (setenv "CC" "gcc")
+ (invoke "sh" "make.sh" "sbcl"
+ (string-append "--prefix="
+ (assoc-ref outputs "out"))
+ "--with-sb-core-compression"
+ "--with-sb-xref-for-internals")))))))))
+
(define-public ccl
;; Warning: according to upstream, CCL is not bootstrappable.
;; See https://github.com/Clozure/ccl/issues/222 from 2019-09-02: