summaryrefslogtreecommitdiff
path: root/mathoms.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 /mathoms.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 'mathoms.c')
-rw-r--r--mathoms.c12
1 files changed, 12 insertions, 0 deletions
diff --git a/mathoms.c b/mathoms.c
index a9fad364a3..3d9105fba1 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -305,6 +305,18 @@ Perl_gv_efullname(pTHX_ SV *sv, const GV *gv)
gv_efullname3(sv, gv, sv == (const SV*)gv ? "*" : "");
}
+void
+Perl_gv_fullname3(pTHX_ SV *sv, const GV *gv, const char *prefix)
+{
+ gv_fullname4(sv, gv, prefix, TRUE);
+}
+
+void
+Perl_gv_efullname3(pTHX_ SV *sv, const GV *gv, const char *prefix)
+{
+ gv_efullname4(sv, gv, prefix, TRUE);
+}
+
/*
* Local variables:
* c-indentation-style: bsd