(record_unwind_protect): Protoize parameter.

diff --git a/src/eval.c b/src/eval.c
index e3a49fd..cab8fd8 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -2692,7 +2692,7 @@ specbind (symbol, value)
 
 void
 record_unwind_protect (function, arg)
-     Lisp_Object (*function)();
+     Lisp_Object (*function) P_ ((Lisp_Object));
      Lisp_Object arg;
 {
   if (specpdl_ptr == specpdl + specpdl_size)