summaryrefslogtreecommitdiff
path: root/functions.m
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-08-04 18:44:16 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-08-04 18:44:16 +0200
commitce1bfc2039cc673c3c9099933c05c9fac3e88ae9 (patch)
tree91380866c5adc53e908e977a7734f11a2bd08f86 /functions.m
parent90e6023292e2bfe927bd633bac42fc355bb9f4d1 (diff)
Make it possible to disable fixnum support by supplying -DNO_FIXNUMS as a compiler flag.
Diffstat (limited to 'functions.m')
-rw-r--r--functions.m2
1 files changed, 2 insertions, 0 deletions
diff --git a/functions.m b/functions.m
index 068d217..ef3e6c3 100644
--- a/functions.m
+++ b/functions.m
@@ -48,10 +48,12 @@ id MLKFixnumWithInt (intptr_t value)
id MLKIntegerWithInt (intptr_t value)
{
+#ifndef NO_FIXNUMS
intptr_t maybeFixnum = (value << 1) | 1;
if (value == (maybeFixnum >> 1))
return (id)maybeFixnum;
else
+#endif
return [MLKInteger integerWithIntptr_t:value];
}