Mercurial > hg > xemacs-beta

comparison src/keymap.h @ 5118:e0db3c197671 ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge up to latest default branch, doesn't compile yet
author Ben Wing <ben@xemacs.org>
date Sat, 26 Dec 2009 21:18:49 -0600
parents a75979634ce3
children b5df3737028a
comparison
equal deleted inserted replaced
5117:3742ea8250b5 5118:e0db3c197671
24 #ifndef INCLUDED_keymap_h_ 24 #ifndef INCLUDED_keymap_h_
25 #define INCLUDED_keymap_h_ 25 #define INCLUDED_keymap_h_
26 26
27 typedef struct Lisp_Keymap Lisp_Keymap; 27 typedef struct Lisp_Keymap Lisp_Keymap;
28 28
29 DECLARE_LRECORD (keymap, Lisp_Keymap); 29 DECLARE_LISP_OBJECT (keymap, Lisp_Keymap);
30 #define XKEYMAP(x) XRECORD (x, keymap, Lisp_Keymap) 30 #define XKEYMAP(x) XRECORD (x, keymap, Lisp_Keymap)
31 #define wrap_keymap(p) wrap_record (p, keymap) 31 #define wrap_keymap(p) wrap_record (p, keymap)
32 #define KEYMAPP(x) RECORDP (x, keymap) 32 #define KEYMAPP(x) RECORDP (x, keymap)
33 #define CHECK_KEYMAP(x) CHECK_RECORD (x, keymap) 33 #define CHECK_KEYMAP(x) CHECK_RECORD (x, keymap)
34 #define CONCHECK_KEYMAP(x) CONCHECK_RECORD (x, keymap) 34 #define CONCHECK_KEYMAP(x) CONCHECK_RECORD (x, keymap)
38 EXFUN (Fmake_keymap, 1); 38 EXFUN (Fmake_keymap, 1);
39 EXFUN (Fwhere_is_internal, 5); 39 EXFUN (Fwhere_is_internal, 5);
40 40
41 extern Lisp_Object Qalt, Qcontrol, Qhyper, Qmeta, Qshift, Qsuper; 41 extern Lisp_Object Qalt, Qcontrol, Qhyper, Qmeta, Qshift, Qsuper;
42 extern Lisp_Object Qbutton1, Qbutton2, Qbutton3, Qbutton4, Qbutton5; 42 extern Lisp_Object Qbutton1, Qbutton2, Qbutton3, Qbutton4, Qbutton5;
43 extern Lisp_Object Qbutton6, Qbutton7, Qbutton8, Qbutton9, Qbutton10;
44 extern Lisp_Object Qbutton11, Qbutton12, Qbutton13, Qbutton14, Qbutton15;
45 extern Lisp_Object Qbutton16, Qbutton17, Qbutton18, Qbutton19, Qbutton20;
46 extern Lisp_Object Qbutton21, Qbutton22, Qbutton23, Qbutton24, Qbutton25;
47 extern Lisp_Object Qbutton26;
43 extern Lisp_Object Vmeta_prefix_char; 48 extern Lisp_Object Vmeta_prefix_char;
44 49
45 Lisp_Object get_keymap (Lisp_Object object, int errorp, int autoload); 50 Lisp_Object get_keymap (Lisp_Object object, int errorp, int autoload);
46 Lisp_Object event_binding (Lisp_Object event0, int accept_default); 51 Lisp_Object event_binding (Lisp_Object event0, int accept_default);
47 Lisp_Object event_binding_in (Lisp_Object event0, Lisp_Object keymap, 52 Lisp_Object event_binding_in (Lisp_Object event0, Lisp_Object keymap,