diff options
Diffstat (limited to 'libguile/gh_data.c')
-rw-r--r-- | libguile/gh_data.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/gh_data.c b/libguile/gh_data.c index cd4d838e3..986bd55e3 100644 --- a/libguile/gh_data.c +++ b/libguile/gh_data.c @@ -82,7 +82,7 @@ gh_double2scm (double x) SCM gh_char2scm (char c) { - return SCM_MAKICHR (c); + return SCM_MAKE_CHAR (c); } SCM gh_str2scm (const char *s, int len) @@ -254,7 +254,7 @@ gh_scm2double (SCM obj) char gh_scm2char (SCM obj) { - return SCM_ICHR (obj); + return SCM_CHAR (obj); } /* Convert a vector, weak vector, string, substring or uniform vector |