namesapce tcl tk

=>namespace current
::DCS::SocketProtocol
=>set m_theObject [[namespace current] ::#auto]
::socketProtocol0
=>set m_theObject [[namespace current] ::#auto]
::socketProtocol1
=>set m_theObject [[namespace current] ::#auto]
::socketProtocol2
=>set m_theObject [[namespace current] ::#auto]
::socketProtocol3
=>set m_theObject [[namespace current] ::#auto]
::socketProtocol4
=>set m_theObject [[namespace current] ::#auto]
::socketProtocol5
=>