diff options
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index 513f63e4315..3b2e123dd39 100644 --- a/src/lread.c +++ b/src/lread.c @@ -3402,7 +3402,7 @@ substitute_object_recurse (Lisp_Object object, Lisp_Object placeholder, Lisp_Obj else if (CHAR_TABLE_P (subtree) || SUB_CHAR_TABLE_P (subtree) || COMPILEDP (subtree) || HASH_TABLE_P (subtree) || RECORDP (subtree)) - length = ASIZE (subtree) & PSEUDOVECTOR_SIZE_MASK; + length = PVSIZE (subtree); else if (VECTORP (subtree)) length = ASIZE (subtree); else |