summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2014-12-27 23:24:44 -0800
committerFather Chrysostomos <sprout@cpan.org>2014-12-27 23:24:44 -0800
commit5ae28fdbad43e9c8cc2641dcc6986f82424990b5 (patch)
tree23086acecf8841f985f80d04858f0fdfce2b097b /pp_hot.c
parent2fbf5f10a3d2adda1abe7658f4fd472ca98023c6 (diff)
downloadperl-5ae28fdbad43e9c8cc2641dcc6986f82424990b5.tar.gz
pp_hot.c:pp_concat: Remove SvGETMAGIC
If the operand is magical, try_amagic_bin will already have copied the operand if both left and right were the same, so left == right will no longer be true by the time this path is reached. This has been the case since v5.13.11-400-g75ea7a1.
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/pp_hot.c b/pp_hot.c
index d218dcca50..3ee48180d3 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -299,9 +299,6 @@ PP(pp_concat)
}
if (!rcopied) {
- if (left == right)
- /* $r.$r: do magic twice: tied might return different 2nd time */
- SvGETMAGIC(right);
rpv = SvPV_nomg_const(right, rlen);
rbyte = !DO_UTF8(right);
}