summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-09-22 20:42:33 -0700
committerFather Chrysostomos <sprout@cpan.org>2011-10-06 13:00:59 -0700
commit460e573096f6fb844640a265dce388c01d713bb7 (patch)
tree1fb1531dd394c9004b2ad9788485fd6bf2182eb8
parentd21989edd792d90d0833257821df6bf9f2ef8e76 (diff)
downloadperl-460e573096f6fb844640a265dce388c01d713bb7.tar.gz
Restore gv_fetchmeth_autoload to perlapi.pod
-rw-r--r--embed.fnc3
-rw-r--r--gv.c5
-rw-r--r--proto.h3
3 files changed, 11 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index 2064b3c9b4..58d9e30a7b 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -444,6 +444,9 @@ Apd |GV* |gv_fetchmeth_pv |NULLOK HV* stash|NN const char* name \
|I32 level|U32 flags
Apd |GV* |gv_fetchmeth_pvn |NULLOK HV* stash|NN const char* name \
|STRLEN len|I32 level|U32 flags
+Amd |GV* |gv_fetchmeth_autoload |NULLOK HV* stash \
+ |NN const char* name|STRLEN len \
+ |I32 level
Apd |GV* |gv_fetchmeth_sv_autoload |NULLOK HV* stash|NN SV* namesv|I32 level|U32 flags
Apd |GV* |gv_fetchmeth_pv_autoload |NULLOK HV* stash|NN const char* name \
|I32 level|U32 flags
diff --git a/gv.c b/gv.c
index 1da1a90af4..7fcd705f79 100644
--- a/gv.c
+++ b/gv.c
@@ -775,6 +775,11 @@ Perl_gv_fetchmeth_pvn(pTHX_ HV *stash, const char *name, STRLEN len, I32 level,
}
/*
+=for apidoc gv_fetchmeth_autoload
+
+This is the old form of L</gv_fetchmeth_pvn_autoload>, which has no flags
+parameter.
+
=for apidoc gv_fetchmeth_sv_autoload
Exactly like L</gv_fetchmeth_pvn_autoload>, but takes the name string in the form
diff --git a/proto.h b/proto.h
index 1abf972704..49aaf994f4 100644
--- a/proto.h
+++ b/proto.h
@@ -1195,6 +1195,9 @@ PERL_CALLCONV GV* Perl_gv_fetchfile_flags(pTHX_ const char *const name, const ST
/* PERL_CALLCONV GV* gv_fetchmeth(pTHX_ HV* stash, const char* name, STRLEN len, I32 level)
__attribute__nonnull__(pTHX_2); */
+/* PERL_CALLCONV GV* gv_fetchmeth_autoload(pTHX_ HV* stash, const char* name, STRLEN len, I32 level)
+ __attribute__nonnull__(pTHX_2); */
+
PERL_CALLCONV GV* Perl_gv_fetchmeth_pv(pTHX_ HV* stash, const char* name, I32 level, U32 flags)
__attribute__nonnull__(pTHX_2);
#define PERL_ARGS_ASSERT_GV_FETCHMETH_PV \