diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-06-23 12:20:59 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-06-23 12:20:59 (GMT) |
commit | 814c9b57aaf622f67d64bf335061ceedf51a5c40 (patch) | |
tree | 8c01ed8f3d937c1fcb96f0ffc87b0bea69ba7c34 /generic/tclExecute.c | |
parent | d7d411426de72cbced551fa007a4e99c84d2fd0a (diff) | |
parent | 6f34bcda8f5613edbb17c22b97774e0c4317a951 (diff) | |
download | tcl-814c9b57aaf622f67d64bf335061ceedf51a5c40.zip tcl-814c9b57aaf622f67d64bf335061ceedf51a5c40.tar.gz tcl-814c9b57aaf622f67d64bf335061ceedf51a5c40.tar.bz2 |
Now really merge [bug-f9800d52bd61f240] (previous commit contains test-cases only)
Diffstat (limited to 'generic/tclExecute.c')
-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 f9c2954..7e51c0d 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -2506,6 +2506,7 @@ TEBCresume( Tcl_IncrRefCount(valuePtr); iPtr->execEnvPtr = corPtr->callerEEPtr; TclSetTailcall(interp, valuePtr); + corPtr->yieldPtr = valuePtr; iPtr->execEnvPtr = corPtr->eePtr; yieldParameter = (PTR2INT(NULL)+1); /*==CORO_ACTIVATE_YIELDM*/ |