diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-07 10:35:59 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-07 10:35:59 (GMT) |
commit | 1bbf6768edea6ff02833e7dd18cf223d23ddf8db (patch) | |
tree | 88de938c4722a4d4c12694626ba6e8def8992024 /generic/tclThreadTest.c | |
parent | d0aa04bdb0fbf47e5564be76ef196934474f7fe1 (diff) | |
parent | 44c8b6c3e8a3570b24b2daca27b2f74f68e3ebd2 (diff) | |
download | tcl-1bbf6768edea6ff02833e7dd18cf223d23ddf8db.zip tcl-1bbf6768edea6ff02833e7dd18cf223d23ddf8db.tar.gz tcl-1bbf6768edea6ff02833e7dd18cf223d23ddf8db.tar.bz2 |
merge trunk
Diffstat (limited to 'generic/tclThreadTest.c')
-rw-r--r-- | generic/tclThreadTest.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c index 7db5c19..1dcb3ad 100644 --- a/generic/tclThreadTest.c +++ b/generic/tclThreadTest.c @@ -834,7 +834,7 @@ ThreadSend( if (threadId == Tcl_GetCurrentThread()) { Tcl_MutexUnlock(&threadMutex); - return Tcl_EvalEx(interp, script, -1, TCL_EVAL_GLOBAL); + return Tcl_EvalEx(interp, script,-1,TCL_EVAL_GLOBAL); } /* @@ -1029,7 +1029,7 @@ ThreadEventProc( Tcl_Preserve(interp); Tcl_ResetResult(interp); Tcl_CreateThreadExitHandler(ThreadFreeProc, threadEventPtr->script); - code = Tcl_EvalEx(interp, threadEventPtr->script, -1, TCL_EVAL_GLOBAL); + code = Tcl_EvalEx(interp, threadEventPtr->script,-1,TCL_EVAL_GLOBAL); Tcl_DeleteThreadExitHandler(ThreadFreeProc, threadEventPtr->script); if (code != TCL_OK) { errorCode = Tcl_GetVar(interp, "errorCode", TCL_GLOBAL_ONLY); |