# Event on keyboard input
class GamnitKeyEvent
	super GamnitInputEvent
	super KeyEvent

	redef type NATIVE: SDLKeyboardEvent

	redef fun is_down do return buffer.is_keydown
	redef fun is_up do return buffer.is_keyup
	redef fun is_arrow_up do return native.keysym.is_up
	redef fun is_arrow_left do return native.keysym.is_left
	redef fun is_arrow_down do return native.keysym.is_down
	redef fun is_arrow_right do return native.keysym.is_right
	redef fun to_c do return native.to_s.chars.first
	redef fun name do return native.to_s.to_lower
end