--- a/src/signal.c	Mon Aug 13 08:49:44 2007 +0200
+++ b/src/signal.c	Mon Aug 13 08:50:05 2007 +0200
@@ -343,16 +343,14 @@
 }
 #endif
 
-DEFUN ("waiting-for-user-input-p", Fwaiting_for_user_input_p,
-       Swaiting_for_user_input_p,
-       0, 0, 0 /*
+DEFUN ("waiting-for-user-input-p", Fwaiting_for_user_input_p, 0, 0, 0, /*
 Return non-nil if XEmacs is waiting for input from the user.
 This is intended for use by asynchronous timeout callbacks and by
 asynchronous process output filters and sentinels (not yet implemented
 in XEmacs).  It will always be nil if XEmacs is not inside of
 an asynchronout timeout or process callback.
-*/ )
-       ()
+*/
+       ())
 {
   return ((waiting_for_user_input_p) ? Qt : Qnil);
 }
@@ -740,7 +738,7 @@
 void
 syms_of_signal (void)
 {
-  defsubr (&Swaiting_for_user_input_p);
+  DEFSUBR (Fwaiting_for_user_input_p);
 }
 
 void