diff options
| author | V3n3RiX <venerix@redcorelinux.org> | 2021-06-20 14:45:01 +0100 |
|---|---|---|
| committer | V3n3RiX <venerix@redcorelinux.org> | 2021-06-20 14:45:01 +0100 |
| commit | 34dea8e38f88007799629d0a56b12dec480b1d21 (patch) | |
| tree | 6790873994b58030360328cf5897d934b3b03d16 /sys-devel/autogen/files | |
| parent | 7932d472a02d4c016ff7dff4b7a5479ab9d1883d (diff) | |
gentoo resync : 20.06.2021
Diffstat (limited to 'sys-devel/autogen/files')
| -rw-r--r-- | sys-devel/autogen/files/autogen-5.18.16-guile-3.patch | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/sys-devel/autogen/files/autogen-5.18.16-guile-3.patch b/sys-devel/autogen/files/autogen-5.18.16-guile-3.patch new file mode 100644 index 000000000000..2d21c4fae3e7 --- /dev/null +++ b/sys-devel/autogen/files/autogen-5.18.16-guile-3.patch @@ -0,0 +1,38 @@ +--- a/config/guile.m4 ++++ b/config/guile.m4 +@@ -61,7 +61,7 @@ + # + AC_DEFUN([GUILE_PKG], + [PKG_PROG_PKG_CONFIG +- _guile_versions_to_search="m4_default([$1], [2.2 2.0 1.8])" ++ _guile_versions_to_search="m4_default([$1], [3.0 2.2 2.0 1.8])" + if test -n "$GUILE_EFFECTIVE_VERSION"; then + _guile_tmp="" + for v in $_guile_versions_to_search; do +--- a/configure ++++ b/configure +@@ -14799,7 +14799,7 @@ $as_echo "no" >&6; } + PKG_CONFIG="" + fi + fi +- _guile_versions_to_search="2.2 2.0 1.8" ++ _guile_versions_to_search="3.0 2.2 2.0 1.8" + if test -n "$GUILE_EFFECTIVE_VERSION"; then + _guile_tmp="" + for v in $_guile_versions_to_search; do +--- a/agen5/guile-iface.h ++++ b/agen5/guile-iface.h +@@ -16,6 +16,13 @@ + # define AG_SCM_TO_LONG(_v) scm_to_long(_v) + # define AG_SCM_TO_ULONG(_v) ((unsigned long)scm_to_ulong(_v)) + ++#elif GUILE_VERSION < 400000 ++# define AG_SCM_IS_PROC(_p) scm_is_true( scm_procedure_p(_p)) ++# define AG_SCM_LIST_P(_l) scm_is_true( scm_list_p(_l)) ++# define AG_SCM_PAIR_P(_p) scm_is_true( scm_pair_p(_p)) ++# define AG_SCM_TO_LONG(_v) scm_to_long(_v) ++# define AG_SCM_TO_ULONG(_v) ((unsigned long)scm_to_ulong(_v)) ++ + #else + # error unknown GUILE_VERSION + choke me. |