Fix tagging of DEFUN by etags

* lib-src/etags.c (C_entries): Tag DEFUN twice: once with its C
name, and then again with its Lisp name.  This restores the
ability to find Lisp primitives by their C name, which was lost
when the etags back-end was switched to a more strict search
criteria.

* test/etags/ETAGS.good_1:
* test/etags/ETAGS.good_2:
* test/etags/ETAGS.good_3:
* test/etags/ETAGS.good_4:
* test/etags/ETAGS.good_5:
* test/etags/ETAGS.good_6:
* test/etags/CTAGS.good: Adapt to the changes in etags.c wrt
tagging DEFUN.

8 files changed, 349 insertions, 20 deletions

diff --git a/lib-src/etags.c b/lib-src/etags.c
index 01e230206ac..1457700fedd 100644
--- a/lib-src/etags.c
+++ b/lib-src/etags.c
@@ -3436,13 +3436,27 @@ C_entries (int c_ext, FILE *inf)
                               int off = tokoff;
                               int len = toklen;
 
-                              /* Rewrite the tag so that emacs lisp DEFUNs
-                                 can be found by their elisp name */
                               if (defun)
                                 {
                                   off += 1;
                                   len -= 1;
+
+                                  /* First, tag it as its C name */
+                                  linebuffer_setlen (&token_name, toklen);
+                                  memcpy (token_name.buffer,
+                                          newlb.buffer + tokoff, toklen);
+                                  token_name.buffer[toklen] = '\0';
+                                  token.named = true;
+                                  token.lineno = lineno;
+                                  token.offset = tokoff;
+                                  token.length = toklen;
+                                  token.line = newlb.buffer;
+                                  token.linepos = newlinepos;
+                                  token.valid = true;
+                                  make_C_tag (funorvar);
                                 }
+                              /* Rewrite the tag so that emacs lisp DEFUNs
+                                 can be found also by their elisp name */
                               linebuffer_setlen (&token_name, len);
                               memcpy (token_name.buffer,
                                       newlb.buffer + off, len);
diff --git a/test/etags/CTAGS.good b/test/etags/CTAGS.good
index 19bc0bef657..d392b691dcb 100644
--- a/test/etags/CTAGS.good
+++ b/test/etags/CTAGS.good
@@ -602,22 +602,67 @@ FUNCTION_KEY_OFFSET	c-src/emacs/src/keyboard.c	4766
 FUNCTION_KEY_OFFSET     c-src/emacs/src/keyboard.c      5061
 F_getit c-src/etags.c   /^F_getit (FILE *inf)$/
 F_takeprec      c-src/etags.c   /^F_takeprec (void)$/
