emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-25 73c67dd: Fix tagging of DEFUN by etags


From: Eli Zaretskii
Subject: [Emacs-diffs] emacs-25 73c67dd: Fix tagging of DEFUN by etags
Date: Wed, 21 Sep 2016 15:11:02 +0000 (UTC)

branch: emacs-25
commit 73c67dda4f22a4a9736f5dc5086d086f5eb567b3
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    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.
---
 lib-src/etags.c         |   18 +++++++++++++++--
 test/etags/CTAGS.good   |   45 +++++++++++++++++++++++++++++++++++++++++
 test/etags/ETAGS.good_1 |   51 ++++++++++++++++++++++++++++++++++++++++++++---
 test/etags/ETAGS.good_2 |   51 ++++++++++++++++++++++++++++++++++++++++++++---
 test/etags/ETAGS.good_3 |   51 ++++++++++++++++++++++++++++++++++++++++++++---
 test/etags/ETAGS.good_4 |   51 ++++++++++++++++++++++++++++++++++++++++++++---
 test/etags/ETAGS.good_5 |   51 ++++++++++++++++++++++++++++++++++++++++++++---
 test/etags/ETAGS.good_6 |   51 ++++++++++++++++++++++++++++++++++++++++++++---
 8 files changed, 349 insertions(+), 20 deletions(-)

diff --git a/lib-src/etags.c b/lib-src/etags.c
index 01e2302..1457700 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 19bc0be..d392b69 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 58661bb..8739144 100644
--- a/test/etags/ETAGS.good_1
+++ b/test/etags/ETAGS.good_1
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b138,2153
   protected body Bidule Bidule/b139,2181
   protected body Machin_T Machin_T/b146,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-table85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", 
Fdefine_global_abbrev,define-global-abbrev149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev389,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-description466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", 
Fdefine_abbrev_table,define-abbrev-table506,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-edit759,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-function1043,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-level1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", 
Fexit_recursive_edit,exit-recursive-edit1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", 
Fabort_recursive_edit,abort-recursive-edit1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse1234,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-time4607,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-modifiers6399,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-list6628,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-sequence9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", 
Fread_key_sequence_vector,read-key-sequence-vector9938,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-p10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", 
Fthis_command_keys_vector,this-command-keys-vector10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", 
Fthis_single_command_keys,this-single-command-keys10080,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-keys10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", 
Freset_this_command_lengths,reset-this-command-lengths10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", 
Fclear_this_command_keys,clear-this-command-keys10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs10225,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-mode10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", 
Fset_output_flow_control,set-output-flow-control10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", 
Fset_input_meta_mode,set-input-meta-mode10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", 
Fcurrent_input_mode,current-input-mode10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point10824,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[array190,
 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-internal206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_2 b/test/etags/ETAGS.good_2
index ecfa7d1..7f24d06 100644
--- a/test/etags/ETAGS.good_2
+++ b/test/etags/ETAGS.good_2
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b138,2153
   protected body Bidule Bidule/b139,2181
   protected body Machin_T Machin_T/b146,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-table85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", 
Fdefine_global_abbrev,define-global-abbrev149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev389,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-description466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", 
Fdefine_abbrev_table,define-abbrev-table506,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-edit759,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-function1043,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-level1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", 
Fexit_recursive_edit,exit-recursive-edit1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", 
Fabort_recursive_edit,abort-recursive-edit1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse1234,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-time4607,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-modifiers6399,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-list6628,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-sequence9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", 
Fread_key_sequence_vector,read-key-sequence-vector9938,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-p10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", 
Fthis_command_keys_vector,this-command-keys-vector10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", 
Fthis_single_command_keys,this-single-command-keys10080,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-keys10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", 
Freset_this_command_lengths,reset-this-command-lengths10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", 
Fclear_this_command_keys,clear-this-command-keys10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs10225,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-mode10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", 
Fset_output_flow_control,set-output-flow-control10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", 
Fset_input_meta_mode,set-input-meta-mode10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", 
Fcurrent_input_mode,current-input-mode10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point10824,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)fa131,
 void 132,
 my_printf 135,
