aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKarl Heuer1995-03-01 03:45:45 +0000
committerKarl Heuer1995-03-01 03:45:45 +0000
commit400b2c6982e71fc0a0c95eb726431927c93c345a (patch)
tree4a42b66541a3c3fda3f4128ca47723a933fb9626 /src
parentee9e37ab2b0a975e1c03b0b09265d2a91de8ed44 (diff)
downloademacs-400b2c6982e71fc0a0c95eb726431927c93c345a.tar.gz
emacs-400b2c6982e71fc0a0c95eb726431927c93c345a.zip
(struct PERDISPLAY): Add prefix_factor, prefix_value, prefix_sign,
prefix_partial. Delete Vcurrent_prefix_arg and Vprefix_arg; those are now plain vars again.
Diffstat (limited to 'src')
-rw-r--r--src/lisp.h22
1 files changed, 6 insertions, 16 deletions
diff --git a/src/lisp.h b/src/lisp.h
index a006dd33476..2bbf7a54f26 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -491,23 +491,12 @@ typedef struct PERDISPLAY PERDISPLAY;
491struct PERDISPLAY 491struct PERDISPLAY
492 { 492 {
493 PERDISPLAY *next_perdisplay; 493 PERDISPLAY *next_perdisplay;
494 Lisp_Object Vprefix_arg;
495 Lisp_Object Vcurrent_prefix_arg;
496 494
497#ifdef MULTI_FRAME 495 /* The state of a prefix arg. */
498 /* The frame in which the last input event occurred, or Qmacro if the 496 Lisp_Object prefix_factor, prefix_value;
499 last event came from a macro. We use this to determine when to 497 int prefix_sign, prefix_partial;
500 generate switch-frame events. This may be cleared by functions
501 like Fselect_frame, to make sure that a switch-frame event is
502 generated by the next character. */
503 Lisp_Object internal_last_event_frame;
504#endif
505
506 /* A user-visible version of the above, intended to allow users to
507 figure out where the last event came from, if the event doesn't
508 carry that information itself (i.e. if it was a character). */
509 Lisp_Object Vlast_event_frame;
510 498
499 /* Unread events specific to this display. */
511 Lisp_Object kbd_queue; 500 Lisp_Object kbd_queue;
512 501
513 /* Placeholder for future vars that will be moved here. */ 502 /* Placeholder for future vars that will be moved here. */
@@ -1581,7 +1570,7 @@ extern Lisp_Object Fread_no_blanks_input ();
1581 1570
1582/* Defined in callint.c */ 1571/* Defined in callint.c */
1583 1572
1584extern Lisp_Object Qminus, Qplus; 1573extern Lisp_Object Qminus, Qplus, Vcurrent_prefix_arg, Vprefix_arg;
1585extern Lisp_Object Vcommand_history; 1574extern Lisp_Object Vcommand_history;
1586extern Lisp_Object Qcall_interactively; 1575extern Lisp_Object Qcall_interactively;
1587extern Lisp_Object Fcall_interactively (); 1576extern Lisp_Object Fcall_interactively ();
@@ -1598,6 +1587,7 @@ extern Lisp_Object Vhelp_form, Vtop_level;
1598extern Lisp_Object Fdiscard_input (), Frecursive_edit (); 1587extern Lisp_Object Fdiscard_input (), Frecursive_edit ();
1599extern Lisp_Object Fcommand_execute (), Finput_pending_p (); 1588extern Lisp_Object Fcommand_execute (), Finput_pending_p ();
1600extern Lisp_Object Qvertical_scroll_bar; 1589extern Lisp_Object Qvertical_scroll_bar;
1590extern void clear_prefix_arg ();
1601 1591
1602/* defined in keymap.c */ 1592/* defined in keymap.c */
1603 1593