comparison src/term.c @ 109664:b6bdd59e60ff

Use const for some arrays and functions. * src/xterm.h (xg_set_icon_from_xpm_data): * src/xfns.c (xg_set_icon_from_xpm_data): * src/term.c (fkeys): * src/keyboard.c (lispy_accent_keys, lispy_function_keys) (lispy_multimedia_keys, lispy_kana_keys, iso_lispy_function_keys) (lispy_drag_n_drop_names, scroll_bar_parts, modify_event_symbol) (frame.c frame_parms): * src/emacs-icon.h (gnu_xpm_bits): * src/callint.c (callint_argfuns): Use const.
author Dan Nicolaescu <dann@ics.uci.edu>
date Fri, 06 Aug 2010 11:41:15 -0700
parents 9cfca8c9fb07
children 64732fa6188a
comparison
equal deleted inserted replaced
109663:a4c55c0d8da2 109664:b6bdd59e60ff
1264 (Berkeley) termcap entries. They're listed in X keysym order; 1264 (Berkeley) termcap entries. They're listed in X keysym order;
1265 except we put the keypad keys first, so that if they clash with 1265 except we put the keypad keys first, so that if they clash with
1266 other keys (as on the IBM PC keyboard) they get overridden. 1266 other keys (as on the IBM PC keyboard) they get overridden.
1267 */ 1267 */
1268 1268
1269 static struct fkey_table keys[] = 1269 static const struct fkey_table keys[] =
1270 { 1270 {
1271 {"kh", "home"}, /* termcap */ 1271 {"kh", "home"}, /* termcap */
1272 {"kl", "left"}, /* termcap */ 1272 {"kl", "left"}, /* termcap */
1273 {"ku", "up"}, /* termcap */ 1273 {"ku", "up"}, /* termcap */
1274 {"kr", "right"}, /* termcap */ 1274 {"kr", "right"}, /* termcap */
2904 } 2904 }
2905 2905
2906 /* Look for a `help-echo' property. */ 2906 /* Look for a `help-echo' property. */
2907 { 2907 {
2908 Lisp_Object help; 2908 Lisp_Object help;
2909 extern Lisp_Object Qhelp_echo;
2910 2909
2911 /* Check overlays first. */ 2910 /* Check overlays first. */
2912 help = Qnil; 2911 help = Qnil;
2913 for (i = noverlays - 1; i >= 0 && NILP (help); --i) 2912 for (i = noverlays - 1; i >= 0 && NILP (help); --i)
2914 { 2913 {