Rebol Programming/find-window

USAGE:Edit

FIND-WINDOW face 

DESCRIPTION:Edit

Find a face's window face.

FIND-WINDOW is a function value.

ARGUMENTSEdit

  • face -- (Type: object)

SOURCE CODEEdit

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