summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2015-03-23 00:33:07 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2015-03-23 00:33:07 (GMT)
commit2593df952706439a96046069b2e1ce0184a9b6a3 (patch)
tree4af584812a1128d2b5f0e8f5ed4025b42b359506 /generic/tclExecute.c
parentd7c6dcbdcddc3c35e9d243a50a8a9f9931a19fd6 (diff)
downloadtcl-2593df952706439a96046069b2e1ce0184a9b6a3.zip
tcl-2593df952706439a96046069b2e1ce0184a9b6a3.tar.gz
tcl-2593df952706439a96046069b2e1ce0184a9b6a3.tar.bz2
completing the fix for bug d87cb182053fd79b3
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 322bd20..4790ba3 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -3185,6 +3185,7 @@ TEBCresume(
pc += 6;
TEBC_YIELD();
+ TclMarkTailcall(interp);
TclNRAddCallback(interp, TclClearRootEnsemble, NULL,NULL,NULL,NULL);
return TclNREvalObjEx(interp, objPtr, TCL_EVAL_INVOKE, NULL, INT_MIN);