summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-09-11 13:21:44 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-09-11 13:21:44 (GMT)
commit6cda0425360759bb7fcb024682887c683b0317be (patch)
tree1e5162a6233fccb17b9247fcf80060a752271794 /generic/tclStringObj.c
parente99f276ddbde6b3937ae618f021080844d6a5076 (diff)
parent8d171426707cfedf851bf4e1626a1192997097ef (diff)
downloadtcl-novem_more_memory_API.zip
tcl-novem_more_memory_API.tar.gz
tcl-novem_more_memory_API.tar.bz2
Diffstat (limited to 'generic/tclStringObj.c')
-rw-r--r--generic/tclStringObj.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index 0d45708..d607c1d 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -3461,7 +3461,7 @@ TclStringObjReverse(
}
to = objPtr->bytes;
- if (numChars < numBytes) {
+ if ((numChars == (size_t)-1) || (numChars < numBytes)) {
/*
* Either numChars == -1 and we don't know how many chars are
* represented by objPtr->bytes and we need Pass 1 just in case,