diff src/lread.c @ 58449:377948a6af9a

(oblookup): Don't use XFASTINT blindly.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 23 Nov 2004 05:06:56 +0000
parents a65f6f256839
children 7b179055722a
line wrap: on
line diff
--- a/src/lread.c	Tue Nov 23 05:05:34 2004 +0000
+++ b/src/lread.c	Tue Nov 23 05:06:56 2004 +0000
@@ -3276,7 +3276,7 @@
   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 */