master df9da94: * src/lread.c (read1): Fix int/Lisp_Object mix up.

[Glenn Morris]

branch: master
commit df9da9445ed665080fbcfdd25f7a544f1403cf8e
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    * src/lread.c (read1): Fix int/Lisp_Object mix up.
    
    Found by --enable-check-lisp-object-type.
---
 src/lread.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lread.c b/src/lread.c
index f39e81a..1613719 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2976,7 +2976,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool 
first_in_list)
            invalid_syntax ("Empty byte-code object");
 
          if (COMPILED_DOC_STRING < vec->header.size
-             && AREF (tmp, COMPILED_DOC_STRING) == make_fixnum (0))
+             && EQ (AREF (tmp, COMPILED_DOC_STRING), make_fixnum (0)))
            {
              /* read_list found a docstring like '(#$ . 5521)' and treated it
                 as 0.  This placeholder 0 would lead to accidental sharing in