X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Finternal%2Ffloatscan.c;fp=src%2Finternal%2Ffloatscan.c;h=b2313293b3985b5af6a7a2f1df02b5ebd45af398;hp=6390d46a1372089e41c82c0931a1eb7dd4058642;hb=4054da9ba062c694dc4fde5c577fcb6da7743bc9;hpb=5837a0bb6b5cf516f79527e837368af0b494d51a diff --git a/src/internal/floatscan.c b/src/internal/floatscan.c index 6390d46a..b2313293 100644 --- a/src/internal/floatscan.c +++ b/src/internal/floatscan.c @@ -200,16 +200,17 @@ static long double decfloat(FILE *f, int c, int bits, int emin, int sign, int po /* FIXME: find a way to compute optimal sh */ if (rp > 9+9*LD_B1B_DIG) sh = 9; e2 += sh; - for (k=a; k!=z; k=(k+1 & MASK)) { + for (i=0; (k=(a+i & MASK))!=z && i>sh) + carry; carry = (1000000000>>sh) * tmp; if (k==a && !x[k]) { a = (a+1 & MASK); + i--; rp -= 9; } } - if (carry) { + if (carry && k==z) { if ((z+1 & MASK) != a) { x[z] = carry; z = (z+1 & MASK);