Module CL_InputEventQueue

module CL_InputEventQueue: sig .. end

type device_number = int 

connect

val connect_sig_key_down : CL_InputDevice.t -> dev_num:device_number -> unit

val connect_sig_key_up : CL_InputDevice.t -> dev_num:device_number -> unit

val connect_sig_pointer_move : CL_InputDevice.t -> dev_num:device_number -> unit

val connect_sig_axis_move : CL_InputDevice.t -> dev_num:device_number -> unit

disconnect

val disconnect_sig_key_down : CL_InputDevice.t -> unit

val disconnect_sig_key_up : CL_InputDevice.t -> unit

val disconnect_sig_pointer_move : CL_InputDevice.t -> unit

val disconnect_sig_axis_move : CL_InputDevice.t -> unit

get events

type event = CL_InputEvent.t * device_number * CL_InputDevice.kind 

val get_input_events : unit -> event list