diff src/minibuf.c @ 20302:5b3bc7f24d51

(read_minibuf_unwind): Fix return type and return nil. (temp_echo_area_glyphs): Define as returning nothing. (init_minibuf_once): Likewise. (syms_of_minibuf): Likewise. (keys_of_minibuf): Likewise.

--- a/src/minibuf.c	Fri Nov 21 13:33:35 1997 +0000
+++ b/src/minibuf.c	Fri Nov 21 13:50:47 1997 +0000
@@ -180,7 +180,7 @@
 
 /* Actual minibuffer invocation. */
 
-static void read_minibuf_unwind ();
+static Lisp_Object read_minibuf_unwind ();
 Lisp_Object get_minibuffer ();
 static Lisp_Object read_minibuf ();
 
@@ -525,7 +525,7 @@
 /* This function is called on exiting minibuffer, whether normally or not,
  and it restores the current window, buffer, etc. */
 
-static void
+static Lisp_Object
 read_minibuf_unwind (data)
      Lisp_Object data;
 {
@@ -584,6 +584,8 @@
   windows_or_buffers_changed++;
   XSETFASTINT (XWINDOW (window)->last_modified, 0);
   XSETFASTINT (XWINDOW (window)->last_overlay_modified, 0);
+
+  return Qnil;
 }
 
 
@@ -1881,6 +1883,7 @@
    that has no possible completions, and other quick, unobtrusive
    messages.  */
 
+void
 temp_echo_area_glyphs (m)
      char *m;
 {
@@ -1919,12 +1922,14 @@
   return Qnil;
 }
 
+void
 init_minibuf_once ()
 {
   Vminibuffer_list = Qnil;
   staticpro (&Vminibuffer_list);
 }
 
+void
 syms_of_minibuf ()
 {
   minibuf_level = 0;
@@ -2088,6 +2093,7 @@
   defsubr (&Sminibuffer_message);
 }
 
+void
 keys_of_minibuf ()
 {
   initial_define_key (Vminibuffer_local_map, Ctl ('g'),