+Fabbrev_expansion       c-src/abbrev.c  /^DEFUN ("abbrev-expansion", Fabbrev_expansion, Sabb/
+Fabbrev_symbol  c-src/abbrev.c  /^DEFUN ("abbrev-symbol", Fabbrev_symbol, Sabbrev_sy/
+Fabort_recursive_edit   c-src/emacs/src/keyboard.c      /^DEFUN ("abort-recursive-edit", Fabort_recursive_ed/
 Fails_t c-src/h.h       5
+Fclear_abbrev_table     c-src/abbrev.c  /^DEFUN ("clear-abbrev-table", Fclear_abbrev_table, /
+Fclear_this_command_keys        c-src/emacs/src/keyboard.c      /^DEFUN ("clear-this-command-keys", Fclear_this_comm/
+Fcommand_error_default_function c-src/emacs/src/keyboard.c      /^DEFUN ("command-error-default-function", Fcommand_/
+Fcurrent_idle_time      c-src/emacs/src/keyboard.c      /^DEFUN ("current-idle-time", Fcurrent_idle_time, Sc/
+Fcurrent_input_mode     c-src/emacs/src/keyboard.c      /^DEFUN ("current-input-mode", Fcurrent_input_mode, /
+Fdefine_abbrev  c-src/abbrev.c  /^DEFUN ("define-abbrev", Fdefine_abbrev, Sdefine_ab/
+Fdefine_abbrev_table    c-src/abbrev.c  /^DEFUN ("define-abbrev-table", Fdefine_abbrev_table/
+Fdefine_global_abbrev   c-src/abbrev.c  /^DEFUN ("define-global-abbrev", Fdefine_global_abbr/
+Fdefine_mode_abbrev     c-src/abbrev.c  /^DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev, /
+Fdiscard_input  c-src/emacs/src/keyboard.c      /^DEFUN ("discard-input", Fdiscard_input, Sdiscard_i/
+Fevent_convert_list     c-src/emacs/src/keyboard.c      /^DEFUN ("event-convert-list", Fevent_convert_list, /
+Fevent_symbol_parse_modifiers   c-src/emacs/src/keyboard.c      /^DEFUN ("internal-event-symbol-parse-modifiers", Fe/
+Fexit_recursive_edit    c-src/emacs/src/keyboard.c      /^DEFUN ("exit-recursive-edit", Fexit_recursive_edit/
+Fexpand_abbrev  c-src/abbrev.c  /^DEFUN ("expand-abbrev", Fexpand_abbrev, Sexpand_ab/
 Finalize_Cond/p ada-src/2ataspri.adb    /^   procedure Finalize_Cond (Cond : in out Conditio/
 Finalize_Cond/p ada-src/2ataspri.ads    /^   procedure Finalize_Cond (Cond : in out Conditio/
 Finalize_Lock/p ada-src/2ataspri.adb    /^   procedure Finalize_Lock (L : in out Lock) is$/
 Finalize_Lock/p ada-src/2ataspri.ads    /^   procedure Finalize_Lock (L : in out Lock);$/
 Finalize_TAS_Cell/p     ada-src/2ataspri.adb    /^   procedure Finalize_TAS_Cell (Cell : in out TAS_/
 Finalize_TAS_Cell/p     ada-src/2ataspri.ads    /^   procedure Finalize_TAS_Cell   (Cell : in out TA/
+Finput_pending_p        c-src/emacs/src/keyboard.c      /^DEFUN ("input-pending-p", Finput_pending_p, Sinput/
+Finsert_abbrev_table_description        c-src/abbrev.c  /^DEFUN ("insert-abbrev-table-description", Finsert_/
 First100Chars   pas-src/common.pas      /^procedure First100Chars; (*($/
+Fmake_abbrev_table      c-src/abbrev.c  /^DEFUN ("make-abbrev-table", Fmake_abbrev_table, Sm/
 Foo     perl-src/kai-test.pl    /^package Foo;$/
 Foo::Bar        perl-src/kai-test.pl    /^package Foo::Bar;$/
+Fopen_dribble_file      c-src/emacs/src/keyboard.c      /^DEFUN ("open-dribble-file", Fopen_dribble_file, So/
 Forth_help      c-src/etags.c   573
 Forth_suffixes  c-src/etags.c   571
 Forth_words     c-src/etags.c   /^Forth_words (FILE *inf)$/
 Fortran_functions       c-src/etags.c   /^Fortran_functions (FILE *inf)$/
 Fortran_help    c-src/etags.c   579
 Fortran_suffixes        c-src/etags.c   577
+Fposn_at_point  c-src/emacs/src/keyboard.c      /^DEFUN ("posn-at-point", Fposn_at_point, Sposn_at_p/
+Fposn_at_x_y    c-src/emacs/src/keyboard.c      /^DEFUN ("posn-at-x-y", Fposn_at_x_y, Sposn_at_x_y, /
+Fread_key_sequence      c-src/emacs/src/keyboard.c      /^DEFUN ("read-key-sequence", Fread_key_sequence, Sr/
+Fread_key_sequence_vector       c-src/emacs/src/keyboard.c      /^DEFUN ("read-key-sequence-vector", Fread_key_seque/
+Frecent_keys    c-src/emacs/src/keyboard.c      /^DEFUN ("recent-keys", Frecent_keys, Srecent_keys, /
+Frecursion_depth        c-src/emacs/src/keyboard.c      /^DEFUN ("recursion-depth", Frecursion_depth, Srecur/
+Frecursive_edit c-src/emacs/src/keyboard.c      /^DEFUN ("recursive-edit", Frecursive_edit, Srecursi/
+Freset_this_command_lengths     c-src/emacs/src/keyboard.c      /^DEFUN ("reset-this-command-lengths", Freset_this_c/
+Fset_input_interrupt_mode       c-src/emacs/src/keyboard.c      /^DEFUN ("set-input-interrupt-mode", Fset_input_inte/
+Fset_input_meta_mode    c-src/emacs/src/keyboard.c      /^DEFUN ("set-input-meta-mode", Fset_input_meta_mode/
+Fset_input_mode c-src/emacs/src/keyboard.c      /^DEFUN ("set-input-mode", Fset_input_mode, Sset_inp/
+Fset_output_flow_control        c-src/emacs/src/keyboard.c      /^DEFUN ("set-output-flow-control", Fset_output_flow/
+Fset_quit_char  c-src/emacs/src/keyboard.c      /^DEFUN ("set-quit-char", Fset_quit_char, Sset_quit_/
+Fsuspend_emacs  c-src/emacs/src/keyboard.c      /^DEFUN ("suspend-emacs", Fsuspend_emacs, Ssuspend_e/
+Fthis_command_keys      c-src/emacs/src/keyboard.c      /^DEFUN ("this-command-keys", Fthis_command_keys, St/
+Fthis_command_keys_vector       c-src/emacs/src/keyboard.c      /^DEFUN ("this-command-keys-vector", Fthis_command_k/
+Fthis_single_command_keys       c-src/emacs/src/keyboard.c      /^DEFUN ("this-single-command-keys", Fthis_single_co/
+Fthis_single_command_raw_keys   c-src/emacs/src/keyboard.c      /^DEFUN ("this-single-command-raw-keys", Fthis_singl/
+Ftop_level      c-src/emacs/src/keyboard.c      /^DEFUN ("top-level", Ftop_level, Stop_level, 0, 0, /
+Ftrack_mouse    c-src/emacs/src/keyboard.c      /^DEFUN ("internal--track-mouse", Ftrack_mouse, Stra/
+Funexpand_abbrev        c-src/abbrev.c  /^DEFUN ("unexpand-abbrev", Funexpand_abbrev, Sunexp/
+Fx_get_selection_internal       c.c     /^DEFUN ("x-get-selection-internal", Fx_get_selectio/
+Fx_get_selection_internal       c.c     /^       Fx_get_selection_internal, Sx_get_selection/
+Fy_get_selection_internal       c.c     /^      Fy_get_selection_internal, Sy_get_selection_/
 GCALIGNED       c-src/emacs/src/lisp.h  288
 GCALIGNED       c-src/emacs/src/lisp.h  290
 GCALIGNMENT     c-src/emacs/src/lisp.h  243
diff --git a/test/etags/ETAGS.good_1 b/test/etags/ETAGS.good_1
index 58661bbf600..873914474e2 100644
--- a/test/etags/ETAGS.good_1
+++ b/test/etags/ETAGS.good_1
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b
138,2153
   protected body Bidule Bidule/b
139,2181
   protected body Machin_T Machin_T/b
146,2281
 
-c-src/abbrev.c,1432
+c-src/abbrev.c,2072
 Lisp_Object Vabbrev_table_name_list;43,1424
 Lisp_Object Vglobal_abbrev_table;48,1569
 Lisp_Object Vfundamental_mode_abbrev_table;52,1680
@@ -188,18 +188,29 @@ Lisp_Object Vlast_abbrev_text;75,2319
 int last_abbrev_point;79,2409
 Lisp_Object Vpre_abbrev_expand_hook,83,2482
 Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook;83,2482
+DEFUN ("make-abbrev-table", Fmake_abbrev_table,85,2546
 DEFUN ("make-abbrev-table", Fmake_abbrev_table,make-abbrev-table
85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table
92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev
107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", Fdefine_global_abbrev,define-global-abbrev
149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev
160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol
174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion
202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev
218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev
389,11677
 write_abbrev 426,12884
 describe_abbrev 445,13319
+DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,466,13834
 DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,insert-abbrev-table-description
466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", Fdefine_abbrev_table,define-abbrev-table
506,14990
 syms_of_abbrev 540,16067
 
@@ -828,7 +839,7 @@ typedef enum { RECC_ERROR 609,22953
 } re_wctype_t;618,23260
 typedef int re_wchar_t;623,23387
 
-c-src/emacs/src/keyboard.c,13565
+c-src/emacs/src/keyboard.c,15539
 volatile int interrupt_input_blocked;76,1808
 volatile bool pending_signals;80,1944
 #define KBD_BUFFER_SIZE 82,1976
@@ -904,6 +915,7 @@ add_command_key 672,21582
 recursive_edit_1 697,22406
 record_auto_save 742,23848
 force_auto_save_soon 751,24016
+DEFUN ("recursive-edit", Frecursive_edit,759,24137
 DEFUN ("recursive-edit", Frecursive_edit,recursive-edit
759,24137
 recursive_edit_unwind 804,25747
 any_kboard_state 817,26013
@@ -918,16 +930,21 @@ record_single_kboard_state 943,29437
 restore_kboard_configuration 952,29621
 cmd_error 970,30077
 cmd_error_internal 1024,31510
+DEFUN ("command-error-default-function", Fcommand_error_default_function,1043,32030
 DEFUN ("command-error-default-function", Fcommand_error_default_function,command-error-default-function
1043,32030
 command_loop 1094,33916
 command_loop_2 1134,35135
 top_level_2 1146,35339
 top_level_1 1152,35417
+DEFUN ("top-level", Ftop_level,1164,35787
 DEFUN ("top-level", Ftop_level,top-level
1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit,exit-recursive-edit
1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit,abort-recursive-edit
1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse
1234,37816
 bool ignore_mouse_drag_p;1256,38392
 some_mouse_moved 1259,38441
@@ -991,6 +1008,7 @@ Lisp_Object pending_funcalls;4377,131172
 decode_timer 4381,131293
 timer_check_2 4414,132246
 timer_check 4572,136817
+DEFUN ("current-idle-time", Fcurrent_idle_time,4607,137662
 DEFUN ("current-idle-time", Fcurrent_idle_time,current-idle-time
4607,137662
 static Lisp_Object accent_key_syms;4625,138239
 static Lisp_Object func_key_syms;4626,138275
@@ -1037,10 +1055,12 @@ static Lisp_Object modifier_symbols;6327,189449
 lispy_modifier_list 6331,189586
 #define KEY_TO_CHAR(6353,190252
 parse_modifiers 6356,190328
+DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,6399,191517
 DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,event-symbol-parse-modifiers
6399,191517
 apply_modifiers 6422,192391
 reorder_modifiers 6491,194720
 modify_event_symbol 6536,196528
+DEFUN ("event-convert-list", Fevent_convert_list,6628,199244
 DEFUN ("event-convert-list", Fevent_convert_list,event-convert-list
6628,199244
 parse_solitary_modifier 6695,201135
 #define SINGLE_LETTER_MOD(6701,201258
@@ -1101,24 +1121,38 @@ keyremap_step 8811,261450
 test_undefined 8867,262934
 read_key_sequence 8916,264861
 read_key_sequence_vs 9826,295821
+DEFUN ("read-key-sequence", Fread_key_sequence,9885,297294
 DEFUN ("read-key-sequence", Fread_key_sequence,read-key-sequence
9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,read-key-sequence-vector
9938,299982
 detect_input_pending 9950,300488
 detect_input_pending_ignore_squeezables 9959,300654
 detect_input_pending_run_timers 9967,300870
 clear_input_pending 9985,301362
 requeued_events_pending_p 9997,301732
+DEFUN ("input-pending-p", Finput_pending_p,10002,301813
 DEFUN ("input-pending-p", Finput_pending_p,input-pending-p
10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys
10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys
10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,this-command-keys-vector
10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", Fthis_single_command_keys,this-single-command-keys
10080,304380
+DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,10096,304955
 DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,this-single-command-raw-keys
10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,reset-this-command-lengths
10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", Fclear_this_command_keys,clear-this-command-keys
10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth
10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file
10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input
10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs
10225,308949
 stuff_buffered_input 10285,311045
 set_waiting_for_input 10323,312016
@@ -1128,13 +1162,21 @@ deliver_interrupt_signal 10378,313642
 static int volatile force_quit_count;10387,313932
 handle_interrupt 10401,314414
 quit_throw_to_read_char 10541,318711
+DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,10562,319288
 DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,set-input-interrupt-mode
10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", Fset_output_flow_control,set-output-flow-control
10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", Fset_input_meta_mode,set-input-meta-mode
10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char
10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode
10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", Fcurrent_input_mode,current-input-mode
10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y
10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point
10824,327060
 init_kboard 10861,328214
 allocate_kboard 10893,329284
@@ -3832,7 +3874,7 @@ void bar(5,69
 int foobar(6,94
 interface_locate(9,131
 
-c.c,1663
+c.c,1807
 my_printf 135,
 void fatala 138,
 max 141,
@@ -3862,8 +3904,11 @@ short array[array
190,
 int f193,
 DEAFUN 196,
 XDEFUN 203,
+DEFUN ("x-get-selection-internal", Fx_get_selection_internal,206,
 DEFUN ("x-get-selection-internal", Fx_get_selection_internal,x-get-selection-internal
206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal
212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal
216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_2 b/test/etags/ETAGS.good_2
index ecfa7d19885..7f24d06432c 100644
--- a/test/etags/ETAGS.good_2
+++ b/test/etags/ETAGS.good_2
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b
138,2153
   protected body Bidule Bidule/b
139,2181
   protected body Machin_T Machin_T/b
146,2281
 
-c-src/abbrev.c,1432
+c-src/abbrev.c,2072
 Lisp_Object Vabbrev_table_name_list;43,1424
 Lisp_Object Vglobal_abbrev_table;48,1569
 Lisp_Object Vfundamental_mode_abbrev_table;52,1680
@@ -188,18 +188,29 @@ Lisp_Object Vlast_abbrev_text;75,2319
 int last_abbrev_point;79,2409
 Lisp_Object Vpre_abbrev_expand_hook,83,2482
 Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook;83,2482
+DEFUN ("make-abbrev-table", Fmake_abbrev_table,85,2546
 DEFUN ("make-abbrev-table", Fmake_abbrev_table,make-abbrev-table
85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table
92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev
107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", Fdefine_global_abbrev,define-global-abbrev
149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev
160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol
174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion
202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev
218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev
389,11677
 write_abbrev 426,12884
 describe_abbrev 445,13319
+DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,466,13834
 DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,insert-abbrev-table-description
466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", Fdefine_abbrev_table,define-abbrev-table
506,14990
 syms_of_abbrev 540,16067
 
@@ -980,7 +991,7 @@ extern re_wctype_t re_wctype 621,23329
 typedef int re_wchar_t;623,23387
 extern void re_set_whitespace_regexp 625,23412
 
-c-src/emacs/src/keyboard.c,15493
+c-src/emacs/src/keyboard.c,17467
 volatile int interrupt_input_blocked;76,1808
 volatile bool pending_signals;80,1944
 #define KBD_BUFFER_SIZE 82,1976
@@ -1087,6 +1098,7 @@ add_command_key 672,21582
 recursive_edit_1 697,22406
 record_auto_save 742,23848
 force_auto_save_soon 751,24016
+DEFUN ("recursive-edit", Frecursive_edit,759,24137
 DEFUN ("recursive-edit", Frecursive_edit,recursive-edit
759,24137
 recursive_edit_unwind 804,25747
 any_kboard_state 817,26013
@@ -1101,6 +1113,7 @@ record_single_kboard_state 943,29437
 restore_kboard_configuration 952,29621
 cmd_error 970,30077
 cmd_error_internal 1024,31510
+DEFUN ("command-error-default-function", Fcommand_error_default_function,1043,32030
 DEFUN ("command-error-default-function", Fcommand_error_default_function,command-error-default-function
1043,32030
 static Lisp_Object command_loop_2 1086,33637
 static Lisp_Object top_level_1 1087,33686
@@ -1108,11 +1121,15 @@ command_loop 1094,33916
 command_loop_2 1134,35135
 top_level_2 1146,35339
 top_level_1 1152,35417
+DEFUN ("top-level", Ftop_level,1164,35787
 DEFUN ("top-level", Ftop_level,top-level
1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit,exit-recursive-edit
1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit,abort-recursive-edit
1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse
1234,37816
 bool ignore_mouse_drag_p;1256,38392
 some_mouse_moved 1259,38441
@@ -1180,6 +1197,7 @@ Lisp_Object pending_funcalls;4377,131172
 decode_timer 4381,131293
 timer_check_2 4414,132246
 timer_check 4572,136817
+DEFUN ("current-idle-time", Fcurrent_idle_time,4607,137662
 DEFUN ("current-idle-time", Fcurrent_idle_time,current-idle-time
4607,137662
 static Lisp_Object accent_key_syms;4625,138239
 static Lisp_Object func_key_syms;4626,138275
@@ -1226,10 +1244,12 @@ static Lisp_Object modifier_symbols;6327,189449
 lispy_modifier_list 6331,189586
 #define KEY_TO_CHAR(6353,190252
 parse_modifiers 6356,190328
+DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,6399,191517
 DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,event-symbol-parse-modifiers
6399,191517
 apply_modifiers 6422,192391
 reorder_modifiers 6491,194720
 modify_event_symbol 6536,196528
+DEFUN ("event-convert-list", Fevent_convert_list,6628,199244
 DEFUN ("event-convert-list", Fevent_convert_list,event-convert-list
6628,199244
 parse_solitary_modifier 6695,201135
 #define SINGLE_LETTER_MOD(6701,201258
@@ -1295,24 +1315,38 @@ keyremap_step 8811,261450
 test_undefined 8867,262934
 read_key_sequence 8916,264861
 read_key_sequence_vs 9826,295821
+DEFUN ("read-key-sequence", Fread_key_sequence,9885,297294
 DEFUN ("read-key-sequence", Fread_key_sequence,read-key-sequence
9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,read-key-sequence-vector
9938,299982
 detect_input_pending 9950,300488
 detect_input_pending_ignore_squeezables 9959,300654
 detect_input_pending_run_timers 9967,300870
 clear_input_pending 9985,301362
 requeued_events_pending_p 9997,301732
+DEFUN ("input-pending-p", Finput_pending_p,10002,301813
 DEFUN ("input-pending-p", Finput_pending_p,input-pending-p
10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys
10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys
10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,this-command-keys-vector
10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", Fthis_single_command_keys,this-single-command-keys
10080,304380
+DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,10096,304955
 DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,this-single-command-raw-keys
10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,reset-this-command-lengths
10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", Fclear_this_command_keys,clear-this-command-keys
10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth
10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file
10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input
10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs
10225,308949
 stuff_buffered_input 10285,311045
 set_waiting_for_input 10323,312016
@@ -1322,13 +1356,21 @@ deliver_interrupt_signal 10378,313642
 static int volatile force_quit_count;10387,313932
 handle_interrupt 10401,314414
 quit_throw_to_read_char 10541,318711
+DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,10562,319288
 DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,set-input-interrupt-mode
10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", Fset_output_flow_control,set-output-flow-control
10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", Fset_input_meta_mode,set-input-meta-mode
10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char
10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode
10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", Fcurrent_input_mode,current-input-mode
10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y
10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point
10824,327060
 init_kboard 10861,328214
 allocate_kboard 10893,329284
@@ -4402,7 +4444,7 @@ void bar(5,69
 int foobar(6,94
 interface_locate(9,131
 
-c.c,1836
+c.c,1980
 void (*fa)fa
131,
 void 132,
 my_printf 135,
@@ -4439,8 +4481,11 @@ short array[array
190,
 int f193,
 DEAFUN 196,
 XDEFUN 203,
+DEFUN ("x-get-selection-internal", Fx_get_selection_internal,206,
 DEFUN ("x-get-selection-internal", Fx_get_selection_internal,x-get-selection-internal
206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal
212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal
216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_3 b/test/etags/ETAGS.good_3
index 5f84aa9a0c6..f8bd93330e2 100644
--- a/test/etags/ETAGS.good_3
+++ b/test/etags/ETAGS.good_3
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b
138,2153
   protected body Bidule Bidule/b
139,2181
   protected body Machin_T Machin_T/b
146,2281
 
-c-src/abbrev.c,1432
+c-src/abbrev.c,2072
 Lisp_Object Vabbrev_table_name_list;43,1424
 Lisp_Object Vglobal_abbrev_table;48,1569
 Lisp_Object Vfundamental_mode_abbrev_table;52,1680
@@ -188,18 +188,29 @@ Lisp_Object Vlast_abbrev_text;75,2319
 int last_abbrev_point;79,2409
 Lisp_Object Vpre_abbrev_expand_hook,83,2482
 Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook;83,2482
+DEFUN ("make-abbrev-table", Fmake_abbrev_table,85,2546
 DEFUN ("make-abbrev-table", Fmake_abbrev_table,make-abbrev-table
85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table
92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev
107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", Fdefine_global_abbrev,define-global-abbrev
149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev
160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol
174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion
202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev
218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev
389,11677
 write_abbrev 426,12884
 describe_abbrev 445,13319
+DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,466,13834
 DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,insert-abbrev-table-description
466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", Fdefine_abbrev_table,define-abbrev-table
506,14990
 syms_of_abbrev 540,16067
 
@@ -942,7 +953,7 @@ typedef enum { RECC_ERROR 609,22953
 } re_wctype_t;618,23260
 typedef int re_wchar_t;623,23387
 
-c-src/emacs/src/keyboard.c,13949
+c-src/emacs/src/keyboard.c,15923
 volatile int interrupt_input_blocked;76,1808
 volatile bool pending_signals;80,1944
 #define KBD_BUFFER_SIZE 82,1976
@@ -1018,6 +1029,7 @@ add_command_key 672,21582
 recursive_edit_1 697,22406
 record_auto_save 742,23848
 force_auto_save_soon 751,24016
+DEFUN ("recursive-edit", Frecursive_edit,759,24137
 DEFUN ("recursive-edit", Frecursive_edit,recursive-edit
759,24137
 recursive_edit_unwind 804,25747
 any_kboard_state 817,26013
@@ -1034,16 +1046,21 @@ record_single_kboard_state 943,29437
 restore_kboard_configuration 952,29621
 cmd_error 970,30077
 cmd_error_internal 1024,31510
+DEFUN ("command-error-default-function", Fcommand_error_default_function,1043,32030
 DEFUN ("command-error-default-function", Fcommand_error_default_function,command-error-default-function
1043,32030
 command_loop 1094,33916
 command_loop_2 1134,35135
 top_level_2 1146,35339
 top_level_1 1152,35417
+DEFUN ("top-level", Ftop_level,1164,35787
 DEFUN ("top-level", Ftop_level,top-level
1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit,exit-recursive-edit
1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit,abort-recursive-edit
1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse
1234,37816
 bool ignore_mouse_drag_p;1256,38392
 some_mouse_moved 1259,38441
@@ -1107,6 +1124,7 @@ Lisp_Object pending_funcalls;4377,131172
 decode_timer 4381,131293
 timer_check_2 4414,132246
 timer_check 4572,136817
+DEFUN ("current-idle-time", Fcurrent_idle_time,4607,137662
 DEFUN ("current-idle-time", Fcurrent_idle_time,current-idle-time
4607,137662
 static Lisp_Object accent_key_syms;4625,138239
 static Lisp_Object func_key_syms;4626,138275
@@ -1153,10 +1171,12 @@ static Lisp_Object modifier_symbols;6327,189449
 lispy_modifier_list 6331,189586
 #define KEY_TO_CHAR(6353,190252
 parse_modifiers 6356,190328
+DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,6399,191517
 DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,event-symbol-parse-modifiers
6399,191517
 apply_modifiers 6422,192391
 reorder_modifiers 6491,194720
 modify_event_symbol 6536,196528
+DEFUN ("event-convert-list", Fevent_convert_list,6628,199244
 DEFUN ("event-convert-list", Fevent_convert_list,event-convert-list
6628,199244
 parse_solitary_modifier 6695,201135
 #define SINGLE_LETTER_MOD(6701,201258
@@ -1225,24 +1245,38 @@ keyremap_step 8811,261450
 test_undefined 8867,262934
 read_key_sequence 8916,264861
 read_key_sequence_vs 9826,295821
+DEFUN ("read-key-sequence", Fread_key_sequence,9885,297294
 DEFUN ("read-key-sequence", Fread_key_sequence,read-key-sequence
9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,read-key-sequence-vector
9938,299982
 detect_input_pending 9950,300488
 detect_input_pending_ignore_squeezables 9959,300654
 detect_input_pending_run_timers 9967,300870
 clear_input_pending 9985,301362
 requeued_events_pending_p 9997,301732
+DEFUN ("input-pending-p", Finput_pending_p,10002,301813
 DEFUN ("input-pending-p", Finput_pending_p,input-pending-p
10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys
10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys
10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,this-command-keys-vector
10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", Fthis_single_command_keys,this-single-command-keys
10080,304380
+DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,10096,304955
 DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,this-single-command-raw-keys
10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,reset-this-command-lengths
10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", Fclear_this_command_keys,clear-this-command-keys
10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth
10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file
10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input
10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs
10225,308949
 stuff_buffered_input 10285,311045
 set_waiting_for_input 10323,312016
@@ -1252,13 +1286,21 @@ deliver_interrupt_signal 10378,313642
 static int volatile force_quit_count;10387,313932
 handle_interrupt 10401,314414
 quit_throw_to_read_char 10541,318711
+DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,10562,319288
 DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,set-input-interrupt-mode
10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", Fset_output_flow_control,set-output-flow-control
10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", Fset_input_meta_mode,set-input-meta-mode
10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char
10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode
10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", Fcurrent_input_mode,current-input-mode
10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y
10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point
10824,327060
 init_kboard 10861,328214
 allocate_kboard 10893,329284
@@ -4179,7 +4221,7 @@ void bar(5,69
 int foobar(6,94
 interface_locate(9,131
 
-c.c,1963
+c.c,2107
 my_printf 135,
 void fatala 138,
 max 141,
@@ -4224,8 +4266,11 @@ short array[array
190,
 int f193,
 DEAFUN 196,
 XDEFUN 203,
+DEFUN ("x-get-selection-internal", Fx_get_selection_internal,206,
 DEFUN ("x-get-selection-internal", Fx_get_selection_internal,x-get-selection-internal
206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal
212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal
216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_4 b/test/etags/ETAGS.good_4
index 12e2a6549cf..9db5e3833a2 100644
--- a/test/etags/ETAGS.good_4
+++ b/test/etags/ETAGS.good_4
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b
138,2153
   protected body Bidule Bidule/b
139,2181
   protected body Machin_T Machin_T/b
146,2281
 
-c-src/abbrev.c,2634
+c-src/abbrev.c,3274
 Lisp_Object Vabbrev_table_name_list;43,1424
 Lisp_Object Vglobal_abbrev_table;48,1569
 Lisp_Object Vfundamental_mode_abbrev_table;52,1680
@@ -188,18 +188,29 @@ Lisp_Object Vlast_abbrev_text;75,2319
 int last_abbrev_point;79,2409
 Lisp_Object Vpre_abbrev_expand_hook,83,2482
 Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook;83,2482
+DEFUN ("make-abbrev-table", Fmake_abbrev_table,85,2546
 DEFUN ("make-abbrev-table", Fmake_abbrev_table,make-abbrev-table
85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table
92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev
107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", Fdefine_global_abbrev,define-global-abbrev
149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev
160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol
174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion
202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev
218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev
389,11677
 write_abbrev 426,12884
 describe_abbrev 445,13319
+DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,466,13834
 DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,insert-abbrev-table-description
466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", Fdefine_abbrev_table,define-abbrev-table
506,14990
 syms_of_abbrev 540,16067
   DEFVAR_LISP ("abbrev-table-name-list"542,16087
@@ -852,7 +863,7 @@ typedef enum { RECC_ERROR 609,22953
 } re_wctype_t;618,23260
 typedef int re_wchar_t;623,23387
 
-c-src/emacs/src/keyboard.c,20957
+c-src/emacs/src/keyboard.c,22931
 volatile int interrupt_input_blocked;76,1808
 volatile bool pending_signals;80,1944
 #define KBD_BUFFER_SIZE 82,1976
@@ -928,6 +939,7 @@ add_command_key 672,21582
 recursive_edit_1 697,22406
 record_auto_save 742,23848
 force_auto_save_soon 751,24016
+DEFUN ("recursive-edit", Frecursive_edit,759,24137
 DEFUN ("recursive-edit", Frecursive_edit,recursive-edit
759,24137
 recursive_edit_unwind 804,25747
 any_kboard_state 817,26013
@@ -942,16 +954,21 @@ record_single_kboard_state 943,29437
 restore_kboard_configuration 952,29621
 cmd_error 970,30077
 cmd_error_internal 1024,31510
+DEFUN ("command-error-default-function", Fcommand_error_default_function,1043,32030
 DEFUN ("command-error-default-function", Fcommand_error_default_function,command-error-default-function
1043,32030
 command_loop 1094,33916
 command_loop_2 1134,35135
 top_level_2 1146,35339
 top_level_1 1152,35417
+DEFUN ("top-level", Ftop_level,1164,35787
 DEFUN ("top-level", Ftop_level,top-level
1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit,exit-recursive-edit
1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit,abort-recursive-edit
1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse
1234,37816
 bool ignore_mouse_drag_p;1256,38392
 some_mouse_moved 1259,38441
@@ -1015,6 +1032,7 @@ Lisp_Object pending_funcalls;4377,131172
 decode_timer 4381,131293
 timer_check_2 4414,132246
 timer_check 4572,136817
+DEFUN ("current-idle-time", Fcurrent_idle_time,4607,137662
 DEFUN ("current-idle-time", Fcurrent_idle_time,current-idle-time
4607,137662
 static Lisp_Object accent_key_syms;4625,138239
 static Lisp_Object func_key_syms;4626,138275
@@ -1061,10 +1079,12 @@ static Lisp_Object modifier_symbols;6327,189449
 lispy_modifier_list 6331,189586
 #define KEY_TO_CHAR(6353,190252
 parse_modifiers 6356,190328
+DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,6399,191517
 DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,event-symbol-parse-modifiers
6399,191517
 apply_modifiers 6422,192391
 reorder_modifiers 6491,194720
 modify_event_symbol 6536,196528
+DEFUN ("event-convert-list", Fevent_convert_list,6628,199244
 DEFUN ("event-convert-list", Fevent_convert_list,event-convert-list
6628,199244
 parse_solitary_modifier 6695,201135
 #define SINGLE_LETTER_MOD(6701,201258
@@ -1125,24 +1145,38 @@ keyremap_step 8811,261450
 test_undefined 8867,262934
 read_key_sequence 8916,264861
 read_key_sequence_vs 9826,295821
+DEFUN ("read-key-sequence", Fread_key_sequence,9885,297294
 DEFUN ("read-key-sequence", Fread_key_sequence,read-key-sequence
9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,read-key-sequence-vector
9938,299982
 detect_input_pending 9950,300488
 detect_input_pending_ignore_squeezables 9959,300654
 detect_input_pending_run_timers 9967,300870
 clear_input_pending 9985,301362
 requeued_events_pending_p 9997,301732
+DEFUN ("input-pending-p", Finput_pending_p,10002,301813
 DEFUN ("input-pending-p", Finput_pending_p,input-pending-p
10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys
10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys
10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,this-command-keys-vector
10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", Fthis_single_command_keys,this-single-command-keys
10080,304380
+DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,10096,304955
 DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,this-single-command-raw-keys
10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,reset-this-command-lengths
10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", Fclear_this_command_keys,clear-this-command-keys
10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth
10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file
10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input
10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs
10225,308949
 stuff_buffered_input 10285,311045
 set_waiting_for_input 10323,312016
@@ -1152,13 +1186,21 @@ deliver_interrupt_signal 10378,313642
 static int volatile force_quit_count;10387,313932
 handle_interrupt 10401,314414
 quit_throw_to_read_char 10541,318711
+DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,10562,319288
 DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,set-input-interrupt-mode
10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", Fset_output_flow_control,set-output-flow-control
10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", Fset_input_meta_mode,set-input-meta-mode
10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char
10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode
10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", Fcurrent_input_mode,current-input-mode
10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y
10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point
10824,327060
 init_kboard 10861,328214
 allocate_kboard 10893,329284
@@ -3996,7 +4038,7 @@ void bar(5,69
 int foobar(6,94
 interface_locate(9,131
 
-c.c,1663
+c.c,1807
 my_printf 135,
 void fatala 138,
 max 141,
@@ -4026,8 +4068,11 @@ short array[array
190,
 int f193,
 DEAFUN 196,
 XDEFUN 203,
+DEFUN ("x-get-selection-internal", Fx_get_selection_internal,206,
 DEFUN ("x-get-selection-internal", Fx_get_selection_internal,x-get-selection-internal
206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal
212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal
216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_5 b/test/etags/ETAGS.good_5
index 98de4f2c2fb..982682d0102 100644
--- a/test/etags/ETAGS.good_5
+++ b/test/etags/ETAGS.good_5
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b
138,2153
   protected body Bidule Bidule/b
139,2181
   protected body Machin_T Machin_T/b
146,2281
 
-c-src/abbrev.c,2634
+c-src/abbrev.c,3274
 Lisp_Object Vabbrev_table_name_list;43,1424
 Lisp_Object Vglobal_abbrev_table;48,1569
 Lisp_Object Vfundamental_mode_abbrev_table;52,1680
@@ -188,18 +188,29 @@ Lisp_Object Vlast_abbrev_text;75,2319
 int last_abbrev_point;79,2409
 Lisp_Object Vpre_abbrev_expand_hook,83,2482
 Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook;83,2482
+DEFUN ("make-abbrev-table", Fmake_abbrev_table,85,2546
 DEFUN ("make-abbrev-table", Fmake_abbrev_table,make-abbrev-table
85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table
92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev
107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", Fdefine_global_abbrev,define-global-abbrev
149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev
160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol
174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion
202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev
218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev
389,11677
 write_abbrev 426,12884
 describe_abbrev 445,13319
+DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,466,13834
 DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,insert-abbrev-table-description
466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", Fdefine_abbrev_table,define-abbrev-table
506,14990
 syms_of_abbrev 540,16067
   DEFVAR_LISP ("abbrev-table-name-list"542,16087
@@ -1118,7 +1129,7 @@ extern re_wctype_t re_wctype 621,23329
 typedef int re_wchar_t;623,23387
 extern void re_set_whitespace_regexp 625,23412
 
-c-src/emacs/src/keyboard.c,23269
+c-src/emacs/src/keyboard.c,25243
 volatile int interrupt_input_blocked;76,1808
 volatile bool pending_signals;80,1944
 #define KBD_BUFFER_SIZE 82,1976
@@ -1225,6 +1236,7 @@ add_command_key 672,21582
 recursive_edit_1 697,22406
 record_auto_save 742,23848
 force_auto_save_soon 751,24016
+DEFUN ("recursive-edit", Frecursive_edit,759,24137
 DEFUN ("recursive-edit", Frecursive_edit,recursive-edit
759,24137
 recursive_edit_unwind 804,25747
 any_kboard_state 817,26013
@@ -1241,6 +1253,7 @@ record_single_kboard_state 943,29437
 restore_kboard_configuration 952,29621
 cmd_error 970,30077
 cmd_error_internal 1024,31510
+DEFUN ("command-error-default-function", Fcommand_error_default_function,1043,32030
 DEFUN ("command-error-default-function", Fcommand_error_default_function,command-error-default-function
1043,32030
 static Lisp_Object command_loop_2 1086,33637
 static Lisp_Object top_level_1 1087,33686
@@ -1248,11 +1261,15 @@ command_loop 1094,33916
 command_loop_2 1134,35135
 top_level_2 1146,35339
 top_level_1 1152,35417
+DEFUN ("top-level", Ftop_level,1164,35787
 DEFUN ("top-level", Ftop_level,top-level
1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit,exit-recursive-edit
1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit,abort-recursive-edit
1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse
1234,37816
 bool ignore_mouse_drag_p;1256,38392
 some_mouse_moved 1259,38441
@@ -1320,6 +1337,7 @@ Lisp_Object pending_funcalls;4377,131172
 decode_timer 4381,131293
 timer_check_2 4414,132246
 timer_check 4572,136817
+DEFUN ("current-idle-time", Fcurrent_idle_time,4607,137662
 DEFUN ("current-idle-time", Fcurrent_idle_time,current-idle-time
4607,137662
 static Lisp_Object accent_key_syms;4625,138239
 static Lisp_Object func_key_syms;4626,138275
@@ -1366,10 +1384,12 @@ static Lisp_Object modifier_symbols;6327,189449
 lispy_modifier_list 6331,189586
 #define KEY_TO_CHAR(6353,190252
 parse_modifiers 6356,190328
+DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,6399,191517
 DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,event-symbol-parse-modifiers
6399,191517
 apply_modifiers 6422,192391
 reorder_modifiers 6491,194720
 modify_event_symbol 6536,196528
+DEFUN ("event-convert-list", Fevent_convert_list,6628,199244
 DEFUN ("event-convert-list", Fevent_convert_list,event-convert-list
6628,199244
 parse_solitary_modifier 6695,201135
 #define SINGLE_LETTER_MOD(6701,201258
@@ -1443,24 +1463,38 @@ keyremap_step 8811,261450
 test_undefined 8867,262934
 read_key_sequence 8916,264861
 read_key_sequence_vs 9826,295821
+DEFUN ("read-key-sequence", Fread_key_sequence,9885,297294
 DEFUN ("read-key-sequence", Fread_key_sequence,read-key-sequence
9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,read-key-sequence-vector
9938,299982
 detect_input_pending 9950,300488
 detect_input_pending_ignore_squeezables 9959,300654
 detect_input_pending_run_timers 9967,300870
 clear_input_pending 9985,301362
 requeued_events_pending_p 9997,301732
+DEFUN ("input-pending-p", Finput_pending_p,10002,301813
 DEFUN ("input-pending-p", Finput_pending_p,input-pending-p
10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys
10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys
10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,this-command-keys-vector
10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", Fthis_single_command_keys,this-single-command-keys
10080,304380
+DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,10096,304955
 DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,this-single-command-raw-keys
10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,reset-this-command-lengths
10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", Fclear_this_command_keys,clear-this-command-keys
10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth
10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file
10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input
10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs
10225,308949
 stuff_buffered_input 10285,311045
 set_waiting_for_input 10323,312016
@@ -1470,13 +1504,21 @@ deliver_interrupt_signal 10378,313642
 static int volatile force_quit_count;10387,313932
 handle_interrupt 10401,314414
 quit_throw_to_read_char 10541,318711
+DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,10562,319288
 DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,set-input-interrupt-mode
10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", Fset_output_flow_control,set-output-flow-control
10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", Fset_input_meta_mode,set-input-meta-mode
10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char
10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode
10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", Fcurrent_input_mode,current-input-mode
10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y
10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point
10824,327060
 init_kboard 10861,328214
 allocate_kboard 10893,329284
@@ -4913,7 +4955,7 @@ void bar(5,69
 int foobar(6,94
 interface_locate(9,131
 
-c.c,2136
+c.c,2280
 void (*fa)fa
131,
 void 132,
 my_printf 135,
@@ -4965,8 +5007,11 @@ short array[array
190,
 int f193,
 DEAFUN 196,
 XDEFUN 203,
+DEFUN ("x-get-selection-internal", Fx_get_selection_internal,206,
 DEFUN ("x-get-selection-internal", Fx_get_selection_internal,x-get-selection-internal
206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal
212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal
216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_6 b/test/etags/ETAGS.good_6
index f5e0ad4407f..cf402ae50d7 100644
--- a/test/etags/ETAGS.good_6
+++ b/test/etags/ETAGS.good_6
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b
138,2153
   protected body Bidule Bidule/b
139,2181
   protected body Machin_T Machin_T/b
146,2281
 
-c-src/abbrev.c,2634
+c-src/abbrev.c,3274
 Lisp_Object Vabbrev_table_name_list;43,1424
 Lisp_Object Vglobal_abbrev_table;48,1569
 Lisp_Object Vfundamental_mode_abbrev_table;52,1680
@@ -188,18 +188,29 @@ Lisp_Object Vlast_abbrev_text;75,2319
 int last_abbrev_point;79,2409
 Lisp_Object Vpre_abbrev_expand_hook,83,2482
 Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook;83,2482
+DEFUN ("make-abbrev-table", Fmake_abbrev_table,85,2546
 DEFUN ("make-abbrev-table", Fmake_abbrev_table,make-abbrev-table
85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table
92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev
107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", Fdefine_global_abbrev,define-global-abbrev
149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev
160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol
174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion
202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev
218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev
389,11677
 write_abbrev 426,12884
 describe_abbrev 445,13319
+DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,466,13834
 DEFUN ("insert-abbrev-table-description", Finsert_abbrev_table_description,insert-abbrev-table-description
466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", Fdefine_abbrev_table,define-abbrev-table
506,14990
 syms_of_abbrev 540,16067
   DEFVAR_LISP ("abbrev-table-name-list"542,16087
@@ -1118,7 +1129,7 @@ extern re_wctype_t re_wctype 621,23329
 typedef int re_wchar_t;623,23387
 extern void re_set_whitespace_regexp 625,23412
 
-c-src/emacs/src/keyboard.c,23269
+c-src/emacs/src/keyboard.c,25243
 volatile int interrupt_input_blocked;76,1808
 volatile bool pending_signals;80,1944
 #define KBD_BUFFER_SIZE 82,1976
@@ -1225,6 +1236,7 @@ add_command_key 672,21582
 recursive_edit_1 697,22406
 record_auto_save 742,23848
 force_auto_save_soon 751,24016
+DEFUN ("recursive-edit", Frecursive_edit,759,24137
 DEFUN ("recursive-edit", Frecursive_edit,recursive-edit
759,24137
 recursive_edit_unwind 804,25747
 any_kboard_state 817,26013
@@ -1241,6 +1253,7 @@ record_single_kboard_state 943,29437
 restore_kboard_configuration 952,29621
 cmd_error 970,30077
 cmd_error_internal 1024,31510
+DEFUN ("command-error-default-function", Fcommand_error_default_function,1043,32030
 DEFUN ("command-error-default-function", Fcommand_error_default_function,command-error-default-function
1043,32030
 static Lisp_Object command_loop_2 1086,33637
 static Lisp_Object top_level_1 1087,33686
@@ -1248,11 +1261,15 @@ command_loop 1094,33916
 command_loop_2 1134,35135
 top_level_2 1146,35339
 top_level_1 1152,35417
+DEFUN ("top-level", Ftop_level,1164,35787
 DEFUN ("top-level", Ftop_level,top-level
1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit,exit-recursive-edit
1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit,abort-recursive-edit
1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse
1234,37816
 bool ignore_mouse_drag_p;1256,38392
 some_mouse_moved 1259,38441
@@ -1320,6 +1337,7 @@ Lisp_Object pending_funcalls;4377,131172
 decode_timer 4381,131293
 timer_check_2 4414,132246
 timer_check 4572,136817
+DEFUN ("current-idle-time", Fcurrent_idle_time,4607,137662
 DEFUN ("current-idle-time", Fcurrent_idle_time,current-idle-time
4607,137662
 static Lisp_Object accent_key_syms;4625,138239
 static Lisp_Object func_key_syms;4626,138275
@@ -1366,10 +1384,12 @@ static Lisp_Object modifier_symbols;6327,189449
 lispy_modifier_list 6331,189586
 #define KEY_TO_CHAR(6353,190252
 parse_modifiers 6356,190328
+DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,6399,191517
 DEFUN ("internal-event-symbol-parse-modifiers", Fevent_symbol_parse_modifiers,event-symbol-parse-modifiers
6399,191517
 apply_modifiers 6422,192391
 reorder_modifiers 6491,194720
 modify_event_symbol 6536,196528
+DEFUN ("event-convert-list", Fevent_convert_list,6628,199244
 DEFUN ("event-convert-list", Fevent_convert_list,event-convert-list
6628,199244
 parse_solitary_modifier 6695,201135
 #define SINGLE_LETTER_MOD(6701,201258
@@ -1443,24 +1463,38 @@ keyremap_step 8811,261450
 test_undefined 8867,262934
 read_key_sequence 8916,264861
 read_key_sequence_vs 9826,295821
+DEFUN ("read-key-sequence", Fread_key_sequence,9885,297294
 DEFUN ("read-key-sequence", Fread_key_sequence,read-key-sequence
9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,read-key-sequence-vector
9938,299982
 detect_input_pending 9950,300488
 detect_input_pending_ignore_squeezables 9959,300654
 detect_input_pending_run_timers 9967,300870
 clear_input_pending 9985,301362
 requeued_events_pending_p 9997,301732
+DEFUN ("input-pending-p", Finput_pending_p,10002,301813
 DEFUN ("input-pending-p", Finput_pending_p,input-pending-p
10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys
10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys
10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,this-command-keys-vector
10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", Fthis_single_command_keys,this-single-command-keys
10080,304380
+DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,10096,304955
 DEFUN ("this-single-command-raw-keys", Fthis_single_command_raw_keys,this-single-command-raw-keys
10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,reset-this-command-lengths
10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", Fclear_this_command_keys,clear-this-command-keys
10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth
10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file
10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input
10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs
10225,308949
 stuff_buffered_input 10285,311045
 set_waiting_for_input 10323,312016
@@ -1470,13 +1504,21 @@ deliver_interrupt_signal 10378,313642
 static int volatile force_quit_count;10387,313932
 handle_interrupt 10401,314414
 quit_throw_to_read_char 10541,318711
+DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,10562,319288
 DEFUN ("set-input-interrupt-mode", Fset_input_interrupt_mode,set-input-interrupt-mode
10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", Fset_output_flow_control,set-output-flow-control
10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", Fset_input_meta_mode,set-input-meta-mode
10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char
10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode
10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", Fcurrent_input_mode,current-input-mode
10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y
10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point
10824,327060
 init_kboard 10861,328214
 allocate_kboard 10893,329284
@@ -4913,7 +4955,7 @@ void bar(5,69
 int foobar(6,94
 interface_locate(9,131
 
-c.c,2136
+c.c,2280
 void (*fa)fa
131,
 void 132,
 my_printf 135,
@@ -4965,8 +5007,11 @@ short array[array
190,
 int f193,
 DEAFUN 196,
 XDEFUN 203,
+DEFUN ("x-get-selection-internal", Fx_get_selection_internal,206,
 DEFUN ("x-get-selection-internal", Fx_get_selection_internal,x-get-selection-internal
206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal
212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal
216,
 defun_func1(218,
 DEFUN_func2(220,