ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-26 06:18:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: gauche: Update to 0.9.10.

Browse source 
* gnu/packages/scheme.scm (gauche): Update to 0.9.10.
[arguments]: Adjust file list in custom 'patch-/bin/sh phase. Remove
'patch-normalize-test phase. Adjust 'patch-network-tests phase.

Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
This commit is contained in:
Martin Becze 2020-12-23 03:35:34 -06:00 committed by Efraim Flashner
parent 91d5424960
commit eb0c1e7462
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 6 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
gnu/packages/scheme.scm
View file

@ -1010,7 +1010,7 @@ (define-public femtolisp
(define-public gauche
(package
(name "gauche")
(version "0.9.9")
(version "0.9.10")
(home-page "https://practical-scheme.net/gauche/index.html")
(source
(origin
@ -1019,7 +1019,7 @@ (define-public gauche
"mirror://sourceforge/gauche/Gauche/Gauche-"
version ".tgz"))
(sha256
(base32 "1yzpszhw52vkpr65r5d4khf3489mnnvnw58dd2wsvvx7499k5aac"))
(base32 "0ci57ak5cp3lkmfy3nh50hifh8nbg58hh6r18asq0rn5mqfxyf8g"))
(modules '((guix build utils)))
(snippet '(begin
;; Remove libatomic-ops.
@ -1039,13 +1039,10 @@ (define-public gauche
(add-after 'unpack 'patch-/bin/sh
;; Needed only for tests.
(lambda _
(substitute* '("configure"
"test/www.scm"
(substitute* '("test/www.scm"
"ext/tls/test.scm"
"gc/configure"
"lib/gauche/configure.scm"
"lib/gauche/package/util.scm"
"lib/gauche/process.scm")
"libsrc/gauche/process.scm")
(("/bin/sh") (which "sh")))
#t))
(add-after 'build 'build-doc
@ -1053,18 +1050,11 @@ (define-public gauche
(with-directory-excursion "doc"
(invoke "make" "info"))
#t))
(add-before 'check 'patch-normalize-test
;; Neutralize sys-normalize-pathname test as it relies on
;; the home directory; (setenv "HOME" xx) isn't enough).
(lambda _
(substitute* "test/system.scm"
(("~/abc") "//abc"))
#t))
(add-before 'check 'patch-network-tests
;; Remove net checks.
(lambda _
(substitute* "ext/Makefile"
(("binary net termios") "binary termios"))
(delete-file "ext/net/test.scm")
(invoke "touch" "ext/net/test.scm")
#t))
(add-after 'install 'install-docs
(lambda _