# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1100619153 0
# Node ID e8156cc4a58fde426e79ee2fbe979a652103c504
# Parent  b838f6a6cb4d8d76b2bb45093c70d87eae2a0637
(NILP): Use EQ rather than XFASTINT.

diff -r b838f6a6cb4d -r e8156cc4a58f src/lisp.h
--- a/src/lisp.h	Tue Nov 16 15:29:10 2004 +0000
+++ b/src/lisp.h	Tue Nov 16 15:32:33 2004 +0000
@@ -1374,7 +1374,7 @@
 
 /* Data type checking */
 
-#define NILP(x)  (XFASTINT (x) == XFASTINT (Qnil))
+#define NILP(x)  EQ (x, Qnil)
 #define GC_NILP(x) GC_EQ (x, Qnil)
 
 #define NUMBERP(x) (INTEGERP (x) || FLOATP (x))