Searched refs:OCXR (Results 1 - 2 of 2) sorted by relevance
| /xsrc/external/mit/xedit/dist/lisp/ |
| H A D | mathimp.c | 112 #define OCXR(object) (object)->data.complex.real macro
629 set_real_object(NREAL(num), OCXR(obj));
710 OCXR(obj) = make_real_object(NREAL(num));
2459 if (cmp_real_object(NREAL(op1), OCXR(op2)) == 0)
2560 return (cmp_real_object(NREAL(op1), OCXR(op2)));
2581 return (cmp_object_object(OCXR(op1), op2, real));
2588 return (cmp_object_object(op1, OCXR(op2), real));
3569 add_real_object(NREAL(num), OCXR(comp));
3586 sub_real_object(NREAL(num), OCXR(comp));
3608 mul_real_object(NREAL(num), OCXR(com
[all...] |
| H A D | math.c | 580 realpart = OCXR(number);
1286 return (OCXR(number));
1363 result = cmp_real_object(&zero, OCXR(number)) == 0 &&
|
Completed in 6 milliseconds