class cc { public method changtext constructor { args } { }}
body cc::changtext { args } { puts $args return [expr $args +3]}
set kk [[namespace current]::[cc \#auto] changtext 33] puts $kk