xotcl::THREAD proc recreate (private)
xotcl::THREAD recreate obj args [ args... ]
Defined in /var/www/openacs.org/packages/xotcl-core/tcl/40-thread-mod-procs.tcl
this method catches recreation of THREADs in worker threads it reinitializes the thread according to the new definition.
- Parameters:
- obj (required)
- args (required)
- Testcases:
- No testcase defined.
Source code: :log "recreating [self] $obj, tid [$obj exists tid]" if {![string match "::*" $obj]} { set obj ::$obj } $obj set recreate 1 next $obj init [lindex $args 0] if {[nsv_exists [self] $obj] && [$obj exists initcmd]} { set tid [nsv_get [self] $obj] ::thread::send $tid [$obj set initcmd] $obj set tid $tid :log "+++ content of thread $obj ($tid) redefined" }XQL Not present: Generic, PostgreSQL, Oracle