X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Ffixnump.h;h=756e2eaa4eda68895b93b79a8cd512fd8dfeda72;hb=35ab27e7aab71c94aa6be12da15603c7fd87fca8;hp=9681520e24fa361be9db8404500c5f867fc29fc9;hpb=584bfdc4e1093e43e4eb328a418b012745935a29;p=sbcl.git

diff --git a/src/runtime/fixnump.h b/src/runtime/fixnump.h
index 9681520..756e2ea 100644
--- a/src/runtime/fixnump.h
+++ b/src/runtime/fixnump.h
@@ -14,10 +14,7 @@
 
 static inline int fixnump(lispobj obj)
 {
-    return((obj &
-            (LOWTAG_MASK &
-             (~(EVEN_FIXNUM_LOWTAG|ODD_FIXNUM_LOWTAG))))
-           == 0);
+    return((obj & FIXNUM_TAG_MASK) == 0);
 }
 
 #endif