From c4e5e18c0ad9e5848bd21684722d21a6ec6f9251 Mon Sep 17 00:00:00 2001 From: John Ralls Date: Tue, 24 Apr 2018 17:57:52 -0700 Subject: [PATCH] Redefine some more buggy Guile string conversions. --- common/guile-mappings.h | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/common/guile-mappings.h b/common/guile-mappings.h index 5e758a2d5e..e116018ff3 100644 --- a/common/guile-mappings.h +++ b/common/guile-mappings.h @@ -24,6 +24,11 @@ #if defined(scm_to_utf8_string) && SCM_MAJOR_VERSION >= 2 #undef scm_to_utf8_string #undef scm_from_utf8_string +#undef SWIG_scm2str +#define SWIG_scm2str(s) scm_to_utf8_string(s) +#undef SWIG_str02scm +#define SWIG_str02scm(str) \ + str ? scm_from_utf8_string(str) : SCM_BOOL_F #endif #define scm_is_equal(obj1,obj2) scm_is_true(scm_equal_p(obj1,obj2)) #define scm_is_exact(obj) scm_is_true(scm_exact_p(obj))