summaryrefslogtreecommitdiff
path: root/dump.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2014-12-10 10:41:33 +0000
committerDavid Mitchell <davem@iabyn.com>2014-12-10 12:20:17 +0000
commit500f40f555ee1c386dcd8fbd4c8043a7739ec5f6 (patch)
tree1c0fdb3c4193d5841d18a7f178cb1aa2aabd523d /dump.c
parent9fa9bd42fd4968537325092ac44713769848d329 (diff)
downloadperl-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.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/dump.c b/dump.c
index e11b73c982..afa40cd131 100644
--- a/dump.c
+++ b/dump.c
@@ -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;