diff options
| author | Karl Heuer | 1995-03-01 03:45:45 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-03-01 03:45:45 +0000 |
| commit | 400b2c6982e71fc0a0c95eb726431927c93c345a (patch) | |
| tree | 4a42b66541a3c3fda3f4128ca47723a933fb9626 /src | |
| parent | ee9e37ab2b0a975e1c03b0b09265d2a91de8ed44 (diff) | |
| download | emacs-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.h | 22 |
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; | |||
| 491 | struct PERDISPLAY | 491 | struct 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 | ||
| 1584 | extern Lisp_Object Qminus, Qplus; | 1573 | extern Lisp_Object Qminus, Qplus, Vcurrent_prefix_arg, Vprefix_arg; |
| 1585 | extern Lisp_Object Vcommand_history; | 1574 | extern Lisp_Object Vcommand_history; |
| 1586 | extern Lisp_Object Qcall_interactively; | 1575 | extern Lisp_Object Qcall_interactively; |
| 1587 | extern Lisp_Object Fcall_interactively (); | 1576 | extern Lisp_Object Fcall_interactively (); |
| @@ -1598,6 +1587,7 @@ extern Lisp_Object Vhelp_form, Vtop_level; | |||
| 1598 | extern Lisp_Object Fdiscard_input (), Frecursive_edit (); | 1587 | extern Lisp_Object Fdiscard_input (), Frecursive_edit (); |
| 1599 | extern Lisp_Object Fcommand_execute (), Finput_pending_p (); | 1588 | extern Lisp_Object Fcommand_execute (), Finput_pending_p (); |
| 1600 | extern Lisp_Object Qvertical_scroll_bar; | 1589 | extern Lisp_Object Qvertical_scroll_bar; |
| 1590 | extern void clear_prefix_arg (); | ||
| 1601 | 1591 | ||
| 1602 | /* defined in keymap.c */ | 1592 | /* defined in keymap.c */ |
| 1603 | 1593 | ||