Tcl Source Code

Check-in [cf882f9cc9]
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:silence compiler warning
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-branch
Files: files | file ages | folders
SHA3-256: cf882f9cc9150cb16435eac05eb20b957ac587320f766fe9ff87dbcfce159e8d
User & Date: dgp 2018-03-14 01:31:10
Context
2018-03-14
22:58
keep on truckin check-in: e46133afc3 user: dgp tags: mistake
04:45
backout the latest merge check-in: d26ad8afa0 user: dgp tags: core-8-branch
01:31
silence compiler warning check-in: cf882f9cc9 user: dgp tags: core-8-branch
01:30
merge 8.6 check-in: ad1f243d40 user: dgp tags: core-8-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclProcess.c.

206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
    Tcl_Obj **errorObjPtr)	/* If non-NULL, will receive error code. */
{
    int waitStatus;
    Tcl_Obj *errorStrings[5];
    const char *msg;

    pid = Tcl_WaitPid(pid, &waitStatus, options);
    if ((pid == 0)) {
	/*
	 * No change.
	 */
	
	return TCL_PROCESS_UNCHANGED;
    }







|







206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
    Tcl_Obj **errorObjPtr)	/* If non-NULL, will receive error code. */
{
    int waitStatus;
    Tcl_Obj *errorStrings[5];
    const char *msg;

    pid = Tcl_WaitPid(pid, &waitStatus, options);
    if (pid == 0) {
	/*
	 * No change.
	 */
	
	return TCL_PROCESS_UNCHANGED;
    }