prevent overflow

diff --git a/lang/cem/libcc/gen/atof.c b/lang/cem/libcc/gen/atof.c
index 8c2c302..256db5e 100644 (file)
--- a/lang/cem/libcc/gen/atof.c
+++ b/lang/cem/libcc/gen/atof.c
@@ -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;