X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Ffixnump.h;h=756e2eaa4eda68895b93b79a8cd512fd8dfeda72;hb=0285aa5ff8416027932daa001b84429be2ca559b;hp=b3aadb7061442658ab305320ec2216b9d6d79849;hpb=79cc569a97e444389350ea3f5b1017374fe16bec;p=sbcl.git

diff --git a/src/runtime/fixnump.h b/src/runtime/fixnump.h
index b3aadb7..756e2ea 100644
--- a/src/runtime/fixnump.h
+++ b/src/runtime/fixnump.h
@@ -12,11 +12,9 @@
 #ifndef _FIXNUMP_H
 #define _FIXNUMP_H
 
-static inline int fixnump(lispobj obj) {
-    return((obj &
-            (LOWTAG_MASK &
-             (~(EVEN_FIXNUM_LOWTAG|ODD_FIXNUM_LOWTAG))))
-           == 0);
+static inline int fixnump(lispobj obj)
+{
+    return((obj & FIXNUM_TAG_MASK) == 0);
 }
 
 #endif