Tcl Source Code

Artifact 0919b32cde566846c025caee59fc723e761bed67:

Attachment "tclEncoding.c-patch" to ticket [1530262fff] added by afredd 2006-07-28 16:54:34.

---

--- tclEncoding.c-orig	2006-06-08 07:48:44.000000000 +0100
+++ tclEncoding.c	2006-07-28 09:39:35.234375000 +0100
@@ -2028,9 +2028,7 @@
     *srcReadPtr = srcLen;
     *dstWrotePtr = srcLen;
     *dstCharsPtr = srcLen;
-    for ( ; --srcLen >= 0; ) {
-	*dst++ = *src++;
-    }
+    memcpy((void *) dst, (void *) src, (size_t) srcLen);
     return result;
 }