dist/tests/reuse.c

96   mpfr_t res1;
105   mpfr_init2 (res1, prec);
118       mpfr_set (res1, ref2, rnd); /* exact operation */
119       testfunc (res1, res1, ref3, rnd);
121       if (! SAME_VAL (res1, ref1))
127           printf ("got      "); mpfr_dump (res1);
132       mpfr_set (res1, ref3, rnd);
133       testfunc (res1, ref2, res1, rnd);
134       if (! SAME_VAL (res1, ref1))
139           printf ("got      "); mpfr_dump (res1);
146       mpfr_set (res1, ref2, rnd);
147       testfunc (res1, res1, res1, rnd);
149       if (! SAME_VAL (res1, ref1))
154           printf ("got      "); mpfr_dump (res1);
162   mpfr_clear (res1);
307   mpfr_t res1;
315   mpfr_init2 (res1, prec);
328       mpfr_set (res1, ref2, rnd); /* exact operation */
329       testfunc (res1, res1, ref3, rnd);
331       if (! SAME_VAL (res1, ref1))
336           printf ("got      "); mpfr_dump (res1);
343   mpfr_clear (res1);
352   mpfr_t res1;
360   mpfr_init2 (res1, prec);
371       mpfr_set (res1, ref3, rnd); /* exact operation */
372       testfunc (res1, ref2, res1, rnd);
373       if (! SAME_VAL (res1, ref1))
377           DISP("expected", ref1); DISP2(", got ", res1);
384   mpfr_clear (res1);
393   mpfr_t res1;
401   mpfr_init2 (res1, prec);
411       mpfr_set (res1, ref2, rnd); /* exact operation */
412       testfunc (res1, res1, rnd);
413       if (! SAME_VAL (res1, ref1))
417           DISP("expected", ref1); DISP2(", got ", res1);
424   mpfr_clear (res1);
433   mpfr_t res1;
441   mpfr_init2 (res1, prec);
451       mpfr_set (res1, ref2, MPFR_RNDN); /* exact operation */
452       testfunc (res1, res1);
453       if (! SAME_VAL (res1, ref1))
457           DISP("expected", ref1); DISP2(", got ", res1);
464   mpfr_clear (res1);
473   mpfr_t res1, res2;
482   mpfr_init2 (res1, prec);
493       mpfr_set (res1, ref3, rnd); /* exact operation */
494       testfunc (res1, res2, res1, rnd);
495       if (! SAME_VAL (res1, ref1) || ! SAME_VAL (res2, ref2))
501           DISP("), got (", res1); DISP(",", res2); printf(")\n");
507       testfunc (res1, res2, res2, rnd);
508       if (! SAME_VAL (res1, ref1) || ! SAME_VAL (res2, ref2))
513           DISP("), got (", res1); DISP(",", res2); printf(")\n");
521   mpfr_clear (res1);
536   mpfr_t res1;
543                ref1, ref2, res1, (mpfr_ptr) 0);
564       mpfr_set (res1, ref2, rnd); /* exact operation */
565       mpfr_pow (res1, res1, ref3, rnd);
567       if (! SAME_VAL (res1, ref1))
572           printf ("got      "); mpfr_dump (res1);
577   mpfr_clears (ref1, ref2, ref3, res1, (mpfr_ptr) 0);