summaryrefslogtreecommitdiff
path: root/libguile/print.c
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2013-08-11 22:46:22 -0400
committerMark H Weaver <mhw@netris.org>2013-08-11 22:46:22 -0400
commit1160e2d94e6a53e4509f81ff08798655db9cae26 (patch)
tree01885df852779fe22ca336082e033dfbff6f5c6e /libguile/print.c
parent1e5c32054e002e2c12ba0188b58b7d26432c3495 (diff)
parent9ea816f54a3cc2216eac45c6238fa06448d824df (diff)
downloadguile-1160e2d94e6a53e4509f81ff08798655db9cae26.tar.gz
Merge remote-tracking branch 'origin/stable-2.0'
Diffstat (limited to 'libguile/print.c')
-rw-r--r--libguile/print.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/print.c b/libguile/print.c
index 50f5a3e68..dbc6e96ed 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -448,7 +448,8 @@ print_extended_symbol (SCM sym, SCM port)
SUBSEQUENT_IDENTIFIER_MASK
| UC_CATEGORY_MASK_Zs))
{
- if (!display_character (c, port, strategy))
+ if (!display_character (c, port, strategy)
+ || (c == '\\' && !display_character (c, port, strategy)))
scm_encoding_error ("print_extended_symbol", errno,
"cannot convert to output locale",
port, SCM_MAKE_CHAR (c));