removed all tests that compare to libm

git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2088 280ebfd0-de03-0410-8827-d642c229c3f4

1 files changed, 0 insertions, 26 deletions

diff --git a/tests/tui_sub.c b/tests/tui_sub.c
index 15694f8ac..1a2c67421 100644
--- a/tests/tui_sub.c
+++ b/tests/tui_sub.c
@@ -141,10 +141,6 @@ check (unsigned long y, double x, mp_rnd_t rnd_mode, double z1)
   mpfr_init2(zz, 53);
   mpfr_set_d(xx, x, rnd_mode);
   mpfr_ui_sub(zz, y, xx, rnd_mode);
-#ifdef MPFR_HAVE_FESETROUND
-  mpfr_set_machine_rnd_mode(rnd_mode);
-#endif
-  if (z1==0.0) z1 = y-x;
   z2 = mpfr_get_d1 (zz);
   if (z1!=z2 && !(isnan(z1) && isnan(z2))) {
     printf("expected difference is %1.20e, got %1.20e\n",z1,z2);
@@ -208,28 +204,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) {
-      /* avoid denormalized numbers and overflows */
-      rnd = (rnd_mode==-1) ? LONG_RAND()%4 : rnd_mode;
-      check(y, x, rnd, 0.0);
-    }
-  }
-  }
-#endif
   special ();
   for (p=2; p<100; p++)
     for (k=0; k<100; k++)