@@ -4439,8 +4481,11 @@ short array[array190,
 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-internal206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_3 b/test/etags/ETAGS.good_3
index 5f84aa9..f8bd933 100644
--- a/test/etags/ETAGS.good_3
+++ b/test/etags/ETAGS.good_3
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b138,2153
   protected body Bidule Bidule/b139,2181
   protected body Machin_T Machin_T/b146,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-table85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", 
Fdefine_global_abbrev,define-global-abbrev149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev389,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-description466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", 
Fdefine_abbrev_table,define-abbrev-table506,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-edit759,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-function1043,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-level1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", 
Fexit_recursive_edit,exit-recursive-edit1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", 
Fabort_recursive_edit,abort-recursive-edit1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse1234,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-time4607,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-modifiers6399,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-list6628,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-sequence9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", 
Fread_key_sequence_vector,read-key-sequence-vector9938,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-p10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", 
Fthis_command_keys_vector,this-command-keys-vector10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", 
Fthis_single_command_keys,this-single-command-keys10080,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-keys10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", 
Freset_this_command_lengths,reset-this-command-lengths10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", 
Fclear_this_command_keys,clear-this-command-keys10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs10225,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-mode10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", 
Fset_output_flow_control,set-output-flow-control10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", 
Fset_input_meta_mode,set-input-meta-mode10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", 
Fcurrent_input_mode,current-input-mode10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point10824,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[array190,
 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-internal206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_4 b/test/etags/ETAGS.good_4
index 12e2a65..9db5e38 100644
--- a/test/etags/ETAGS.good_4
+++ b/test/etags/ETAGS.good_4
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b138,2153
   protected body Bidule Bidule/b139,2181
   protected body Machin_T Machin_T/b146,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-table85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", 
Fdefine_global_abbrev,define-global-abbrev149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev389,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-description466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", 
Fdefine_abbrev_table,define-abbrev-table506,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-edit759,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-function1043,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-level1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", 
Fexit_recursive_edit,exit-recursive-edit1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", 
Fabort_recursive_edit,abort-recursive-edit1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse1234,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-time4607,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-modifiers6399,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-list6628,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-sequence9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", 
Fread_key_sequence_vector,read-key-sequence-vector9938,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-p10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", 
Fthis_command_keys_vector,this-command-keys-vector10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", 
Fthis_single_command_keys,this-single-command-keys10080,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-keys10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", 
Freset_this_command_lengths,reset-this-command-lengths10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", 
Fclear_this_command_keys,clear-this-command-keys10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs10225,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-mode10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", 
Fset_output_flow_control,set-output-flow-control10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", 
Fset_input_meta_mode,set-input-meta-mode10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", 
Fcurrent_input_mode,current-input-mode10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point10824,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[array190,
 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-internal206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_5 b/test/etags/ETAGS.good_5
index 98de4f2..982682d 100644
--- a/test/etags/ETAGS.good_5
+++ b/test/etags/ETAGS.good_5
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b138,2153
   protected body Bidule Bidule/b139,2181
   protected body Machin_T Machin_T/b146,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-table85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", 
Fdefine_global_abbrev,define-global-abbrev149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev389,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-description466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", 
Fdefine_abbrev_table,define-abbrev-table506,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-edit759,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-function1043,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-level1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", 
Fexit_recursive_edit,exit-recursive-edit1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", 
Fabort_recursive_edit,abort-recursive-edit1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse1234,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-time4607,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-modifiers6399,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-list6628,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-sequence9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", 
Fread_key_sequence_vector,read-key-sequence-vector9938,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-p10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", 
Fthis_command_keys_vector,this-command-keys-vector10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", 
Fthis_single_command_keys,this-single-command-keys10080,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-keys10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", 
Freset_this_command_lengths,reset-this-command-lengths10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", 
Fclear_this_command_keys,clear-this-command-keys10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs10225,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-mode10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", 
Fset_output_flow_control,set-output-flow-control10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", 
Fset_input_meta_mode,set-input-meta-mode10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", 
Fcurrent_input_mode,current-input-mode10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point10824,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)fa131,
 void 132,
 my_printf 135,
@@ -4965,8 +5007,11 @@ short array[array190,
 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-internal206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal216,
 defun_func1(218,
 DEFUN_func2(220,
diff --git a/test/etags/ETAGS.good_6 b/test/etags/ETAGS.good_6
index f5e0ad4..cf402ae 100644
--- a/test/etags/ETAGS.good_6
+++ b/test/etags/ETAGS.good_6
@@ -175,7 +175,7 @@ package body Truc.Bidule Truc.Bidule/b138,2153
   protected body Bidule Bidule/b139,2181
   protected body Machin_T Machin_T/b146,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-table85,2546
+DEFUN ("clear-abbrev-table", Fclear_abbrev_table,92,2738
 DEFUN ("clear-abbrev-table", Fclear_abbrev_table,clear-abbrev-table92,2738
+DEFUN ("define-abbrev", Fdefine_abbrev,107,3119
 DEFUN ("define-abbrev", Fdefine_abbrev,define-abbrev107,3119
+DEFUN ("define-global-abbrev", Fdefine_global_abbrev,149,4438
 DEFUN ("define-global-abbrev", 
Fdefine_global_abbrev,define-global-abbrev149,4438
+DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,160,4809
 DEFUN ("define-mode-abbrev", Fdefine_mode_abbrev,define-mode-abbrev160,4809
+DEFUN ("abbrev-symbol", Fabbrev_symbol,174,5277
 DEFUN ("abbrev-symbol", Fabbrev_symbol,abbrev-symbol174,5277
+DEFUN ("abbrev-expansion", Fabbrev_expansion,202,6241
 DEFUN ("abbrev-expansion", Fabbrev_expansion,abbrev-expansion202,6241
+DEFUN ("expand-abbrev", Fexpand_abbrev,218,6756
 DEFUN ("expand-abbrev", Fexpand_abbrev,expand-abbrev218,6756
+DEFUN ("unexpand-abbrev", Funexpand_abbrev,389,11677
 DEFUN ("unexpand-abbrev", Funexpand_abbrev,unexpand-abbrev389,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-description466,13834
+DEFUN ("define-abbrev-table", Fdefine_abbrev_table,506,14990
 DEFUN ("define-abbrev-table", 
Fdefine_abbrev_table,define-abbrev-table506,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-edit759,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-function1043,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-level1164,35787
 user_error 1183,36288
+DEFUN ("exit-recursive-edit", Fexit_recursive_edit,1189,36429
 DEFUN ("exit-recursive-edit", 
Fexit_recursive_edit,exit-recursive-edit1189,36429
+DEFUN ("abort-recursive-edit", Fabort_recursive_edit,1201,36819
 DEFUN ("abort-recursive-edit", 
Fabort_recursive_edit,abort-recursive-edit1201,36819
 tracking_off 1216,37281
+DEFUN ("internal--track-mouse", Ftrack_mouse,1234,37816
 DEFUN ("internal--track-mouse", Ftrack_mouse,track-mouse1234,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-time4607,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-modifiers6399,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-list6628,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-sequence9885,297294
+DEFUN ("read-key-sequence-vector", Fread_key_sequence_vector,9938,299982
 DEFUN ("read-key-sequence-vector", 
Fread_key_sequence_vector,read-key-sequence-vector9938,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-p10002,301813
+DEFUN ("recent-keys", Frecent_keys,10024,302596
 DEFUN ("recent-keys", Frecent_keys,recent-keys10024,302596
+DEFUN ("this-command-keys", Fthis_command_keys,10055,303517
 DEFUN ("this-command-keys", Fthis_command_keys,this-command-keys10055,303517
+DEFUN ("this-command-keys-vector", Fthis_command_keys_vector,10068,303958
 DEFUN ("this-command-keys-vector", 
Fthis_command_keys_vector,this-command-keys-vector10068,303958
+DEFUN ("this-single-command-keys", Fthis_single_command_keys,10080,304380
 DEFUN ("this-single-command-keys", 
Fthis_single_command_keys,this-single-command-keys10080,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-keys10096,304955
+DEFUN ("reset-this-command-lengths", Freset_this_command_lengths,10109,305495
 DEFUN ("reset-this-command-lengths", 
Freset_this_command_lengths,reset-this-command-lengths10109,305495
+DEFUN ("clear-this-command-keys", Fclear_this_command_keys,10136,306510
 DEFUN ("clear-this-command-keys", 
Fclear_this_command_keys,clear-this-command-keys10136,306510
+DEFUN ("recursion-depth", Frecursion_depth,10158,307069
 DEFUN ("recursion-depth", Frecursion_depth,recursion-depth10158,307069
+DEFUN ("open-dribble-file", Fopen_dribble_file,10169,307406
 DEFUN ("open-dribble-file", Fopen_dribble_file,open-dribble-file10169,307406
+DEFUN ("discard-input", Fdiscard_input,10203,308447
 DEFUN ("discard-input", Fdiscard_input,discard-input10203,308447
+DEFUN ("suspend-emacs", Fsuspend_emacs,10225,308949
 DEFUN ("suspend-emacs", Fsuspend_emacs,suspend-emacs10225,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-mode10562,319288
+DEFUN ("set-output-flow-control", Fset_output_flow_control,10609,320516
 DEFUN ("set-output-flow-control", 
Fset_output_flow_control,set-output-flow-control10609,320516
+DEFUN ("set-input-meta-mode", Fset_input_meta_mode,10643,321432
 DEFUN ("set-input-meta-mode", 
Fset_input_meta_mode,set-input-meta-mode10643,321432
+DEFUN ("set-quit-char", Fset_quit_char,10694,322706
 DEFUN ("set-quit-char", Fset_quit_char,set-quit-char10694,322706
+DEFUN ("set-input-mode", Fset_input_mode,10729,323570
 DEFUN ("set-input-mode", Fset_input_mode,set-input-mode10729,323570
+DEFUN ("current-input-mode", Fcurrent_input_mode,10750,324459
 DEFUN ("current-input-mode", 
Fcurrent_input_mode,current-input-mode10750,324459
+DEFUN ("posn-at-x-y", Fposn_at_x_y,10787,325837
 DEFUN ("posn-at-x-y", Fposn_at_x_y,posn-at-x-y10787,325837
+DEFUN ("posn-at-point", Fposn_at_point,10824,327060
 DEFUN ("posn-at-point", Fposn_at_point,posn-at-point10824,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)fa131,
 void 132,
 my_printf 135,
@@ -4965,8 +5007,11 @@ short array[array190,
 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-internal206,
+       Fx_get_selection_internal,212,
        Fx_get_selection_internal,x-get-selection-internal212,
+      Fy_get_selection_internal,216,
       Fy_get_selection_internal,y-get-selection-internal216,
 defun_func1(218,
 DEFUN_func2(220,



reply via email to

[Prev in Thread] Current Thread [Next in Thread]