From: Paul Eggert Date: Sat, 6 Oct 2012 00:52:17 +0000 (-0700) Subject: * keyboard.c (read_char): Remove unnecessary 'volatile's and label. X-Git-Tag: emacs-24.2.90~241^2~5 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6e21c0323ab576a7d600f6074d9ad7b882a3efd;p=emacs.git * keyboard.c (read_char): Remove unnecessary 'volatile's and label. --- diff --git a/src/ChangeLog b/src/ChangeLog index cb17e8192e4..956e78e6c7e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2012-10-06 Paul Eggert + + * keyboard.c (read_char): Remove unnecessary 'volatile's and label. + 2012-10-05 Eli Zaretskii * w32proc.c (stop_timer_thread): Fix declaration of 'err'. diff --git a/src/keyboard.c b/src/keyboard.c index 19ece4a22f1..d06b02024c5 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -2283,11 +2283,10 @@ read_char (int commandflag, ptrdiff_t nmaps, Lisp_Object *maps, Lisp_Object prev_event, int *used_mouse_menu, EMACS_TIME *end_time) { - volatile Lisp_Object c; + Lisp_Object c; ptrdiff_t jmpcount; sys_jmp_buf local_getcjmp; sys_jmp_buf save_jump; - volatile int key_already_recorded = 0; Lisp_Object tem, save; volatile Lisp_Object previous_echo_area_message; volatile Lisp_Object also_record; @@ -2519,10 +2518,7 @@ read_char (int commandflag, ptrdiff_t nmaps, Lisp_Object *maps, return c; /* wrong_kboard_jmpbuf */ if (! NILP (c)) - { - key_already_recorded = 1; - goto non_reread_1; - } + goto exit; } /* Make a longjmp point for quits to use, but don't alter getcjmp just yet. @@ -2850,12 +2846,10 @@ read_char (int commandflag, ptrdiff_t nmaps, Lisp_Object *maps, goto wrong_kboard; } - non_reread_1: - /* Buffer switch events are only for internal wakeups so don't show them to the user. Also, don't record a key if we already did. */ - if (BUFFERP (c) || key_already_recorded) + if (BUFFERP (c)) goto exit; /* Process special events within read_char