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 5554eac193f..4d2895ca2e6 100644 --- a/src/lread.c +++ b/src/lread.c @@ -2334,7 +2334,7 @@ substitute_object_recurse (object, placeholder, subtree) case Lisp_Vectorlike: { int i; - int length = Flength(subtree); + int length = XINT (Flength(subtree)); for (i = 0; i < length; i++) { Lisp_Object idx = make_number (i); |