ajout du flag inexact

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

1 files changed, 4 insertions, 2 deletions

diff --git a/exp2.c b/exp2.c
index 0c05e90e3..6760ec6af 100644
--- a/exp2.c
+++ b/exp2.c
@@ -64,6 +64,8 @@ mpfr_exp2 (y, x, rnd_mode)
 #endif
 {    
 
+    int inexact =0;
+
     if (MPFR_IS_NAN(x))
       {
         MPFR_SET_NAN(y); 
@@ -138,10 +140,10 @@ mpfr_exp2 (y, x, rnd_mode)
 
       } while (!mpfr_can_round(t,err,GMP_RNDN,rnd_mode,Ny));
  
-      mpfr_set(y,t,rnd_mode);
+      inexact = mpfr_set(y,t,rnd_mode);
       mpfr_clear(t);
       mpfr_clear(te);
     }
-    return 1;
+    return inexact;
 
 }