summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-03-20 03:28:02 -0800
committerJarkko Hietaniemi <jhi@iki.fi>2000-08-02 04:26:46 +0000
commit436933950535d3942db23a87c1a6344f566a9af4 (patch)
tree53a51ada91219346920fcaa7071e8b0f32861fea /proto.h
parentef7adf26b48d8441a94b9133216b2ca93f1f3137 (diff)
downloadperl-436933950535d3942db23a87c1a6344f566a9af4.tar.gz
Remove the extraneous "main::" prefix from all the
"opened only for", "on closed", and "never opened" warnings. Subject: Re: inappropriate warning Message-Id: <200003201928.LAA32224@maul.ActiveState.com> p4raw-id: //depot/perl@6489
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/proto.h b/proto.h
index 714c923b94..28597eaf07 100644
--- a/proto.h
+++ b/proto.h
@@ -292,6 +292,7 @@ PERL_CALLCONV GV* Perl_gv_autoload4(pTHX_ HV* stash, const char* name, STRLEN le
PERL_CALLCONV void Perl_gv_check(pTHX_ HV* stash);
PERL_CALLCONV void Perl_gv_efullname(pTHX_ SV* sv, GV* gv);
PERL_CALLCONV void Perl_gv_efullname3(pTHX_ SV* sv, GV* gv, const char* prefix);
+PERL_CALLCONV void Perl_gv_efullname4(pTHX_ SV* sv, GV* gv, const char* prefix, bool keepmain);
PERL_CALLCONV GV* Perl_gv_fetchfile(pTHX_ const char* name);
PERL_CALLCONV GV* Perl_gv_fetchmeth(pTHX_ HV* stash, const char* name, STRLEN len, I32 level);
PERL_CALLCONV GV* Perl_gv_fetchmethod(pTHX_ HV* stash, const char* name);
@@ -299,6 +300,7 @@ PERL_CALLCONV GV* Perl_gv_fetchmethod_autoload(pTHX_ HV* stash, const char* name
PERL_CALLCONV GV* Perl_gv_fetchpv(pTHX_ const char* name, I32 add, I32 sv_type);
PERL_CALLCONV void Perl_gv_fullname(pTHX_ SV* sv, GV* gv);
PERL_CALLCONV void Perl_gv_fullname3(pTHX_ SV* sv, GV* gv, const char* prefix);
+PERL_CALLCONV void Perl_gv_fullname4(pTHX_ SV* sv, GV* gv, const char* prefix, bool keepmain);
PERL_CALLCONV void Perl_gv_init(pTHX_ GV* gv, HV* stash, const char* name, STRLEN len, int multi);
PERL_CALLCONV HV* Perl_gv_stashpv(pTHX_ const char* name, I32 create);
PERL_CALLCONV HV* Perl_gv_stashpvn(pTHX_ const char* name, U32 namelen, I32 create);