Cross Reference: /xsrc/external/mit/xedit/dist/lisp/mathimp.c

Lines Matching refs:RBR
92 #define RBR(real)		(real)->data.bigratio
93 #define RBRN(real)		mpr_num(RBR(real))
94 #define RBRD(real)		mpr_den(RBR(real))
100 #define RCLEAR_BR(real)		mpr_clear(RBR(real)); XFREE(RBR(real))
542 	    RBR(real) = XALLOC(mpr);
543 	    mpr_init(RBR(real));
544 	    mpr_set(RBR(real), RBR(val));
578 	    RBR(real) = XALLOC(mpr);
579 	    mpr_init(RBR(real));
580 	    mpr_set(RBR(real), OBR(obj));
646 	mpr_clear(RBR(real));
647 	XFREE(RBR(real));
688 	    obj = BIGRATIO(RBR(real));
769 		    r##OP##_fi_br(real, RBR(val));			\
788 		    r##OP##_bi_br(real, RBR(val));			\
808 		    r##OP##_flonum(real, RFF(real), br_getd(RBR(val)));	\
829 		    r##OP##_fr_br(real, RBR(val));			\
842 		    r##OP##_flonum(real, br_getd(RBR(real)), RFF(val));	\
848 		    r##OP##_br_br(real, RBR(val));			\
946 		    r##OP##_flonum(real, br_getd(RBR(real)), ODF(obj));	\
1359 	RBR(real) = bigr;
2288 		    return (cmp_fi_br(RFI(op1), RBR(op2)));
2302 		    return (cmp_bi_br(RBI(op1), RBR(op2)));
2317 		    return (cmp_flonum(RFF(op1), br_getd(RBR(op2))));
2333 		    return (cmp_fr_br(RFRN(op1), RFRD(op1), RBR(op2)));
2339 		    return (cmp_br_fi(RBR(op1), RFI(op2)));
2341 		    return (cmp_br_bi(RBR(op1), RBI(op2)));
2343 		    return (cmp_flonum(br_getd(RBR(op1)), RFF(op2)));
2345 		    return (cmp_br_fr(RBR(op1), RFRN(op2), RFRD(op2)));
2347 		    return (cmp_br_br(RBR(op1), RBR(op2)));
2369 		    return (cmp_br_fi(RBR(op1), OFI(op2)));
2383 		    return (cmp_br_fi(RBR(op1), OII(op2)));
2397 		    return (cmp_br_bi(RBR(op1), OBI(op2)));
2412 		    return (cmp_flonum(br_getd(RBR(op1)), ODF(op2)));
2428 		    return (cmp_br_fr(RBR(op1), OFRN(op2), OFRD(op2)));
2442 		    return (cmp_br_br(RBR(op1), OBR(op2)));
2800 	RBR(real) = bigratio;
2842     mpr_canonicalize(RBR(real));
2848 	mpr_clear(RBR(real));
2849 	XFREE(RBR(real));
2871 	    mpr_clear(RBR(real));
2872 	    XFREE(RBR(real));
4064     RBR(real) = bigr;
4117 	RBR(real) = bigr;
4159 	RBR(real) = bigr;
4218     RBR(real) = bigr;
4241     RBR(real) = bigr;
4314     RBR(real) = bigr;
4363     RBR(real) = bigr;
4398     RBR(real) = bigr;
4420     RBR(real) = bigr;
4493     RBR(real) = bigr;
4512     RBR(real) = bigr;
4597 	RBR(real) = bigr;
4630 	RBR(real) = bigr;
4689     RBR(real) = bigr;
4707     RBR(real) = bigr;
4806 	RBR(real) = bigr;
4854 	RBR(real) = bigr;
4918     RBR(real) = bigr;
4969     mpr *bigratio = RBR(real);
5098     mpr *bigratio = RBR(real), rop;
5165     mpr_add(RBR(real), RBR(real), bigratio);
5172     mpr_sub(RBR(real), RBR(real), bigratio);
5179     mpr_mul(RBR(real), RBR(real), bigratio);
5186     mpr_div(RBR(real), RBR(real), bigratio);