diff src/objects-x.c @ 2286:04bc9d2f42c7

[xemacs-hg @ 2004-09-20 19:18:55 by james] Mark all unused parameters as unused. Also eliminate some unneeded local variables.
author james
date Mon, 20 Sep 2004 19:20:08 +0000
parents a8d8f419b459
children ecf1ebac70d8
line wrap: on
line diff
--- a/src/objects-x.c	Mon Sep 20 19:11:29 2004 +0000
+++ b/src/objects-x.c	Mon Sep 20 19:20:08 2004 +0000
@@ -283,7 +283,7 @@
 static void
 x_print_color_instance (Lisp_Color_Instance *c,
 			Lisp_Object printcharfun,
-			int escapeflag)
+			int UNUSED (escapeflag))
 {
   XColor color = COLOR_INSTANCE_X_COLOR (c);
   write_fmt_string (printcharfun, " %ld=(%X,%X,%X)",
@@ -317,7 +317,7 @@
 static int
 x_color_instance_equal (Lisp_Color_Instance *c1,
 			Lisp_Color_Instance *c2,
-			int depth)
+			int UNUSED (depth))
 {
   XColor color1 = COLOR_INSTANCE_X_COLOR (c1);
   XColor color2 = COLOR_INSTANCE_X_COLOR (c2);
@@ -327,7 +327,7 @@
 }
 
 static unsigned long
-x_color_instance_hash (Lisp_Color_Instance *c, int depth)
+x_color_instance_hash (Lisp_Color_Instance *c, int UNUSED (depth))
 {
   XColor color = COLOR_INSTANCE_X_COLOR (c);
   return HASH3 (color.red, color.green, color.blue);
@@ -361,7 +361,7 @@
 /************************************************************************/
 
 static int
-x_initialize_font_instance (Lisp_Font_Instance *f, Lisp_Object name,
+x_initialize_font_instance (Lisp_Font_Instance *f, Lisp_Object UNUSED (name),
 			    Lisp_Object device, Error_Behavior errb)
 {
   Display *dpy = DEVICE_X_DISPLAY (XDEVICE (device));
@@ -456,7 +456,7 @@
 static void
 x_print_font_instance (Lisp_Font_Instance *f,
 		       Lisp_Object printcharfun,
-		       int escapeflag)
+		       int UNUSED (escapeflag))
 {
   write_fmt_string (printcharfun, " 0x%lx",
 		    (unsigned long) FONT_INSTANCE_X_FONT (f)->fid);
@@ -881,7 +881,7 @@
 #ifdef MULE
 
 static int
-x_font_spec_matches_charset (struct device *d, Lisp_Object charset,
+x_font_spec_matches_charset (struct device *UNUSED (d), Lisp_Object charset,
 			     const Ibyte *nonreloc, Lisp_Object reloc,
 			     Bytecount offset, Bytecount length,
 			     int stage)