4258 |
#else |
#else |
4259 |
0, |
0, |
4260 |
#endif |
#endif |
4261 |
|
#ifdef XK_dead_abovering |
4262 |
|
XK_dead_abovering, |
4263 |
|
#else |
4264 |
|
0, |
4265 |
|
#endif |
4266 |
|
#ifdef XK_dead_iota |
4267 |
|
XK_dead_iota, |
4268 |
|
#else |
4269 |
|
0, |
4270 |
|
#endif |
4271 |
|
#ifdef XK_dead_belowdot |
4272 |
|
XK_dead_belowdot, |
4273 |
|
#else |
4274 |
|
0, |
4275 |
|
#endif |
4276 |
|
#ifdef XK_dead_voiced_sound |
4277 |
|
XK_dead_voiced_sound, |
4278 |
|
#else |
4279 |
|
0, |
4280 |
|
#endif |
4281 |
|
#ifdef XK_dead_semivoiced_sound |
4282 |
|
XK_dead_semivoiced_sound, |
4283 |
|
#else |
4284 |
|
0, |
4285 |
|
#endif |
4286 |
|
#ifdef XK_dead_hook |
4287 |
|
XK_dead_hook, |
4288 |
|
#else |
4289 |
|
0, |
4290 |
|
#endif |
4291 |
|
#ifdef XK_dead_horn |
4292 |
|
XK_dead_horn, |
4293 |
|
#else |
4294 |
|
0, |
4295 |
|
#endif |
4296 |
}; |
}; |
4297 |
|
|
4298 |
/* This is a list of Lisp names for special "accent" characters. |
/* This is a list of Lisp names for special "accent" characters. |
4313 |
"dead-caron", |
"dead-caron", |
4314 |
"dead-doubleacute", |
"dead-doubleacute", |
4315 |
"dead-abovedot", |
"dead-abovedot", |
4316 |
|
"dead-abovering", |
4317 |
|
"dead-iota", |
4318 |
|
"dead-belowdot", |
4319 |
|
"dead-voiced-sound", |
4320 |
|
"dead-semivoiced-sound", |
4321 |
|
"dead-hook", |
4322 |
|
"dead-horn", |
4323 |
}; |
}; |
4324 |
|
|
4325 |
#ifdef HAVE_NTGUI |
#ifdef HAVE_NTGUI |
4486 |
|
|
4487 |
#else /* not HAVE_NTGUI */ |
#else /* not HAVE_NTGUI */ |
4488 |
|
|
4489 |
|
/* This should be dealt with in XTread_socket now, and that doesn't |
4490 |
|
depend on the client system having the Kana syms defined. See also |
4491 |
|
the XK_kana_A case below. */ |
4492 |
|
#if 0 |
4493 |
#ifdef XK_kana_A |
#ifdef XK_kana_A |
4494 |
static char *lispy_kana_keys[] = |
static char *lispy_kana_keys[] = |
4495 |
{ |
{ |
4524 |
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x4f0 .. 0x4ff */ |
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x4f0 .. 0x4ff */ |
4525 |
}; |
}; |
4526 |
#endif /* XK_kana_A */ |
#endif /* XK_kana_A */ |
4527 |
|
#endif /* 0 */ |
4528 |
|
|
4529 |
#define FUNCTION_KEY_OFFSET 0xff00 |
#define FUNCTION_KEY_OFFSET 0xff00 |
4530 |
|
|
4794 |
(unsigned)-1); |
(unsigned)-1); |
4795 |
} |
} |
4796 |
|
|
4797 |
|
#if 0 |
4798 |
#ifdef XK_kana_A |
#ifdef XK_kana_A |
4799 |
if (event->code >= 0x400 && event->code < 0x500) |
if (event->code >= 0x400 && event->code < 0x500) |
4800 |
return modify_event_symbol (event->code - 0x400, |
return modify_event_symbol (event->code - 0x400, |
4804 |
(sizeof (lispy_kana_keys) |
(sizeof (lispy_kana_keys) |
4805 |
/ sizeof (lispy_kana_keys[0]))); |
/ sizeof (lispy_kana_keys[0]))); |
4806 |
#endif /* XK_kana_A */ |
#endif /* XK_kana_A */ |
4807 |
|
#endif /* 0 */ |
4808 |
|
|
4809 |
#ifdef ISO_FUNCTION_KEY_OFFSET |
#ifdef ISO_FUNCTION_KEY_OFFSET |
4810 |
if (event->code < FUNCTION_KEY_OFFSET |
if (event->code < FUNCTION_KEY_OFFSET |
4823 |
|| (event->code - FUNCTION_KEY_OFFSET |
|| (event->code - FUNCTION_KEY_OFFSET |
4824 |
>= sizeof lispy_function_keys / sizeof *lispy_function_keys)) |
>= sizeof lispy_function_keys / sizeof *lispy_function_keys)) |
4825 |
{ |
{ |
4826 |
/* EVENT->code is an unknown keysym, for example someone |
/* EVENT->code is an unknown keysym. */ |
|
assigned `ccaron' to a key in a locale where |
|
|
XmbLookupString doesn't return a translation for it. */ |
|
4827 |
char *name; |
char *name; |
4828 |
Lisp_Object symbol; |
Lisp_Object symbol; |
4829 |
|
|