guile3.0.patch

   1 --- autogen-5.18.16/config/guile.m4~    2018-08-26 19:44:19.000000000 +0200
   2 +++ autogen-5.18.16/config/guile.m4     2022-03-12 13:25:01.248062089 +0100
   3 @@ -61,7 +61,7 @@
   4  #
   5  AC_DEFUN([GUILE_PKG],
   6   [PKG_PROG_PKG_CONFIG
   7 -  _guile_versions_to_search="m4_default([$1], [2.2 2.0 1.8])"
   8 +  _guile_versions_to_search="m4_default([$1], [3.0 2.2 2.0 1.8])"
   9    if test -n "$GUILE_EFFECTIVE_VERSION"; then
  10      _guile_tmp=""
  11      for v in $_guile_versions_to_search; do
  12 @@ -237,7 +237,7 @@
  13  AC_DEFUN([GUILE_PROGS],
  14   [_guile_required_version="m4_default([$1], [$GUILE_EFFECTIVE_VERSION])"
  15    if test -z "$_guile_required_version"; then
  16 -    _guile_required_version=2.2
  17 +    _guile_required_version=3.0
  18    fi
  19
  20    _guile_candidates=guile
  21 --- autogen-5.18.16/agen5/guile-iface.h~        2018-08-26 19:44:48.000000000 +0200
  22 +++ autogen-5.18.16/agen5/guile-iface.h 2022-03-12 13:31:35.236915503 +0100
  23 @@ -9,16 +9,12 @@
  24  # error AutoGen does not work with this version of Guile
  25    choke me.
  26
  27 -#elif GUILE_VERSION < 203000
  28 +#else
  29  # define AG_SCM_IS_PROC(_p)           scm_is_true( scm_procedure_p(_p))
  30  # define AG_SCM_LIST_P(_l)            scm_is_true( scm_list_p(_l))
  31  # define AG_SCM_PAIR_P(_p)            scm_is_true( scm_pair_p(_p))
  32  # define AG_SCM_TO_LONG(_v)           scm_to_long(_v)
  33  # define AG_SCM_TO_ULONG(_v)          ((unsigned long)scm_to_ulong(_v))
  34 -
  35 -#else
  36 -# error unknown GUILE_VERSION
  37 -  choke me.
  38  #endif
  39
  40  #endif /* MUTATING_GUILE_IFACE_H_GUARD */