xotcl::THREAD proc shutdown (private)

 xotcl::THREAD shutdown registry obj tid

Defined in /var/www/openacs/packages/xotcl-core/tcl/40-thread-mod-procs.tcl

Stop a persistent thread after NaviServer has drained connection workers. The shared stopping marker prevents further sends and duplicate releases.

Parameters:

registry (required)

shared thread registry used by the object's class

obj (required)

fully qualified thread object name

tid (required)

thread identifier registered for this shutdown callback

Testcases:

No testcase defined.

Source code:

if {![nsv_exists $registry $obj]
    || [nsv_get $registry $obj] ne $tid
    || [nsv_exists ${registry}::stopping $obj]} {
  return
}
nsv_set ${registry}::stopping $obj $tid
if {[::thread::exists $tid]} {
  ::thread::release $tid
}

XQL Not present:

Generic, PostgreSQL, Oracle