infnan: if the mulexp10 value goes to zero, return it.

diff --git a/numeric.c b/numeric.c
index ab42efc..75d348d 100644 (file)
--- a/numeric.c
+++ b/numeric.c
@@ -1029,6 +1029,8 @@ S_mulexp10(NV value, I32 exponent)
             exponent--;
             value /= 10;
         }
+        if (value == 0.0)
+            return value;
 #endif
     }
     for (bit = 1; exponent; bit <<= 1) {