buttons<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: buttons<< ( value object -- )

Methods

USING: accessors alien.c-types classes.struct
classes.struct.private glfw.ffi kernel ;

M: GLFWgamepadstate buttons<<
    T{ struct-slot-spec
        { name "buttons" }
        { offset 0 }
        { class object }
        { type { uchar 15 } }
    } write-struct-slot ; inline


USING: accessors classes.struct classes.struct.private
x11.xinput2.ffi ;

M: XIDeviceEvent buttons<<
    T{ struct-slot-spec
        { name "buttons" }
        { offset 128 }
        { class XIButtonState }
        { initial S{ XIButtonState { mask_len 0 } { mask f } } }
        { type XIButtonState }
    } write-struct-slot ; inline


USING: accessors classes.struct classes.struct.private
x11.xinput2.ffi ;

M: XIEnterEvent buttons<<
    T{ struct-slot-spec
        { name "buttons" }
        { offset 136 }
        { class XIButtonState }
        { initial S{ XIButtonState { mask_len 0 } { mask f } } }
        { type XIButtonState }
    } write-struct-slot ; inline


USING: accessors game.input slots.private ;

M: controller-state buttons<< 10 set-slot ; inline


USING: accessors game.input.demos.joysticks slots.private ;

M: joystick-demo-gadget buttons<< 26 set-slot ; inline


USING: accessors game.input slots.private ;

M: mouse-state buttons<< 6 set-slot ; inline