Searched refs:OCXI (Results 1 - 2 of 2) sorted by relevance

/xsrc/external/mit/xedit/dist/lisp/
H A Dmathimp.c113 #define OCXI(object) (object)->data.complex.imag macro
630 set_real_object(NIMAG(num), OCXI(obj));
708 OCXI(obj) = NIL;
711 OCXI(obj) = make_real_object(NIMAG(num));
2460 return (cmp_real_object(NIMAG(op1), OCXI(op2)));
2559 if (cmp_real_object(&zero, OCXI(op2)) == 0)
2580 else if (cmp_real_object(&zero, OCXI(op1)) == 0)
2587 if (cmp_real_object(&zero, OCXI(op2)) == 0)
3572 set_real_object(NIMAG(num), OCXI(comp));
3591 mul_real_object(NIMAG(num), OCXI(com
[all...]
H A Dmath.c584 mul_number_object(&num, OCXI(number));
817 return (OCXI(number));
1364 cmp_real_object(&zero, OCXI(number)) == 0 ? T : NIL;

Completed in 8 milliseconds