21     TkWindow *topLevelPtr;	/* Information about top-level window. */  member
118     TkWindow *newPtr, *topLevelPtr;  in Tk_FocusObjCmd()  local
207 	for (topLevelPtr = newPtr; topLevelPtr != NULL;  in Tk_FocusObjCmd()
208 		topLevelPtr = topLevelPtr->parentPtr) {  in Tk_FocusObjCmd()
209 	    if (!(topLevelPtr->flags & TK_TOP_HIERARCHY)) {  in Tk_FocusObjCmd()
214 		if (tlFocusPtr->topLevelPtr == topLevelPtr) {  in Tk_FocusObjCmd()
220 	    Tcl_SetObjResult(interp, Tk_NewWindowObj((Tk_Window) topLevelPtr));  in Tk_FocusObjCmd()
413 	if (tlFocusPtr->topLevelPtr == winPtr) {  in TkFocusFilterEvent()
419 	tlFocusPtr->topLevelPtr = tlFocusPtr->focusWinPtr = winPtr;  in TkFocusFilterEvent()
543     TkWindow *topLevelPtr;  in TkSetFocusWin()  local
578     for (topLevelPtr = winPtr; ; topLevelPtr = topLevelPtr->parentPtr) {  in TkSetFocusWin()
579 	if (topLevelPtr == NULL) {  in TkSetFocusWin()
588 	if (!(topLevelPtr->flags & TK_MAPPED)) {  in TkSetFocusWin()
591 	if (topLevelPtr->flags & TK_TOP_HIERARCHY) {  in TkSetFocusWin()
620 	if (tlFocusPtr->topLevelPtr == topLevelPtr) {  in TkSetFocusWin()
626 	tlFocusPtr->topLevelPtr = topLevelPtr;  in TkSetFocusWin()
632     if (topLevelPtr->flags & TK_EMBEDDED &&  in TkSetFocusWin()
642 	TkpClaimFocus(topLevelPtr, force);  in TkSetFocusWin()
665 	serial = TkpChangeFocus(TkpGetWrapperWindow(topLevelPtr), force);  in TkSetFocusWin()
835 	if (winPtr == tlFocusPtr->topLevelPtr) {  in TkFocusDeadWindow()
844 			tlFocusPtr->topLevelPtr->pathName));  in TkFocusDeadWindow()
866 	    tlFocusPtr->focusWinPtr = tlFocusPtr->topLevelPtr;  in TkFocusDeadWindow()
868 		    && !(tlFocusPtr->topLevelPtr->flags & TK_ALREADY_DEAD)) {  in TkFocusDeadWindow()
870 			tlFocusPtr->topLevelPtr->pathName, winPtr->pathName));  in TkFocusDeadWindow()
872 			tlFocusPtr->topLevelPtr);  in TkFocusDeadWindow()
873 		displayFocusPtr->focusWinPtr = tlFocusPtr->topLevelPtr;  in TkFocusDeadWindow()
874 		dispPtr->focusPtr = tlFocusPtr->topLevelPtr;  in TkFocusDeadWindow()
1088     TkWindow *topLevelPtr, *subWinPtr;  in TkFocusSplit()  local
1098     for (topLevelPtr = winPtr; ; topLevelPtr = topLevelPtr->parentPtr) {  in TkFocusSplit()
1099 	if (topLevelPtr == NULL) {  in TkFocusSplit()
1107 	if (topLevelPtr->flags & TK_TOP_HIERARCHY) {  in TkFocusSplit()
1118 	if (tlFocusPtr->topLevelPtr == topLevelPtr) {  in TkFocusSplit()
1136 	    subWinPtr && subWinPtr != winPtr && subWinPtr != topLevelPtr;  in TkFocusSplit()
1148 	newTlFocusPtr->topLevelPtr = winPtr;  in TkFocusSplit()
1157 	tlFocusPtr->focusWinPtr = topLevelPtr;  in TkFocusSplit()
1192 	    && winPtr->mainPtr->tlFocusPtr->topLevelPtr == winPtr) {  in TkFocusJoin()
1200 		    tlFocusPtr->nextPtr->topLevelPtr == winPtr) {  in TkFocusJoin()