Rebol Programming/find-window

USAGE: edit

FIND-WINDOW face 

DESCRIPTION: edit

Find a face's window face.

FIND-WINDOW is a function value.

ARGUMENTS edit

  • face -- (Type: object)

SOURCE CODE edit

find-window: func [
    "Find a face's window face." 
    face [object!]
][
    while [face/parent-face] [face: face/parent-face] 
    face
]