summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-02-27 08:34:05 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-02-27 08:34:05 (GMT)
commitf04b875d88bbe9cd4d2114d60c194be01a7c9e04 (patch)
tree34dde540a1ed936003a721aec62cf6ede6e5bfa2 /generic/tclStringObj.c
parent4fdbe79875a43efd9f42e75ccf256884f657dac3 (diff)
downloadtcl-f04b875d88bbe9cd4d2114d60c194be01a7c9e04.zip
tcl-f04b875d88bbe9cd4d2114d60c194be01a7c9e04.tar.gz
tcl-f04b875d88bbe9cd4d2114d60c194be01a7c9e04.tar.bz2
More use of (efficient) TclHasIntRep() macro. Also eliminate many (size_t) and (unsigned) type-casts, which don't make sense any more.
Diffstat (limited to 'generic/tclStringObj.c')
-rw-r--r--generic/tclStringObj.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index b6fa5fa..74ce2b5 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -3227,7 +3227,7 @@ TclStringCat(
if (TclIsPureByteArray(objPtr)) {
int more;
unsigned char *src = Tcl_GetByteArrayFromObj(objPtr, &more);
- memcpy(dst, src, (size_t) more);
+ memcpy(dst, src, more);
dst += more;
}
}
@@ -3326,7 +3326,7 @@ TclStringCat(
int more;
char *src = Tcl_GetStringFromObj(objPtr, &more);
- memcpy(dst, src, (size_t) more);
+ memcpy(dst, src, more);
dst += more;
}
}