1 files changed, 1 insertions, 1 deletions

diff --git a/src/lread.c b/src/lread.c
index e87dba53128..47512fd3197 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -3276,7 +3276,7 @@ oblookup (obarray, ptr, size, size_byte)
   hash %= obsize;
   bucket = XVECTOR (obarray)->contents[hash];
   oblookup_last_bucket_number = hash;
-  if (XFASTINT (bucket) == 0)
+  if (EQ (bucket, make_number (0)))
     ;
   else if (!SYMBOLP (bucket))
     error ("Bad data in guts of obarray"); /* Like CADR error message */