summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-10-29 11:14:40 +0000
committerNicholas Clark <nick@ccl4.org>2005-10-29 11:14:40 +0000
commit2674aeec9d4106f3928d3c8b88be7bc9e6f8eff1 (patch)
treeb3b535c1bacf95848dd392a96c00efe7f3ddc044 /gv.c
parente27afef8dac321d729b447b4b30a0ca796905454 (diff)
downloadperl-2674aeec9d4106f3928d3c8b88be7bc9e6f8eff1.tar.gz
gv_fullname3 and gv_efullname3 are definately mathoms. They even say so.
p4raw-id: //depot/perl@25871
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c12
1 files changed, 0 insertions, 12 deletions
diff --git a/gv.c b/gv.c
index 78d9d9598f..1d950eb033 100644
--- a/gv.c
+++ b/gv.c
@@ -1183,24 +1183,12 @@ Perl_gv_fullname4(pTHX_ SV *sv, const GV *gv, const char *prefix, bool keepmain)
}
void
-Perl_gv_fullname3(pTHX_ SV *sv, const GV *gv, const char *prefix)
-{
- gv_fullname4(sv, gv, prefix, TRUE);
-}
-
-void
Perl_gv_efullname4(pTHX_ SV *sv, const GV *gv, const char *prefix, bool keepmain)
{
const GV * const egv = GvEGV(gv);
gv_fullname4(sv, egv ? egv : gv, prefix, keepmain);
}
-void
-Perl_gv_efullname3(pTHX_ SV *sv, const GV *gv, const char *prefix)
-{
- gv_efullname4(sv, gv, prefix, TRUE);
-}
-
IO *
Perl_newIO(pTHX)
{