diff options
| author | Andreas Schwab | 1997-11-25 14:06:38 +0000 |
|---|---|---|
| committer | Andreas Schwab | 1997-11-25 14:06:38 +0000 |
| commit | 5e14b1fc0386d052454772454999b65f73af23a0 (patch) | |
| tree | bf2af2a6a64a71b1590847e4ec728b800f32ffa6 /src | |
| parent | 44d46531541eb8b97bb005b1693975d4da5b3207 (diff) | |
| download | emacs-5e14b1fc0386d052454772454999b65f73af23a0.tar.gz emacs-5e14b1fc0386d052454772454999b65f73af23a0.zip | |
Add prototypes.
(delete_window): Fix return type.
(set_window_height): Likewise.
(set_window_width): Likewise.
(change_window_height): Likewise.
Diffstat (limited to 'src')
| -rw-r--r-- | src/window.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/src/window.c b/src/window.c index c4d59903d90..52ba9b6be7f 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -33,11 +33,7 @@ Boston, MA 02111-1307, USA. */ | |||
| 33 | 33 | ||
| 34 | Lisp_Object Qwindowp, Qwindow_live_p; | 34 | Lisp_Object Qwindowp, Qwindow_live_p; |
| 35 | 35 | ||
| 36 | Lisp_Object Fnext_window (), Fdelete_window (), Fselect_window (); | 36 | static struct window *decode_window P_ ((Lisp_Object)); |
| 37 | Lisp_Object Fset_window_buffer (), Fsplit_window (), Frecenter (); | ||
| 38 | |||
| 39 | void delete_all_subwindows (); | ||
| 40 | static struct window *decode_window(); | ||
| 41 | 37 | ||
| 42 | /* This is the window in which the terminal's cursor should | 38 | /* This is the window in which the terminal's cursor should |
| 43 | be left when nothing is being done with it. This must | 39 | 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 | return Qnil; | 799 | return Qnil; |
| 804 | } | 800 | } |
| 805 | 801 | ||
| 802 | void | ||
| 806 | delete_window (window) | 803 | delete_window (window) |
| 807 | register Lisp_Object window; | 804 | register Lisp_Object window; |
| 808 | { | 805 | { |
| @@ -1720,6 +1717,7 @@ check_frame_size (frame, rows, cols) | |||
| 1720 | nodelete nonzero means do not do this. | 1717 | nodelete nonzero means do not do this. |
| 1721 | (The caller should check later and do so if appropriate) */ | 1718 | (The caller should check later and do so if appropriate) */ |
| 1722 | 1719 | ||
| 1720 | void | ||
| 1723 | set_window_height (window, height, nodelete) | 1721 | set_window_height (window, height, nodelete) |
| 1724 | Lisp_Object window; | 1722 | Lisp_Object window; |
| 1725 | int height; | 1723 | int height; |
| @@ -1790,6 +1788,7 @@ set_window_height (window, height, nodelete) | |||
| 1790 | 1788 | ||
| 1791 | /* Recursively set width of WINDOW and its inferiors. */ | 1789 | /* Recursively set width of WINDOW and its inferiors. */ |
| 1792 | 1790 | ||
| 1791 | void | ||
| 1793 | set_window_width (window, width, nodelete) | 1792 | set_window_width (window, width, nodelete) |
| 1794 | Lisp_Object window; | 1793 | Lisp_Object window; |
| 1795 | int width; | 1794 | int width; |
| @@ -2540,6 +2539,7 @@ window_width (window) | |||
| 2540 | also changes the heights of the siblings so as to | 2539 | also changes the heights of the siblings so as to |
| 2541 | keep everything consistent. */ | 2540 | keep everything consistent. */ |
| 2542 | 2541 | ||
| 2542 | void | ||
| 2543 | change_window_height (delta, widthflag) | 2543 | change_window_height (delta, widthflag) |
| 2544 | register int delta; | 2544 | register int delta; |
| 2545 | int widthflag; | 2545 | int widthflag; |
| @@ -2548,10 +2548,10 @@ change_window_height (delta, widthflag) | |||
| 2548 | Lisp_Object window; | 2548 | Lisp_Object window; |
| 2549 | register struct window *p; | 2549 | register struct window *p; |
| 2550 | int *sizep; | 2550 | int *sizep; |
| 2551 | int (*sizefun) () = widthflag ? window_width : window_height; | 2551 | int (*sizefun) P_ ((Lisp_Object)) |
| 2552 | register int (*setsizefun) () = (widthflag | 2552 | = widthflag ? window_width : window_height; |
| 2553 | ? set_window_width | 2553 | register void (*setsizefun) P_ ((Lisp_Object, int, int)) |
| 2554 | : set_window_height); | 2554 | = (widthflag ? set_window_width : set_window_height); |
| 2555 | int maximum; | 2555 | int maximum; |
| 2556 | Lisp_Object next, prev; | 2556 | Lisp_Object next, prev; |
| 2557 | 2557 | ||