diff options
| author | David Mitchell <davem@iabyn.com> | 2016-05-23 14:43:56 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2016-05-23 14:52:11 +0100 |
| commit | f2b9631d5d19d2b71c1776e1193173d13f3620bf (patch) | |
| tree | eebe06d71ad47fec23d7f7f55840fb7764595632 /cop.h | |
| parent | 5f602b3b7e2c9031e50c464666e93499c86a8fbe (diff) | |
| download | perl-f2b9631d5d19d2b71c1776e1193173d13f3620bf.tar.gz | |
CX_POP_SAVEARRAY(): use more distinctive var name
Under -Wshadow, CX_POP_SAVEARRAY's local var 'av' can generate this
warning:
warning: declaration shadows a local variable [-Wshadow]
So rename it to cx_pop_savearay_av to reduce the risk of a clash.
(See http://nntp.perl.org/group/perl.perl5.porters/236444)
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -609,10 +609,10 @@ struct block_format { /* Restore old @_ */ #define CX_POP_SAVEARRAY(cx) \ STMT_START { \ - AV *av = GvAV(PL_defgv); \ + AV *cx_pop_savearray_av = GvAV(PL_defgv); \ GvAV(PL_defgv) = cx->blk_sub.savearray; \ cx->blk_sub.savearray = NULL; \ - SvREFCNT_dec(av); \ + SvREFCNT_dec(cx_pop_savearray_av); \ } STMT_END /* junk in @_ spells trouble when cloning CVs and in pp_caller(), so don't |