fixed MLK's

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

1 files changed, 3 insertions, 9 deletions

diff --git a/tests/tfma.c b/tests/tfma.c
index 1f48f2d5f..c50eaa040 100644
--- a/tests/tfma.c
+++ b/tests/tfma.c
@@ -214,7 +214,7 @@ main (int argc, char *argv[])
 
   {
     mp_prec_t prec;
-    mpfr_t x, y, z, t,s, slong;
+    mpfr_t t, slong;
     mp_rnd_t rnd;
     int inexact, compare;
     unsigned int n;
@@ -223,14 +223,9 @@ main (int argc, char *argv[])
     int p1=200;
     int N=200;
     
-    mpfr_init (x);
-    mpfr_init (y);
-    mpfr_init (z);
     mpfr_init (t);
-    mpfr_init (s);
     mpfr_init (slong);
 
-
     /* generic test */
     for (prec = p0; prec <= p1; prec++)
     {
@@ -295,14 +290,13 @@ main (int argc, char *argv[])
 	}
     }
   mpfr_clear (t);
-  mpfr_clear (s);
   mpfr_clear (slong);
 
-
   }
   mpfr_clear (x);
   mpfr_clear (y);
-  mpfr_clear (x);
+  mpfr_clear (z);
+  mpfr_clear (s);
 
   return 0;
 }