summaryrefslogtreecommitdiff
path: root/libguile/bytevectors.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-01-15 15:07:15 +0100
committerAndy Wingo <wingo@pobox.com>2013-01-15 16:36:55 +0100
commit686df5162d17d976a0aa7eec75fed42fb3e23eee (patch)
treea69aaf50a448bc16583248c5cd7cef0297590195 /libguile/bytevectors.c
parentb39685c6da974d5edc5629495c559ab8e1137103 (diff)
downloadguile-686df5162d17d976a0aa7eec75fed42fb3e23eee.tar.gz
string->utf8 implementation uses scm_from_utf8_stringn
* libguile/bytevectors.c (UTF_TO_STRING): Use scm_from_utf8_stringn.
Diffstat (limited to 'libguile/bytevectors.c')
-rw-r--r--libguile/bytevectors.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/bytevectors.c b/libguile/bytevectors.c
index 4ce90ebdf..9093f49c3 100644
--- a/libguile/bytevectors.c
+++ b/libguile/bytevectors.c
@@ -2028,8 +2028,7 @@ SCM_DEFINE (scm_string_to_utf32, "string->utf32",
scm_list_1 (utf), err); \
else \
{ \
- str = scm_from_stringn (c_str, c_strlen, "UTF-8", \
- SCM_FAILED_CONVERSION_ERROR); \
+ str = scm_from_utf8_stringn (c_str, c_strlen); \
free (c_str); \
} \
return (str);