X-Git-Url: http://nitlanguage.org diff --git a/lib/sdl.nit b/lib/sdl.nit index f8f1f3e..960c062 100644 --- a/lib/sdl.nit +++ b/lib/sdl.nit @@ -14,123 +14,123 @@ package sdl universal SDL_Surface -special Pointer - meth width: Int is extern "sdl_surface_width" - meth height: Int is extern "sdl_surface_height" + super Pointer + fun width: Int is extern "sdl_surface_width" + fun height: Int is extern "sdl_surface_height" - meth lock_surface: Int is extern "SDL_LockSurface" - meth unlock_surface: Int is extern "SDL_LockSurface" + fun lock_surface: Int is extern "SDL_LockSurface" + fun unlock_surface: Int is extern "SDL_LockSurface" - meth blit_on(dest: SDL_Surface) is extern "sdl_blit_surface" - meth blit_on_xy(dest: SDL_Surface, dest_x: Int, dest_y: Int) is extern "sdl_blit_surface_xy" + fun blit_on(dest: SDL_Surface) is extern "sdl_blit_surface" + fun blit_on_xy(dest: SDL_Surface, dest_x: Int, dest_y: Int) is extern "sdl_blit_surface_xy" - meth update_rect(x: Int, y: Int, w: Int, h: Int) is extern "SDL_UpdateRect" - meth update_all + fun update_rect(x: Int, y: Int, w: Int, h: Int) is extern "SDL_UpdateRect" + fun update_all do update_rect(0, 0, 0, 0) end - meth clear is extern "sdl_clear_sruface" + fun clear is extern "sdl_clear_sruface" - meth to_display_format: SDL_Surface is extern "SDL_DisplayFormat" - meth free is extern "SDL_FreeSurface" + fun to_display_format: SDL_Surface is extern "SDL_DisplayFormat" + fun free is extern "SDL_FreeSurface" end universal SDL_Screen -special SDL_Surface - meth flip is extern "SDL_Flip" + super SDL_Surface + fun flip is extern "SDL_Flip" end universal SDL_Event -special Pointer - meth is_keyboard: Bool is extern "sdl_evt_is_keyboard" - meth as_keyboard: SDL_KeyboardEvent is extern "sdl_evt_as_keyboard" - meth is_mouse_button: Bool is extern "sdl_evt_is_mouse_button" - meth as_mouse_button: SDL_MouseButtonEvent is extern "sdl_evt_as_mouse_button" - meth is_mouse_motion: Bool is extern "sdl_evt_is_mouse_motion" - meth as_mouse_motion: SDL_MouseMotionEvent is extern "sdl_evt_as_mouse_motion" - meth is_expose: Bool is extern "sdl_evt_is_expose" - meth is_quit: Bool is extern "sdl_evt_is_quit" + super Pointer + fun is_keyboard: Bool is extern "sdl_evt_is_keyboard" + fun as_keyboard: SDL_KeyboardEvent is extern "sdl_evt_as_keyboard" + fun is_mouse_button: Bool is extern "sdl_evt_is_mouse_button" + fun as_mouse_button: SDL_MouseButtonEvent is extern "sdl_evt_as_mouse_button" + fun is_mouse_motion: Bool is extern "sdl_evt_is_mouse_motion" + fun as_mouse_motion: SDL_MouseMotionEvent is extern "sdl_evt_as_mouse_motion" + fun is_expose: Bool is extern "sdl_evt_is_expose" + fun is_quit: Bool is extern "sdl_evt_is_quit" end universal SDL_ButtonEvent -special SDL_Event - meth is_pressed: Bool is abstract + super SDL_Event + fun is_pressed: Bool is abstract end universal SDL_MouseEvent -special SDL_Event - meth x: Int is abstract - meth y: Int is abstract + super SDL_Event + fun x: Int is abstract + fun y: Int is abstract end universal SDL_KeyboardEvent -special SDL_ButtonEvent - redef meth is_pressed: Bool is extern "sdl_keyboard_evt_state" + super SDL_ButtonEvent + redef fun is_pressed: Bool is extern "sdl_keyboard_evt_state" end universal SDL_MouseButtonEvent -special SDL_ButtonEvent -special SDL_MouseEvent - redef meth is_pressed: Bool is extern "sdl_mouse_button_evt_state" - redef meth x: Int is extern "sdl_mouse_button_evt_x" - redef meth y: Int is extern "sdl_mouse_button_evt_y" - meth button: Int is extern "sdl_mouse_button_evt_button" + super SDL_ButtonEvent + super SDL_MouseEvent + redef fun is_pressed: Bool is extern "sdl_mouse_button_evt_state" + redef fun x: Int is extern "sdl_mouse_button_evt_x" + redef fun y: Int is extern "sdl_mouse_button_evt_y" + fun button: Int is extern "sdl_mouse_button_evt_button" end universal SDL_MouseMotionEvent -special SDL_MouseEvent - redef meth x: Int is extern "sdl_mouse_evt_x" - redef meth y: Int is extern "sdl_mouse_evt_y" - meth xrel: Int is extern "sdl_mouse_evt_xrel" - meth yrel: Int is extern "sdl_mouse_evt_yrel" + super SDL_MouseEvent + redef fun x: Int is extern "sdl_mouse_evt_x" + redef fun y: Int is extern "sdl_mouse_evt_y" + fun xrel: Int is extern "sdl_mouse_evt_xrel" + fun yrel: Int is extern "sdl_mouse_evt_yrel" end class SDL_EventListener - meth on_keyboard(evt: SDL_KeyboardEvent) + fun on_keyboard(evt: SDL_KeyboardEvent) do end - meth on_mouse_button(evt: SDL_MouseButtonEvent) + fun on_mouse_button(evt: SDL_MouseButtonEvent) do end - meth on_mouse_motion(evt: SDL_MouseMotionEvent) + fun on_mouse_motion(evt: SDL_MouseMotionEvent) do end - meth on_expose + fun on_expose do end - meth on_quit + fun on_quit do end end class SDL_EventProcessor - attr _listeners: Array[SDL_EventListener] + var _listeners: Array[SDL_EventListener] - meth add_listener(l: SDL_EventListener) + fun add_listener(l: SDL_EventListener) do _listeners.add(l) end - meth remove_listener(l: SDL_EventListener) + fun remove_listener(l: SDL_EventListener) do _listeners.remove(l) end - meth process_one_event + fun process_one_event do if sdl_poll_next_event then process_event(sdl_current_event) end end - meth process_all_events + fun process_all_events do while sdl_poll_next_event do process_event(sdl_current_event) end end - private meth process_event(evt: SDL_Event) + private fun process_event(evt: SDL_Event) do var sdl_listeners = _listeners if evt.is_keyboard then @@ -164,18 +164,18 @@ end # General -meth sdl_init is extern +fun sdl_init is extern # Video -meth sdl_set_video_mode(w: Int, h: Int, d: Int): SDL_Screen is extern -meth sdl_set_fullscreen_video_mode(w: Int, h: Int, d: Int): SDL_Screen is extern +fun sdl_set_video_mode(w: Int, h: Int, d: Int): SDL_Screen is extern +fun sdl_set_fullscreen_video_mode(w: Int, h: Int, d: Int): SDL_Screen is extern -meth sdl_load_raw_bmp(s: String): SDL_Surface +fun sdl_load_raw_bmp(s: String): SDL_Surface do return sdl_load_bmp_native(s.to_cstring) end -meth sdl_load_bmp(s: String): SDL_Surface +fun sdl_load_bmp(s: String): SDL_Surface do var raw = sdl_load_raw_bmp(s) var sprite = raw.to_display_format @@ -183,22 +183,22 @@ do return sprite end -meth sdl_load_bmp_native(s: NativeString): SDL_Surface is extern +fun sdl_load_bmp_native(s: NativeString): SDL_Surface is extern -meth sdl_show_cursor=(b: Bool) is extern "sdl_show_cursor_1" -meth sdl_show_cursor: Bool is extern "sdl_show_cursor_0" +fun sdl_show_cursor=(b: Bool) is extern "sdl_show_cursor_1" +fun sdl_show_cursor: Bool is extern "sdl_show_cursor_0" # WM -meth sdl_grab=(b: Bool) is extern "sdl_grab_1" -meth sdl_grab: Bool is extern "sdl_grab_0" +fun sdl_grab=(b: Bool) is extern "sdl_grab_1" +fun sdl_grab: Bool is extern "sdl_grab_0" # Events -meth sdl_current_event: SDL_Event is extern -meth sdl_poll_next_event: Bool is extern +fun sdl_current_event: SDL_Event is extern +fun sdl_poll_next_event: Bool is extern # Time -meth sdl_get_ticks: Int is extern -meth sdl_delay(ms: Int) is extern +fun sdl_get_ticks: Int is extern +fun sdl_delay(ms: Int) is extern