APPROVE COMMIT NOTE: This patch has been committed # HG changeset patch # User Aidan Kehoe <kehoea(a)parhasard.net&gt; # Date 1507926591 -3600 # Fri Oct 13 21:29:51 2017 +0100 # Node ID 222b2a338e9daa7f4b7c12efe00859c76058e946 # Parent 2870572bc49be089166437bb3fbaa800bcdf8d14 Remove a couple of unused file-level variables from doc.c, text.c src/ChangeLog addition: 2017-10-13 Aidan Kehoe <kehoea(a)parhasard.net&gt; * doc.c: * doc.c (vars_of_doc): * text.c: * text.c (syms_of_text): Removed unused file-local C variables QSsubstitute, Qsubstitute_negated from these files. diff -r 2870572bc49b -r 222b2a338e9d src/ChangeLog --- a/src/ChangeLog Thu Oct 12 20:27:07 2017 +0100 +++ b/src/ChangeLog Fri Oct 13 21:29:51 2017 +0100 ＠＠ -1,3 +1,12 ＠＠ +2017-10-13 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * doc.c: + * doc.c (vars_of_doc): + * text.c: + * text.c (syms_of_text): + Removed unused file-local C variables QSsubstitute, + Qsubstitute_negated from these files. + 2017-10-07 Aidan Kehoe <kehoea(a)parhasard.net&gt; * eval.c (Feval): diff -r 2870572bc49b -r 222b2a338e9d src/doc.c --- a/src/doc.c Thu Oct 12 20:27:07 2017 +0100 +++ b/src/doc.c Fri Oct 13 21:29:51 2017 +0100 ＠＠ -36,10 +36,7 ＠＠ #include "elhash.h" Lisp_Object Vinternal_doc_file_name; - -Lisp_Object QSsubstitute, Qdefvar; - -Lisp_Object Qfunction_documentation; +Lisp_Object Qdefvar, Qfunction_documentation; /* Work out what source file a function or variable came from, taking the information from the documentation file. */ ＠＠ -1399,7 +1396,4 ＠＠ Name of file containing documentation strings of built-in symbols. */ ); Vinternal_doc_file_name = Qnil; - - QSsubstitute = build_ascstring (" *substitute*"); - staticpro (&QSsubstitute); } diff -r 2870572bc49b -r 222b2a338e9d src/text.c --- a/src/text.c Thu Oct 12 20:27:07 2017 +0100 +++ b/src/text.c Fri Oct 13 21:29:51 2017 +0100 ＠＠ -1370,7 +1370,7 ＠＠ Lisp_Object QSin_char_byte_conversion, QSin_byte_char_conversion; Lisp_Object QSin_internal_external_conversion, QSin_external_internal_conversion; -Lisp_Object /* Qfail, Qsubstitute, */ Qsubstitute_negated, Quse_private; +Lisp_Object /* Qfail, Qsubstitute, */ Quse_private; Fixnum Vchar_code_limit;  ＠＠ -6116,7 +6116,6 ＠＠ DEFSUBR (Fchar_width); /* Qfail, Qsubstitute, Qsucceed in general.c */ - DEFSYMBOL (Qsubstitute_negated); /* #### what's this used for? */ DEFSYMBOL (Quse_private); #ifdef ENABLE_COMPOSITE_CHARS -- ‘As I sat looking up at the Guinness ad, I could never figure out / How your man stayed up on the surfboard after forty pints of stout’ (C. Moore)