Mercurial > emacs
comparison src/keymap.h @ 39691:27fe3d5767ed
New file. Extracted from lisp.h.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 08 Oct 2001 11:12:28 +0000 |
parents | |
children | 171753f5a65e |
comparison
equal
deleted
inserted
replaced
39690:38c1890338cc | 39691:27fe3d5767ed |
---|---|
1 /* Functions to manipulate keymaps. | |
2 Copyright (C) 2001 Free Software Foundation, Inc. | |
3 | |
4 This file is part of GNU Emacs. | |
5 | |
6 GNU Emacs is free software; you can redistribute it and/or modify | |
7 it under the terms of the GNU General Public License as published by | |
8 the Free Software Foundation; either version 2, or (at your option) | |
9 any later version. | |
10 | |
11 GNU Emacs is distributed in the hope that it will be useful, | |
12 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 GNU General Public License for more details. | |
15 | |
16 You should have received a copy of the GNU General Public License | |
17 along with GNU Emacs; see the file COPYING. If not, write to | |
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
19 Boston, MA 02111-1307, USA. */ | |
20 | |
21 #ifndef KEYMAP_H | |
22 #define KEYMAP_H | |
23 | |
24 #define KEYMAPP(m) (!NILP (get_keymap (m, 0, 0))) | |
25 extern Lisp_Object Qkeymap, Qmenu_bar; | |
26 extern Lisp_Object current_global_map; | |
27 EXFUN (Fmake_sparse_keymap, 1); | |
28 EXFUN (Fkeymap_prompt, 1); | |
29 EXFUN (Fcopy_keymap, 1); | |
30 EXFUN (Fdefine_key, 3); | |
31 EXFUN (Flookup_key, 3); | |
32 EXFUN (Fkey_binding, 2); | |
33 EXFUN (Fkey_description, 1); | |
34 EXFUN (Fsingle_key_description, 2); | |
35 EXFUN (Fwhere_is_internal, 4); | |
36 extern Lisp_Object access_keymap P_ ((Lisp_Object, Lisp_Object, int, int, int)); | |
37 extern Lisp_Object get_keyelt P_ ((Lisp_Object, int)); | |
38 extern Lisp_Object get_keymap P_ ((Lisp_Object, int, int)); | |
39 extern void describe_vector P_ ((Lisp_Object, Lisp_Object, | |
40 void (*) (Lisp_Object), int, | |
41 Lisp_Object, Lisp_Object, int *, int)); | |
42 extern void describe_map_tree P_ ((Lisp_Object, int, Lisp_Object, Lisp_Object, | |
43 char *, int, int, int)); | |
44 extern int current_minor_maps P_ ((Lisp_Object **, Lisp_Object **)); | |
45 extern void initial_define_key P_ ((Lisp_Object, int, char *)); | |
46 extern void initial_define_lispy_key P_ ((Lisp_Object, char *, char *)); | |
47 extern void syms_of_keymap P_ ((void)); | |
48 extern void keys_of_keymap P_ ((void)); | |
49 | |
50 | |
51 #endif |