diff options
Diffstat (limited to 'libguile/strings.c')
-rw-r--r-- | libguile/strings.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/strings.c b/libguile/strings.c index 470b3206f..677a1d4bd 100644 --- a/libguile/strings.c +++ b/libguile/strings.c @@ -132,7 +132,7 @@ scm_makstr (long len, int dummy) mem[len] = 0; SCM_NEWCELL (s); - SCM_SETCHARS (s, mem); + SCM_SET_STRING_CHARS (s, mem); SCM_SET_STRING_LENGTH (s, len); return s; @@ -170,7 +170,7 @@ scm_take_str (char *s, int len) SCM_DEFER_INTS; SCM_SET_STRING_LENGTH (answer, len); scm_done_malloc (len + 1); - SCM_SETCHARS (answer, s); + SCM_SET_STRING_CHARS (answer, s); SCM_ALLOW_INTS; return answer; } |