prevent overflow

This commit is contained in:
ceriel 1988-08-10 15:54:15 +00:00
parent 5bde69d625
commit 5bd25f4545

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;