diff options
author | Yves Orton <demerphq@gmail.com> | 2022-11-25 19:23:51 +0100 |
---|---|---|
committer | Yves Orton <demerphq@gmail.com> | 2022-12-09 18:34:58 +0100 |
commit | 7213797de96c01cd94037e3f00467c6440627569 (patch) | |
tree | cab27fa81467e3a5040a256fd1ed62f3621afc91 /pp_ctl.c | |
parent | 1a55cc50be771638e0f1939af537d43047f9def2 (diff) | |
download | perl-7213797de96c01cd94037e3f00467c6440627569.tar.gz |
pp_ctl.c - rename vars to something more descriptive in require_file()
"i" and "ar" is a bit too minimal, and I will be refactoring
this code somewhat in following patches, so this preps it for
future changes.
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -4260,16 +4260,16 @@ S_require_file(pTHX_ SV *sv) * For searchable paths, just search @INC normally */ if (!tryrsfp && !(errno == EACCES && !path_searchable)) { - AV * const ar = GvAVn(PL_incgv); - SSize_t i; + AV * const inc_ar = GvAVn(PL_incgv); + SSize_t inc_idx; #ifdef VMS if (vms_unixname) #endif { SV *nsv = sv; namesv = newSV_type(SVt_PV); - for (i = 0; i <= AvFILL(ar); i++) { - SV * const dirsv = *av_fetch(ar, i, TRUE); + for (inc_idx = 0; inc_idx <= AvFILL(inc_ar); inc_idx++) { + SV * const dirsv = *av_fetch(inc_ar, inc_idx, TRUE); SvGETMAGIC(dirsv); if (SvROK(dirsv)) { |