* casetab.c (Vascii_upcase_table, Vascii_eqv_table): Now static.

* lisp.h: Remove these decls.

diff --git a/src/ChangeLog b/src/ChangeLog
index 01602b1516b24bfd70fbc91fce33f4d2f744ec7f..45a6e1011ff9638087829e5b8aeaa5dc459f54c6 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2011-04-11  Paul Eggert  <eggert@cs.ucla.edu>
 
+       * 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 691dbc8c08b9c5af2a9f968d941fbfcc4e8154b2..4bea6ee7e71c2246df1d0c490d0a14f1afe353c3 100644 (file)
--- a/src/casetab.c
+++ b/src/casetab.c
@@ -25,8 +25,10 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #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 b06626ad37953b22e444829de57dcaf09a385723..fc924b7b1dcaff7e566f24575933798296647bac 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2054,8 +2054,8 @@ extern int pending_signals;
 
 #define QUITP (!NILP (Vquit_flag) && NILP (Vinhibit_quit))
 \f
-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;
 \f
 /* Number of bytes of structure consed since last GC.  */