summaryrefslogtreecommitdiff
path: root/libguile/strings.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/strings.c')
-rw-r--r--libguile/strings.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/strings.c b/libguile/strings.c
index dc2e4f5fe..232ddf90e 100644
--- a/libguile/strings.c
+++ b/libguile/strings.c
@@ -1778,7 +1778,7 @@ scm_from_port_stringn (const char *str, size_t len, SCM port)
else
return scm_from_stringn (str, len, scm_i_symbol_chars (pt->encoding),
scm_i_string_failed_conversion_handler
- (scm_port_conversion_strategy (port)));
+ (SCM_PORT (port)->conversion_strategy));
}
/* Create a new scheme string from the C string STR. The memory of
@@ -2217,7 +2217,7 @@ scm_to_port_stringn (SCM str, size_t *lenp, SCM port)
else
return scm_to_stringn (str, lenp, scm_i_symbol_chars (pt->encoding),
scm_i_string_failed_conversion_handler
- (scm_port_conversion_strategy (port)));
+ (SCM_PORT (port)->conversion_strategy));
}
/* Return a malloc(3)-allocated buffer containing the contents of STR encoded