Rebol Programming/in-window?

USAGE:

IN-WINDOW? window face 

DESCRIPTION:

Return true if a window contains a given face.

IN-WINDOW? is a function value.

ARGUMENTS:

• window -- (Type: any)
• face -- (Type: any)

SOURCE CODE

in-window?: func [
    "Return true if a window contains a given face." 
    window face
][
    if face = window [return true] 
    if none? face/parent-face [return false] 
    in-window? window face/parent-face
]