diff options
| author | dgp <dgp@users.sourceforge.net> | 2015-04-08 16:42:33 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2015-04-08 16:42:33 (GMT) |
| commit | 6d6afda39de86db3c4b0f0479432b0f61529a785 (patch) | |
| tree | c7e09cbb5705078332e12cd64d68863a9fa55dfb | |
| parent | 7fc61f369bd93fb2745878679eebe7024c3cf97b (diff) | |
| download | tcl-6d6afda39de86db3c4b0f0479432b0f61529a785.zip tcl-6d6afda39de86db3c4b0f0479432b0f61529a785.tar.gz tcl-6d6afda39de86db3c4b0f0479432b0f61529a785.tar.bz2 | |
Correction suggested by miguel. Passes test suite and fixes bug demos.
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index feff85b..43c2b08 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -4946,7 +4946,7 @@ TEBCresume( pc += pcAdjustment; TEBC_YIELD(); - TclMarkTailcall(interp); + TclPushTailcallPoint(interp); oPtr = contextPtr->oPtr; if (oPtr->flags & FILTER_HANDLING) { TclNRAddCallback(interp, FinalizeOONextFilter, |