nsshell::THREAD method init (protected)

 <instance of nsshell::THREAD[i]> init

Defined in /usr/local/ns/tcl/nsshell/shell.tcl

Partial Call Graph (max 5 caller/called nodes):
%3 nsf::exithandler nsf::exithandler thread::mutex thread::mutex nsshell::THREAD instproc init nsshell::THREAD instproc init nsshell::THREAD instproc init->nsf::exithandler nsshell::THREAD instproc init->thread::mutex

Testcases:
No testcase defined.
Source code:
if {![ns_ictl epoch]} {
    # We are during initialization.
    set :initCmd {
        package req nx
    }
}
append :initCmd {
    ns_thread name SELF
    ::nsf::exithandler set {
        ns_log notice "[self] exits"
    }
}
regsub -all SELF ${:initCmd} [self] :initCmd
append :initCmd \n [list set ::currentThread [self]] \n ${:cmd}
set :mutex [thread::mutex create]
ns_log notice "mutex ${:mutex} created"
next
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: