irrlicht

An OCaml binding for the Irrlicht Engine
Module Irr_base
type obj
exception Null_pointer_exn
class reference_counted : obj -> object ... end
class timer : obj -> object ... end
class attribute_exchanging_object : obj -> object ... end
type key_input = {
ki_char : char;
ki_control : bool;
ki_key : Irr_enums.key_code;
ki_pressed_down : bool;
ki_shift : bool;
}
val key_count : int
val int_of_key : Irr_enums.key_code -> int
type mouse_input = {
mi_left_pressed : bool;
mi_middle_pressed : bool;
mi_right_pressed : bool;
mi_control : bool;
mi_event : Irr_enums.mouse_input_event;
mi_shift : bool;
mi_wheel : float;
mi_x : int;
mi_y : int;
}
type gui_event = {
ge_caller : int;
ge_element : int option;
ge_type : Irr_enums.gui_event_type;
}
type event = [
| `gui_event of gui_event
| `key_input of key_input
| `mouse_input of mouse_input
| `other
]
class event_receiver : obj -> object ... end
class event_receiver_fun : ( event -> bool ) -> object ... end