size if PSEUDOVECTOR_FLAG is set.
+2004-01-08 Andreas Schwab <schwab@suse.de>
+
+ * print.c (print_preprocess) <case Lisp_Vectorlike>: Only mask
+ size if PSEUDOVECTOR_FLAG is set.
+
2004-01-07 Kenichi Handa <handa@m17n.org>
* charset.c (Fdeclare_equiv_charset): Fix docstring.
goto loop;
case Lisp_Vectorlike:
- size = XVECTOR (obj)->size & PSEUDOVECTOR_SIZE_MASK;
+ size = XVECTOR (obj)->size;
+ if (size & PSEUDOVECTOR_FLAG)
+ size &= PSEUDOVECTOR_SIZE_MASK;
for (i = 0; i < size; i++)
print_preprocess (XVECTOR (obj)->contents[i]);
break;