Mercurial > hg > xemacs-beta

diff src/cmdloop.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 61855263cb07
children 989a7680c221
line wrap: on
line diff
--- a/src/cmdloop.c	Mon Sep 20 19:11:29 2004 +0000
+++ b/src/cmdloop.c	Mon Sep 20 19:20:08 2004 +0000
@@ -200,7 +200,7 @@
 
 
 static Lisp_Object
-cmd_error (Lisp_Object data, Lisp_Object dummy)
+cmd_error (Lisp_Object data, Lisp_Object UNUSED (dummy))
 {
   /* This function can GC */
   check_quit (); /* make Vquit_flag accurate */
@@ -215,7 +215,7 @@
 }
 
 static Lisp_Object
-top_level_1 (Lisp_Object dummy)
+top_level_1 (Lisp_Object UNUSED (dummy))
 {
   /* This function can GC */
   /* On entry to the outer level, run the startup file */
@@ -270,7 +270,7 @@
 static DECLARE_DOESNT_RETURN_TYPE (Lisp_Object, command_loop_2 (Lisp_Object));
 
 static DOESNT_RETURN_TYPE (Lisp_Object)
-command_loop_2 (Lisp_Object dummy)
+command_loop_2 (Lisp_Object UNUSED (dummy))
 {
   command_loop_3(); /* doesn't return */
   RETURN_NOT_REACHED (Qnil);
@@ -498,7 +498,7 @@
 #else
 static DOESNT_RETURN_TYPE (Lisp_Object)
 #endif
-command_loop_1 (Lisp_Object dummy)
+command_loop_1 (Lisp_Object UNUSED (dummy))
 {
   /* This function can GC */
   /* #### not correct with Vselected_console */