|
428
|
1 /* Private header for the Emacs frame widget.
|
|
|
2 Copyright (C) 1993-1995 Sun Microsystems, Inc.
|
|
|
3 Copyright (C) 1995 Ben Wing.
|
|
|
4
|
|
|
5 This file is part of XEmacs.
|
|
|
6
|
|
|
7 XEmacs is free software; you can redistribute it and/or modify it
|
|
|
8 under the terms of the GNU General Public License as published by the
|
|
|
9 Free Software Foundation; either version 2, or (at your option) any
|
|
|
10 later version.
|
|
|
11
|
|
|
12 XEmacs is distributed in the hope that it will be useful, but WITHOUT
|
|
|
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
15 for more details.
|
|
|
16
|
|
|
17 You should have received a copy of the GNU General Public License
|
|
|
18 along with XEmacs; see the file COPYING. If not, write to
|
|
|
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
20 Boston, MA 02111-1307, USA. */
|
|
|
21
|
|
|
22 /* Synched up with: Not in FSF. */
|
|
|
23
|
|
440
|
24 #ifndef INCLUDED_EmacsFrameP_h_
|
|
|
25 #define INCLUDED_EmacsFrameP_h_
|
|
428
|
26
|
|
|
27 #include "xintrinsicp.h"
|
|
|
28 #include <X11/CoreP.h>
|
|
|
29 #ifdef LWLIB_USES_MOTIF
|
|
|
30 #include "xmprimitivep.h"
|
|
|
31 #endif
|
|
|
32 #include "EmacsFrame.h"
|
|
|
33
|
|
|
34 typedef struct {
|
|
1455
|
35
|
|
|
36 #ifdef LWLIB_USES_MOTIF
|
|
|
37 #if XmVERSION < 2
|
|
|
38 /* It's easy to erroneously compile with Motif 1 headers, but link
|
|
|
39 with Motif 2 libraries.
|
|
|
40
|
|
|
41 For example, AIX stupidly provides Motif headers in
|
|
|
42 /usr/dt/include, but fails to provide the corresponding libraries
|
|
|
43 in /usr/dt/lib.
|
|
|
44
|
|
|
45 We actually try to survive such a version mismatch, since Motif 2
|
|
|
46 is _almost_ binary compatible with Motif 1. Motif 2's
|
|
|
47 XmPrimitivePart has some trailing data members which overlay the
|
|
|
48 start of this struct. We create dummy members to make space for
|
|
|
49 XmPrimitivePart's added members. These must, of course, be at
|
|
|
50 the beginning of this struct.
|
|
|
51
|
|
|
52 Delete this kludge when no one has Motif1 on their system anymore,
|
|
|
53 perhaps in 2010. */
|
|
|
54 XtCallbackList Motif2_dummy_convert_callback;
|
|
|
55 XtCallbackList Motif2_dummy_popup_handler_callback;
|
|
|
56 long Motif2_dummy_layout_direction;
|
|
|
57 #endif
|
|
|
58 #endif
|
|
|
59
|
|
428
|
60 struct frame* frame; /* the *emacs* frame object */
|
|
|
61
|
|
|
62 /* Resources that can't be done from lisp.
|
|
|
63 */
|
|
|
64 char* geometry; /* geometry spec of this frame */
|
|
|
65 Boolean iconic; /* whether this frame is iconic */
|
|
|
66
|
|
|
67 /* The rest of this is crap and should be deleted.
|
|
3381
|
68 #### Comments that start with + are fields that actually get referred
|
|
|
69 to somewhere aside from the init function.
|
|
|
70 I guess the "crap" has mostly moved to specifiers?
|
|
428
|
71 */
|
|
|
72 Boolean minibuffer; /* 0: normal frames with minibuffers.
|
|
|
73 * 1: frames without minibuffers
|
|
|
74 * 2: minibuffer only. */
|
|
|
75 Boolean unsplittable; /* frame can only have one window */
|
|
|
76
|
|
3381
|
77 int internal_border_width; /* + internal borders */
|
|
428
|
78 int scrollbar_width; /* width of frame vertical sb's */
|
|
|
79 int scrollbar_height; /* height of frame horizontal sb's */
|
|
|
80 int top_toolbar_height; /* height of top toolbar */
|
|
|
81 int bottom_toolbar_height; /* height of bottom toolbar */
|
|
|
82 int left_toolbar_width; /* width of left toolbar */
|
|
|
83 int right_toolbar_width; /* width of right toolbar */
|
|
|
84 int top_toolbar_border_width; /* border width */
|
|
|
85 int bottom_toolbar_border_width; /* ... of bottom toolbar */
|
|
|
86 int left_toolbar_border_width; /* ... of left toolbar */
|
|
|
87 int right_toolbar_border_width; /* ... of right toolbar */
|
|
3381
|
88 Dimension toolbar_shadow_thickness; /* + of shadows */
|
|
428
|
89 unsigned char scrollbar_placement;
|
|
3381
|
90 int interline; /* + skips between lines */
|
|
428
|
91
|
|
|
92 XFontStruct* font; /* font */
|
|
|
93 Pixel foreground_pixel; /* foreground */
|
|
|
94 Pixel background_pixel; /* background */
|
|
|
95
|
|
|
96 Pixel cursor_color; /* text cursor color */
|
|
|
97 Boolean bar_cursor; /* 1 if bar, 0 if block */
|
|
|
98
|
|
|
99 Boolean visual_bell; /* flash instead of beep */
|
|
|
100 int bell_volume; /* how loud is beep */
|
|
|
101
|
|
|
102 Boolean menubar_p; /* initially show a menubar? */
|
|
3381
|
103 Boolean initially_unmapped; /* + inhibit initial window mapping */
|
|
428
|
104 Boolean use_backing_store; /* backing store for menubar & ew? */
|
|
|
105
|
|
|
106 Dimension preferred_width; /* if non-zero, preferred size for */
|
|
|
107 Dimension preferred_height; /* QueryGeometry() */
|
|
|
108 /* private state */
|
|
|
109
|
|
|
110 } EmacsFramePart;
|
|
|
111
|
|
|
112 typedef struct _EmacsFrameRec { /* full instance record */
|
|
|
113 CorePart core;
|
|
|
114 #ifdef LWLIB_USES_MOTIF
|
|
|
115 XmPrimitivePart primitive;
|
|
|
116 #endif
|
|
|
117 EmacsFramePart emacs_frame;
|
|
|
118 } EmacsFrameRec;
|
|
|
119
|
|
|
120 typedef struct { /* new fields for EmacsFrame class */
|
|
|
121 int dummy;
|
|
|
122 } EmacsFrameClassPart;
|
|
|
123
|
|
|
124 typedef struct _EmacsFrameClassRec { /* full class record declaration */
|
|
|
125 CoreClassPart core_class;
|
|
|
126 #ifdef LWLIB_USES_MOTIF
|
|
|
127 XmPrimitiveClassPart primitive_class;
|
|
|
128 #endif
|
|
|
129 EmacsFrameClassPart emacs_frame_class;
|
|
|
130 } EmacsFrameClassRec;
|
|
|
131
|
|
|
132 extern EmacsFrameClassRec emacsFrameClassRec; /* class pointer */
|
|
|
133
|
|
440
|
134 #endif /* INCLUDED_EmacsFrameP_h_ */
|
