# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 853725412 0
# Node ID 5889a6e7c71b5fbb07efd2733f7d4c6578843770
# Parent  a8a539285d695be9b51214da4f5e52a2aaddacf3
(print): Round size of bool-vector properly.

diff -r a8a539285d69 -r 5889a6e7c71b src/print.c
--- a/src/print.c	Mon Jan 20 01:52:48 1997 +0000
+++ b/src/print.c	Mon Jan 20 01:56:52 1997 +0000
@@ -1136,7 +1136,7 @@
 	  register unsigned char c;
 	  struct gcpro gcpro1;
 	  int size_in_chars
-	    = (XBOOL_VECTOR (obj)->size + BITS_PER_CHAR) / BITS_PER_CHAR;
+	    = (XBOOL_VECTOR (obj)->size + BITS_PER_CHAR - 1) / BITS_PER_CHAR;
 
 	  GCPRO1 (obj);