Fix output of floating-point values with large exponent.

diff --git a/ChangeLog b/ChangeLog
index 57272542ad2c3114bc1a226746300d1e77f60282..34465ea509c635e4ebdbffa82b43ab177d32c3b1 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2007-11-04  Bruno Haible  <bruno@clisp.org>
+
+       * lib/vasnprintf.c (scale10_round_decimal_decoded): Fix shift loop.
+
 2007-11-04  Bruno Haible  <bruno@clisp.org>
 
        * modules/relocatable-prog (Files): Add m4/lib-ld.m4.

diff --git a/lib/vasnprintf.c b/lib/vasnprintf.c
index 55202cbe8cc1a69bab42a18618a2ed4e5c210f0c..17a6046308c66b1c449b61d6700046a7482eaf41 100644 (file)
--- a/lib/vasnprintf.c
+++ b/lib/vasnprintf.c
@@ -1151,7 +1151,7 @@ scale10_round_decimal_decoded (int e, mpn_t m, void *memory, int n)
                size_t count;
                for (count = m.nlimbs; count > 0; count--)
                  {
-                   accu += (mp_twolimb_t) *sourceptr++ << s;
+                   accu += (mp_twolimb_t) *sourceptr++ << s_bits;
                    *destptr++ = (mp_limb_t) accu;
                    accu = accu >> GMP_LIMB_BITS;
                  }