gv_fullname and gv_efullname are definately mathoms.

p4raw-id: //depot/perl@25869

1 files changed, 0 insertions, 14 deletions

diff --git a/gv.c b/gv.c
index d222d2885d..78d9d9598f 100644
--- a/gv.c
+++ b/gv.c
@@ -1201,20 +1201,6 @@ Perl_gv_efullname3(pTHX_ SV *sv, const GV *gv, const char *prefix)
     gv_efullname4(sv, gv, prefix, TRUE);
 }
 
-/* compatibility with versions <= 5.003. */
-void
-Perl_gv_fullname(pTHX_ SV *sv, const GV *gv)
-{
-    gv_fullname3(sv, gv, sv == (const SV*)gv ? "*" : "");
-}
-
-/* compatibility with versions <= 5.003. */
-void
-Perl_gv_efullname(pTHX_ SV *sv, const GV *gv)
-{
-    gv_efullname3(sv, gv, sv == (const SV*)gv ? "*" : "");
-}
-
 IO *
 Perl_newIO(pTHX)
 {