create_destroy_child.tcl   [plain text]


puts "I'm running"
after 1000 
exit 0