me/guix
Archived
1
0
Fork 0
Code Activity

gnu: racket-minimal: Remove top-level reference to 'chez-scheme'.

Browse source 
This could cause build errors; for instance, doing:

  make && touch gnu/packages/chez.scm && make

would trigger a "chez-scheme: unbound variable" error.

* gnu/packages/racket.scm (racket-minimal)[source]: Add 'modules'
field.  In 'snippet', remove top-level reference to CHEZ-SCHEME, which
could cause build errors.  Simplify snippet.
This commit is contained in:
Ludovic Courtès 2021-09-07 15:11:46 +02:00
parent 5cfe5ddece
commit 96db2ff145
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 11 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/racket.scm
View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014, 2015, 2016, 2018, 2020 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013, 2014, 2015, 2016, 2018, 2020, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2020 Pierre Neidhardt <mail@ambrevar.xyz> ;;; Copyright © 2020 Pierre Neidhardt <mail@ambrevar.xyz>
;;; Copyright © 2021 Philip McGrath <philip@philipmcgrath.com> ;;; Copyright © 2021 Philip McGrath <philip@philipmcgrath.com>
@ -139,17 +139,20 @@
"061bhiyjlvazph0dj9i3i3x2q5z53rp8h5cjwg3frjimkr45lncn") "061bhiyjlvazph0dj9i3i3x2q5z53rp8h5cjwg3frjimkr45lncn")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(patches (search-patches "racket-minimal-sh-via-rktio.patch")) (patches (search-patches "racket-minimal-sh-via-rktio.patch"))
(modules '((guix build utils)))
(snippet (snippet
(with-imported-modules '((guix build utils)) (with-imported-modules '((guix build utils))
#~(begin #~(begin
(use-modules (guix build utils)) ;; Unbundle Chez submodules.
;; unbundle Chez submodules
(with-directory-excursion "racket/src/ChezScheme" (with-directory-excursion "racket/src/ChezScheme"
#$(origin-snippet (package-source chez-scheme))) ;; Remove bundled libraries (copied from 'chez-scheme').
;; unbundle libffi (for-each delete-file-recursively
(for-each '("stex"
delete-file-recursively "nanopass"
'("racket/src/bc/foreign/libffi"))))))) "lz4"
"zlib")))
;; Unbundle libffi.
(delete-file-recursively "racket/src/bc/foreign/libffi"))))))
(inputs (inputs
`(;; common to all racket-minimal variants: `(;; common to all racket-minimal variants:
("openssl" ,openssl) ("openssl" ,openssl)