aboutsummaryrefslogtreecommitdiffstats
path: root/src/window.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/window.c')
-rw-r--r--src/window.c16
1 files changed, 11 insertions, 5 deletions
diff --git a/src/window.c b/src/window.c
index e66fde9ec02..c92196d7dc1 100644
--- a/src/window.c
+++ b/src/window.c
@@ -78,6 +78,9 @@ static Lisp_Object next_window (Lisp_Object, Lisp_Object,
78 Lisp_Object, int); 78 Lisp_Object, int);
79static void decode_next_window_args (Lisp_Object *, Lisp_Object *, 79static void decode_next_window_args (Lisp_Object *, Lisp_Object *,
80 Lisp_Object *); 80 Lisp_Object *);
81static void foreach_window (struct frame *,
82 int (* fn) (struct window *, void *),
83 void *);
81static int foreach_window_1 (struct window *, 84static int foreach_window_1 (struct window *,
82 int (* fn) (struct window *, void *), 85 int (* fn) (struct window *, void *),
83 void *); 86 void *);
@@ -1425,6 +1428,8 @@ DEFUN ("set-window-display-table", Fset_window_display_table, Sset_window_displa
1425 return table; 1428 return table;
1426} 1429}
1427 1430
1431static void delete_window (Lisp_Object);
1432
1428/* Record info on buffer window w is displaying 1433/* Record info on buffer window w is displaying
1429 when it is about to cease to display that buffer. */ 1434 when it is about to cease to display that buffer. */
1430static void 1435static void
@@ -1548,7 +1553,7 @@ Signal an error when WINDOW is the only window on its frame. */)
1548 return Qnil; 1553 return Qnil;
1549} 1554}
1550 1555
1551void 1556static void
1552delete_window (register Lisp_Object window) 1557delete_window (register Lisp_Object window)
1553{ 1558{
1554 register Lisp_Object tem, parent, sib; 1559 register Lisp_Object tem, parent, sib;
@@ -3958,14 +3963,14 @@ fixed size windows is not altered by this function. */)
3958 return Qnil; 3963 return Qnil;
3959} 3964}
3960 3965
3961int 3966static int
3962window_height (Lisp_Object window) 3967window_height (Lisp_Object window)
3963{ 3968{
3964 register struct window *p = XWINDOW (window); 3969 register struct window *p = XWINDOW (window);
3965 return WINDOW_TOTAL_LINES (p); 3970 return WINDOW_TOTAL_LINES (p);
3966} 3971}
3967 3972
3968int 3973static int
3969window_width (Lisp_Object window) 3974window_width (Lisp_Object window)
3970{ 3975{
3971 register struct window *p = XWINDOW (window); 3976 register struct window *p = XWINDOW (window);
@@ -6817,8 +6822,9 @@ If PIXELS-P is non-nil, the return value is VSCROLL. */)
6817 first argument being a pointer to the leaf window, and with 6822 first argument being a pointer to the leaf window, and with
6818 additional argument USER_DATA. Stops when FN returns 0. */ 6823 additional argument USER_DATA. Stops when FN returns 0. */
6819 6824
6820void 6825static void
6821foreach_window (struct frame *f, int (*fn) (struct window *, void *), void *user_data) 6826foreach_window (struct frame *f, int (*fn) (struct window *, void *),
6827 void *user_data)
6822{ 6828{
6823 /* delete_frame may set FRAME_ROOT_WINDOW (f) to Qnil. */ 6829 /* delete_frame may set FRAME_ROOT_WINDOW (f) to Qnil. */
6824 if (WINDOWP (FRAME_ROOT_WINDOW (f))) 6830 if (WINDOWP (FRAME_ROOT_WINDOW (f)))