../../src/printobj.tcl