typedef int KeySym

def NoSymbol -1   # XXX check this, is it 0 in X?

def KeyPress 2
def KeyRelease 3
def ButtonPress 4
def ButtonRelease 5
def MotionNotify 6

def ShiftMask 0  # XXX FIXME

int events_queued(boolean wait_for_event)
	use(wait_for_event)
	return 0

handle_event()
	.

XDisplayKeycodes(Display *display, int *key_first, int *key_last)
	use(display)
	*key_first = 0
	*key_last = 255

int XKeysymToKeycode(Display *display, KeySym keysym):
	use(display)
	return toupper(keysym)

int XStringToKeysym(char *keystr)
	use(keystr)
	error("XStringToKeysym: not implemented for gr_dummy")
	return 0

char *XKeysymToString(KeySym keysym)
	use(keysym)
	error("XKeysymToString: not implemented for gr_dummy")
	return ""

def gr_key_avoid_auto_repeat_press(e) 0
def gr_key_avoid_auto_repeat_release(e, is_callback) 0

int XKeycodeToKeysym(Display *display, KeySym keycode, int shift)
	use(display, shift)
	return shift ? tolower(keycode) : toupper(keycode)

long2cstr event_type_names[] =
	{ KeyPress, "KeyPress" },
	{ KeyRelease, "KeyRelease" },
	{ ButtonPress, "ButtonPress" },
	{ ButtonRelease, "ButtonRelease" },
	{ MotionNotify, "MotionNotify" },