Rebol Programming/deflag-face

From Wikibooks, open books for an open world
< Rebol Programming
Jump to navigation Jump to search

USAGE:[edit | edit source]

DEFLAG-FACE face 'flag 

DESCRIPTION:[edit | edit source]

Clears a flag in a VID face.

DEFLAG-FACE is a function value.

ARGUMENTS[edit | edit source]

  • face -- (Type: object)
  • flag -- (Type: any)

SOURCE CODE[edit | edit source]

deflag-face: func [
    "Clears a flag in a VID face." 
    face [object!] 
    if none? face/flags [exit] 
    if not find face/flags 'flags [face/flags: copy face/flags insert face/flags 'flags] 
    remove find face/flags flag