diff options
| author | dgp <dgp@users.sourceforge.net> | 2021-11-06 18:12:01 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2021-11-06 18:12:01 (GMT) |
| commit | 5a30c6515f08410a8064d8ecf30a152996e7d189 (patch) | |
| tree | 826d1a487d657619a2760bb408dd8f35e3683d17 /generic/tclStringObj.c | |
| parent | 6574848ee46baa0fae419a52e6aa1b56dee16867 (diff) | |
| download | tcl-5a30c6515f08410a8064d8ecf30a152996e7d189.zip tcl-5a30c6515f08410a8064d8ecf30a152996e7d189.tar.gz tcl-5a30c6515f08410a8064d8ecf30a152996e7d189.tar.bz2 | |
Eliminate more branch diffs.
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index dc47f3f..d66e0d0 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -614,7 +614,7 @@ TclGetUnicodeFromObj( } if (lengthPtr != NULL) { - *lengthPtr = stringPtr->numChars; + *lengthPtr = (int)stringPtr->numChars; } return stringPtr->unicode; } @@ -642,7 +642,7 @@ Tcl_GetUnicodeFromObj( } return stringPtr->unicode; } - + /* *---------------------------------------------------------------------- * |