prevent overflow

This commit is contained in:
ceriel 1988-08-10 15:54:15 +00:00
parent 7e8d7af500
commit 094d427268

View file

@ -68,7 +68,7 @@ atof(p)
while (exp) { while (exp) {
if (exp % 2) correction *= exp5; if (exp % 2) correction *= exp5;
exp /= 2; exp /= 2;
exp5 *= exp5; if (exp != 0) exp5 *= exp5;
} }
if (expsign) fl = fl / correction; if (expsign) fl = fl / correction;
else fl = fl * correction; else fl = fl * correction;