In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/86f4502880c5cbc7a5ec1510ab05a413bfb40e03?hp=c7a622b32220ef59969124212598b6848bcaa247>
- Log -----------------------------------------------------------------
commit 86f4502880c5cbc7a5ec1510ab05a413bfb40e03
Author: Dagfinn Ilmari Mannsåker <ilm...@ilmari.org>
Date: Thu Jul 16 08:08:19 2015 +0100
Merge declaration and initialisation of local variable
Commit 2b32fed8 removed the PUTBACK/SPAGAIN around hv_iterval and
Perl_sv_setpvf, but didn't take the opportunity to merge the
initialisation with the declaration now that there's no code between
them.
-----------------------------------------------------------------------
Summary of changes:
doop.c | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/doop.c b/doop.c
index 22e614a..19fe310 100644
--- a/doop.c
+++ b/doop.c
@@ -1263,8 +1263,7 @@ Perl_do_kv(pTHX)
XPUSHs(sv);
}
if (dovalues) {
- SV *tmpstr;
- tmpstr = hv_iterval(keys,entry);
+ SV *tmpstr = hv_iterval(keys,entry);
DEBUG_H(Perl_sv_setpvf(aTHX_ tmpstr, "%lu%%%d=%lu",
(unsigned long)HeHASH(entry),
(int)HvMAX(keys)+1,
--
Perl5 Master Repository
