From f6064cbe2f3682cce21e6d8063afbd32aaa3ce25 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 25 Jan 1995 07:18:37 +0000 Subject: [PATCH] (PERD): New struct containing per-display data. (the_only_perd): An instance of it. (get_perd): Macro to retrieve it. --- src/lisp.h | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) diff --git a/src/lisp.h b/src/lisp.h index 937e5315083..1adf5433863 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -483,6 +483,26 @@ typedef struct interval *INTERVAL; #endif /* USE_TEXT_PROPERTIES */ +/* All of the per-display objects, packaged together in a struct. */ +typedef struct + { + Lisp_Object prefix_arg; + Lisp_Object current_prefix_arg; + Lisp_Object this_command_keys; + Lisp_Object internal_last_event_frame; + Lisp_Object kbd_buffer_frame_or_window; + struct input_event *kbd_buffer; + struct input_event *kbd_fetch_ptr; + struct input_event *kbd_store_ptr; + int this_command_key_count; + int immediate_echo; + int echo_after_prompt; + char *echoptr; + char echobuf[300]; + } PERD; +extern PERD the_only_perd; +#define get_perd(f) (&the_only_perd) + /* In a cons, the markbit of the car is the gc mark bit */ struct Lisp_Cons -- 2.39.5