Introduce sb!vm::fixnum-lowtags

[sbcl.git] / src / runtime / fixnump.h

diff --git a/src/runtime/fixnump.h b/src/runtime/fixnump.h
index 9681520..756e2ea 100644 (file)
--- 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