# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1027319229 0
# Node ID 6d6ec38a31ac49fcdc7614f1e6782693127033b3
# Parent  ce44b8f7d67bbcfa2edc80b5b87d54f993b1d5dc
(print_object): Use octal form for printing the
contents of a bool vector.

diff -r ce44b8f7d67b -r 6d6ec38a31ac src/print.c
--- a/src/print.c	Thu Jul 18 16:30:48 2002 +0000
+++ b/src/print.c	Mon Jul 22 06:27:09 2002 +0000
@@ -1698,7 +1698,12 @@
 	    {
 	      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');