(print_object): Use octal form for printing the

contents of a bool vector.

1 files changed, 6 insertions, 1 deletions

diff --git a/src/print.c b/src/print.c
index 7a900a108c1..29555a7acbe 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1698,7 +1698,12 @@ print_object (obj, printcharfun, escapeflag)
             {
               QUIT;
               c = XBOOL_VECTOR (obj)->data[i];
-              if (c == '\n' && print_escape_newlines)
+              if (! ASCII_BYTE_P (c))
+                {
+                  sprintf (buf, "\\%03o", c);
+                  strout (buf, -1, -1, printcharfun, 0);
+                }
+              else if (c == '\n' && print_escape_newlines)
                 {
                   PRINTCHAR ('\\');
                   PRINTCHAR ('n');