From 310d524062b544c538977c5e33548889fbb85926 Mon Sep 17 00:00:00 2001 From: Sergey Bolshakov Date: Wed, 26 Apr 2017 13:40:47 +0300 Subject: [PATCH 1/2] guile: first arg to scm_error should be symbol, not string --- Lib/exception.i | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Lib/exception.i b/Lib/exception.i index da0d56cdd..534f1d6f5 100644 --- a/Lib/exception.i +++ b/Lib/exception.i @@ -31,7 +31,7 @@ SWIGINTERN void SWIG_exception_ (int code, const char *msg, const char *subr) { #define ERROR(scmerr) \ - scm_error(scm_from_locale_string((char *) (scmerr)), \ + scm_error(scm_from_locale_symbol((char *) (scmerr)), \ (char *) subr, (char *) msg, \ SCM_EOL, SCM_BOOL_F) #define MAP(swigerr, scmerr) \ -- 2.33.8