diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-04-27 13:29:04 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-04-27 13:29:04 (GMT) |
| commit | 3b165ace67c03d01ee0c7c0b0d7f6f56caca55e3 (patch) | |
| tree | 5e463cbe16f0292aef9bb0ecb98c9ef11241a1d1 /generic/tclTest.c | |
| parent | bdb10b8e7d85c04dbb38419f365949163829cb8f (diff) | |
| parent | b1d47f7bfb156ff7692c3f50c29633642d30c0bc (diff) | |
| download | tcl-3b165ace67c03d01ee0c7c0b0d7f6f56caca55e3.zip tcl-3b165ace67c03d01ee0c7c0b0d7f6f56caca55e3.tar.gz tcl-3b165ace67c03d01ee0c7c0b0d7f6f56caca55e3.tar.bz2 | |
merge 8.5
Diffstat (limited to 'generic/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 322d6b4..db672cc 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -6762,7 +6762,7 @@ TestUtfNextCmd( return TCL_OK; } - first = TclUtfNext(buffer + 1); + first = result = TclUtfNext(buffer + 1); while ((buffer[0] = *p++) != '\0') { /* Run Tcl_UtfNext with many more possible bytes at src[-1], all should give the same result */ result = TclUtfNext(buffer + 1); |