Concurrency in Tcl: Weaving Threads