Variables declared within the main body of a coroutine persist for the life of the coroutine. This much is obvious. What may be less obvious is that you can access those variables from commands called from the coro, using [upvar #1], so here's a little wrapper to facilitate that:
proc corovars {args} {
foreach n $args {lappend v $n $n}
uplevel 1 [list upvar #1 {*}$v]
}So, coro-persistent variables may be declared thus within procs:
corovars x y z
| enter categories here |
|---|