* update mu-guile for other changes

This commit is contained in:
Dirk-Jan C. Binnema
2011-08-30 21:59:25 +03:00
parent c9d4111915
commit 2c92018484
2 changed files with 28 additions and 28 deletions

View File

@ -27,7 +27,7 @@
void
mu_guile_error (const char *func_name, int status,
const char *fmt, SCM args)
const char *fmt, SCM args)
{
scm_error_scm (scm_from_locale_symbol ("MuError"),
scm_from_utf8_string (func_name ? func_name : "<nameless>"),
@ -37,15 +37,14 @@ mu_guile_error (const char *func_name, int status,
void
mu_guile_g_error (const char *func_name, GError *err)
{
{
scm_error_scm (scm_from_locale_symbol ("MuError"),
scm_from_utf8_string (func_name),
scm_from_utf8_string (err->message),
scm_from_utf8_string (err ? err->message : "error"),
SCM_UNDEFINED, SCM_UNDEFINED);
}
void
mu_guile_init (void)
{
@ -57,8 +56,8 @@ mu_guile_init (void)
/*
* backward compat for pre-2.x guile - note, this will fail miserably
* if you don't use a UTF8 locale
*/
* if you don't use a UTF8 locale
*/
#if HAVE_PRE2_GUILE
SCM