-extern "C" {
-
- void
- init_cursor_control (void)
- {
- init_cursor_control_type ();
- scm_c_define_gsubr ("get-cursor-control", 1, 0, 0, (scm_t_subr)irr_getCursorControl);
- scm_c_export ("get-cursor-control", NULL);
- }
-
- DEFINE_WRAPPED_TYPE (irr::gui::ICursorControl*, "cursor-control",
- init_cursor_control_type, cursor_control_p,
- wrap_cursor_control, unwrap_cursor_control);