diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-04-16 20:28:15 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-04-16 20:28:15 (GMT) |
| commit | ae8350301e553be8131de6a4cc47b223fb405386 (patch) | |
| tree | ce2e948e4fbcf0838677050d74cc4aecc3c9147e /generic | |
| parent | 90e26007fa528e3a4685f6452ec77f65a5decc61 (diff) | |
| download | tcl-ae8350301e553be8131de6a4cc47b223fb405386.zip tcl-ae8350301e553be8131de6a4cc47b223fb405386.tar.gz tcl-ae8350301e553be8131de6a4cc47b223fb405386.tar.bz2 | |
merge litter
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclUtf.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c index 67603af..b5c430b 100644 --- a/generic/tclUtf.c +++ b/generic/tclUtf.c @@ -558,7 +558,7 @@ Tcl_NumUtfChars( int length) /* The length of the string in bytes, or -1 * for strlen(string). */ { - register int i; + register int i = 0; /* * The separate implementations are faster. @@ -567,7 +567,6 @@ Tcl_NumUtfChars( * single-byte char case specially. */ - i = 0; if (length < 0) { while ((*src != '\0') && (i < INT_MAX)) { src = TclUtfNext(src); |