Mercurial > hg > xemacs-beta
annotate src/window.h @ 5518:3cc7470ea71c
gnuclient: if TMPDIR was set and connect failed, try again with /tmp
2011-06-03 Aidan Kehoe <kehoea@parhasard.net>
* gnuslib.c (connect_to_unix_server):
Retry with /tmp as a directory in which to search for Unix sockets
if an attempt to connect with some other directory failed (which
may be because gnuclient and gnuserv don't share an environment
value for TMPDIR, or because gnuserv was compiled with USE_TMPDIR
turned off).
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Fri, 03 Jun 2011 18:40:57 +0100 |
| parents | 308d34e9f07d |
| children |
| rev | line source |
|---|---|
| 428 | 1 /* Window definitions for XEmacs. |
| 2 Copyright (C) 1985, 1986, 1992, 1993, 1994, 1995 | |
| 3 Free Software Foundation, Inc. | |
| 4 Copyright (C) 1994, 1995 Board of Trustees, University of Illinois. | |
|
5047
07dcc7000bbf
put width before height consistently, fix a real bug found in the process
Ben Wing <ben@xemacs.org>
parents:
4775
diff
changeset
|
5 Copyright (C) 1995, 1996, 2002, 2010 Ben Wing. |
| 428 | 6 Copyright (C) 1996 Chuck Thompson. |
| 7 | |
| 8 This file is part of XEmacs. | |
| 9 | |
|
5402
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
5157
diff
changeset
|
10 XEmacs is free software: you can redistribute it and/or modify it |
| 428 | 11 under the terms of the GNU General Public License as published by the |
|
5402
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
5157
diff
changeset
|
12 Free Software Foundation, either version 3 of the License, or (at your |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
5157
diff
changeset
|
13 option) any later version. |
| 428 | 14 |
| 15 XEmacs is distributed in the hope that it will be useful, but WITHOUT | |
| 16 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 17 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 18 for more details. | |
| 19 | |
| 20 You should have received a copy of the GNU General Public License | |
|
5402
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
5157
diff
changeset
|
21 along with XEmacs. If not, see <http://www.gnu.org/licenses/>. */ |
| 428 | 22 |
| 23 /* Synched up with: FSF 19.30. */ | |
| 24 | |
| 440 | 25 #ifndef INCLUDED_window_h_ |
| 26 #define INCLUDED_window_h_ | |
| 428 | 27 |
| 28 #include "redisplay.h" | |
| 29 #ifdef HAVE_SCROLLBARS | |
| 30 #include "scrollbar.h" | |
| 31 #endif | |
| 32 | |
| 872 | 33 struct window; |
| 428 | 34 |
|
5118
e0db3c197671
merge up to latest default branch, doesn't compile yet
Ben Wing <ben@xemacs.org>
parents:
4775
diff
changeset
|
35 DECLARE_LISP_OBJECT (window, struct window); |
| 617 | 36 #define XWINDOW(x) XRECORD (x, window, struct window) |
| 37 #define wrap_window(p) wrap_record (p, window) | |
| 38 #define WINDOWP(x) RECORDP (x, window) | |
| 39 #define CHECK_WINDOW(x) CHECK_RECORD (x, window) | |
| 40 #define CONCHECK_WINDOW(x) CONCHECK_RECORD (x, window) | |
| 41 | |
| 872 | 42 /* Basic properties available to non-privileged users; redefined in |
| 43 window-impl.h */ | |
| 428 | 44 |
| 872 | 45 int window_live_p (struct window *w); |
| 46 Lisp_Object window_frame (struct window *w); | |
| 47 Lisp_Object window_buffer (struct window *w); | |
| 428 | 48 |
| 872 | 49 #define WINDOW_LIVE_P(w) window_live_p (w) |
| 50 #define WINDOW_FRAME(w) window_frame (w) | |
| 51 #define WINDOW_BUFFER(w) window_buffer (w) | |
| 428 | 52 |
| 872 | 53 #define WINDOW_XFRAME(w) XFRAME (WINDOW_FRAME (w)) |
| 54 #define WINDOW_DEVICE(w) XFRAME_DEVICE (WINDOW_FRAME (w)) | |
| 55 #define WINDOW_XDEVICE(w) XDEVICE (WINDOW_DEVICE (w)) | |
| 56 #define WINDOW_CONSOLE(w) XDEVICE_CONSOLE (WINDOW_DEVICE (w)) | |
| 57 #define WINDOW_XCONSOLE(w) XCONSOLE (WINDOW_CONSOLE (w)) | |
| 58 #define WINDOW_XBUFFER(w) XBUFFER (WINDOW_BUFFER (w)) | |
| 428 | 59 |
| 872 | 60 #define XWINDOW_FRAME(w) WINDOW_FRAME (XWINDOW (w)) |
| 61 #define XWINDOW_XFRAME(w) XFRAME (XWINDOW_FRAME (w)) | |
| 62 #define XWINDOW_DEVICE(w) XFRAME_DEVICE (XWINDOW_FRAME (w)) | |
| 63 #define XWINDOW_XDEVICE(w) XDEVICE (XWINDOW_DEVICE (w)) | |
| 64 #define XWINDOW_CONSOLE(w) XDEVICE_CONSOLE (XWINDOW_DEVICE (w)) | |
| 65 #define XWINDOW_XCONSOLE(w) XCONSOLE (XWINDOW_CONSOLE (w)) | |
| 66 #define XWINDOW_BUFFER(w) WINDOW_BUFFER (XWINDOW (w)) | |
| 67 #define XWINDOW_XBUFFER(w) XBUFFER (XWINDOW_BUFFER (w)) | |
| 428 | 68 |
| 69 #define CHECK_LIVE_WINDOW(x) do { \ | |
| 70 CHECK_WINDOW (x); \ | |
| 71 if (!WINDOW_LIVE_P (XWINDOW (x))) \ | |
| 72 dead_wrong_type_argument (Qwindow_live_p, (x)); \ | |
| 73 } while (0) | |
| 74 #define CONCHECK_LIVE_WINDOW(x) do { \ | |
| 75 CONCHECK_WINDOW (x); \ | |
| 76 if (!WINDOW_LIVE_P (XWINDOW (x))) \ | |
| 77 x = wrong_type_argument (Qwindow_live_p, (x)); \ | |
| 78 } while (0) | |
| 79 | |
| 872 | 80 struct window_mirror; |
| 428 | 81 |
|
5118
e0db3c197671
merge up to latest default branch, doesn't compile yet
Ben Wing <ben@xemacs.org>
parents:
4775
diff
changeset
|
82 DECLARE_LISP_OBJECT (window_mirror, struct window_mirror); |
| 872 | 83 #define XWINDOW_MIRROR(x) XRECORD (x, window_mirror, struct window_mirror) |
| 84 #define wrap_window_mirror(p) wrap_record (p, window_mirror) | |
| 85 #define WINDOW_MIRRORP(x) RECORDP (x, window_mirror) | |
| 86 #define CHECK_WINDOW_MIRROR(x) CHECK_RECORD (x, window_mirror) | |
| 87 #define CONCHECK_WINDOW_MIRROR(x) CONCHECK_RECORD (x, window_mirror) | |
| 428 | 88 |
| 89 EXFUN (Fget_buffer_window, 3); | |
| 90 EXFUN (Fmove_to_window_line, 2); | |
| 91 EXFUN (Frecenter, 2); | |
| 444 | 92 EXFUN (Freplace_buffer_in_windows, 3); |
| 428 | 93 EXFUN (Fselect_window, 2); |
| 94 EXFUN (Fselected_window, 1); | |
| 440 | 95 EXFUN (Fset_window_buffer, 3); |
| 428 | 96 EXFUN (Fset_window_hscroll, 2); |
| 97 EXFUN (Fset_window_point, 2); | |
| 98 EXFUN (Fset_window_start, 3); | |
| 99 EXFUN (Fwindow_buffer, 1); | |
| 100 EXFUN (Fwindow_highest_p, 1); | |
| 101 EXFUN (Fwindow_point, 1); | |
| 102 EXFUN (Fwindow_start, 1); | |
| 872 | 103 |
| 1149 | 104 extern Lisp_Object Qcurrent_window_configuration, Qset_window_configuration; |
| 872 | 105 Lisp_Object display_buffer (Lisp_Object, Lisp_Object, Lisp_Object); |
| 428 | 106 |
| 107 /* The minibuffer window of the selected frame. | |
| 108 Note that you cannot test for minibufferness of an arbitrary window | |
| 109 by comparing against this; but you can test for minibufferness of | |
| 110 the selected window or of any window that is displayed. */ | |
| 111 extern Lisp_Object minibuf_window; | |
| 112 | |
| 113 /* Prompt to display in front of the minibuffer contents, or nil */ | |
| 114 extern Lisp_Object Vminibuf_prompt; | |
| 115 /* Prompt to display in front of the minibuffer prompt, or nil */ | |
| 116 extern Lisp_Object Vminibuf_preprompt; | |
| 117 | |
| 118 Lisp_Object allocate_window (void); | |
| 119 int window_char_width (struct window *, int include_margins_p); | |
| 120 int window_char_height (struct window *, int include_gutters_p); | |
| 121 int window_displayed_height (struct window *); | |
| 122 int window_is_leftmost (struct window *w); | |
| 123 int window_is_rightmost (struct window *w); | |
| 124 int window_is_lowest (struct window *w); | |
| 125 int window_is_highest (struct window *w); | |
| 126 int window_truncation_on (struct window *w); | |
| 127 int window_needs_vertical_divider (struct window *); | |
| 128 int window_scrollbar_width (struct window *w); | |
| 129 int window_scrollbar_height (struct window *w); | |
| 130 int window_modeline_height (struct window *w); | |
| 131 int window_left_margin_width (struct window *w); | |
| 132 int window_right_margin_width (struct window *w); | |
| 133 int window_top_gutter_height (struct window *w); | |
| 134 int window_bottom_gutter_height (struct window *w); | |
| 135 int window_left_gutter_width (struct window *w, int modeline); | |
| 136 int window_right_gutter_width (struct window *w, int modeline); | |
| 137 | |
| 138 void delete_all_subwindows (struct window *w); | |
| 139 void set_window_pixheight (Lisp_Object window, int pixheight, | |
| 140 int nodelete); | |
| 141 void set_window_pixwidth (Lisp_Object window, int pixwidth, | |
| 142 int nodelete); | |
| 143 void window_scroll (Lisp_Object window, Lisp_Object n, int direction, | |
| 578 | 144 Error_Behavior errb); |
| 428 | 145 int buffer_window_count (struct buffer *b, struct frame *f); |
| 146 int buffer_window_mru (struct window *w); | |
|
5047
07dcc7000bbf
put width before height consistently, fix a real bug found in the process
Ben Wing <ben@xemacs.org>
parents:
4775
diff
changeset
|
147 void check_frame_size (struct frame *frame, int *cols, int *rows); |
| 440 | 148 int frame_pixsize_valid_p (struct frame *frame, int width, int height); |
| 428 | 149 struct window *decode_window (Lisp_Object window); |
| 150 struct window *find_window_by_pixel_pos (int pix_x, int pix_y, Lisp_Object win); | |
| 151 | |
| 152 void free_window_mirror (struct window_mirror *mir); | |
| 153 Lisp_Object real_window (struct window_mirror *mir, int no_abort); | |
| 154 struct window_mirror *find_window_mirror (struct window *w); | |
| 155 display_line_dynarr *window_display_lines (struct window *w, int); | |
| 156 struct buffer *window_display_buffer (struct window *w); | |
| 157 void set_window_display_buffer (struct window *w, struct buffer *b); | |
| 158 void update_frame_window_mirror (struct frame *f); | |
| 159 | |
| 160 int map_windows (struct frame *f, | |
| 161 int (*mapfun) (struct window *w, void *closure), | |
| 162 void *closure); | |
| 163 void some_window_value_changed (Lisp_Object specifier, struct window *w, | |
| 164 Lisp_Object oldval); | |
| 165 int invalidate_vertical_divider_cache_in_window (struct window *w, | |
| 166 void *u_n_u_s_e_d); | |
| 167 int window_divider_width (struct window *w); | |
| 168 | |
| 440 | 169 #endif /* INCLUDED_window_h_ */ |