This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Change formal parameter name of gv_autload4
authorKarl Williamson <khw@cpan.org>
Thu, 27 Aug 2020 15:17:59 +0000 (09:17 -0600)
committerKarl Williamson <khw@cpan.org>
Sat, 5 Sep 2020 16:15:53 +0000 (10:15 -0600)
The name was completely irrelevant to what it is

gv.h

diff --git a/gv.h b/gv.h
index 4d7e758..f598586 100644 (file)
--- a/gv.h
+++ b/gv.h
@@ -264,8 +264,8 @@ 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)
-#define gv_autoload4(stash, name, len, method) \
-       gv_autoload_pvn(stash, name, len, !!(method))
+#define gv_autoload4(stash, name, len, autoload) \
+       gv_autoload_pvn(stash, name, len, !!(autoload))
 #define newGVgen(pack)  newGVgen_flags(pack, 0)
 #define gv_method_changed(gv)              \
     (                                       \