object-procs.tcl