Mercurial > hg > xemacs-beta

diff src/faces.c @ 2286:04bc9d2f42c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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 41c5752314c9
children ecf1ebac70d8
line wrap: on
line diff
--- a/src/faces.c	Mon Sep 20 19:11:29 2004 +0000
+++ b/src/faces.c	Mon Sep 20 19:20:08 2004 +0000
@@ -97,7 +97,7 @@
 }
 
 static void
-print_face (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
+print_face (Lisp_Object obj, Lisp_Object printcharfun, int UNUSED (escapeflag))
 {
   Lisp_Face *face = XFACE (obj);
 
@@ -289,7 +289,7 @@
 /************************************************************************/
 
 static int
-face_name_validate (Lisp_Object keyword, Lisp_Object value,
+face_name_validate (Lisp_Object UNUSED (keyword), Lisp_Object value,
 		    Error_Behavior errb)
 {
   if (ERRB_EQ (errb, ERROR_ME))
@@ -387,7 +387,7 @@
 };
 
 static int
-add_face_to_list_mapper (Lisp_Object key, Lisp_Object value,
+add_face_to_list_mapper (Lisp_Object UNUSED (key), Lisp_Object value,
 			 void *face_list_closure)
 {
   /* This function can GC */
@@ -427,7 +427,7 @@
 
 
 static int
-mark_face_as_clean_mapper (Lisp_Object key, Lisp_Object value,
+mark_face_as_clean_mapper (Lisp_Object UNUSED (key), Lisp_Object value,
 			   void *flag_closure)
 {
   /* This function can GC */