diff options
76 files changed, 111 insertions, 113 deletions
@@ -92,6 +92,7 @@ mpfr_exp (mpfr_ptr y, mpfr_srcptr x, mpfr_rnd_t rnd_mode) previous_emax = expo.saved_emax; MPFR_SAVE_EXPO_FREE (expo); } + /* mpfr_cmp works even in reduced emin,emax range */ if (MPFR_UNLIKELY (mpfr_cmp (x, bound_emax) >= 0)) { @@ -120,6 +121,7 @@ mpfr_exp (mpfr_ptr y, mpfr_srcptr x, mpfr_rnd_t rnd_mode) previous_emin = expo.saved_emin; MPFR_SAVE_EXPO_FREE (expo); } + if (MPFR_UNLIKELY (mpfr_cmp (x, bound_emin) <= 0)) { /* x < log(2^(emin - 2)), thus exp(x) < 2^(emin - 2) */ @@ -130,7 +132,7 @@ mpfr_exp (mpfr_ptr y, mpfr_srcptr x, mpfr_rnd_t rnd_mode) expx = MPFR_GET_EXP (x); precy = MPFR_PREC (y); - /* if x < 2^(-precy), then exp(x) i.e. gives 1 +/- 1 ulp(1) */ + /* if x < 2^(-precy), then exp(x) gives 1 +/- 1 ulp(1) */ if (MPFR_UNLIKELY (expx < 0 && (mpfr_uexp_t) (-expx) > precy)) { mpfr_exp_t emin = __gmpfr_emin; @@ -149,17 +151,13 @@ mpfr_exp (mpfr_ptr y, mpfr_srcptr x, mpfr_rnd_t rnd_mode) else { __gmpfr_emin = 1; - __gmpfr_emax = 1; + __gmpfr_emax = 1 + (MPFR_PREC(y) == 1); mpfr_setmin (y, 1); /* y = 1 */ if (MPFR_IS_POS_SIGN (signx) && (rnd_mode == MPFR_RNDU || rnd_mode == MPFR_RNDA)) { - mp_size_t yn; - int sh; - - yn = MPFR_LIMB_SIZE (y); - sh = (mpfr_prec_t) yn * GMP_NUMB_BITS - MPFR_PREC(y); - MPFR_MANT(y)[0] += MPFR_LIMB_ONE << sh; + /* Warning: should work for precision 1 bit too! */ + mpfr_nextabove (y); inexact = 1; } else diff --git a/tests/tabs.c b/tests/tabs.c index 673412245..56f9329fa 100644 --- a/tests/tabs.c +++ b/tests/tabs.c @@ -167,7 +167,7 @@ main (int argc, char *argv[]) check_inexact (); check_cmp (argc, argv); - test_generic (2, 1000, 10); + test_generic (MPFR_PREC_MIN, 1000, 10); tests_end_mpfr (); return 0; diff --git a/tests/tacos.c b/tests/tacos.c index fa0177e13..0a8b9353d 100644 --- a/tests/tacos.c +++ b/tests/tacos.c @@ -171,7 +171,7 @@ main (void) } } - test_generic (2, 100, 7); + test_generic (MPFR_PREC_MIN, 100, 7); mpfr_clear (x); mpfr_clear (y); diff --git a/tests/tacosh.c b/tests/tacosh.c index c95138ec1..fbabc3098 100644 --- a/tests/tacosh.c +++ b/tests/tacosh.c @@ -204,8 +204,8 @@ main (int argc, char *argv[]) bug20070831 (); huge (); - test_generic (2, 100, 25); - test_generic_huge (2, 100, 5); + test_generic (MPFR_PREC_MIN, 100, 25); + test_generic_huge (MPFR_PREC_MIN, 100, 5); data_check ("data/acosh", mpfr_acosh, "mpfr_acosh"); bad_cases (mpfr_acosh, mpfr_cosh, "mpfr_acosh", 0, -128, 29, diff --git a/tests/tadd.c b/tests/tadd.c index 4d90ce466..f27e1fac3 100644 --- a/tests/tadd.c +++ b/tests/tadd.c @@ -1146,7 +1146,7 @@ main (int argc, char *argv[]) check_extreme (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tadd_d.c b/tests/tadd_d.c index 2782c1cd5..5848264e0 100644 --- a/tests/tadd_d.c +++ b/tests/tadd_d.c @@ -139,7 +139,7 @@ main (void) check_nans (); check_regulars (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tadd_ui.c b/tests/tadd_ui.c index 2d0f5c910..7e98bb784 100644 --- a/tests/tadd_ui.c +++ b/tests/tadd_ui.c @@ -108,7 +108,7 @@ main (int argc, char *argv[]) check3 ("-2.0769715792901673e-5", 880524, MPFR_RNDN, "8.8052399997923023e5"); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tagm.c b/tests/tagm.c index 6f9781a6c..a1d1a5946 100644 --- a/tests/tagm.c +++ b/tests/tagm.c @@ -327,7 +327,7 @@ main (int argc, char* argv[]) check4 ("1.0", "44.0", MPFR_RNDU, "13.3658354512981243907", 1); check4 ("1.0", "3.7252902984619140625e-9", MPFR_RNDU, "0.07553933569711989657765", 1); - test_generic (2, 300, 17); + test_generic (MPFR_PREC_MIN, 300, 17); tests_end_mpfr (); return 0; diff --git a/tests/tai.c b/tests/tai.c index a12622dd9..1873107ed 100644 --- a/tests/tai.c +++ b/tests/tai.c @@ -98,7 +98,7 @@ main (int argc, char *argv[]) check_large (); check_zero (); - test_generic (2, 100, 5); + test_generic (MPFR_PREC_MIN, 100, 5); tests_end_mpfr (); return 0; diff --git a/tests/tasin.c b/tests/tasin.c index 11ec766f5..5214002a5 100644 --- a/tests/tasin.c +++ b/tests/tasin.c @@ -268,7 +268,7 @@ main (void) special_overflow (); reduced_expo_range (); - test_generic (2, 100, 15); + test_generic (MPFR_PREC_MIN, 100, 15); tests_end_mpfr (); diff --git a/tests/tasinh.c b/tests/tasinh.c index 17228d1d6..77aa9faf3 100644 --- a/tests/tasinh.c +++ b/tests/tasinh.c @@ -147,7 +147,7 @@ main (int argc, char *argv[]) special (); - test_generic (2, 100, 25); + test_generic (MPFR_PREC_MIN, 100, 25); data_check ("data/asinh", mpfr_asinh, "mpfr_asinh"); bad_cases (mpfr_asinh, mpfr_sinh, "mpfr_asinh", 256, -128, 29, diff --git a/tests/tatan.c b/tests/tatan.c index 77e4d69cc..839916689 100644 --- a/tests/tatan.c +++ b/tests/tatan.c @@ -627,9 +627,9 @@ main (int argc, char *argv[]) atan2_different_prec (); reduced_expo_range (); - test_generic_atan (2, 200, 17); - test_generic_atan2 (2, 200, 17); - test_generic_atan2_neg (2, 200, 17); + test_generic_atan (MPFR_PREC_MIN, 200, 17); + test_generic_atan2 (MPFR_PREC_MIN, 200, 17); + test_generic_atan2_neg (MPFR_PREC_MIN, 200, 17); data_check ("data/atan", mpfr_atan, "mpfr_atan"); bad_cases (mpfr_atan, mpfr_tan, "mpfr_atan", 256, -40, 1, 4, 128, 800, 40); diff --git a/tests/tatanh.c b/tests/tatanh.c index 5479f36af..15da7a061 100644 --- a/tests/tatanh.c +++ b/tests/tatanh.c @@ -175,7 +175,7 @@ main (int argc, char *argv[]) special (); - test_generic (2, 100, 25); + test_generic (MPFR_PREC_MIN, 100, 25); data_check ("data/atanh", mpfr_atanh, "mpfr_atanh"); bad_cases (mpfr_atanh, mpfr_tanh, "mpfr_atanh", 256, -128, 9, diff --git a/tests/tcbrt.c b/tests/tcbrt.c index ce5b656f1..6db285648 100644 --- a/tests/tcbrt.c +++ b/tests/tcbrt.c @@ -207,7 +207,7 @@ main (void) } mpfr_clear (x); - test_generic (2, 200, 10); + test_generic (MPFR_PREC_MIN, 200, 10); data_check ("data/cbrt", mpfr_cbrt, "mpfr_cbrt"); diff --git a/tests/tconst_catalan.c b/tests/tconst_catalan.c index 2177e61c0..618e14754 100644 --- a/tests/tconst_catalan.c +++ b/tests/tconst_catalan.c @@ -50,7 +50,7 @@ main (int argc, char *argv[]) } mpfr_clear (x); - test_generic (2, 200, 1); + test_generic (MPFR_PREC_MIN, 200, 1); tests_end_mpfr (); return 0; diff --git a/tests/tconst_euler.c b/tests/tconst_euler.c index cda5334aa..219936f3b 100644 --- a/tests/tconst_euler.c +++ b/tests/tconst_euler.c @@ -106,7 +106,7 @@ main (int argc, char *argv[]) mpfr_clear (z); mpfr_clear (t); - test_generic (2, 200, 1); + test_generic (MPFR_PREC_MIN, 200, 1); tests_end_mpfr (); return 0; diff --git a/tests/tconst_log2.c b/tests/tconst_log2.c index 9448ef7cf..8f8bb9246 100644 --- a/tests/tconst_log2.c +++ b/tests/tconst_log2.c @@ -210,7 +210,7 @@ main (int argc, char *argv[]) check_large (); check_cache (); - test_generic (2, 200, 1); + test_generic (MPFR_PREC_MIN, 200, 1); tests_end_mpfr (); return 0; diff --git a/tests/tconst_pi.c b/tests/tconst_pi.c index 364ebb5da..af197d21e 100644 --- a/tests/tconst_pi.c +++ b/tests/tconst_pi.c @@ -175,7 +175,7 @@ main (int argc, char *argv[]) check_large (); - test_generic (2, 200, 1); + test_generic (MPFR_PREC_MIN, 200, 1); tests_end_mpfr (); diff --git a/tests/tcos.c b/tests/tcos.c index 0c1841c87..c40dd5783 100644 --- a/tests/tcos.c +++ b/tests/tcos.c @@ -356,7 +356,7 @@ main (int argc, char *argv[]) check53 ("1.00591265847407274059", "0.53531755997839769456", MPFR_RNDN); overflowed_cos0 (); - test_generic (2, 100, 15); + test_generic (MPFR_PREC_MIN, 100, 15); /* check inexact flag */ mpfr_set_prec (x, 3); diff --git a/tests/tcosh.c b/tests/tcosh.c index bb0c39033..940eff9d4 100644 --- a/tests/tcosh.c +++ b/tests/tcosh.c @@ -191,7 +191,7 @@ main (int argc, char *argv[]) special_overflow (); special (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); data_check ("data/cosh", mpfr_cosh, "mpfr_cosh"); bad_cases (mpfr_cosh, mpfr_acosh, "mpfr_cosh", 0, 1, 255, 4, 128, 800, 100); diff --git a/tests/tcot.c b/tests/tcot.c index 83819bc8a..696f823b3 100644 --- a/tests/tcot.c +++ b/tests/tcot.c @@ -134,7 +134,7 @@ main (int argc, char *argv[]) two2emin (MPFR_EMAX_DEFAULT); if (MPFR_EMAX_MAX != MPFR_EMAX_DEFAULT) two2emin (MPFR_EMAX_MAX); - test_generic (2, 200, 5); + test_generic (MPFR_PREC_MIN, 200, 5); tests_end_mpfr (); return 0; diff --git a/tests/tcoth.c b/tests/tcoth.c index d90c181b4..6a7b22d1c 100644 --- a/tests/tcoth.c +++ b/tests/tcoth.c @@ -202,7 +202,7 @@ main (int argc, char *argv[]) check_specials (); check_bugs (); - test_generic (2, 200, 10); + test_generic (MPFR_PREC_MIN, 200, 10); underflowed_cothinf (); tests_end_mpfr (); diff --git a/tests/tcsc.c b/tests/tcsc.c index 6b7a39be7..e17f1bb3a 100644 --- a/tests/tcsc.c +++ b/tests/tcsc.c @@ -85,7 +85,7 @@ main (int argc, char *argv[]) check_specials (); - test_generic (2, 100, 10); + test_generic (MPFR_PREC_MIN, 100, 10); tests_end_mpfr (); return 0; diff --git a/tests/tcsch.c b/tests/tcsch.c index a15c7a49d..863c89371 100644 --- a/tests/tcsch.c +++ b/tests/tcsch.c @@ -100,7 +100,7 @@ main (int argc, char *argv[]) tests_start_mpfr (); check_specials (); - test_generic (2, 200, 10); + test_generic (MPFR_PREC_MIN, 200, 10); tests_end_mpfr (); return 0; diff --git a/tests/td_div.c b/tests/td_div.c index 0de183143..292c04aab 100644 --- a/tests/td_div.c +++ b/tests/td_div.c @@ -187,7 +187,7 @@ main (void) check_nans (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/td_sub.c b/tests/td_sub.c index b3d898e9d..c5151edf3 100644 --- a/tests/td_sub.c +++ b/tests/td_sub.c @@ -107,7 +107,7 @@ main (void) check_nans (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tdigamma.c b/tests/tdigamma.c index 3adbd6cd7..097f3a3fd 100644 --- a/tests/tdigamma.c +++ b/tests/tdigamma.c @@ -56,7 +56,7 @@ main (int argc, char *argv[]) special (); - test_generic (2, 100, 2); + test_generic (MPFR_PREC_MIN, 100, 2); data_check ("data/digamma", mpfr_digamma, "mpfr_digamma"); diff --git a/tests/tdim.c b/tests/tdim.c index 025d7242a..b0fdb68c3 100644 --- a/tests/tdim.c +++ b/tests/tdim.c @@ -104,7 +104,7 @@ main (void) mpfr_clear (y); mpfr_clear (z); - test_generic (2, 220, 42); + test_generic (MPFR_PREC_MIN, 220, 42); tests_end_mpfr (); return 0; diff --git a/tests/tdiv.c b/tests/tdiv.c index f7b02aefd..c55e501f2 100644 --- a/tests/tdiv.c +++ b/tests/tdiv.c @@ -1330,7 +1330,7 @@ main (int argc, char *argv[]) test_20070603 (); test_20070628 (); test_20151023 (); - test_generic (2, 800, 50); + test_generic (MPFR_PREC_MIN, 800, 50); test_bad (); test_extreme (); diff --git a/tests/tdiv_d.c b/tests/tdiv_d.c index 12971657a..4ed1c632a 100644 --- a/tests/tdiv_d.c +++ b/tests/tdiv_d.c @@ -133,7 +133,7 @@ main (void) check_nans (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tdiv_ui.c b/tests/tdiv_ui.c index 0a56d9b51..e270149bb 100644 --- a/tests/tdiv_ui.c +++ b/tests/tdiv_ui.c @@ -236,7 +236,7 @@ main (int argc, char **argv) } mpfr_clear (x); - test_generic (2, 200, 100); + test_generic (MPFR_PREC_MIN, 200, 100); tests_end_mpfr (); return 0; diff --git a/tests/teint.c b/tests/teint.c index 229fabd69..edf0b8f4d 100644 --- a/tests/teint.c +++ b/tests/teint.c @@ -205,7 +205,7 @@ main (int argc, char *argv[]) { check_specials (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); } tests_end_mpfr (); diff --git a/tests/terf.c b/tests/terf.c index 7a1997e0d..c71e06a6b 100644 --- a/tests/terf.c +++ b/tests/terf.c @@ -649,8 +649,8 @@ main (int argc, char *argv[]) test_erfc (); reduced_expo_range (); - test_generic_erf (2, 100, 15); - test_generic_erfc (2, 100, 15); + test_generic_erf (MPFR_PREC_MIN, 100, 15); + test_generic_erfc (MPFR_PREC_MIN, 100, 15); data_check ("data/erf", mpfr_erf, "mpfr_erf"); data_check ("data/erfc", mpfr_erfc, "mpfr_erfc"); diff --git a/tests/texp.c b/tests/texp.c index 2f5e36a2f..92f917636 100644 --- a/tests/texp.c +++ b/tests/texp.c @@ -976,7 +976,7 @@ main (int argc, char *argv[]) check_inexact (); check_special (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); compare_exp2_exp3 (20, 1000); check_worst_cases(); diff --git a/tests/texp10.c b/tests/texp10.c index cfd41088f..d2373d8b3 100644 --- a/tests/texp10.c +++ b/tests/texp10.c @@ -300,7 +300,7 @@ main (int argc, char *argv[]) } } - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); mpfr_clear (x); mpfr_clear (y); diff --git a/tests/texp2.c b/tests/texp2.c index b00b49c68..4ac67659a 100644 --- a/tests/texp2.c +++ b/tests/texp2.c @@ -361,7 +361,7 @@ main (int argc, char *argv[]) exit (1); } - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); mpfr_clear (x); mpfr_clear (y); diff --git a/tests/texpm1.c b/tests/texpm1.c index 76d30ee83..fd27a8c2f 100644 --- a/tests/texpm1.c +++ b/tests/texpm1.c @@ -159,7 +159,7 @@ main (int argc, char *argv[]) special (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); data_check ("data/expm1", mpfr_expm1, "mpfr_expm1"); bad_cases (mpfr_expm1, mpfr_log1p, "mpfr_expm1", 256, -256, 255, diff --git a/tests/tfmod.c b/tests/tfmod.c index d00b65634..2c620aef4 100644 --- a/tests/tfmod.c +++ b/tests/tfmod.c @@ -358,7 +358,7 @@ main (int argc, char *argv[]) bug20090519 (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); special (); regular (); diff --git a/tests/tfrac.c b/tests/tfrac.c index 8f7b17737..d4094bbd4 100644 --- a/tests/tfrac.c +++ b/tests/tfrac.c @@ -291,7 +291,7 @@ main (void) bug20090918 (); - test_generic (2, 1000, 10); + test_generic (MPFR_PREC_MIN, 1000, 10); tests_end_mpfr (); return 0; diff --git a/tests/tgamma.c b/tests/tgamma.c index d344dd36a..33f3b963f 100644 --- a/tests/tgamma.c +++ b/tests/tgamma.c @@ -1065,7 +1065,7 @@ main (int argc, char *argv[]) special_overflow (); exprange (); tiny (argc == 1); - test_generic (2, 100, 2); + test_generic (MPFR_PREC_MIN, 100, 2); gamma_integer (); test20071231 (); test20100709 (); diff --git a/tests/tgmpop.c b/tests/tgmpop.c index a5fbf85fa..e554df67e 100644 --- a/tests/tgmpop.c +++ b/tests/tgmpop.c @@ -1229,25 +1229,25 @@ main (int argc, char *argv[]) test_specialz (mpfr_add_z, mpz_add, "add"); test_specialz (mpfr_sub_z, mpz_sub, "sub"); test_specialz (mpfr_mul_z, mpz_mul, "mul"); - test_genericz (2, 100, 100, mpfr_add_z, "add"); - test_genericz (2, 100, 100, mpfr_sub_z, "sub"); - test_genericz (2, 100, 100, mpfr_mul_z, "mul"); - test_genericz (2, 100, 100, mpfr_div_z, "div"); + test_genericz (MPFR_PREC_MIN, 100, 100, mpfr_add_z, "add"); + test_genericz (MPFR_PREC_MIN, 100, 100, mpfr_sub_z, "sub"); + test_genericz (MPFR_PREC_MIN, 100, 100, mpfr_mul_z, "mul"); + test_genericz (MPFR_PREC_MIN, 100, 100, mpfr_div_z, "div"); test_special2z (mpfr_z_sub, mpz_sub, "sub"); - test_generic2z (2, 100, 100, mpfr_z_sub, "sub"); - - test_genericq (2, 100, 100, mpfr_add_q, "add"); - test_genericq (2, 100, 100, mpfr_sub_q, "sub"); - test_genericq (2, 100, 100, mpfr_mul_q, "mul"); - test_genericq (2, 100, 100, mpfr_div_q, "div"); - test_specialq (2, 100, 100, mpfr_mul_q, mpq_mul, "mul"); - test_specialq (2, 100, 100, mpfr_div_q, mpq_div, "div"); - test_specialq (2, 100, 100, mpfr_add_q, mpq_add, "add"); - test_specialq (2, 100, 100, mpfr_sub_q, mpq_sub, "sub"); - - test_cmp_z (2, 100, 100); - test_cmp_q (2, 100, 100); - test_cmp_f (2, 100, 100); + test_generic2z (MPFR_PREC_MIN, 100, 100, mpfr_z_sub, "sub"); + + test_genericq (MPFR_PREC_MIN, 100, 100, mpfr_add_q, "add"); + test_genericq (MPFR_PREC_MIN, 100, 100, mpfr_sub_q, "sub"); + test_genericq (MPFR_PREC_MIN, 100, 100, mpfr_mul_q, "mul"); + test_genericq (MPFR_PREC_MIN, 100, 100, mpfr_div_q, "div"); + test_specialq (MPFR_PREC_MIN, 100, 100, mpfr_mul_q, mpq_mul, "mul"); + test_specialq (MPFR_PREC_MIN, 100, 100, mpfr_div_q, mpq_div, "div"); + test_specialq (MPFR_PREC_MIN, 100, 100, mpfr_add_q, mpq_add, "add"); + test_specialq (MPFR_PREC_MIN, 100, 100, mpfr_sub_q, mpq_sub, "sub"); + + test_cmp_z (MPFR_PREC_MIN, 100, 100); + test_cmp_q (MPFR_PREC_MIN, 100, 100); + test_cmp_f (MPFR_PREC_MIN, 100, 100); check_for_zero (); diff --git a/tests/thypot.c b/tests/thypot.c index bdac6bed2..08027463c 100644 --- a/tests/thypot.c +++ b/tests/thypot.c @@ -320,7 +320,7 @@ main (int argc, char *argv[]) test_large (); alltst (); - test_generic (2, 100, 10); + test_generic (MPFR_PREC_MIN, 100, 10); tests_end_mpfr (); return 0; diff --git a/tests/tj0.c b/tests/tj0.c index 3f392293e..19ebe5fb6 100644 --- a/tests/tj0.c +++ b/tests/tj0.c @@ -134,7 +134,7 @@ main (int argc, char *argv[]) mpfr_clear (x); mpfr_clear (y); - test_generic (2, 100, 10); + test_generic (MPFR_PREC_MIN, 100, 10); data_check ("data/j0", mpfr_j0, "mpfr_j0"); diff --git a/tests/tj1.c b/tests/tj1.c index 58162ba20..6b5d4658b 100644 --- a/tests/tj1.c +++ b/tests/tj1.c @@ -75,7 +75,7 @@ main (int argc, char *argv[]) mpfr_clear (x); mpfr_clear (y); - test_generic (2, 100, 10); + test_generic (MPFR_PREC_MIN, 100, 10); data_check ("data/j1", mpfr_j1, "mpfr_j1"); diff --git a/tests/tlgamma.c b/tests/tlgamma.c index 32a6c7ba6..85afda98a 100644 --- a/tests/tlgamma.c +++ b/tests/tlgamma.c @@ -391,7 +391,7 @@ main (void) tests_start_mpfr (); special (); - test_generic (2, 100, 2); + test_generic (MPFR_PREC_MIN, 100, 2); data_check ("data/lgamma", mpfr_lgamma1, "mpfr_lgamma"); diff --git a/tests/tli2.c b/tests/tli2.c index 44f2bdb44..edd8c72e9 100644 --- a/tests/tli2.c +++ b/tests/tli2.c @@ -183,7 +183,7 @@ main (int argc, char *argv[]) normal (); - test_generic (2, 100, 2); + test_generic (MPFR_PREC_MIN, 100, 2); data_check ("data/li2", mpfr_li2, "mpfr_li2"); diff --git a/tests/tlngamma.c b/tests/tlngamma.c index 19427c79d..e0b0d0891 100644 --- a/tests/tlngamma.c +++ b/tests/tlngamma.c @@ -258,7 +258,7 @@ main (void) tests_start_mpfr (); special (); - test_generic (2, 100, 2); + test_generic (MPFR_PREC_MIN, 100, 2); tests_end_mpfr (); return 0; diff --git a/tests/tlog.c b/tests/tlog.c index 481ccdc3c..fc1e3fba9 100644 --- a/tests/tlog.c +++ b/tests/tlog.c @@ -347,7 +347,7 @@ main (int argc, char *argv[]) x_near_one (); - test_generic (2, 100, 40); + test_generic (MPFR_PREC_MIN, 100, 40); data_check ("data/log", mpfr_log, "mpfr_log"); bad_cases (mpfr_log, mpfr_exp, "mpfr_log", 256, -30, 30, 4, 128, 800, 50); diff --git a/tests/tlog10.c b/tests/tlog10.c index fad0427d7..9bb9e8d8e 100644 --- a/tests/tlog10.c +++ b/tests/tlog10.c @@ -58,7 +58,7 @@ main (int argc, char *argv[]) tests_start_mpfr (); - test_generic (2, 100, 20); + test_generic (MPFR_PREC_MIN, 100, 20); mpfr_init2 (x, 53); mpfr_init2 (y, 53); diff --git a/tests/tlog1p.c b/tests/tlog1p.c index f69f44bcd..c21656be7 100644 --- a/tests/tlog1p.c +++ b/tests/tlog1p.c @@ -136,7 +136,7 @@ main (int argc, char *argv[]) special (); other (); - test_generic (2, 100, 50); + test_generic (MPFR_PREC_MIN, 100, 50); data_check ("data/log1p", mpfr_log1p, "mpfr_log1p"); bad_cases (mpfr_log1p, mpfr_expm1, "mpfr_log1p", 256, -64, 40, diff --git a/tests/tlog2.c b/tests/tlog2.c index b0e87b41e..52f88e5bb 100644 --- a/tests/tlog2.c +++ b/tests/tlog2.c @@ -72,7 +72,7 @@ main (int argc, char *argv[]) special (); - test_generic (2, 100, 30); + test_generic (MPFR_PREC_MIN, 100, 30); data_check ("data/log2", mpfr_log2, "mpfr_log2"); diff --git a/tests/tmul.c b/tests/tmul.c index 0422bcb01..7e25dbc84 100644 --- a/tests/tmul.c +++ b/tests/tmul.c @@ -666,7 +666,7 @@ main (int argc, char *argv[]) check_min(); check_regression (); - test_generic (2, 500, 100); + test_generic (MPFR_PREC_MIN, 500, 100); data_check ("data/mulpi", mpfr_mulpi, "mpfr_mulpi"); diff --git a/tests/tmul_d.c b/tests/tmul_d.c index e4b495e95..3659123ad 100644 --- a/tests/tmul_d.c +++ b/tests/tmul_d.c @@ -114,7 +114,7 @@ main (void) check_nans (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tmul_ui.c b/tests/tmul_ui.c index 84a012d2c..ac33e7af2 100644 --- a/tests/tmul_ui.c +++ b/tests/tmul_ui.c @@ -279,7 +279,7 @@ main (int argc, char *argv[]) mpfr_clear(x); mpfr_clear(y); - test_generic (2, 500, 100); + test_generic (MPFR_PREC_MIN, 500, 100); tests_end_mpfr (); return 0; diff --git a/tests/tpow.c b/tests/tpow.c index 03ee9aba0..e4a2cc248 100644 --- a/tests/tpow.c +++ b/tests/tpow.c @@ -1611,9 +1611,9 @@ main (int argc, char **argv) bug20110320 (); tst20140422 (); - test_generic (2, 100, 100); - test_generic_ui (2, 100, 100); - test_generic_si (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); + test_generic_ui (MPFR_PREC_MIN, 100, 100); + test_generic_si (MPFR_PREC_MIN, 100, 100); data_check ("data/pow275", mpfr_pow275, "mpfr_pow275"); diff --git a/tests/trec_sqrt.c b/tests/trec_sqrt.c index dc8df2e77..796ab3634 100644 --- a/tests/trec_sqrt.c +++ b/tests/trec_sqrt.c @@ -183,7 +183,7 @@ main (void) special (); bad_case1 (); bad_case2 (); - test_generic (2, 300, 15); + test_generic (MPFR_PREC_MIN, 300, 15); data_check ("data/rec_sqrt", mpfr_rec_sqrt, "mpfr_rec_sqrt"); bad_cases (mpfr_rec_sqrt, pm2, "mpfr_rec_sqrt", 8, -256, 255, 4, 128, diff --git a/tests/trint.c b/tests/trint.c index ec7f81c65..e762b66b3 100644 --- a/tests/trint.c +++ b/tests/trint.c @@ -651,11 +651,11 @@ main (int argc, char *argv[]) basic_tests (); coverage_03032011 (); - test_generic_trunc (2, 300, 20); - test_generic_floor (2, 300, 20); - test_generic_ceil (2, 300, 20); - test_generic_round (2, 300, 20); - test_generic_roundeven (2, 300, 20); + test_generic_trunc (MPFR_PREC_MIN, 300, 20); + test_generic_floor (MPFR_PREC_MIN, 300, 20); + test_generic_ceil (MPFR_PREC_MIN, 300, 20); + test_generic_round (MPFR_PREC_MIN, 300, 20); + test_generic_roundeven (MPFR_PREC_MIN, 300, 20); #if __MPFR_STDC (199901L) if (argc > 1 && strcmp (argv[1], "-s") == 0) diff --git a/tests/troot.c b/tests/troot.c index c89edcb48..8844d2add 100644 --- a/tests/troot.c +++ b/tests/troot.c @@ -348,7 +348,7 @@ main (void) } mpfr_clear (x); - test_generic_ui (2, 200, 30); + test_generic_ui (MPFR_PREC_MIN, 200, 30); tests_end_mpfr (); return 0; diff --git a/tests/tsec.c b/tests/tsec.c index d67b04f08..95d55e731 100644 --- a/tests/tsec.c +++ b/tests/tsec.c @@ -161,7 +161,7 @@ main (int argc, char *argv[]) check_specials (); - test_generic (2, 200, 10); + test_generic (MPFR_PREC_MIN, 200, 10); overflowed_sec0 (); tests_end_mpfr (); diff --git a/tests/tsech.c b/tests/tsech.c index db2755bfd..af001f7fc 100644 --- a/tests/tsech.c +++ b/tests/tsech.c @@ -179,7 +179,7 @@ main (int argc, char *argv[]) tests_start_mpfr (); check_specials (); - test_generic (2, 200, 10); + test_generic (MPFR_PREC_MIN, 200, 10); overflowed_sech0 (); tests_end_mpfr (); diff --git a/tests/tset.c b/tests/tset.c index 99d553798..c7bfa3ad6 100644 --- a/tests/tset.c +++ b/tests/tset.c @@ -228,7 +228,7 @@ main (void) check_special (); check_neg_special (); - test_generic (2, 1000, 10); + test_generic (MPFR_PREC_MIN, 1000, 10); tests_end_mpfr (); return error; diff --git a/tests/tsi_op.c b/tests/tsi_op.c index ed5cdc10a..02c4e8c0c 100644 --- a/tests/tsi_op.c +++ b/tests/tsi_op.c @@ -138,10 +138,10 @@ main (int argc, char *argv[]) check_invert (); - test_generic_add_si (2, 200, 17); - test_generic_sub_si (2, 200, 17); - test_generic_mul_si (2, 200, 17); - test_generic_div_si (2, 200, 17); + test_generic_add_si (MPFR_PREC_MIN, 200, 17); + test_generic_sub_si (MPFR_PREC_MIN, 200, 17); + test_generic_mul_si (MPFR_PREC_MIN, 200, 17); + test_generic_div_si (MPFR_PREC_MIN, 200, 17); tests_end_mpfr (); return 0; diff --git a/tests/tsin.c b/tests/tsin.c index 42605ba0a..f1bd7d0ad 100644 --- a/tests/tsin.c +++ b/tests/tsin.c @@ -363,7 +363,7 @@ main (int argc, char *argv[]) mpfr_clear (c); mpfr_clear (x); - test_generic (2, 100, 15); + test_generic (MPFR_PREC_MIN, 100, 15); test_generic (MPFR_SINCOS_THRESHOLD-1, MPFR_SINCOS_THRESHOLD+1, 2); test_sign (); check_tiny (); diff --git a/tests/tsinh.c b/tests/tsinh.c index 263cc3a36..a311351b2 100644 --- a/tests/tsinh.c +++ b/tests/tsinh.c @@ -95,7 +95,7 @@ main (int argc, char *argv[]) special (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); data_check ("data/sinh", mpfr_sinh, "mpfr_sinh"); bad_cases (mpfr_sinh, mpfr_asinh, "mpfr_sinh", 256, -256, 255, diff --git a/tests/tsqr.c b/tests/tsqr.c index 45444b54e..199fa4692 100644 --- a/tests/tsqr.c +++ b/tests/tsqr.c @@ -166,7 +166,7 @@ main (void) for (p = MPFR_PREC_MIN; p < 200; p++) check_random (p); - test_generic (2, 200, 15); + test_generic (MPFR_PREC_MIN, 200, 15); data_check ("data/sqr", mpfr_sqr, "mpfr_sqr"); bad_cases (mpfr_sqr, mpfr_sqrt, "mpfr_sqr", 8, -256, 255, 4, 128, 800, 50); diff --git a/tests/tsqrt.c b/tests/tsqrt.c index 34551cadb..fb8c46299 100644 --- a/tests/tsqrt.c +++ b/tests/tsqrt.c @@ -728,7 +728,7 @@ main (void) check4 ("72154663483843080704304789585920.0", MPFR_RNDA, "1.e2d9a51977e6e@13"); - test_generic (2, 300, 15); + test_generic (MPFR_PREC_MIN, 300, 15); data_check ("data/sqrt", mpfr_sqrt, "mpfr_sqrt"); bad_cases (mpfr_sqrt, mpfr_sqr, "mpfr_sqrt", 8, -256, 255, 4, 128, 800, 50); diff --git a/tests/tsub.c b/tests/tsub.c index 89a75b9a3..d15a59a9b 100644 --- a/tests/tsub.c +++ b/tests/tsub.c @@ -650,7 +650,7 @@ main (void) for (p=2; p<200; p++) for (i=0; i<50; i++) check_two_sum (p); - test_generic (2, 800, 100); + test_generic (MPFR_PREC_MIN, 800, 100); tests_end_mpfr (); return 0; diff --git a/tests/tsub_d.c b/tests/tsub_d.c index c0005b2b2..57a125505 100644 --- a/tests/tsub_d.c +++ b/tests/tsub_d.c @@ -106,7 +106,7 @@ main (void) check_nans (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/tsub_ui.c b/tests/tsub_ui.c index 96fb7917b..652a94916 100644 --- a/tests/tsub_ui.c +++ b/tests/tsub_ui.c @@ -135,7 +135,7 @@ main (int argc, char *argv[]) check3 ("0.9999999999", 1, MPFR_RNDN, "-10000000827403709990903735160827636718750e-50"); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/ttan.c b/tests/ttan.c index e49c4ad10..d57059cde 100644 --- a/tests/ttan.c +++ b/tests/ttan.c @@ -150,7 +150,7 @@ main (int argc, char *argv[]) mpfr_clear (x); - test_generic (2, 100, 10); + test_generic (MPFR_PREC_MIN, 100, 10); data_check ("data/tan", mpfr_tan, "mpfr_tan"); bad_cases (mpfr_tan, mpfr_atan, "mpfr_tan", 256, -256, 255, 4, 128, 800, 40); diff --git a/tests/ttanh.c b/tests/ttanh.c index 03c837ac9..a8110c764 100644 --- a/tests/ttanh.c +++ b/tests/ttanh.c @@ -124,7 +124,7 @@ main (int argc, char *argv[]) special_overflow (); special (); - test_generic (2, 100, 100); + test_generic (MPFR_PREC_MIN, 100, 100); data_check ("data/tanh", mpfr_tanh, "mpfr_tanh"); bad_cases (mpfr_tanh, mpfr_atanh, "mpfr_tanh", 256, -128, 0, diff --git a/tests/tui_div.c b/tests/tui_div.c index d444237ff..e5fab1779 100644 --- a/tests/tui_div.c +++ b/tests/tui_div.c @@ -244,7 +244,7 @@ main (int argc, char *argv[]) "-6.8938315017943889615e-297"); check_overflow (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); /* inv is for 1/x */ data_check ("data/inv", mpfr_inv, "mpfr_ui_div(1,x)"); diff --git a/tests/tui_sub.c b/tests/tui_sub.c index 98ccfc35d..cc0c31071 100644 --- a/tests/tui_sub.c +++ b/tests/tui_sub.c @@ -353,7 +353,7 @@ main (int argc, char *argv[]) check_neg (); - test_generic (2, 1000, 100); + test_generic (MPFR_PREC_MIN, 1000, 100); tests_end_mpfr (); return 0; diff --git a/tests/ty0.c b/tests/ty0.c index 5562dc949..72a4d9fd3 100644 --- a/tests/ty0.c +++ b/tests/ty0.c @@ -86,7 +86,7 @@ main (int argc, char *argv[]) mpfr_clear (x); mpfr_clear (y); - test_generic (2, 100, 1); + test_generic (MPFR_PREC_MIN, 100, 1); data_check ("data/y0", mpfr_y0, "mpfr_y0"); diff --git a/tests/ty1.c b/tests/ty1.c index 816e534e2..28d32c1bf 100644 --- a/tests/ty1.c +++ b/tests/ty1.c @@ -86,7 +86,7 @@ main (int argc, char *argv[]) mpfr_clear (x); mpfr_clear (y); - test_generic (2, 100, 1); + test_generic (MPFR_PREC_MIN, 100, 1); data_check ("data/y1", mpfr_y1, "mpfr_y1"); diff --git a/tests/tzeta.c b/tests/tzeta.c index 8663ca497..7316223e0 100644 --- a/tests/tzeta.c +++ b/tests/tzeta.c @@ -415,7 +415,7 @@ main (int argc, char *argv[]) mpfr_clear (y); mpfr_clear (z); - test_generic (2, 70, 5); + test_generic (MPFR_PREC_MIN, 70, 5); test2 (); tests_end_mpfr (); |