sig val pointer_pos : Tsdl.Sdl.event -> int * int val pos : unit -> int * int val window_pos : Tsdl.Sdl.window -> int * int val button_pos : Tsdl.Sdl.event -> int * int val finger_pos : Tsdl.Sdl.event -> float * float end