gnu: gerbil: Update to 0.17.0.

* gnu/package/scheme.scm (gerbil): Update to 0.17.0.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Juliana Sims 2023-03-28 22:45:26 -04:00 committed by Ludovic Courtès
parent 0f567d55de
commit 225ec28353
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -21,6 +21,7 @@
;;; Copyright © 2022 jgart <jgart@dismail.de> ;;; Copyright © 2022 jgart <jgart@dismail.de>
;;; Copyright © 2022 Robby Zambito <contact@robbyzambito.me> ;;; Copyright © 2022 Robby Zambito <contact@robbyzambito.me>
;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au> ;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au>
;;; Copyright © 2023 Juliana Sims <jtsims@protonmail.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -1113,7 +1114,7 @@ (define-public cl-airship-scheme
(define-public gerbil (define-public gerbil
(package (package
(name "gerbil") (name "gerbil")
(version "0.16") (version "0.17.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@ -1122,7 +1123,7 @@ (define-public gerbil
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0vng0kxpnwsg8jbjdpyn4sdww36jz7zfpfbzayg9sdpz6bjxjy0f")))) (base32 "0c0nspm659ybgmqlppdv7sxzll4hwkvcp9qmcsip6d0kz0p8r9c3"))))
(arguments (arguments
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
@ -1172,6 +1173,14 @@ (define-public gerbil
"./tutorial/proxy/build-static.ss" "./tutorial/proxy/build-static.ss"
"./tutorial/proxy/build.ss"))) "./tutorial/proxy/build.ss")))
#t)) #t))
(add-after 'configure 'create-gx-version.scm
(lambda _
(with-output-to-file (string-append
(getcwd)
"/gerbil/runtime/gx-version.scm")
(lambda _
(write `(define (gerbil-version-string)
,(string-append "v" ,(version-major+minor version))))))))
(replace (replace
'build 'build
(lambda* (lambda*
@ -1195,7 +1204,7 @@ (define-public gerbil
(copy-recursively "../bin" bin) (copy-recursively "../bin" bin)
(copy-recursively "../lib" lib))))))) (copy-recursively "../lib" lib)))))))
(native-inputs (native-inputs
(list coreutils util-linux)) (list coreutils gambit-c util-linux))
(propagated-inputs (propagated-inputs
(list gambit-c zlib openssl sqlite)) (list gambit-c zlib openssl sqlite))
(build-system gnu-build-system) (build-system gnu-build-system)