Mercurial > hg > xemacs-beta

diff src/data.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 91d4c8c65a0f
children 3d8143fc88e1
line wrap: on
line diff
--- a/src/data.c	Mon Sep 20 19:11:29 2004 +0000
+++ b/src/data.c	Mon Sep 20 19:20:08 2004 +0000
@@ -2536,13 +2536,14 @@
 static Lisp_Object encode_weak_list_type (enum weak_list_type type);
 
 static Lisp_Object
-mark_weak_list (Lisp_Object obj)
+mark_weak_list (Lisp_Object UNUSED (obj))
 {
   return Qnil; /* nichts ist gemarkt */
 }
 
 static void
-print_weak_list (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
+print_weak_list (Lisp_Object obj, Lisp_Object printcharfun,
+		 int UNUSED (escapeflag))
 {
   if (print_readably)
     printing_unreadable_object ("#<weak-list>");
@@ -3014,13 +3015,14 @@
 }
 
 static Lisp_Object
-mark_weak_box (Lisp_Object obj)
+mark_weak_box (Lisp_Object UNUSED (obj))
 {
   return Qnil;
 }
 
 static void
-print_weak_box (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
+print_weak_box (Lisp_Object UNUSED (obj), Lisp_Object printcharfun,
+		int UNUSED (escapeflag))
 {
   if (print_readably)
     printing_unreadable_object ("#<weak_box>");
@@ -3239,13 +3241,14 @@
 }
 
 static Lisp_Object
-mark_ephemeron (Lisp_Object obj)
+mark_ephemeron (Lisp_Object UNUSED (obj))
 {
   return Qnil;
 }
 
 static void
-print_ephemeron (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
+print_ephemeron (Lisp_Object UNUSED (obj), Lisp_Object printcharfun,
+		 int UNUSED (escapeflag))
 {
   if (print_readably)
     printing_unreadable_object ("#<ephemeron>");