Exactly 1 function, in perl.c, calls Perl_magicname(), so inline it.

p4raw-id: //depot/perl@34927

1 files changed, 0 insertions, 5 deletions

diff --git a/proto.h b/proto.h
index 4d5c83e9ee..1517baaeee 100644
--- a/proto.h
+++ b/proto.h
@@ -1796,11 +1796,6 @@ PERL_CALLCONV int	Perl_magic_wipepack(pTHX_ SV* sv, MAGIC* mg)
 #define PERL_ARGS_ASSERT_MAGIC_WIPEPACK	\
 	assert(sv); assert(mg)
 
-PERL_CALLCONV void	Perl_magicname(pTHX_ const char* sym, const char* name, I32 namlen)
-			__attribute__nonnull__(pTHX_1);
-#define PERL_ARGS_ASSERT_MAGICNAME	\
-	assert(sym)
-
 PERL_CALLCONV void	Perl_markstack_grow(pTHX);
 #if defined(USE_LOCALE_COLLATE)
 PERL_CALLCONV int	Perl_magic_setcollxfrm(pTHX_ SV* sv, MAGIC* mg)