summaryrefslogtreecommitdiff
path: root/libguile/strings.c
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2012-04-03 09:50:20 -0400
committerMark H Weaver <mhw@netris.org>2012-04-03 09:50:20 -0400
commit51853eee69ca5811ae0661eb91868121c6ad1d74 (patch)
tree691008b0fcf8fceb744ddb6b4ce82e383331cc70 /libguile/strings.c
parente26da7a24e79cf3a9d3052e78228a9dfed3c4f3d (diff)
downloadguile-51853eee69ca5811ae0661eb91868121c6ad1d74.tar.gz
Fix scm_to_utf8_stringn to NUL-terminate properly
* libguile/strings.c (scm_to_utf8_stringn): NUL-terminate using the correct pointer.
Diffstat (limited to 'libguile/strings.c')
-rw-r--r--libguile/strings.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/strings.c b/libguile/strings.c
index f4828f8bb..ec55c501b 100644
--- a/libguile/strings.c
+++ b/libguile/strings.c
@@ -1944,7 +1944,7 @@ scm_to_utf8_stringn (SCM str, size_t *lenp)
else
{
buf = scm_malloc (predicted_len + 1);
- ret[predicted_len] = 0;
+ buf[predicted_len] = 0;
}
ret = u32_to_u8 ((scm_t_uint32 *) scm_i_string_wide_chars (str),