summaryrefslogtreecommitdiff
path: root/libguile/gh_data.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/gh_data.c')
-rw-r--r--libguile/gh_data.c4
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