* print.c (print_preprocess): Adjust to match changed
sub char-table structure and avoid crash (Bug#18038).
This commit is contained in:
parent
02a7e500e8
commit
b1bfebbfc5
2 changed files with 7 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2014-07-17 Dmitry Antipov <dmantipov@yandex.ru>
|
||||
|
||||
* print.c (print_preprocess): Adjust to match changed
|
||||
sub char-table structure and avoid crash (Bug#18038).
|
||||
|
||||
2014-07-16 Eli Zaretskii <eliz@gnu.org>
|
||||
|
||||
* xdisp.c (decode_mode_spec): Call file-remote-p on the current
|
||||
|
|
|
@ -1228,7 +1228,8 @@ print_preprocess (Lisp_Object obj)
|
|||
size = ASIZE (obj);
|
||||
if (size & PSEUDOVECTOR_FLAG)
|
||||
size &= PSEUDOVECTOR_SIZE_MASK;
|
||||
for (i = 0; i < size; i++)
|
||||
for (i = (SUB_CHAR_TABLE_P (obj)
|
||||
? SUB_CHAR_TABLE_OFFSET : 0); i < size; i++)
|
||||
print_preprocess (AREF (obj, i));
|
||||
if (HASH_TABLE_P (obj))
|
||||
{ /* For hash tables, the key_and_value slot is past
|
||||
|
|
Loading…
Add table
Reference in a new issue