summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2014-10-17 14:29:33 +0100
committerDavid Mitchell <davem@iabyn.com>2014-10-20 10:16:56 +0100
commit8160c8f5087e2f3acc3f9423356949718103de98 (patch)
tree13a319d6c44abe2a7679b4417e51c2640c6b6152 /pp.c
parentf6f22b1fc01b8676e43ef64616ed7899a84bfec2 (diff)
downloadperl-8160c8f5087e2f3acc3f9423356949718103de98.tar.gz
pp_av2arylen(): rename var from 'sv' to svp'
Conventionally we name variables of type 'SV**' svp rather than sv. Calling the var 'sv' in this small function initially confused me, so rename it.
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/pp.c b/pp.c
index 67dc770c6e..250e96603c 100644
--- a/pp.c
+++ b/pp.c
@@ -418,12 +418,12 @@ PP(pp_av2arylen)
AV * const av = MUTABLE_AV(TOPs);
const I32 lvalue = PL_op->op_flags & OPf_MOD || LVRET;
if (lvalue) {
- SV ** const sv = Perl_av_arylen_p(aTHX_ MUTABLE_AV(av));
- if (!*sv) {
- *sv = newSV_type(SVt_PVMG);
- sv_magic(*sv, MUTABLE_SV(av), PERL_MAGIC_arylen, NULL, 0);
+ SV ** const svp = Perl_av_arylen_p(aTHX_ MUTABLE_AV(av));
+ if (!*svp) {
+ *svp = newSV_type(SVt_PVMG);
+ sv_magic(*svp, MUTABLE_SV(av), PERL_MAGIC_arylen, NULL, 0);
}
- SETs(*sv);
+ SETs(*svp);
} else {
SETs(sv_2mortal(newSViv(AvFILL(MUTABLE_AV(av)))));
}