Mercurial > emacs
comparison src/window.c @ 21514:fa9ff387d260
Fix -Wimplicit warnings.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Tue, 14 Apr 1998 12:25:56 +0000 |
| parents | be147fbd56f1 |
| children | b7df83bf15ff |
comparison
equal
deleted
inserted
replaced
| 21513:984881b316fc | 21514:fa9ff387d260 |
|---|---|
| 28 #include "indent.h" | 28 #include "indent.h" |
| 29 #include "termchar.h" | 29 #include "termchar.h" |
| 30 #include "disptab.h" | 30 #include "disptab.h" |
| 31 #include "keyboard.h" | 31 #include "keyboard.h" |
| 32 #include "blockinput.h" | 32 #include "blockinput.h" |
| 33 #include "dispextern.h" | |
| 34 #ifdef HAVE_WINDOW_SYSTEM | |
| 35 #include "xterm.h" | |
| 36 #endif | |
| 33 | 37 |
| 34 Lisp_Object Qwindowp, Qwindow_live_p; | 38 Lisp_Object Qwindowp, Qwindow_live_p; |
| 35 | 39 |
| 36 static struct window *decode_window P_ ((Lisp_Object)); | 40 static struct window *decode_window P_ ((Lisp_Object)); |
| 37 | 41 |
| 721 return table; | 725 return table; |
| 722 } | 726 } |
| 723 | 727 |
| 724 /* Record info on buffer window w is displaying | 728 /* Record info on buffer window w is displaying |
| 725 when it is about to cease to display that buffer. */ | 729 when it is about to cease to display that buffer. */ |
| 726 static | 730 static void |
| 727 unshow_buffer (w) | 731 unshow_buffer (w) |
| 728 register struct window *w; | 732 register struct window *w; |
| 729 { | 733 { |
| 730 Lisp_Object buf; | 734 Lisp_Object buf; |
| 731 struct buffer *b; | 735 struct buffer *b; |
| 765 marker_byte_position (w->pointm), | 769 marker_byte_position (w->pointm), |
| 766 BUF_ZV_BYTE (b))); | 770 BUF_ZV_BYTE (b))); |
| 767 } | 771 } |
| 768 | 772 |
| 769 /* Put replacement into the window structure in place of old. */ | 773 /* Put replacement into the window structure in place of old. */ |
| 770 static | 774 static void |
| 771 replace_window (old, replacement) | 775 replace_window (old, replacement) |
| 772 Lisp_Object old, replacement; | 776 Lisp_Object old, replacement; |
| 773 { | 777 { |
| 774 register Lisp_Object tem; | 778 register Lisp_Object tem; |
| 775 register struct window *o = XWINDOW (old), *p = XWINDOW (replacement); | 779 register struct window *o = XWINDOW (old), *p = XWINDOW (replacement); |
| 2363 } | 2367 } |
| 2364 } | 2368 } |
| 2365 } | 2369 } |
| 2366 } | 2370 } |
| 2367 | 2371 |
| 2368 static | 2372 static void |
| 2369 make_dummy_parent (window) | 2373 make_dummy_parent (window) |
| 2370 Lisp_Object window; | 2374 Lisp_Object window; |
| 2371 { | 2375 { |
| 2372 Lisp_Object new; | 2376 Lisp_Object new; |
| 2373 register struct window *o, *p; | 2377 register struct window *o, *p; |
| 3797 if (compare_window_configurations (x, y, 1)) | 3801 if (compare_window_configurations (x, y, 1)) |
| 3798 return Qt; | 3802 return Qt; |
| 3799 return Qnil; | 3803 return Qnil; |
| 3800 } | 3804 } |
| 3801 | 3805 |
| 3806 void | |
| 3802 init_window_once () | 3807 init_window_once () |
| 3803 { | 3808 { |
| 3804 selected_frame = make_terminal_frame (); | 3809 selected_frame = make_terminal_frame (); |
| 3805 XSETFRAME (Vterminal_frame, selected_frame); | 3810 XSETFRAME (Vterminal_frame, selected_frame); |
| 3806 minibuf_window = selected_frame->minibuffer_window; | 3811 minibuf_window = selected_frame->minibuffer_window; |
| 3808 last_nonminibuf_frame = selected_frame; | 3813 last_nonminibuf_frame = selected_frame; |
| 3809 | 3814 |
| 3810 window_initialized = 1; | 3815 window_initialized = 1; |
| 3811 } | 3816 } |
| 3812 | 3817 |
| 3818 void | |
| 3813 syms_of_window () | 3819 syms_of_window () |
| 3814 { | 3820 { |
| 3815 staticpro (&Qwindow_configuration_change_hook); | 3821 staticpro (&Qwindow_configuration_change_hook); |
| 3816 Qwindow_configuration_change_hook | 3822 Qwindow_configuration_change_hook |
| 3817 = intern ("window-configuration-change-hook"); | 3823 = intern ("window-configuration-change-hook"); |
| 4027 defsubr (&Scurrent_window_configuration); | 4033 defsubr (&Scurrent_window_configuration); |
| 4028 defsubr (&Ssave_window_excursion); | 4034 defsubr (&Ssave_window_excursion); |
| 4029 defsubr (&Scompare_window_configurations); | 4035 defsubr (&Scompare_window_configurations); |
| 4030 } | 4036 } |
| 4031 | 4037 |
| 4038 void | |
| 4032 keys_of_window () | 4039 keys_of_window () |
| 4033 { | 4040 { |
| 4034 initial_define_key (control_x_map, '1', "delete-other-windows"); | 4041 initial_define_key (control_x_map, '1', "delete-other-windows"); |
| 4035 initial_define_key (control_x_map, '2', "split-window"); | 4042 initial_define_key (control_x_map, '2', "split-window"); |
| 4036 initial_define_key (control_x_map, '0', "delete-window"); | 4043 initial_define_key (control_x_map, '0', "delete-window"); |
