Posted to tcl by mjanssen at Tue Jun 09 16:38:11 GMT 2020view pretty

package require Thread

set t [thread::create]

thread::send -async $t "interp create slave ; slave eval {package require http}; thread::wait "
thread::send -async $t "slave eval {http::geturl http://www.google.com}"

thread::send -async $t {slave eval {puts [namespace current]}}
vwait forever

-> ::http