X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/353c87f6ff3c0834e521563f8eefa75c0b10e388..647d367f3b5c92db371da218aa8e5f643b2ad1ad:/src/keymap.h diff --git a/src/keymap.h b/src/keymap.h index d9334cda0f..feccb129b7 100644 --- a/src/keymap.h +++ b/src/keymap.h @@ -1,5 +1,5 @@ /* Functions to manipulate keymaps. - Copyright (C) 2001-2012 Free Software Foundation, Inc. + Copyright (C) 2001-2013 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -29,26 +29,16 @@ along with GNU Emacs. If not, see . */ We need one more byte for string terminator `\0'. */ #define KEY_DESCRIPTION_SIZE ((2 * 6) + 1 + (CHARACTERBITS / 3) + 1 + 1) -#define KEYMAPP(m) (!NILP (get_keymap (m, 0, 0))) +#define KEYMAPP(m) (!NILP (get_keymap (m, false, false))) extern Lisp_Object Qkeymap, Qmenu_bar; extern Lisp_Object Qremap; extern Lisp_Object Qmenu_item; extern Lisp_Object current_global_map; -EXFUN (Fmake_sparse_keymap, 1); -EXFUN (Fkeymap_prompt, 1); -EXFUN (Fdefine_key, 3); -EXFUN (Fcommand_remapping, 3); -EXFUN (Fkey_binding, 4); -EXFUN (Fkey_description, 2); -extern char *push_key_description (EMACS_INT, char *, int); -EXFUN (Fsingle_key_description, 2); -EXFUN (Fwhere_is_internal, 5); -EXFUN (Fcurrent_active_maps, 2); -extern Lisp_Object access_keymap (Lisp_Object, Lisp_Object, int, int, int); -extern Lisp_Object get_keymap (Lisp_Object, int, int); -EXFUN (Fset_keymap_parent, 2); -extern void describe_map_tree (Lisp_Object, int, Lisp_Object, Lisp_Object, - const char *, int, int, int, int); +extern char *push_key_description (EMACS_INT, char *); +extern Lisp_Object access_keymap (Lisp_Object, Lisp_Object, bool, bool, bool); +extern Lisp_Object get_keymap (Lisp_Object, bool, bool); +extern void describe_map_tree (Lisp_Object, bool, Lisp_Object, Lisp_Object, + const char *, bool, bool, bool, bool); extern ptrdiff_t current_minor_maps (Lisp_Object **, Lisp_Object **); extern void initial_define_key (Lisp_Object, int, const char *); extern void initial_define_lispy_key (Lisp_Object, const char *, const char *); @@ -57,7 +47,8 @@ extern void keys_of_keymap (void); typedef void (*map_keymap_function_t) (Lisp_Object key, Lisp_Object val, Lisp_Object args, void* data); -extern void map_keymap (Lisp_Object map, map_keymap_function_t fun, Lisp_Object largs, void* cargs, int autoload); +extern void map_keymap (Lisp_Object, map_keymap_function_t, Lisp_Object, + void *, bool); extern void map_keymap_canonical (Lisp_Object map, map_keymap_function_t fun, Lisp_Object args, void *data);