diff options
| author | dgp@users.sourceforge.net <dgp> | 2015-04-08 14:37:58 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2015-04-08 14:37:58 (GMT) |
| commit | b4b78ce2b9ae161a11cd7b30b0a16f8b91850f5e (patch) | |
| tree | 86e23cc971c29434c76c3f09976f6f633403d4c0 | |
| parent | 71c321bd3c2cf98a0a7e0a00d6b2956a7b049325 (diff) | |
| download | tcl-b4b78ce2b9ae161a11cd7b30b0a16f8b91850f5e.zip tcl-b4b78ce2b9ae161a11cd7b30b0a16f8b91850f5e.tar.gz tcl-b4b78ce2b9ae161a11cd7b30b0a16f8b91850f5e.tar.bz2 | |
Proposed fix.
| -rw-r--r-- | generic/tclExecute.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index f2f475a..feff85b 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -4946,6 +4946,7 @@ TEBCresume( pc += pcAdjustment; TEBC_YIELD(); + TclMarkTailcall(interp); oPtr = contextPtr->oPtr; if (oPtr->flags & FILTER_HANDLING) { TclNRAddCallback(interp, FinalizeOONextFilter, |