diff options
author | Mark H Weaver <mhw@netris.org> | 2013-08-11 22:46:22 -0400 |
---|---|---|
committer | Mark H Weaver <mhw@netris.org> | 2013-08-11 22:46:22 -0400 |
commit | 1160e2d94e6a53e4509f81ff08798655db9cae26 (patch) | |
tree | 01885df852779fe22ca336082e033dfbff6f5c6e /libguile/print.c | |
parent | 1e5c32054e002e2c12ba0188b58b7d26432c3495 (diff) | |
parent | 9ea816f54a3cc2216eac45c6238fa06448d824df (diff) | |
download | guile-1160e2d94e6a53e4509f81ff08798655db9cae26.tar.gz |
Merge remote-tracking branch 'origin/stable-2.0'
Diffstat (limited to 'libguile/print.c')
-rw-r--r-- | libguile/print.c | 3 |
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)); |