diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-17 22:28:38 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-17 22:28:38 (GMT) |
| commit | ad5f7e54641391f59816162a8a53b2375e7222a0 (patch) | |
| tree | 6046e84e87a076d9ed6ca1edf226832ffa7bd073 /generic/tclThreadTest.c | |
| parent | 3b0f6c1c31151c22e22f431ed737a6a41f9c5494 (diff) | |
| download | tcl-ad5f7e54641391f59816162a8a53b2375e7222a0.zip tcl-ad5f7e54641391f59816162a8a53b2375e7222a0.tar.gz tcl-ad5f7e54641391f59816162a8a53b2375e7222a0.tar.bz2 | |
Convert Tcl_Eval and Tcl_GlobalEval to a macro
Diffstat (limited to 'generic/tclThreadTest.c')
| -rw-r--r-- | generic/tclThreadTest.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c index e718d34..ab0a169 100644 --- a/generic/tclThreadTest.c +++ b/generic/tclThreadTest.c @@ -613,7 +613,7 @@ NewTestThread( */ Tcl_Preserve(tsdPtr->interp); - result = Tcl_Eval(tsdPtr->interp, threadEvalScript); + result = Tcl_EvalEx(tsdPtr->interp, threadEvalScript, -1, 0); if (result != TCL_OK) { ThreadErrorProc(tsdPtr->interp); } |