diff options
author | Mathieu Othacehe <m.othacehe@gmail.com> | 2019-12-31 11:04:51 +0100 |
---|---|---|
committer | Mathieu Othacehe <m.othacehe@gmail.com> | 2019-12-31 11:04:51 +0100 |
commit | ce9383c090fff90acb3a555d0ccfe12d791fef17 (patch) | |
tree | 7b9cce156799486b94e4f3e55b03831638e73465 /gnu/packages/lisp.scm | |
parent | 91be09de61c277d0f1b26cefcefcd0a7fae2e00d (diff) | |
parent | fc4eb87dc45b169e3912c73bbf60cb8ce76b7c7c (diff) | |
download | guix-patches-ce9383c090fff90acb3a555d0ccfe12d791fef17.tar guix-patches-ce9383c090fff90acb3a555d0ccfe12d791fef17.tar.gz |
Merge remote-tracking branch 'master' into core-updates.
Diffstat (limited to 'gnu/packages/lisp.scm')
-rw-r--r-- | gnu/packages/lisp.scm | 64 |
1 files changed, 48 insertions, 16 deletions
diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm index d51b9a3662..a3ac957f63 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: @@ -741,7 +773,7 @@ enough to play the original mainframe Zork all the way through.") (define-public txr (package (name "txr") - (version "224") + (version "230") (source (origin (method git-fetch) @@ -752,7 +784,7 @@ enough to play the original mainframe Zork all the way through.") (patches (search-patches "txr-shell.patch")) (sha256 (base32 - "1036k71f6mffy9rjwzmhr5nnp1n0wzb0rqvilpzvb8jc5yxv0810")))) + "1ma6nbqsnl4f8ndh47zzc8n5vzcny66v0z3ndddgm3g0bqaxzjzm")))) (build-system gnu-build-system) (arguments '(#:configure-flags '("cc=gcc") |