(device-input-callback) ( context result sender value -- )

Vocabulary

game.input.iokit

Inputs

context	an object
result	an object
sender	an object
value	an object

Outputs

None

Definition

USING: assocs combinators namespaces ;

IN: game.input.iokit

:: (device-input-callback)
    ( context result sender value -- )
    sender get-input-device :> device {
        {
            [ device mouse-device? ]
            [ +mouse-state+ get-global value record-mouse ]
        }
        {
            [ device controller-device? ]
            [
                device +controller-states+ get-global at
                value record-controller
            ]
        }
        [ +keyboard-state+ get-global value record-keyboard ]
    } cond ;