summaryrefslogtreecommitdiff
path: root/doop.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-04-19 09:09:14 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-04-19 09:09:14 +0000
commit640af7f1c049ab83d4ea0840bc5fa3e1973e991f (patch)
tree13701011576b93f16fa55191c7635e7d6ffb8578 /doop.c
parentcbf82dd00c19573e7e274a1d8dda9656bc6e259a (diff)
downloadperl-640af7f1c049ab83d4ea0840bc5fa3e1973e991f.tar.gz
Replace some Copy() by Move() calls, because valgrind reports
we can have overlapping memory areas here p4raw-id: //depot/perl@27897
Diffstat (limited to 'doop.c')
-rw-r--r--doop.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/doop.c b/doop.c
index 202e320b3c..c4edb6035c 100644
--- a/doop.c
+++ b/doop.c
@@ -215,7 +215,7 @@ S_do_trans_complex(pTHX_ SV *sv)
if (comp > 0xff) {
if (!complement) {
- Copy(s, d, len, U8);
+ Move(s, d, len, U8);
d += len;
}
else {
@@ -243,7 +243,7 @@ S_do_trans_complex(pTHX_ SV *sv)
continue;
}
else if (ch == -1) { /* -1 is unmapped character */
- Copy(s, d, len, U8);
+ Move(s, d, len, U8);
d += len;
}
else if (ch == -2) /* -2 is delete character */
@@ -278,7 +278,7 @@ S_do_trans_complex(pTHX_ SV *sv)
matches++;
}
else if (ch == -1) { /* -1 is unmapped character */
- Copy(s, d, len, U8);
+ Move(s, d, len, U8);
d += len;
}
else if (ch == -2) /* -2 is delete character */