More verbose debugging.

[p5sagit/p5-mst-13.2.git] / util.c

diff --git a/util.c b/util.c
index 8d51730..c92bf87 100644 (file)
--- a/util.c
+++ b/util.c
@@ -4169,8 +4169,6 @@ Perl_my_atof2(pTHX_ const char* orig, NV* value)
 
     if (seendigit && (*s == 'e' || *s == 'E')) {
        bool expnegative = 0;
-       I32 bit;
-       NV power;
 
        ++s;
        switch (*s) {