Use deprecate() in place of deprecate_old(), and remove S_deprecate_old().

1 files changed, 0 insertions, 7 deletions

diff --git a/proto.h b/proto.h
index 05b38126c9..c99a25aad9 100644
--- a/proto.h
+++ b/proto.h
@@ -521,13 +521,6 @@ PERL_CALLCONV void	Perl_deprecate(pTHX_ const char *const s)
 #define PERL_ARGS_ASSERT_DEPRECATE	\
 	assert(s)
 
-#if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT)
-STATIC void	S_deprecate_old(pTHX_ const char *const s)
-			__attribute__nonnull__(pTHX_1);
-#define PERL_ARGS_ASSERT_DEPRECATE_OLD	\
-	assert(s)
-
-#endif
 PERL_CALLCONV OP*	Perl_die(pTHX_ const char* pat, ...)
 			__attribute__format__null_ok__(__printf__,pTHX_1,pTHX_2);