用法

DEFLAG-FACE face 'flag

描述

清除 VID 面中的標誌。

DEFLAG-FACE 是一個函式值。

引數

face -- (型別：物件)
flag -- (型別：任何)

原始碼

deflag-face: func [
    "Clears a flag in a VID face." 
    face [object!] 
    'flag
][
    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
]