diff options
| author | sebres <sebres@users.sourceforge.net> | 2017-05-03 15:49:43 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2017-05-03 15:49:43 (GMT) |
| commit | 1cf19be2d96450b4bba520b370ff0d274ab6382f (patch) | |
| tree | bcca96ed5927dffc9238048c9f6cb98d56a4933d | |
| parent | f8a2b5dcaf3c04db9a77200b0d25d90ee2bad793 (diff) | |
| download | tcl-core_8_5_branch_fix_1997007.zip tcl-core_8_5_branch_fix_1997007.tar.gz tcl-core_8_5_branch_fix_1997007.tar.bz2 | |
code review: restore missing "break" to step out from internal cycle "while (toWrite > 0) ..." (compared to 8.6 and previous non-patched 8.5)core_8_5_branch_fix_1997007
| -rw-r--r-- | win/tclWinConsole.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/win/tclWinConsole.c b/win/tclWinConsole.c index 748f93c..e0edc46 100644 --- a/win/tclWinConsole.c +++ b/win/tclWinConsole.c @@ -1204,10 +1204,10 @@ ConsoleWriterThread( &count) == FALSE) { infoPtr->writeError = GetLastError(); done = 1; - } else { - toWrite -= count; - buf += count; + break; } + toWrite -= count; + buf += count; } /* |