Differences From Artifact [e554c03809]:

• File generic/tclThreadTest.c — part of check-in [512220a685] at 2011-09-21 21:45:54 on branch trunk — Revise the thread exit handling of the [testthread] command so that it properly maintains the per-process data structures even when the thread exits for reasons other than the [testthread exit] command. (user: dgp size: 31093) [more...]

To Artifact [96562ce2b1]:

• File generic/tclThreadTest.c — part of check-in [0b4be2fe68] at 2011-11-18 01:01:37 on branch trunk — For [testthread cancel], avoid creating a new Tcl_Obj when the default script cancellation result is desired. (user: mistachkin size: 31124) [more...]

984
985
986
987
988
989
990
991


992
993
994
995
996
997
998

984
985
986
987
988
989
990

991
992
993
994
995
996
997
998
999

-
+
+

    /*
     * Since Tcl_CancelEval can be safely called from any thread,
     * we do it now.
     */

    Tcl_MutexUnlock(&threadMutex);
    Tcl_ResetResult(interp);
    return Tcl_CancelEval(tsdPtr->interp, Tcl_NewStringObj(result, -1), 0, flags);
    return Tcl_CancelEval(tsdPtr->interp,
    	(result != NULL) ? Tcl_NewStringObj(result, -1) : NULL, 0, flags);
}

/*
 *------------------------------------------------------------------------
 *
 * ThreadEventProc --
 *