changeset 109559:4325622babca

Remove declarations and unused variables. * src/term.c (Qspace, QCalign_to, QCwidth): Remove declarations. (encode_terminal_code, produce_composite_glyph): Remove unused variables. (set_tty_color_mode, term_mouse_highlight, term_get_fkeys): Remove local extern declarations.
author Dan Nicolaescu <dann@ics.uci.edu>
date Mon, 26 Jul 2010 21:20:51 -0700
parents 0a2fae39b2dc
children cd9d4b014838
files src/ChangeLog src/term.c
diffstat 2 files changed, 6 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog	Mon Jul 26 21:12:42 2010 -0700
+++ b/src/ChangeLog	Mon Jul 26 21:20:51 2010 -0700
@@ -1,5 +1,10 @@
 2010-07-27  Dan Nicolaescu  <dann@ics.uci.edu>
 
+	* term.c (Qspace, QCalign_to, QCwidth): Remove declarations.
+	(encode_terminal_code, produce_composite_glyph): Remove unused variables.
+	(set_tty_color_mode, term_mouse_highlight, term_get_fkeys): Remove
+	local extern declarations.
+
 	* xmenu.c: Do not included lwlib.h, not needed.
 
 	* m/iris4d.h (XUINT, XSET): Remove, not needed.
--- a/src/term.c	Mon Jul 26 21:12:42 2010 -0700
+++ b/src/term.c	Mon Jul 26 21:20:51 2010 -0700
@@ -132,8 +132,6 @@
 
 /* Display space properties */
 
-extern Lisp_Object Qspace, QCalign_to, QCwidth;
-
 /* Functions to call after suspending a tty. */
 Lisp_Object Vsuspend_tty_functions;
 
@@ -712,7 +710,7 @@
 	    }
 	  else
 	    {
-	      unsigned char *p = SDATA (string), *pend = p + SBYTES (string);
+	      unsigned char *p = SDATA (string);
 
 	      if (! STRING_MULTIBYTE (string))
 		string = string_to_multibyte (string);
@@ -1383,7 +1381,6 @@
      function key specification, rather than giving the user an error and
      refusing to run at all on such a terminal.  */
 
-  extern Lisp_Object Fidentity (Lisp_Object);
   term_get_fkeys_address = address;
   term_get_fkeys_kboard = kboard;
   internal_condition_case (term_get_fkeys_1, Qerror, Fidentity);
@@ -1860,8 +1857,6 @@
 static void
 produce_composite_glyph (struct it *it)
 {
-  int c;
-
   if (it->cmp_it.ch < 0)
     {
       struct composition *cmp = composition_table[it->cmp_it.id];
@@ -2256,7 +2251,6 @@
   Lisp_Object tem, val;
   Lisp_Object color_mode;
   int mode;
-  extern Lisp_Object Qtty_color_mode;
   Lisp_Object tty_color_mode_alist
     = Fintern_soft (build_string ("tty-color-mode-alist"), Qnil);
 
@@ -2795,7 +2789,6 @@
 
       /* Check for mouse-face.  */
       {
-	extern Lisp_Object Qmouse_face;
 	Lisp_Object mouse_face, overlay, position, *overlay_vec;
 	int noverlays, obegv, ozv;
 	struct buffer *obuf;