Parent Directory | Revision Log | Patch
revision 1.7 by camm, Sat Feb 15 00:38:28 2003 UTC | revision 1.8 by camm, Wed Feb 26 22:21:37 2003 UTC | |
---|---|---|
# | Line 76 DEFUN_NEW("ALLOCATE-BIGGER-FIXNUM-RANGE" | Line 76 DEFUN_NEW("ALLOCATE-BIGGER-FIXNUM-RANGE" |
76 | ||
77 | ||
78 | object | object |
79 | make_fixnum(long i) | make_fixnum1(long i) |
80 | { | { |
81 | object x; | object x; |
82 | ||
83 | if (-SMALL_FIXNUM_LIMIT <= i && i < SMALL_FIXNUM_LIMIT) | /* In a macro now */ |
84 | return(small_fixnum(i)); | /* if (-SMALL_FIXNUM_LIMIT <= i && i < SMALL_FIXNUM_LIMIT) */ |
85 | /* return(small_fixnum(i)); */ | |
86 | #ifdef BIGGER_FIXNUM_RANGE | #ifdef BIGGER_FIXNUM_RANGE |
87 | if (bigger_fixnum_table) | if (bigger_fixnum_table) |
88 | { if (i >= bigger_fixnums.min | { if (i >= bigger_fixnums.min |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |