record-key ( keycode pressed? -- )

Vocabulary

ui.backend.input-state

Inputs

keycode	an object
pressed?	an object

Outputs

None

Definition

USING: accessors assocs kernel namespaces ;

IN: ui.backend.input-state

: record-key ( keycode pressed? -- )
    [ t swap current-input-state get-global keycodes>> set-at ]
    [ current-input-state get-global keycodes>> delete-at ] if ;