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) {
if (exp % 2) correction *= exp5;
exp /= 2;
exp5 *= exp5;
if (exp != 0) exp5 *= exp5;
}
if (expsign) fl = fl / correction;
else fl = fl * correction;