Re: [gnutls-dev] Guile needs 1.8?

[Ludovic Courtès]

Hi,

Simon Josefsson <address@hidden> writes:

> address@hidden (Ludovic Courtès) writes:

>> I'll add a more reliable test anyway.

See attached patch: It basically uses Guile's `version' procedure to
check whether we are using 1.8 or later.

> Perhaps a test for the feature that seems to break things here?
> SCM_API, scm_t_bits, or whatever it might have been.

No.  Those types and macros are actually defined in 1.6 as well.  It
just turned out that for some reason their definitions were not visible.

Anyway, such a feature test wouldn't help since 1.6 and 1.8 are
significantly different API-wise.

BTW, I think it should be possible to install both Debian packages
side-by-side, except the `-dev' packages.

Thanks,
Ludovic.


>From 6e92f455b41867bb8479164b3f91bb961852ff94 Mon Sep 17 00:00:00 2001
From: Ludovic Courtes <address@hidden>
Date: Sun, 17 Jun 2007 19:49:03 +0200
Subject: [PATCH] Make sure Guile is 1.8 or later.

* configure.in: Make sure Guile is 1.8 or later, using `GUILE_CHECK'.
---
 configure.in |   47 +++++++++++++++++++++++++++++------------------
 1 files changed, 29 insertions(+), 18 deletions(-)

diff --git a/configure.in b/configure.in
index 7edc16f..2b392f2 100644
--- a/configure.in
+++ b/configure.in
@@ -132,24 +132,35 @@ if test "x$opt_guile_bindings" = "xyes"; then
       GUILE_PROGS
       GUILE_FLAGS
 
-      case "x$with_guile_site_dir" in 
-          x|xno)
-             # Use the default $(GUILE_SITE).
-             GUILE_SITE_DIR
-             ;;
-          xyes)
-             # Automatically derive $(GUILE_SITE) from $(pkgdatadir).  This
-             # hack is used to allow `distcheck' to work (see
-             # `DISTCHECK_CONFIGURE_FLAGS' in the top-level `Makefile.am').
-             GUILE_SITE="${datadir}/guile/site"
-             AC_SUBST(GUILE_SITE)
-             ;;
-          *)
-             # Use the user-specified directory as $(GUILE_SITE).
-             GUILE_SITE="$with_guile_site_dir"
-             AC_SUBST(GUILE_SITE)
-             ;;
-      esac
+      AC_MSG_CHECKING([whether GNU Guile 1.8 or later is available])
+      GUILE_CHECK([is_guile_1_8],
+         [(exit (string>=? (version) (number->string 1.8)))])
+
+      if test $is_guile_1_8 -eq 0; then
+        AC_MSG_RESULT([yes])
+       case "x$with_guile_site_dir" in 
+            x|xno)
+               # Use the default $(GUILE_SITE).
+               GUILE_SITE_DIR
+               ;;
+            xyes)
+               # Automatically derive $(GUILE_SITE) from $(pkgdatadir).  This
+               # hack is used to allow `distcheck' to work (see
+               # `DISTCHECK_CONFIGURE_FLAGS' in the top-level `Makefile.am').
+               GUILE_SITE="${datadir}/guile/site"
+               AC_SUBST(GUILE_SITE)
+               ;;
+            *)
+               # Use the user-specified directory as $(GUILE_SITE).
+               GUILE_SITE="$with_guile_site_dir"
+               AC_SUBST(GUILE_SITE)
+               ;;
+       esac
+      else
+        AC_MSG_RESULT([no])
+        AC_MSG_WARN([GNU Guile 1.8 or later is required.  Guile bindings not 
built.])
+        opt_guile_bindings=no
+      fi
    fi
 fi
 
-- 
1.5.2.1