Mercurial > hg > xemacs-beta

comparison src/commands.h @ 272:c5d627a313b1 r21-0b34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 3d6bfa290dbd
children 74fd4e045ea6
comparison
equal deleted inserted replaced
271:c7b7086b0a39 272:c5d627a313b1
90 /* This is so incredibly losing that it's been completely eliminated 90 /* This is so incredibly losing that it's been completely eliminated
91 from the code. Trust me, there are cleaner, safer ways of 91 from the code. Trust me, there are cleaner, safer ways of
92 achieving the same functionality (e.g. use select()). */ 92 achieving the same functionality (e.g. use select()). */
93 /* extern int immediate_quit; Nonzero means ^G can quit instantly */ 93 /* extern int immediate_quit; Nonzero means ^G can quit instantly */
94 94
95 extern Lisp_Object Vexecuting_macro;
96
97 /* Nonzero if input is coming from the keyboard */ 95 /* Nonzero if input is coming from the keyboard */
98 96
99 #define INTERACTIVE (NILP (Vexecuting_macro) && !noninteractive) 97 #define INTERACTIVE (NILP (Vexecuting_macro) && !noninteractive)
100 98
101 /* Set this nonzero to force reconsideration of modeline. */ 99 /* Set this nonzero to force reconsideration of modeline. */
102 100
103 extern int modeline_changed; 101 extern int modeline_changed;
104
105 /* Nonzero means reading single-character input with prompt
106 so put cursor on minibuffer after the prompt. */
107
108 extern int cursor_in_echo_area;
109 102
110 extern Lisp_Object recent_keys_ring; 103 extern Lisp_Object recent_keys_ring;
111 extern int recent_keys_ring_index; 104 extern int recent_keys_ring_index;
112 105
113 /* #ifndef LISP_COMMAND_LOOP */ 106 /* #ifndef LISP_COMMAND_LOOP */
114 extern Lisp_Object Vtop_level; 107 extern Lisp_Object Vtop_level;
115 /* #else */ 108 /* #else */
116 extern Lisp_Object Vcommand_loop; 109 extern Lisp_Object Vcommand_loop;
117 /* #endif */ 110 /* #endif */
118 DECLARE_DOESNT_RETURN (initial_command_loop (Lisp_Object)); 111 DECLARE_DOESNT_RETURN (initial_command_loop (Lisp_Object));
119 DOESNT_RETURN initial_command_loop (Lisp_Object);
120 Lisp_Object call_command_loop (Lisp_Object catch_errors); 112 Lisp_Object call_command_loop (Lisp_Object catch_errors);
121 extern int command_loop_level; 113 extern int command_loop_level;
122 114
123 extern Lisp_Object Vkeyboard_translate_table; 115 extern Lisp_Object Vkeyboard_translate_table;
124 extern Lisp_Object Vlast_input_time; 116 extern Lisp_Object Vlast_input_time;