4.3BSD - /usr/src/new/emacs/src/commands.h

   1: /* Definitions needed by most editing commands.
   2:    Copyright (C) 1985 Richard M. Stallman.
   3: 
   4: This file is part of GNU Emacs.
   5: 
   6: GNU Emacs is distributed in the hope that it will be useful,
   7: but WITHOUT ANY WARRANTY.  No author or distributor
   8: accepts responsibility to anyone for the consequences of using it
   9: or for whether it serves any particular purpose or works at all,
  10: unless he says so in writing.  Refer to the GNU Emacs General Public
  11: License for full details.
  12: 
  13: Everyone is granted permission to copy, modify and redistribute
  14: GNU Emacs, but only under the conditions described in the
  15: GNU Emacs General Public License.   A copy of this license is
  16: supposed to have been given to you along with GNU Emacs so you
  17: can know your rights and responsibilities.  It should be in a
  18: file named COPYING.  Among other things, the copyright notice
  19: and this notice must be preserved on all copies.  */
  20: 
  21: 
  22: #define Ctl(c) ((c)&037)
  23: 
  24: /* Define the names of keymaps, just so people can refer to them in calls to defkey */
  25: 
  26: extern struct Lisp_Vector *GlobalMap;
  27:                 /* default global key bindings */
  28: 
  29: extern struct Lisp_Vector *ESCmap;
  30:                 /* The keymap used for globally bound
  31: 				   ESC-prefixed default commands */
  32: 
  33: extern struct Lisp_Vector *CtlXmap;
  34:                 /* The keymap used for globally bound
  35: 				   C-x-prefixed default commands */
  36: 
  37: extern Lisp_Object Vminibuffer_local_map;
  38:                 /* The keymap used by the minibuf for
  39: 				   local bindings when spaces are allowed
  40: 				   in the minibuf */
  41: 
  42: extern Lisp_Object Vminibuffer_local_ns_map;
  43:                 /* The keymap used by the minibuf for
  44: 				   local bindings when spaces are not
  45: 				   encouraged in the minibuf */
  46: 
  47: /* keymap used for minibuffers when doing completion */
  48: extern Lisp_Object Vminibuffer_local_completion_map;
  49: 
  50: /* keymap used for minibuffers when doing completion and require a match */
  51: extern Lisp_Object Vminibuffer_local_must_match_map;
  52: 
  53: extern int last_command_char;       /* The last key struck as a command */
  54: 
  55: extern int unread_command_char; /* Command character to be re-read, or -1 */
  56: 
  57: /* Previous command symbol found here for comparison */
  58: extern Lisp_Object last_command;
  59: 
  60: extern int immediate_quit;      /* Nonzero means ^G can quit instantly */
  61: 
  62: extern Lisp_Object Vexecuting_macro;
  63: 
  64: /* Nonzero if input is coming from the keyboard */
  65: 
  66: #define INTERACTIVE (NULL (Vexecuting_macro) && !noninteractive)
  67: 
  68: /* Set this nonzero to force reconsideration of mode line. */
  69: 
  70: extern int RedoModes;

Defined macros

Usage of this include