This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
mktables: Handle platforms with 3 digit exponents
[perl5.git] / proto.h
diff --git a/proto.h b/proto.h
index 6003a7b..a708a61 100644 (file)
--- a/proto.h
+++ b/proto.h
@@ -4324,11 +4324,6 @@ STATIC void      S_validate_suid(pTHX_ PerlIO *rsfp);
        assert(rsfp)
 #  endif
 #endif
-#if !defined(USE_QUADMATH)
-#  if defined(PERL_IN_NUMERIC_C)
-STATIC NV      S_mulexp10(NV value, I32 exponent);
-#  endif
-#endif
 #if !defined(UV_IS_QUAD)
 #  if defined(PERL_IN_UTF8_C)
 STATIC int     S_is_utf8_cp_above_31_bits(const U8 * const s, const U8 * const e, const bool consider_overlongs)