diff options
author | Karl Williamson <khw@cpan.org> | 2020-08-27 10:15:07 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-09-05 10:15:53 -0600 |
commit | 3752a9fedb0ab448a219302b97944b6f2ea253a1 (patch) | |
tree | 13e786077ae48d92048e95660a698b5e310048d0 /handy.h | |
parent | 37738dd69b192fdc59c34ae34704f5154dfa4ed0 (diff) | |
download | perl-3752a9fedb0ab448a219302b97944b6f2ea253a1.tar.gz |
Change formal parameter name of gv_fetchpv*
This is a flags parameter, not a particular single flag
Diffstat (limited to 'handy.h')
-rw-r--r-- | handy.h | 9 |
1 files changed, 5 insertions, 4 deletions
@@ -442,10 +442,11 @@ Perl_xxx(aTHX_ ...) form for any API calls where it's used. #define savesharedpvs(str) Perl_savesharedpvn(aTHX_ STR_WITH_LEN(str)) #define gv_stashpvs(str, create) \ Perl_gv_stashpvn(aTHX_ STR_WITH_LEN(str), create) -#define gv_fetchpvs(namebeg, add, sv_type) \ - Perl_gv_fetchpvn_flags(aTHX_ STR_WITH_LEN(namebeg), add, sv_type) -#define gv_fetchpvn(namebeg, len, add, sv_type) \ - Perl_gv_fetchpvn_flags(aTHX_ namebeg, len, add, sv_type) + +#define gv_fetchpvs(namebeg, flags, sv_type) \ + Perl_gv_fetchpvn_flags(aTHX_ STR_WITH_LEN(namebeg), flags, sv_type) +#define gv_fetchpvn(namebeg, len, flags, sv_type) \ + Perl_gv_fetchpvn_flags(aTHX_ namebeg, len, flags, sv_type) #define sv_catxmlpvs(dsv, str, utf8) \ Perl_sv_catxmlpvn(aTHX_ dsv, STR_WITH_LEN(str), utf8) |