Legend:
Library
Module
Module type
Parameter
Class
Class type
Library
Module
Module type
Parameter
Class
Class type
type 'msg onesub =
| SubTick of Time.posix -> 'msg
| SubMouseMove of (float * float) -> 'msg
| SubMouseDown of unit -> 'msg
| SubMouseUp of unit -> 'msg
| SubKeyDown of Keyboard.key -> 'msg
| SubKeyUp of Keyboard.key -> 'msg
type 'msg t = 'msg onesub list
val on_animation_frame : (Time.posix -> 'msg) -> 'msg t
val on_mouse_move : ((float * float) -> 'msg) -> 'msg t
val on_mouse_down : (unit -> 'msg) -> 'msg t
val on_mouse_up : (unit -> 'msg) -> 'msg t
val on_key_down : (Keyboard.key -> 'msg) -> 'msg t
val on_key_up : (Keyboard.key -> 'msg) -> 'msg t
type event =
| ETick of float
| EMouseMove of int * int
| EMouseButton of bool
| EKeyChanged of bool * Keyboard.key