diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-08-11 06:08:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-08-11 06:08:05 (GMT) |
commit | 09fa076d2968426473c0e8982d28cd68960f0a16 (patch) | |
tree | 71f298cc42eb01f1d7ce4c78c6c67eb794151103 /generic/tclLink.c | |
parent | 3e14eccec5183416eba831d66d2e75f89ca1c96e (diff) | |
parent | d73c6dbd81c0537e3d6df60dc145af1b6539d6d2 (diff) | |
download | tcl-09fa076d2968426473c0e8982d28cd68960f0a16.zip tcl-09fa076d2968426473c0e8982d28cd68960f0a16.tar.gz tcl-09fa076d2968426473c0e8982d28cd68960f0a16.tar.bz2 |
Merge 8.6
Diffstat (limited to 'generic/tclLink.c')
-rw-r--r-- | generic/tclLink.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c index 95844a0..4256f84 100644 --- a/generic/tclLink.c +++ b/generic/tclLink.c @@ -911,8 +911,8 @@ LinkTraceProc( return (char *) "wrong size of char* value"; } if (linkPtr->flags & LINK_ALLOC_LAST) { - memcpy(linkPtr->lastValue.aryPtr, value, (size_t) valueLength); - memcpy(linkPtr->addr, value, (size_t) valueLength); + memcpy(linkPtr->lastValue.aryPtr, value, valueLength); + memcpy(linkPtr->addr, value, valueLength); } else { linkPtr->lastValue.c = '\0'; LinkedVar(char) = linkPtr->lastValue.c; @@ -925,8 +925,8 @@ LinkTraceProc( return (char *) "wrong size of binary value"; } if (linkPtr->flags & LINK_ALLOC_LAST) { - memcpy(linkPtr->lastValue.aryPtr, value, (size_t) valueLength); - memcpy(linkPtr->addr, value, (size_t) valueLength); + memcpy(linkPtr->lastValue.aryPtr, value, valueLength); + memcpy(linkPtr->addr, value, valueLength); } else { linkPtr->lastValue.uc = (unsigned char) *value; LinkedVar(unsigned char) = linkPtr->lastValue.uc; |