xo::thread_shutdown (private)

 xo::thread_shutdown registry obj tid

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

Stop a persistent worker after connection workers have drained. This Tcl callback must remain callable after its XOTcl controller or class has been finalized. It uses only the shared registry and the Thread extension.

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

Partial Call Graph (max 5 caller/called nodes):

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