diff options
author | David Mitchell <davem@iabyn.com> | 2014-12-10 10:41:33 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2014-12-10 12:20:17 +0000 |
commit | 500f40f555ee1c386dcd8fbd4c8043a7739ec5f6 (patch) | |
tree | 1c0fdb3c4193d5841d18a7f178cb1aa2aabd523d /dump.c | |
parent | 9fa9bd42fd4968537325092ac44713769848d329 (diff) | |
download | perl-500f40f555ee1c386dcd8fbd4c8043a7739ec5f6.tar.gz |
unop_aux_stringify(): remove redundant assignment
my recent OP_MULTIDEREF patch included this bizarre thinko:
PAD *comppad = comppad = ....;
Spotted by Jarkko.
Diffstat (limited to 'dump.c')
-rw-r--r-- | dump.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2339,7 +2339,7 @@ Perl_unop_aux_stringify(pTHX_ const OP *o, CV *cv) SV *out = sv_2mortal(newSVpv("",0)); #ifdef USE_ITHREADS PADLIST * const padlist = CvPADLIST(cv); - PAD *comppad = comppad = PadlistARRAY(padlist)[1]; + PAD *comppad = PadlistARRAY(padlist)[1]; #endif PERL_ARGS_ASSERT_UNOP_AUX_STRINGIFY; |