03/13: maint: Check whether Guile-zlib is recent enough.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 62a091368df3bab499142d06f5114a73915c71f2
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Mar 17 10:42:46 2021 +0100

    maint: Check whether Guile-zlib is recent enough.
    
    This is a followup to a04aef2430645357d7796969d4b6453478ff8a3f.
    
    * m4/guix.m4 (GUIX_CHECK_GUILE_ZLIB): New macro.
    * configure.ac: Use it when checking for Guile-zlib.
---
 configure.ac |  6 +++---
 m4/guix.m4   | 18 ++++++++++++++++++
 2 files changed, 21 insertions(+), 3 deletions(-)

diff --git a/configure.ac b/configure.ac
index aa60471..1598bfa 100644
--- a/configure.ac
+++ b/configure.ac
@@ -151,9 +151,9 @@ if test "x$guix_cv_have_recent_guile_git" != "xyes"; then
 fi
 
 dnl Check for Guile-zlib.
-GUILE_MODULE_AVAILABLE([have_guile_zlib], [(zlib)])
-if test "x$have_guile_zlib" != "xyes"; then
-  AC_MSG_ERROR([Guile-zlib is missing; please install it.])
+GUIX_CHECK_GUILE_ZLIB
+if test "x$guix_cv_have_recent_guile_zlib" != "xyes"; then
+  AC_MSG_ERROR([A recent Guile-zlib could not be found; please install it.])
 fi
 
 dnl Check for Guile-lzlib.
diff --git a/m4/guix.m4 b/m4/guix.m4
index c1ce087..90a106a 100644
--- a/m4/guix.m4
+++ b/m4/guix.m4
@@ -226,6 +226,24 @@ AC_DEFUN([GUIX_CHECK_GUILE_GIT], [
      fi])
 ])
 
+dnl GUIX_CHECK_GUILE_ZLIB
+dnl
+dnl Check whether a recent-enough Guile-zlib is available.
+AC_DEFUN([GUIX_CHECK_GUILE_ZLIB], [
+  dnl Check whether we're using Guile-zlib 0.1.0 or later.
+  dnl 0.1.0 introduced the 'make-zlib-input-port' and related code.
+  AC_CACHE_CHECK([whether Guile-zlib is available and recent enough],
+    [guix_cv_have_recent_guile_zlib],
+    [GUILE_CHECK([retval],
+      [(use-modules (zlib))
+       make-zlib-input-port])
+     if test "$retval" = 0; then
+       guix_cv_have_recent_guile_zlib="yes"
+     else
+       guix_cv_have_recent_guile_zlib="no"
+     fi])
+])
+
 dnl GUIX_TEST_ROOT_DIRECTORY
 AC_DEFUN([GUIX_TEST_ROOT_DIRECTORY], [
   AC_CACHE_CHECK([for unit test root directory],