* [PATCH] gnu: Add SBCL.
@ 2015-02-14 22:42 Taylan Ulrich Bayırlı/Kammer
2015-02-14 23:50 ` Mark H Weaver
0 siblings, 1 reply; 4+ messages in thread
From: Taylan Ulrich Bayırlı/Kammer @ 2015-02-14 22:42 UTC (permalink / raw)
To: guix-devel
[-- Attachment #1: Type: text/plain, Size: 632 bytes --]
This wasn't as difficult as I feared but still caused some difficulties.
Most notably, the sb-executable module has been patched in such a way
that the executables it generates are only guaranteed work as long as
you still have the SBCL package which generated them in your store.
After it's garbage-collected, they will fail to run because they will
try running themselves with the /gnu/store/.../bin/sbcl that was used to
generate them. (Also they will contain a #!/.../bin/sh shebang pointing
to the Bash package that was input to the SBCL version they were
generated with; that Bash package could get garbage-collected too.)
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch --]
[-- Type: text/x-diff, Size: 5447 bytes --]
From 13388cb42a79d9a59597b3b8b38c7d65ac2ad68f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Taylan=20Ulrich=20Bay=C4=B1rl=C4=B1/Kammer?=
<taylanbayirli@gmail.com>
Date: Sat, 14 Feb 2015 19:04:12 +0100
Subject: [PATCH] gnu: Add SBCL.
* gnu/packages/lisp.scm (sbcl): New variable.
---
gnu/packages/lisp.scm | 89 ++++++++++++++++++++++++++++++++++++++++++++++++++-
1 file changed, 88 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index 26914a6..fe48f41 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -34,7 +34,9 @@
#:use-module (gnu packages libffi)
#:use-module (gnu packages libffcall)
#:use-module (gnu packages readline)
- #:use-module (gnu packages libsigsegv))
+ #:use-module (gnu packages libsigsegv)
+ #:use-module (gnu packages admin)
+ #:use-module (gnu packages ed))
(define-public gcl
(package
@@ -188,3 +190,88 @@ readline.")
;; a lot of gpl3+. (Also some parts are under non-copyleft licenses, such
;; as CLX by Texas Instruments.) In that case gpl3+ wins out.
(license license:gpl3+)))
+
+(define-public sbcl
+ (package
+ (name "sbcl")
+ (version "1.2.8")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "mirror://sourceforge/sbcl/sbcl/" version "/sbcl-"
+ version "-source.tar.bz2"))
+ (sha256
+ (base32 "0ab9lw056yf6y0rjmx3iirn5n59pmssqxf00fbmpyl6qsnpaja1d"))))
+ (build-system gnu-build-system)
+ ;; Bootstrap with CLISP.
+ (native-inputs
+ `(("clisp" ,clisp)
+ ("which" ,which)
+ ("inetutils" ,inetutils) ;for hostname(1)
+ ("ed" ,ed)))
+ (arguments
+ '(#:phases
+ (alist-delete
+ 'configure
+ (alist-cons-before
+ 'build 'patch-unix-tool-paths
+ (lambda* (#:key outputs inputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out"))
+ (bash (assoc-ref inputs "bash"))
+ (coreutils (assoc-ref inputs "coreutils"))
+ (ed (assoc-ref inputs "ed")))
+ (define (quoted-path input path)
+ (string-append "\"" input path "\""))
+ ;; Patch absolute paths in string literals. Note that this
+ ;; occurs in some .sh files too (which contain Lisp code).
+ (substitute* (find-files "." "\\.(lisp|sh)$")
+ (("\"/bin/sh\"") (quoted-path bash "/bin/sh"))
+ (("\"/usr/bin/env\"") (quoted-path coreutils "/usr/bin/env"))
+ (("\"/bin/cat\"") (quoted-path coreutils "/bin/cat"))
+ (("\"/bin/ed\"") (quoted-path ed "/bin/ed"))
+ (("\"/bin/echo\"") (quoted-path coreutils "/bin/echo"))
+ (("\"/bin/uname\"") (quoted-path coreutils "/bin/uname")))
+ ;; This one script has a non-string occurrence of /bin/sh.
+ (substitute* '("tests/foreign.test.sh")
+ ;; Leave whitespace so we don't match the shebang.
+ ((" /bin/sh ") " sh "))
+ ;; This file contains a module that can create executable files
+ ;; which depend on the presence of SBCL. It generates shell
+ ;; scripts doing "exec sbcl ..." to achieve this. We patch both
+ ;; the shebang and the reference to "sbcl", tying the generated
+ ;; executables to the exact SBCL package that generated them.
+ (substitute* '("contrib/sb-executable/sb-executable.lisp")
+ (("/bin/sh") (string-append bash "/bin/sh"))
+ (("exec sbcl") (string-append "exec " out "/bin/sbcl")))))
+ (alist-replace
+ 'build
+ (lambda _
+ (setenv "CC" "gcc")
+ ;; Note: this will run tests as well, of which there are 5 total
+ ;; expected failures: GET-PROTOCOL-BY-NAME/ERROR (because there is
+ ;; no /etc/protocols file), GETPWUID, GETPWNAM, GETGRID, GETGRNAM
+ ;; (because certain common users and groups which the tests assume
+ ;; to exist don't exist in the build environment). These failures
+ ;; won't make the build process fail so we just leave them be.
+ (system* "sh" "make.sh" "clisp"))
+ (alist-replace
+ 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (setenv "INSTALL_ROOT" out)
+ (system* "sh" "install.sh")
+ (wrap-program (string-append out "/bin/sbcl")
+ `("SBCL_HOME" = ,(list (string-append out "/lib/sbcl"))))))
+ %standard-phases))))
+ ;; No 'check' target, though "make.sh" (build phase) runs tests.
+ #:tests? #f))
+ (home-page "http://www.sbcl.org/")
+ (synopsis "Common Lisp implementation")
+ (description "Steel Bank Common Lisp (SBCL) is a high performance Common
+Lisp compiler. In addition to the compiler and runtime system for ANSI Common
+Lisp, it provides an interactive environment including a debugger, a
+statistical profiler, a code coverage tool, and many other extensions.")
+ ;; Public domain in jurisdictions that allow it, bsd-2 otherwise. MIT
+ ;; loop macro has its own license. See COPYING file for further notes.
+ (license (list license:public-domain license:bsd-2
+ (license:x11-style "file://src/code/loop.lisp")))))
--
2.2.1
^ permalink raw reply related [flat|nested] 4+ messages in thread
* Re: [PATCH] gnu: Add SBCL.
2015-02-14 22:42 [PATCH] gnu: Add SBCL Taylan Ulrich Bayırlı/Kammer
@ 2015-02-14 23:50 ` Mark H Weaver
2015-02-15 2:56 ` Taylan Ulrich Bayırlı/Kammer
0 siblings, 1 reply; 4+ messages in thread
From: Mark H Weaver @ 2015-02-14 23:50 UTC (permalink / raw)
To: Taylan Ulrich "Bayırlı/Kammer"; +Cc: guix-devel
taylanbayirli@gmail.com (Taylan Ulrich "Bayırlı/Kammer") writes:
> This wasn't as difficult as I feared but still caused some difficulties.
>
> Most notably, the sb-executable module has been patched in such a way
> that the executables it generates are only guaranteed work as long as
> you still have the SBCL package which generated them in your store.
> After it's garbage-collected, they will fail to run because they will
> try running themselves with the /gnu/store/.../bin/sbcl that was used to
> generate them. (Also they will contain a #!/.../bin/sh shebang pointing
> to the Bash package that was input to the SBCL version they were
> generated with; that Bash package could get garbage-collected too.)
This is generally how things work in Guix. Similarly, when you compile
a C program on Guix, the resulting executable depends on the precise
dynamic linker and shared libraries linked in, and will fail if those
are garbage collected. The solution is to either build things as guix
packages or add an explicit GC root.
> From 13388cb42a79d9a59597b3b8b38c7d65ac2ad68f Mon Sep 17 00:00:00 2001
> From: =?UTF-8?q?Taylan=20Ulrich=20Bay=C4=B1rl=C4=B1/Kammer?=
> <taylanbayirli@gmail.com>
> Date: Sat, 14 Feb 2015 19:04:12 +0100
> Subject: [PATCH] gnu: Add SBCL.
>
> * gnu/packages/lisp.scm (sbcl): New variable.
> ---
> gnu/packages/lisp.scm | 89 ++++++++++++++++++++++++++++++++++++++++++++++++++-
> 1 file changed, 88 insertions(+), 1 deletion(-)
>
>
> diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
> index 26914a6..fe48f41 100644
> --- a/gnu/packages/lisp.scm
> +++ b/gnu/packages/lisp.scm
> @@ -34,7 +34,9 @@
> #:use-module (gnu packages libffi)
> #:use-module (gnu packages libffcall)
> #:use-module (gnu packages readline)
> - #:use-module (gnu packages libsigsegv))
> + #:use-module (gnu packages libsigsegv)
> + #:use-module (gnu packages admin)
> + #:use-module (gnu packages ed))
>
> (define-public gcl
> (package
> @@ -188,3 +190,88 @@ readline.")
> ;; a lot of gpl3+. (Also some parts are under non-copyleft licenses, such
> ;; as CLX by Texas Instruments.) In that case gpl3+ wins out.
> (license license:gpl3+)))
> +
> +(define-public sbcl
> + (package
> + (name "sbcl")
> + (version "1.2.8")
> + (source
> + (origin
> + (method url-fetch)
> + (uri (string-append "mirror://sourceforge/sbcl/sbcl/" version "/sbcl-"
> + version "-source.tar.bz2"))
> + (sha256
> + (base32 "0ab9lw056yf6y0rjmx3iirn5n59pmssqxf00fbmpyl6qsnpaja1d"))))
> + (build-system gnu-build-system)
> + ;; Bootstrap with CLISP.
> + (native-inputs
> + `(("clisp" ,clisp)
> + ("which" ,which)
> + ("inetutils" ,inetutils) ;for hostname(1)
> + ("ed" ,ed)))
> + (arguments
> + '(#:phases
> + (alist-delete
> + 'configure
> + (alist-cons-before
> + 'build 'patch-unix-tool-paths
> + (lambda* (#:key outputs inputs #:allow-other-keys)
> + (let ((out (assoc-ref outputs "out"))
> + (bash (assoc-ref inputs "bash"))
> + (coreutils (assoc-ref inputs "coreutils"))
> + (ed (assoc-ref inputs "ed")))
> + (define (quoted-path input path)
> + (string-append "\"" input path "\""))
> + ;; Patch absolute paths in string literals. Note that this
> + ;; occurs in some .sh files too (which contain Lisp code).
> + (substitute* (find-files "." "\\.(lisp|sh)$")
> + (("\"/bin/sh\"") (quoted-path bash "/bin/sh"))
> + (("\"/usr/bin/env\"") (quoted-path coreutils "/usr/bin/env"))
> + (("\"/bin/cat\"") (quoted-path coreutils "/bin/cat"))
> + (("\"/bin/ed\"") (quoted-path ed "/bin/ed"))
> + (("\"/bin/echo\"") (quoted-path coreutils "/bin/echo"))
> + (("\"/bin/uname\"") (quoted-path coreutils "/bin/uname")))
> + ;; This one script has a non-string occurrence of /bin/sh.
> + (substitute* '("tests/foreign.test.sh")
> + ;; Leave whitespace so we don't match the shebang.
> + ((" /bin/sh ") " sh "))
> + ;; This file contains a module that can create executable files
> + ;; which depend on the presence of SBCL. It generates shell
> + ;; scripts doing "exec sbcl ..." to achieve this. We patch both
> + ;; the shebang and the reference to "sbcl", tying the generated
> + ;; executables to the exact SBCL package that generated them.
> + (substitute* '("contrib/sb-executable/sb-executable.lisp")
> + (("/bin/sh") (string-append bash "/bin/sh"))
> + (("exec sbcl") (string-append "exec " out "/bin/sbcl")))))
> + (alist-replace
> + 'build
> + (lambda _
> + (setenv "CC" "gcc")
> + ;; Note: this will run tests as well, of which there are 5 total
> + ;; expected failures: GET-PROTOCOL-BY-NAME/ERROR (because there is
> + ;; no /etc/protocols file), GETPWUID, GETPWNAM, GETGRID, GETGRNAM
> + ;; (because certain common users and groups which the tests assume
> + ;; to exist don't exist in the build environment). These failures
> + ;; won't make the build process fail so we just leave them be.
> + (system* "sh" "make.sh" "clisp"))
Please write (zero? (system* "sh" "make.sh" "clisp")) instead, to detect
errors. It's possible that this will cause the test failures mentioned
above to cause the build process to fail now. In that case, those
particular tests will have to be disabled.
> + (alist-replace
> + 'install
> + (lambda* (#:key outputs #:allow-other-keys)
> + (let ((out (assoc-ref outputs "out")))
> + (setenv "INSTALL_ROOT" out)
> + (system* "sh" "install.sh")
To detect errors, how about this:
(unless (zero? (system* "sh" "install.sh"))
(error "install.sh failed"))
> + (wrap-program (string-append out "/bin/sbcl")
> + `("SBCL_HOME" = ,(list (string-append out "/lib/sbcl"))))))
It would be preferable to avoid this wrapper. I looked into this a bit.
It looks like you can pass --prefix=<out> to 'make.sh', and that will
become hardcoded into the executable via SBCL_PREFIX and SBCL_HOME (see
make-config.sh and runtime.c). It looks like this will also remove the
need to set INSTALL_ROOT (which will be SBCL_PREFIX by default).
Also, if you don't wrap, then the 'install.sh' call will be at the end
and you can avoid the 'unless' and 'error' and just put (zero? (system*
...)) as the last expression.
The one remaining bit that I'm unsure about is 'sbcl-homedir-pathname'
in src/code/filesys.lisp. If it doesn't work nicely, we might consider
replacing the call to (posix-getenv "SBCL_HOME") with a string literal.
Would you like to try this and see if you run into other problems?
> + %standard-phases))))
> + ;; No 'check' target, though "make.sh" (build phase) runs tests.
> + #:tests? #f))
> + (home-page "http://www.sbcl.org/")
> + (synopsis "Common Lisp implementation")
> + (description "Steel Bank Common Lisp (SBCL) is a high performance Common
> +Lisp compiler. In addition to the compiler and runtime system for ANSI Common
> +Lisp, it provides an interactive environment including a debugger, a
> +statistical profiler, a code coverage tool, and many other extensions.")
> + ;; Public domain in jurisdictions that allow it, bsd-2 otherwise. MIT
> + ;; loop macro has its own license. See COPYING file for further notes.
> + (license (list license:public-domain license:bsd-2
> + (license:x11-style "file://src/code/loop.lisp")))))
Can you look into this and send an updated patch?
Thank you!
Mark
^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: [PATCH] gnu: Add SBCL.
2015-02-14 23:50 ` Mark H Weaver
@ 2015-02-15 2:56 ` Taylan Ulrich Bayırlı/Kammer
2015-02-15 3:45 ` Mark H Weaver
0 siblings, 1 reply; 4+ messages in thread
From: Taylan Ulrich Bayırlı/Kammer @ 2015-02-15 2:56 UTC (permalink / raw)
To: Mark H Weaver; +Cc: guix-devel
[-- Attachment #1: Type: text/plain, Size: 2262 bytes --]
Mark H Weaver <mhw@netris.org> writes:
> This is generally how things work in Guix. Similarly, when you compile
> a C program on Guix, the resulting executable depends on the precise
> dynamic linker and shared libraries linked in, and will fail if those
> are garbage collected. The solution is to either build things as guix
> packages or add an explicit GC root.
I see, thanks for the explanation. Every time I think I understood
Nix/Guix, it comes out it's even stricter. :-)
> Please write (zero? (system* "sh" "make.sh" "clisp")) instead, to detect
> errors. It's possible that this will cause the test failures mentioned
> above to cause the build process to fail now. In that case, those
> particular tests will have to be disabled.
Indeed. Is the way I disable them OK in the updated patch below?
> To detect errors, how about this:
>
> (unless (zero? (system* "sh" "install.sh"))
> (error "install.sh failed"))
>
>> + (wrap-program (string-append out "/bin/sbcl")
>> + `("SBCL_HOME" = ,(list (string-append out "/lib/sbcl"))))))
>
> It would be preferable to avoid this wrapper. I looked into this a bit.
> It looks like you can pass --prefix=<out> to 'make.sh', and that will
> become hardcoded into the executable via SBCL_PREFIX and SBCL_HOME (see
> make-config.sh and runtime.c). It looks like this will also remove the
> need to set INSTALL_ROOT (which will be SBCL_PREFIX by default).
>
> Also, if you don't wrap, then the 'install.sh' call will be at the end
> and you can avoid the 'unless' and 'error' and just put (zero? (system*
> ...)) as the last expression.
>
> The one remaining bit that I'm unsure about is 'sbcl-homedir-pathname'
> in src/code/filesys.lisp. If it doesn't work nicely, we might consider
> replacing the call to (posix-getenv "SBCL_HOME") with a string literal.
>
> Would you like to try this and see if you run into other problems?
Thanks for looking into it! Using --prefix= worked, and I didn't need
to patch the getenv call. One can now still set SBCL_HOME to something
else to override it explicitly, but I guess that would be considered a
feature; the executable runs fine, without a wrapper, when SBCL_HOME is
unset.
Updated patch:
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch --]
[-- Type: text/x-diff, Size: 5564 bytes --]
From 651fce09c03227656c09fc7876fb8c3d115e7f43 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Taylan=20Ulrich=20Bay=C4=B1rl=C4=B1/Kammer?=
<taylanbayirli@gmail.com>
Date: Sat, 14 Feb 2015 19:04:12 +0100
Subject: [PATCH] gnu: Add SBCL.
* gnu/packages/lisp.scm (sbcl): New variable.
---
gnu/packages/lisp.scm | 92 ++++++++++++++++++++++++++++++++++++++++++++++++++-
1 file changed, 91 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index 26914a6..fe9cdab 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -34,7 +34,9 @@
#:use-module (gnu packages libffi)
#:use-module (gnu packages libffcall)
#:use-module (gnu packages readline)
- #:use-module (gnu packages libsigsegv))
+ #:use-module (gnu packages libsigsegv)
+ #:use-module (gnu packages admin)
+ #:use-module (gnu packages ed))
(define-public gcl
(package
@@ -188,3 +190,91 @@ readline.")
;; a lot of gpl3+. (Also some parts are under non-copyleft licenses, such
;; as CLX by Texas Instruments.) In that case gpl3+ wins out.
(license license:gpl3+)))
+
+(define-public sbcl
+ (package
+ (name "sbcl")
+ (version "1.2.8")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "mirror://sourceforge/sbcl/sbcl/" version "/sbcl-"
+ version "-source.tar.bz2"))
+ (sha256
+ (base32 "0ab9lw056yf6y0rjmx3iirn5n59pmssqxf00fbmpyl6qsnpaja1d"))))
+ (build-system gnu-build-system)
+ ;; Bootstrap with CLISP.
+ (native-inputs
+ `(("clisp" ,clisp)
+ ("which" ,which)
+ ("inetutils" ,inetutils) ;for hostname(1)
+ ("ed" ,ed)))
+ (arguments
+ '(#:phases
+ (alist-delete
+ 'configure
+ (alist-cons-before
+ 'build 'patch-unix-tool-paths
+ (lambda* (#:key outputs inputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out"))
+ (bash (assoc-ref inputs "bash"))
+ (coreutils (assoc-ref inputs "coreutils"))
+ (ed (assoc-ref inputs "ed")))
+ (define (quoted-path input path)
+ (string-append "\"" input path "\""))
+ ;; Patch absolute paths in string literals. Note that this
+ ;; occurs in some .sh files too (which contain Lisp code).
+ (substitute* (find-files "." "\\.(lisp|sh)$")
+ (("\"/bin/sh\"") (quoted-path bash "/bin/sh"))
+ (("\"/usr/bin/env\"") (quoted-path coreutils "/usr/bin/env"))
+ (("\"/bin/cat\"") (quoted-path coreutils "/bin/cat"))
+ (("\"/bin/ed\"") (quoted-path ed "/bin/ed"))
+ (("\"/bin/echo\"") (quoted-path coreutils "/bin/echo"))
+ (("\"/bin/uname\"") (quoted-path coreutils "/bin/uname")))
+ ;; This one script has a non-string occurrence of /bin/sh.
+ (substitute* '("tests/foreign.test.sh")
+ ;; Leave whitespace so we don't match the shebang.
+ ((" /bin/sh ") " sh "))
+ ;; This file contains a module that can create executable files
+ ;; which depend on the presence of SBCL. It generates shell
+ ;; scripts doing "exec sbcl ..." to achieve this. We patch both
+ ;; the shebang and the reference to "sbcl", tying the generated
+ ;; executables to the exact SBCL package that generated them.
+ (substitute* '("contrib/sb-executable/sb-executable.lisp")
+ (("/bin/sh") (string-append bash "/bin/sh"))
+ (("exec sbcl") (string-append "exec " out "/bin/sbcl")))
+ ;; Disable some tests that fail in our build environment.
+ (substitute* '("contrib/sb-bsd-sockets/tests.lisp")
+ ;; This requires /etc/protocols.
+ (("\\(deftest get-protocol-by-name/error" all)
+ (string-append "#+nil ;disabled by Guix\n" all)))
+ (substitute* '("contrib/sb-posix/posix-tests.lisp")
+ ;; These assume some users/groups which we don't have.
+ (("\\(deftest pwent\\.[12]" all)
+ (string-append "#+nil ;disabled by Guix\n" all))
+ (("\\(deftest grent\\.[12]" all)
+ (string-append "#+nil ;disabled by Guix\n" all)))))
+ (alist-replace
+ 'build
+ (lambda* (#:key outputs #:allow-other-keys)
+ (setenv "CC" "gcc")
+ (zero? (system* "sh" "make.sh" "clisp"
+ (string-append "--prefix="
+ (assoc-ref outputs "out")))))
+ (alist-replace
+ 'install
+ (lambda _
+ (zero? (system* "sh" "install.sh")))
+ %standard-phases))))
+ ;; No 'check' target, though "make.sh" (build phase) runs tests.
+ #:tests? #f))
+ (home-page "http://www.sbcl.org/")
+ (synopsis "Common Lisp implementation")
+ (description "Steel Bank Common Lisp (SBCL) is a high performance Common
+Lisp compiler. In addition to the compiler and runtime system for ANSI Common
+Lisp, it provides an interactive environment including a debugger, a
+statistical profiler, a code coverage tool, and many other extensions.")
+ ;; Public domain in jurisdictions that allow it, bsd-2 otherwise. MIT
+ ;; loop macro has its own license. See COPYING file for further notes.
+ (license (list license:public-domain license:bsd-2
+ (license:x11-style "file://src/code/loop.lisp")))))
--
2.2.1
^ permalink raw reply related [flat|nested] 4+ messages in thread
* Re: [PATCH] gnu: Add SBCL.
2015-02-15 2:56 ` Taylan Ulrich Bayırlı/Kammer
@ 2015-02-15 3:45 ` Mark H Weaver
0 siblings, 0 replies; 4+ messages in thread
From: Mark H Weaver @ 2015-02-15 3:45 UTC (permalink / raw)
To: Taylan Ulrich "Bayırlı/Kammer"; +Cc: guix-devel
taylanbayirli@gmail.com (Taylan Ulrich "Bayırlı/Kammer") writes:
> Mark H Weaver <mhw@netris.org> writes:
>
>> It would be preferable to avoid this wrapper. I looked into this a bit.
>> It looks like you can pass --prefix=<out> to 'make.sh', and that will
>> become hardcoded into the executable via SBCL_PREFIX and SBCL_HOME (see
>> make-config.sh and runtime.c). It looks like this will also remove the
>> need to set INSTALL_ROOT (which will be SBCL_PREFIX by default).
[...]
> Thanks for looking into it! Using --prefix= worked, and I didn't need
> to patch the getenv call. One can now still set SBCL_HOME to something
> else to override it explicitly, but I guess that would be considered a
> feature; the executable runs fine, without a wrapper, when SBCL_HOME is
> unset.
Excellent :) Your updated patch looks good to me. Please push!
Thanks,
Mark
^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2015-02-15 3:45 UTC | newest]
Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2015-02-14 22:42 [PATCH] gnu: Add SBCL Taylan Ulrich Bayırlı/Kammer
2015-02-14 23:50 ` Mark H Weaver
2015-02-15 2:56 ` Taylan Ulrich Bayırlı/Kammer
2015-02-15 3:45 ` Mark H Weaver
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).