Rebol Programming/flag-face
Jump to navigation
Jump to search
USAGE:[edit | edit source]
FLAG-FACE face 'flag
DESCRIPTION:[edit | edit source]
Sets a flag in a VID face.
FLAG-FACE is a function value.
ARGUMENTS[edit | edit source]
- face -- (Type: object)
- flag -- (Type: any)
SOURCE CODE[edit | edit source]
flag-face: func [ "Sets a flag in a VID face." face [object!] 'flag ][ if none? face/flags [face/flags: copy [flags]] if not find face/flags 'flags [face/flags: copy face/flags insert face/flags 'flags] append face/flags flag ]