Gleurbs.

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

1 files changed, 1 insertions, 1 deletions

diff --git a/set_d.c b/set_d.c
index eff10bab9..ac387aa57 100644
--- a/set_d.c
+++ b/set_d.c
@@ -275,7 +275,7 @@ mpfr_set_d (r, d, rnd_mode)
       return;
     }
 
-  sizer = (MPFR_PREC(tmp)-1)/BITS_PER_MP_LIMB + 1;
+  sizer = (MPFR_PREC(r)-1)/BITS_PER_MP_LIMB + 1;
   if (sizer < MPFR_LIMBS_PER_DOUBLE) 
     {
       tmp = TMP_ALLOC(sizeof(mpfr_ptr));