ip_CallWhenDeleted 5582 ext/tk/tcltklib.c     Tcl_CallWhenDeleted(ptr->ip, ip_CallWhenDeleted, (ClientData)mainWin);
ip_CallWhenDeleted 5685 ext/tk/tcltklib.c     Tcl_CallWhenDeleted(slave->ip, ip_CallWhenDeleted, (ClientData)mainWin);