(print): Round size of bool-vector properly.

diff --git a/src/print.c b/src/print.c
index db0b4cb..d26f7fd 100644 (file)
--- a/src/print.c
+++ b/src/print.c
@@ -1136,7 +1136,7 @@ print (obj, printcharfun, escapeflag)
          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);