This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Document gv_autoload4
authorKarl Williamson <khw@cpan.org>
Thu, 27 Aug 2020 15:18:53 +0000 (09:18 -0600)
committerKarl Williamson <khw@cpan.org>
Sun, 27 Dec 2020 16:55:02 +0000 (09:55 -0700)
embed.fnc
gv.h

index c187f27..e605369 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -940,7 +940,7 @@ Ap  |GV*    |gv_add_by_type |NULLOK GV *gv|svtype type
 ApMb   |GV*    |gv_AVadd       |NULLOK GV *gv
 ApMb   |GV*    |gv_HVadd       |NULLOK GV *gv
 ApMb   |GV*    |gv_IOadd       |NULLOK GV* gv
-AmR    |GV*    |gv_autoload4   |NULLOK HV* stash|NN const char* name \
+AdmR   |GV*    |gv_autoload4   |NULLOK HV* stash|NN const char* name \
                                |STRLEN len|I32 method
 ApR    |GV*    |gv_autoload_sv |NULLOK HV* stash|NN SV* namesv|U32 flags
 ApR    |GV*    |gv_autoload_pv |NULLOK HV* stash|NN const char* namepv \
diff --git a/gv.h b/gv.h
index 6ac9981..2589b53 100644 (file)
--- a/gv.h
+++ b/gv.h
@@ -269,6 +269,13 @@ Return the CV from the GV.
 #define gv_fetchmeth(stash,name,len,level) gv_fetchmeth_pvn(stash, name, len, level, 0)
 #define gv_fetchmeth_autoload(stash,name,len,level) gv_fetchmeth_pvn_autoload(stash, name, len, level, 0)
 #define gv_fetchmethod_flags(stash,name,flags) gv_fetchmethod_pv_flags(stash, name, flags)
+
+/*
+=for apidoc gv_autoload4
+Equivalent to C<L</gv_autoload_pvn>>.
+
+=cut
+*/
 #define gv_autoload4(stash, name, len, autoload) \
        gv_autoload_pvn(stash, name, len, !!(autoload))
 #define newGVgen(pack)  newGVgen_flags(pack, 0)