From 31cd66f38b534c4ca882a1eb8ec51012c431687d Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 10 Apr 2011 23:21:47 -0700 Subject: [PATCH] * casetab.c (Vascii_upcase_table, Vascii_eqv_table): Now static. * lisp.h: Remove these decls. --- src/ChangeLog | 3 +++ src/casetab.c | 6 ++++-- src/lisp.h | 4 ++-- 3 files changed, 9 insertions(+), 4 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 01602b1516b..45a6e1011ff 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,8 @@ 2011-04-11 Paul Eggert + * casetab.c (Vascii_upcase_table, Vascii_eqv_table): Now static. + * lisp.h: Remove these decls. + * buffer.c (buffer_count): Remove unused var. * bidi.c (bidi_dump_cached_states): Mark as externally visible, diff --git a/src/casetab.c b/src/casetab.c index 691dbc8c08b..4bea6ee7e71 100644 --- a/src/casetab.c +++ b/src/casetab.c @@ -25,8 +25,10 @@ along with GNU Emacs. If not, see . */ #include "character.h" static Lisp_Object Qcase_table_p, Qcase_table; -Lisp_Object Vascii_downcase_table, Vascii_upcase_table; -Lisp_Object Vascii_canon_table, Vascii_eqv_table; +Lisp_Object Vascii_downcase_table; +static Lisp_Object Vascii_upcase_table; +Lisp_Object Vascii_canon_table; +static Lisp_Object Vascii_eqv_table; static void set_canon (Lisp_Object case_table, Lisp_Object range, Lisp_Object elt); static void set_identity (Lisp_Object table, Lisp_Object c, Lisp_Object elt); diff --git a/src/lisp.h b/src/lisp.h index b06626ad379..fc924b7b1dc 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -2054,8 +2054,8 @@ extern int pending_signals; #define QUITP (!NILP (Vquit_flag) && NILP (Vinhibit_quit)) -extern Lisp_Object Vascii_downcase_table, Vascii_upcase_table; -extern Lisp_Object Vascii_canon_table, Vascii_eqv_table; +extern Lisp_Object Vascii_downcase_table; +extern Lisp_Object Vascii_canon_table; /* Number of bytes of structure consed since last GC. */ -- 2.39.2