diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2002-11-25 12:54:49 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2002-11-25 12:54:49 +0000 |
commit | 3cf9542cbfffcd1c66cbc4e396916d8527e67bd7 (patch) | |
tree | f1ab8b40b5dd709db4814a903b8105876307968e /tests/tadd_ui.c | |
parent | e01060829e30d5afa96c76e453cd7eff4a356395 (diff) | |
download | mpfr-3cf9542cbfffcd1c66cbc4e396916d8527e67bd7.tar.gz |
removed all tests that compare to libm
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2088 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tadd_ui.c')
-rw-r--r-- | tests/tadd_ui.c | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/tests/tadd_ui.c b/tests/tadd_ui.c index befe38e49..f6563839d 100644 --- a/tests/tadd_ui.c +++ b/tests/tadd_ui.c @@ -48,10 +48,6 @@ check3 (double x, unsigned long y, unsigned int rnd_mode, double z1) mpfr_init2(zz, 53); mpfr_set_d(xx, x, rnd_mode); mpfr_add_ui(zz, xx, y, rnd_mode); -#ifdef MPFR_HAVE_FESETROUND - mpfr_set_machine_rnd_mode(rnd_mode); -#endif - if (z1==0.0) z1 = x+y; z2 = mpfr_get_d1 (zz); if (z1!=z2 && !(isnan(z1) && isnan(z2))) { printf("expected sum is %1.20e, got %1.20e\n",z1,z2); @@ -80,26 +76,6 @@ main (int argc, char *argv[]) { tests_start_mpfr (); -#ifdef MPFR_HAVE_FESETROUND - { - double x; unsigned long y, N; int i,rnd_mode,rnd; - - mpfr_test_init (); - - SEED_RAND (time(NULL)); - N = (argc<2) ? 1000000 : atoi(argv[1]); - rnd_mode = (argc<3) ? -1 : atoi(argv[2]); - for (i=0;i<1000000;i++) { - x = drand(); - y = LONG_RAND(); - if (ABS(x)>=DBL_MIN && x+y<DBL_MAX && x+y>-DBL_MAX) { - /* avoid denormalized numbers and overflows */ - rnd = (rnd_mode==-1) ? LONG_RAND()%4 : rnd_mode; - check(x, y, rnd); - } - } - } -#endif special (); check3 (-1.716113812768534e-140, 1271212614, GMP_RNDZ, 1.27121261399999976e9); |