diff options
Diffstat (limited to 'src/keyboard.h')
| -rw-r--r-- | src/keyboard.h | 52 |
1 files changed, 26 insertions, 26 deletions
diff --git a/src/keyboard.h b/src/keyboard.h index 33a94014ca1..bcdeaf62165 100644 --- a/src/keyboard.h +++ b/src/keyboard.h | |||
| @@ -25,7 +25,7 @@ INLINE_HEADER_BEGIN | |||
| 25 | 25 | ||
| 26 | /* Most code should use this macro to access Lisp fields in struct kboard. */ | 26 | /* Most code should use this macro to access Lisp fields in struct kboard. */ |
| 27 | 27 | ||
| 28 | #define KVAR(kboard, field) ((kboard)->field) | 28 | #define KVAR(kboard, field) ((kboard)->field ## _) |
| 29 | 29 | ||
| 30 | /* Each KBOARD represents one logical input stream from which Emacs | 30 | /* Each KBOARD represents one logical input stream from which Emacs |
| 31 | gets input. If we are using ordinary terminals, it has one KBOARD | 31 | gets input. If we are using ordinary terminals, it has one KBOARD |
| @@ -78,32 +78,32 @@ struct kboard | |||
| 78 | can effectively wait for input in the any-kboard state, and hence | 78 | can effectively wait for input in the any-kboard state, and hence |
| 79 | avoid blocking out the other KBOARDs. See universal-argument in | 79 | avoid blocking out the other KBOARDs. See universal-argument in |
| 80 | lisp/simple.el for an example. */ | 80 | lisp/simple.el for an example. */ |
| 81 | Lisp_Object Voverriding_terminal_local_map; | 81 | Lisp_Object Voverriding_terminal_local_map_; |
| 82 | 82 | ||
| 83 | /* Last command executed by the editor command loop, not counting | 83 | /* Last command executed by the editor command loop, not counting |
| 84 | commands that set the prefix argument. */ | 84 | commands that set the prefix argument. */ |
| 85 | Lisp_Object Vlast_command; | 85 | Lisp_Object Vlast_command_; |
| 86 | 86 | ||
| 87 | /* Normally same as last-command, but never modified by other commands. */ | 87 | /* Normally same as last-command, but never modified by other commands. */ |
| 88 | Lisp_Object Vreal_last_command; | 88 | Lisp_Object Vreal_last_command_; |
| 89 | 89 | ||
| 90 | /* User-supplied table to translate input characters through. */ | 90 | /* User-supplied table to translate input characters through. */ |
| 91 | Lisp_Object Vkeyboard_translate_table; | 91 | Lisp_Object Vkeyboard_translate_table_; |
| 92 | 92 | ||
| 93 | /* Last command that may be repeated by `repeat'. */ | 93 | /* Last command that may be repeated by `repeat'. */ |
| 94 | Lisp_Object Vlast_repeatable_command; | 94 | Lisp_Object Vlast_repeatable_command_; |
| 95 | 95 | ||
| 96 | /* The prefix argument for the next command, in raw form. */ | 96 | /* The prefix argument for the next command, in raw form. */ |
| 97 | Lisp_Object Vprefix_arg; | 97 | Lisp_Object Vprefix_arg_; |
| 98 | 98 | ||
| 99 | /* Saved prefix argument for the last command, in raw form. */ | 99 | /* Saved prefix argument for the last command, in raw form. */ |
| 100 | Lisp_Object Vlast_prefix_arg; | 100 | Lisp_Object Vlast_prefix_arg_; |
| 101 | 101 | ||
| 102 | /* Unread events specific to this kboard. */ | 102 | /* Unread events specific to this kboard. */ |
| 103 | Lisp_Object kbd_queue; | 103 | Lisp_Object kbd_queue_; |
| 104 | 104 | ||
| 105 | /* Non-nil while a kbd macro is being defined. */ | 105 | /* Non-nil while a kbd macro is being defined. */ |
| 106 | Lisp_Object defining_kbd_macro; | 106 | Lisp_Object defining_kbd_macro_; |
| 107 | 107 | ||
| 108 | /* The start of storage for the current keyboard macro. */ | 108 | /* The start of storage for the current keyboard macro. */ |
| 109 | Lisp_Object *kbd_macro_buffer; | 109 | Lisp_Object *kbd_macro_buffer; |
| @@ -125,28 +125,28 @@ struct kboard | |||
| 125 | ptrdiff_t kbd_macro_bufsize; | 125 | ptrdiff_t kbd_macro_bufsize; |
| 126 | 126 | ||
| 127 | /* Last anonymous kbd macro defined. */ | 127 | /* Last anonymous kbd macro defined. */ |
| 128 | Lisp_Object Vlast_kbd_macro; | 128 | Lisp_Object Vlast_kbd_macro_; |
| 129 | 129 | ||
| 130 | /* Alist of system-specific X windows key symbols. */ | 130 | /* Alist of system-specific X windows key symbols. */ |
| 131 | Lisp_Object Vsystem_key_alist; | 131 | Lisp_Object Vsystem_key_alist_; |
| 132 | 132 | ||
| 133 | /* Cache for modify_event_symbol. */ | 133 | /* Cache for modify_event_symbol. */ |
| 134 | Lisp_Object system_key_syms; | 134 | Lisp_Object system_key_syms_; |
| 135 | 135 | ||
| 136 | /* The kind of display: x, w32, ... */ | 136 | /* The kind of display: x, w32, ... */ |
| 137 | Lisp_Object Vwindow_system; | 137 | Lisp_Object Vwindow_system_; |
| 138 | 138 | ||
| 139 | /* Keymap mapping keys to alternative preferred forms. | 139 | /* Keymap mapping keys to alternative preferred forms. |
| 140 | See the DEFVAR for more documentation. */ | 140 | See the DEFVAR for more documentation. */ |
| 141 | Lisp_Object Vlocal_function_key_map; | 141 | Lisp_Object Vlocal_function_key_map_; |
| 142 | 142 | ||
| 143 | /* Keymap mapping ASCII function key sequences onto their preferred | 143 | /* Keymap mapping ASCII function key sequences onto their preferred |
| 144 | forms. Initialized by the terminal-specific lisp files. See the | 144 | forms. Initialized by the terminal-specific lisp files. See the |
| 145 | DEFVAR for more documentation. */ | 145 | DEFVAR for more documentation. */ |
| 146 | Lisp_Object Vinput_decode_map; | 146 | Lisp_Object Vinput_decode_map_; |
| 147 | 147 | ||
| 148 | /* Minibufferless frames on this display use this frame's minibuffer. */ | 148 | /* Minibufferless frames on this display use this frame's minibuffer. */ |
| 149 | Lisp_Object Vdefault_minibuffer_frame; | 149 | Lisp_Object Vdefault_minibuffer_frame_; |
| 150 | 150 | ||
| 151 | /* Number of displays using this KBOARD. Normally 1, but can be | 151 | /* Number of displays using this KBOARD. Normally 1, but can be |
| 152 | larger when you have multiple screens on a single X display. */ | 152 | larger when you have multiple screens on a single X display. */ |
| @@ -154,7 +154,7 @@ struct kboard | |||
| 154 | 154 | ||
| 155 | /* The text we're echoing in the modeline - partial key sequences, | 155 | /* The text we're echoing in the modeline - partial key sequences, |
| 156 | usually. This is nil when not echoing. */ | 156 | usually. This is nil when not echoing. */ |
| 157 | Lisp_Object echo_string; | 157 | Lisp_Object echo_string_; |
| 158 | 158 | ||
| 159 | /* This flag indicates that events were put into kbd_queue | 159 | /* This flag indicates that events were put into kbd_queue |
| 160 | while Emacs was running for some other KBOARD. | 160 | while Emacs was running for some other KBOARD. |
| @@ -179,42 +179,42 @@ struct kboard | |||
| 179 | INLINE void | 179 | INLINE void |
| 180 | kset_default_minibuffer_frame (struct kboard *kb, Lisp_Object val) | 180 | kset_default_minibuffer_frame (struct kboard *kb, Lisp_Object val) |
| 181 | { | 181 | { |
| 182 | kb->Vdefault_minibuffer_frame = val; | 182 | kb->Vdefault_minibuffer_frame_ = val; |
| 183 | } | 183 | } |
| 184 | INLINE void | 184 | INLINE void |
| 185 | kset_defining_kbd_macro (struct kboard *kb, Lisp_Object val) | 185 | kset_defining_kbd_macro (struct kboard *kb, Lisp_Object val) |
| 186 | { | 186 | { |
| 187 | kb->defining_kbd_macro = val; | 187 | kb->defining_kbd_macro_ = val; |
| 188 | } | 188 | } |
| 189 | INLINE void | 189 | INLINE void |
| 190 | kset_input_decode_map (struct kboard *kb, Lisp_Object val) | 190 | kset_input_decode_map (struct kboard *kb, Lisp_Object val) |
| 191 | { | 191 | { |
| 192 | kb->Vinput_decode_map = val; | 192 | kb->Vinput_decode_map_ = val; |
| 193 | } | 193 | } |
| 194 | INLINE void | 194 | INLINE void |
| 195 | kset_last_command (struct kboard *kb, Lisp_Object val) | 195 | kset_last_command (struct kboard *kb, Lisp_Object val) |
| 196 | { | 196 | { |
| 197 | kb->Vlast_command = val; | 197 | kb->Vlast_command_ = val; |
| 198 | } | 198 | } |
| 199 | INLINE void | 199 | INLINE void |
| 200 | kset_last_kbd_macro (struct kboard *kb, Lisp_Object val) | 200 | kset_last_kbd_macro (struct kboard *kb, Lisp_Object val) |
| 201 | { | 201 | { |
| 202 | kb->Vlast_kbd_macro = val; | 202 | kb->Vlast_kbd_macro_ = val; |
| 203 | } | 203 | } |
| 204 | INLINE void | 204 | INLINE void |
| 205 | kset_prefix_arg (struct kboard *kb, Lisp_Object val) | 205 | kset_prefix_arg (struct kboard *kb, Lisp_Object val) |
| 206 | { | 206 | { |
| 207 | kb->Vprefix_arg = val; | 207 | kb->Vprefix_arg_ = val; |
| 208 | } | 208 | } |
| 209 | INLINE void | 209 | INLINE void |
| 210 | kset_system_key_alist (struct kboard *kb, Lisp_Object val) | 210 | kset_system_key_alist (struct kboard *kb, Lisp_Object val) |
| 211 | { | 211 | { |
| 212 | kb->Vsystem_key_alist = val; | 212 | kb->Vsystem_key_alist_ = val; |
| 213 | } | 213 | } |
| 214 | INLINE void | 214 | INLINE void |
| 215 | kset_window_system (struct kboard *kb, Lisp_Object val) | 215 | kset_window_system (struct kboard *kb, Lisp_Object val) |
| 216 | { | 216 | { |
| 217 | kb->Vwindow_system = val; | 217 | kb->Vwindow_system_ = val; |
| 218 | } | 218 | } |
| 219 | 219 | ||
| 220 | /* Temporarily used before a frame has been opened. */ | 220 | /* Temporarily used before a frame has been opened. */ |