Commit 5e14b1fc authored by Andreas Schwab's avatar Andreas Schwab
Browse files

Add prototypes.

(delete_window): Fix return type.
(set_window_height): Likewise.
(set_window_width): Likewise.
(change_window_height): Likewise.
parent 44d46531
...@@ -33,11 +33,7 @@ Boston, MA 02111-1307, USA. */ ...@@ -33,11 +33,7 @@ Boston, MA 02111-1307, USA. */
Lisp_Object Qwindowp, Qwindow_live_p; Lisp_Object Qwindowp, Qwindow_live_p;
Lisp_Object Fnext_window (), Fdelete_window (), Fselect_window (); static struct window *decode_window P_ ((Lisp_Object));
Lisp_Object Fset_window_buffer (), Fsplit_window (), Frecenter ();
void delete_all_subwindows ();
static struct window *decode_window();
/* This is the window in which the terminal's cursor should /* This is the window in which the terminal's cursor should
be left when nothing is being done with it. This must be left when nothing is being done with it. This must
...@@ -803,6 +799,7 @@ DEFUN ("delete-window", Fdelete_window, Sdelete_window, 0, 1, "", ...@@ -803,6 +799,7 @@ DEFUN ("delete-window", Fdelete_window, Sdelete_window, 0, 1, "",
return Qnil; return Qnil;
} }
void
delete_window (window) delete_window (window)
register Lisp_Object window; register Lisp_Object window;
{ {
...@@ -1720,6 +1717,7 @@ check_frame_size (frame, rows, cols) ...@@ -1720,6 +1717,7 @@ check_frame_size (frame, rows, cols)
nodelete nonzero means do not do this. nodelete nonzero means do not do this.
(The caller should check later and do so if appropriate) */ (The caller should check later and do so if appropriate) */
void
set_window_height (window, height, nodelete) set_window_height (window, height, nodelete)
Lisp_Object window; Lisp_Object window;
int height; int height;
...@@ -1790,6 +1788,7 @@ set_window_height (window, height, nodelete) ...@@ -1790,6 +1788,7 @@ set_window_height (window, height, nodelete)
/* Recursively set width of WINDOW and its inferiors. */ /* Recursively set width of WINDOW and its inferiors. */
void
set_window_width (window, width, nodelete) set_window_width (window, width, nodelete)
Lisp_Object window; Lisp_Object window;
int width; int width;
...@@ -2540,6 +2539,7 @@ window_width (window) ...@@ -2540,6 +2539,7 @@ window_width (window)
also changes the heights of the siblings so as to also changes the heights of the siblings so as to
keep everything consistent. */ keep everything consistent. */
void
change_window_height (delta, widthflag) change_window_height (delta, widthflag)
register int delta; register int delta;
int widthflag; int widthflag;
...@@ -2548,10 +2548,10 @@ change_window_height (delta, widthflag) ...@@ -2548,10 +2548,10 @@ change_window_height (delta, widthflag)
Lisp_Object window; Lisp_Object window;
register struct window *p; register struct window *p;
int *sizep; int *sizep;
int (*sizefun) () = widthflag ? window_width : window_height; int (*sizefun) P_ ((Lisp_Object))
register int (*setsizefun) () = (widthflag = widthflag ? window_width : window_height;
? set_window_width register void (*setsizefun) P_ ((Lisp_Object, int, int))
: set_window_height); = (widthflag ? set_window_width : set_window_height);
int maximum; int maximum;
Lisp_Object next, prev; Lisp_Object next, prev;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment