Minor patch (put to 0 the nonsignificant bits).

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

1 files changed, 5 insertions, 1 deletions

diff --git a/trunc.c b/trunc.c
index 8b112e40e..a6f927f2b 100644
--- a/trunc.c
+++ b/trunc.c
@@ -75,7 +75,7 @@ FUNC_NAME (r, u)
 {
   mp_ptr rp, up;
   mp_size_t size, asize;
-  mp_size_t prec;
+  mp_size_t prec, rw;
 #ifdef _MPFR_FLOOR_OR_CEIL
   mp_size_t ignored_n;
 #endif
@@ -144,6 +144,10 @@ FUNC_NAME (r, u)
 #endif
   MPN_COPY_INCR (rp, up, asize);
 
+  /* Put to 0 the remaining bits */
+  rw = r->_mp_prec & (BITS_PER_MP_LIMB - 1);
+  rp[asize] &= ~((((mp_limb_t)1)<<(BITS_PER_MP_LIMB - rw)) - (mp_limb_t)1);
+
   r->_mp_exp = exp;
   r->_mp_size = size >= 0 ? asize : -asize;
 }