Tcl Source Code

Check-in [91967bbc3f]
Login
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to [email protected]
or submit via the online form by Sep 9.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:merge core-8-6-branch
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 91967bbc3fe46a0af8445298adb436c516a2bfdd72a4e035c64f7519305e78da
User & Date: jan.nijtmans 2017-10-23 12:10:42
Context
2017-10-23
17:10
Update TZ info to tzcode2017c. check-in: 9fd28af657 user: jima tags: trunk
17:06
Implementation branch for TIP 345: Kill the "identity" encoding. This checkin, completely does that.... check-in: 04e7b29a20 user: dgp tags: tip-345
16:20
Implementation branch for TIP 114 - Eliminate Octal Parsing... check-in: c5426334cf user: dgp tags: tip-114
13:23
merge trunk check-in: ed4667c2a5 user: jan.nijtmans tags: win-console-panic
12:10
merge core-8-6-branch check-in: 91967bbc3f user: jan.nijtmans tags: trunk
12:09
Fix [b58e689703]: Return value of 'Tcl_Flush' check-in: f7b55d3100 user: jan.nijtmans tags: core-8-6-branch
2017-10-19
09:30
[1a56550e96] Ensure that method list introspection finds methods from mixins in all cases. check-in: 8e4847552a user: dkf tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclIO.c.

6704
6705
6706
6707
6708
6709
6710
6711
6712
6713
6714
6715
6716
6717
6718
    /*
     * This operation should occur at the top of a channel stack.
     */

    chanPtr = statePtr->topChanPtr;

    if (CheckChannelErrors(statePtr, TCL_WRITABLE) != 0) {
	return -1;
    }

    result = FlushChannel(NULL, chanPtr, 0);
    if (result != 0) {
	return TCL_ERROR;
    }







|







6704
6705
6706
6707
6708
6709
6710
6711
6712
6713
6714
6715
6716
6717
6718
    /*
     * This operation should occur at the top of a channel stack.
     */

    chanPtr = statePtr->topChanPtr;

    if (CheckChannelErrors(statePtr, TCL_WRITABLE) != 0) {
	return TCL_ERROR;
    }

    result = FlushChannel(NULL, chanPtr, 0);
    if (result != 0) {
	return TCL_ERROR;
    }