err => long int

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

1 files changed, 2 insertions, 2 deletions

diff --git a/exp2.c b/exp2.c
index 6760ec6af..c5d11e055 100644
--- a/exp2.c
+++ b/exp2.c
@@ -108,7 +108,7 @@ mpfr_exp2 (y, x, rnd_mode)
       mp_prec_t Ny = MPFR_PREC(y);   /* Precision of input variable */
 
       mp_prec_t Nt;   /* Precision of the intermediary variable */
-      mp_prec_t err;  /* Precision of error */
+      long int err;  /* Precision of error */
                 
       /* compute the precision of intermediary variable */
       Nt=MAX(Nx,Ny);
@@ -138,7 +138,7 @@ mpfr_exp2 (y, x, rnd_mode)
 	/* actualisation of the precision */
 	Nt += 10;
 
-      } while (!mpfr_can_round(t,err,GMP_RNDN,rnd_mode,Ny));
+      } while ((err<0) || !mpfr_can_round(t,err,GMP_RNDN,rnd_mode,Ny));
  
       inexact = mpfr_set(y,t,rnd_mode);
       mpfr_clear(t);