projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
better SB-INT:MIX
[sbcl.git]
/
src
/
runtime
/
fixnump.h
diff --git
a/src/runtime/fixnump.h
b/src/runtime/fixnump.h
index
b3aadb7
..
756e2ea
100644
(file)
--- a/
src/runtime/fixnump.h
+++ b/
src/runtime/fixnump.h
@@
-12,11
+12,9
@@
#ifndef _FIXNUMP_H
#define _FIXNUMP_H
#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
}
#endif