Searched refs:fixnum (Results 1 - 4 of 4) sorted by relevance
| /xsrc/external/mit/xedit/dist/lisp/ |
| H A D | string.c | 936 LispObj *fixnum; local in function:LispStringCompare
974 fixnum = FIXNUM(start1);
977 return ((cmp1 < cmp2) ? fixnum : NIL);
979 return ((cmp1 <= cmp2) ? fixnum : NIL);
981 return (fixnum);
983 return ((cmp1 >= cmp2) ? fixnum : NIL);
985 return ((cmp1 > cmp2) ? fixnum : NIL);
990 fixnum = FIXNUM(start1);
993 return (start1 >= end1 && start2 < end2 ? fixnum : NIL);
995 return (start1 >= end1 ? fixnum
[all...] |
| H A D | math.c | 210 num.real.data.fixnum = 1;
239 num.real.data.fixnum = 1;
257 num.real.data.fixnum = -1;
583 num.real.data.fixnum = -1;
621 num.real.data.fixnum = -1;
856 num.real.data.fixnum = 1;
957 gcd.data.fixnum = 0;
962 if (real.type == N_FIXNUM && real.data.fixnum == 0)
993 real.data.fixnum = -1;
1014 real.data.fixnum
[all...] |
| H A D | mathimp.c | 61 #define NRFI(num) (num)->real.data.fixnum
76 #define NIFI(num) (num)->imag.data.fixnum
87 #define RFI(real) (real)->data.fixnum
125 long fixnum; member in union:_n_real::__anon938c238e010a
189 /* fixnum */
301 /* fixnum fixnum */
310 /* fixnum bignum */
318 /* fixnum fixratio */
327 /* fixnum bigrati
4070 cmp_fi_bi(long fixnum,mpi * bignum) argument
4661 cmp_fr_fi(long num,long den,long fixnum) argument
4967 rop_br_fi_asmd_xr(n_real * real,long fixnum,int nop) argument
4991 radd_br_fi(n_real * real,long fixnum) argument
4997 rsub_br_fi(n_real * real,long fixnum) argument
5003 rmul_br_fi(n_real * real,long fixnum) argument
5009 rdiv_br_fi(n_real * real,long fixnum) argument
5015 cmp_br_fi(mpr * bigratio,long fixnum) argument
[all...] |
| H A D | bytecode.c | 2868 long fixnum = 0; local in function:ExecuteBytecode
3193 if (!FIXNUMP(reg0) || (fixnum = FIXNUM_VALUE(reg0)) < 0)
3194 LispDestroy("LAST: %s is not a positive fixnum",
3198 fixnum = 1;
3204 for (length -= fixnum, reg0 = reg1; length > 0; length--)
3213 if (!FIXNUMP(reg1) || (fixnum = FIXNUM_VALUE(reg1)) < 0)
3214 LispDestroy("NTHCDR: %s is not a positive fixnum",
3219 for (; fixnum > 0; fixnum--) {
|
Completed in 10 milliseconds