# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1280204451 25200
# Node ID 4325622babcafd0df6b06704fe4fa738b986d5e0
# Parent  0a2fae39b2dc6093f1982f0e0239c25669d160c7
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.

diff -r 0a2fae39b2dc -r 4325622babca src/ChangeLog
--- 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.
diff -r 0a2fae39b2dc -r 4325622babca src/term.c
--- 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;