A Supervisor like Tcl implementation