1 files changed, 7 insertions, 11 deletions

diff --git a/toke.c b/toke.c
index 9e332fc290..0cbe1c0ee5 100644
--- a/toke.c
+++ b/toke.c
@@ -10347,24 +10347,20 @@ Perl_scan_num(pTHX_ const char *start, YYSTYPE* lvalp)
                                 hexfp_exp += *h - '0';
 #ifdef NV_MIN_EXP
                                 if (negexp
-                                    && -hexfp_exp < NV_MIN_EXP - 1)
-                                {
+                                    && -hexfp_exp < NV_MIN_EXP - 1) {
                                     Perl_ck_warner(aTHX_ packWARN(WARN_OVERFLOW),
                                                    "Hexadecimal float: exponent underflow");
-#endif
                                     break;
                                 }
-                                else {
+#endif
 #ifdef NV_MAX_EXP
-                                    if (!negexp
-                                        && hexfp_exp > NV_MAX_EXP - 1)
-                                    {
-                                        Perl_ck_warner(aTHX_ packWARN(WARN_OVERFLOW),
+                                if (!negexp
+                                    && hexfp_exp > NV_MAX_EXP - 1) {
+                                    Perl_ck_warner(aTHX_ packWARN(WARN_OVERFLOW),
                                                    "Hexadecimal float: exponent overflow");
-                                        break;
-                                    }
-#endif
+                                    break;
                                 }
+#endif
                             }
                             h++;
                         }