record-modifier-flags ( flags -- )

Vocabulary

ui.backend.cocoa.views

Inputs

flags

an object

Outputs

None

Definition

USING: assocs kernel math ui.backend.input-state ;

IN: ui.backend.cocoa.views

:: record-modifier-flags ( flags -- )
    cocoa-modifier-masks
    [| code mask | code flags mask bitand zero? not record-key ]
    assoc-each ;