Differences From Artifact [a3228d0b14]:

• File generic/tclThreadTest.c — part of check-in [0a56102bb4] at 2018-02-22 18:57:20 on branch core-8-6-branch — [89dfecb6b7] Make thread IDs in testing commands consistent. (user: dgp size: 31290) [more...]

To Artifact [cc9e33a244]:

• File generic/tclThreadTest.c — part of check-in [6f650b4271] at 2018-06-21 22:21:31 on branch pyk-tcltest-exit — Add custom exit procedure for tcltests executable. (user: pooryorick size: 31418) [more...]

171
172
173
174
175
176
177







178
179
180
181
182
183
184

    }
    Tcl_MutexUnlock(&threadMutex);

    Tcl_CreateObjCommand(interp, "testthread", ThreadObjCmd, NULL, NULL);
    return TCL_OK;
}









/*
 *----------------------------------------------------------------------
 *
 * ThreadObjCmd --
 *
 *	This procedure is invoked to process the "testthread" Tcl command. See

>
>
>
>
>
>
>

171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191

    }
    Tcl_MutexUnlock(&threadMutex);

    Tcl_CreateObjCommand(interp, "testthread", ThreadObjCmd, NULL, NULL);
    return TCL_OK;
}


void * TclThreadTestFinalize() {
    if (errorProcString != NULL) {
	ckfree(errorProcString);
	errorProcString= NULL;
    }
}

/*
 *----------------------------------------------------------------------
 *
 * ThreadObjCmd --
 *
 *	This procedure is invoked to process the "testthread" Tcl command. See