self: Add dependency on lzlib.

* guix/self.scm (compiled-guix): Pass #:lzlib to 'make-config.scm'.
(make-config.scm): Add #:lzlib and honor it.
(specification->package): Add "lzlib".
This commit is contained in:
Ludovic Courtès 2019-05-24 10:28:34 +02:00
parent 66229b04ae
commit 73ac9098b1
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -57,6 +57,7 @@ (define specification->package
("guile-gcrypt" (ref '(gnu packages gnupg) 'guile-gcrypt))
("gnutls" (ref '(gnu packages tls) 'gnutls))
("zlib" (ref '(gnu packages compression) 'zlib))
("lzlib" (ref '(gnu packages compression) 'lzlib))
("gzip" (ref '(gnu packages compression) 'gzip))
("bzip2" (ref '(gnu packages compression) 'bzip2))
("xz" (ref '(gnu packages compression) 'xz))
@ -660,6 +661,7 @@ (define* (compiled-guix source #:key (version %guix-version)
(guile-version (effective-version))
(guile-for-build (default-guile))
(zlib (specification->package "zlib"))
(lzlib (specification->package "lzlib"))
(gzip (specification->package "gzip"))
(bzip2 (specification->package "bzip2"))
(xz (specification->package "xz"))
@ -814,6 +816,7 @@ (define *config*
#:extra-modules
`(((guix config)
=> ,(make-config.scm #:zlib zlib
#:lzlib lzlib
#:gzip gzip
#:bzip2 bzip2
#:xz xz
@ -911,7 +914,7 @@ (define %config-variables
(variables rest ...))))))
(variables %localstatedir %storedir %sysconfdir)))
(define* (make-config.scm #:key zlib gzip xz bzip2
(define* (make-config.scm #:key zlib lzlib gzip xz bzip2
(package-name "GNU Guix")
(package-version "0")
(bug-report-address "bug-guix@gnu.org")
@ -933,7 +936,7 @@ (define defmod 'define-module)
%store-database-directory
%config-directory
%libz
;; TODO: %liblz
%liblz
%gzip
%bzip2
%xz))
@ -980,7 +983,11 @@ (define %xz
(define %libz
#+(and zlib
(file-append zlib "/lib/libz"))))
(file-append zlib "/lib/libz")))
(define %liblz
#+(and lzlib
(file-append lzlib "/lib/liblz"))))
;; Guile 2.0 *requires* the 'define-module' to be at the
;; top-level or the 'toplevel-ref' in the resulting .go file are