Mercurial > emacs
annotate src/msdos.h @ 83448:d2af586aefe4
Fix Delete keys under X (for good, this time).
* lisp/simple.el (normal-erase-is-backspace-mode): Fix enabled/disabled logic.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-488
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Tue, 03 Jan 2006 01:22:02 +0000 |
parents | a0d1312ede66 |
children | 3bd95f4f2941 2d92f5c9d6ae |
rev | line source |
---|---|
5503 | 1 /* MS-DOS specific C utilities, interface. |
64770
a0d1312ede66
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
2 Copyright (C) 1993, 2001, 2002, 2003, 2004, |
a0d1312ede66
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
3 2005 Free Software Foundation, Inc. |
5503 | 4 |
5 This file is part of GNU Emacs. | |
6 | |
7 GNU Emacs is free software; you can redistribute it and/or modify | |
8 it under the terms of the GNU General Public License as published by | |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
9 the Free Software Foundation; either version 2, or (at your option) |
5503 | 10 any later version. |
11 | |
12 GNU Emacs is distributed in the hope that it will be useful, | |
13 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 GNU General Public License for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
18 along with GNU Emacs; see the file COPYING. If not, write to | |
64084 | 19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
20 Boston, MA 02110-1301, USA. */ | |
5503 | 21 |
29611
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
22 #ifndef EMACS_MSDOS_H |
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
23 #define EMACS_MSDOS_H |
9572 | 24 |
5503 | 25 #include <dpmi.h> |
26 | |
27 int dos_ttraw (); | |
28 int dos_ttcooked (); | |
13178 | 29 int dos_get_saved_screen (char **, int *, int *); |
30 int dos_set_keyboard (int, int); | |
14285
6081221167de
(dos_set_window_size): Prototype for a new function.
Karl Heuer <kwzh@gnu.org>
parents:
14186
diff
changeset
|
31 void dos_set_window_size (int *, int *); |
13178 | 32 |
5503 | 33 int getdefdir (int, char*); |
34 void unixtodos_filename (char *); | |
35 void dostounix_filename (char *); | |
7822
17b96e349369
Add template for rootrelativepath.
Richard M. Stallman <rms@gnu.org>
parents:
7604
diff
changeset
|
36 char *rootrelativepath (char *); |
5503 | 37 void init_environment (); |
38 void internal_terminal_init (); | |
39 void ctrl_break_func (_go32_dpmi_registers *); | |
40 void install_ctrl_break_check (); | |
41 | |
42 extern int have_mouse; | |
43 void mouse_init (); | |
44 void mouse_on (); | |
45 void mouse_off (); | |
46 void mouse_moveto (int, int); | |
9572 | 47 |
48 #ifndef HAVE_X_WINDOWS | |
49 /* Dummy types. */ | |
50 typedef int XFontStruct; | |
51 typedef int GC; | |
52 typedef int Pixmap; | |
53 typedef int Display; | |
54 typedef int Window; | |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
55 typedef int XRectangle; |
9572 | 56 #define PIX_TYPE int |
57 #define XDISPLAY | |
58 | |
27018 | 59 /* A stripped version of struct x_display_info in xterm.h, which see. */ |
60 struct display_info | |
61 { | |
62 /* These variables describe the range of text currently shown in its | |
63 mouse-face, together with the window they apply to. As long as | |
64 the mouse stays within this range, we need not redraw anything on | |
65 its account. Rows and columns are glyph matrix positions in | |
66 MOUSE_FACE_WINDOW. */ | |
67 int mouse_face_beg_row, mouse_face_beg_col; | |
68 int mouse_face_end_row, mouse_face_end_col; | |
69 int mouse_face_past_end; | |
70 Lisp_Object mouse_face_window; | |
71 int mouse_face_face_id; | |
72 | |
73 /* 1 if a mouse motion event came and we didn't handle it right away because | |
74 gc was in progress. */ | |
75 int mouse_face_deferred_gc; | |
76 | |
77 /* FRAME and X, Y position of mouse when last checked for | |
78 highlighting. X and Y can be negative or out of range for the frame. */ | |
79 struct frame *mouse_face_mouse_frame; | |
80 int mouse_face_mouse_x, mouse_face_mouse_y; | |
81 | |
82 /* Nonzero means defer mouse-motion highlighting. */ | |
83 int mouse_face_defer; | |
43370
9a4630ba3eae
(struct display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
40501
diff
changeset
|
84 |
9a4630ba3eae
(struct display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
40501
diff
changeset
|
85 /* Nonzero means that the mouse highlight should not be shown. */ |
9a4630ba3eae
(struct display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
40501
diff
changeset
|
86 int mouse_face_hidden; |
27018 | 87 }; |
88 | |
50226
1ba638ccab28
(Display_Info): Add generic typedef.
Kim F. Storm <storm@cua.dk>
parents:
43370
diff
changeset
|
89 typedef struct display_info Display_Info; |
1ba638ccab28
(Display_Info): Add generic typedef.
Kim F. Storm <storm@cua.dk>
parents:
43370
diff
changeset
|
90 |
9572 | 91 /* This is a cut-down version of the one in xterm.h, which see. */ |
13395
c18547cf191f
(struct x_output): Rename from struct x_display.
Karl Heuer <kwzh@gnu.org>
parents:
13178
diff
changeset
|
92 struct x_output |
9572 | 93 { |
26729
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25111
diff
changeset
|
94 PIX_TYPE background_pixel; /* used in xfaces.c and lots of other places */ |
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25111
diff
changeset
|
95 PIX_TYPE foreground_pixel; /* ditto */ |
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
25111
diff
changeset
|
96 XFontStruct *font; /* used in x-popup-menu (xmenu.c) */ |
36253
6ece4a809131
(struct x_output): Rename busy_window to
Gerd Moellmann <gerd@gnu.org>
parents:
30340
diff
changeset
|
97 Window hourglass_window; /* currently unused (but maybe some day) */ |
6ece4a809131
(struct x_output): Rename busy_window to
Gerd Moellmann <gerd@gnu.org>
parents:
30340
diff
changeset
|
98 unsigned hourglass_p : 1; /* ditto */ |
27018 | 99 struct display_info display_info; /* used for drawing mouse highlight */ |
9572 | 100 }; |
101 | |
13395
c18547cf191f
(struct x_output): Rename from struct x_display.
Karl Heuer <kwzh@gnu.org>
parents:
13178
diff
changeset
|
102 extern struct x_output the_only_x_display; |
9572 | 103 |
104 #define FRAME_X_DISPLAY(f) ((Display *) 0) | |
105 #define FRAME_FOREGROUND_PIXEL(f) (the_only_x_display.foreground_pixel) | |
106 #define FRAME_BACKGROUND_PIXEL(f) (the_only_x_display.background_pixel) | |
107 #define FRAME_FONT(f) (the_only_x_display.font) | |
27018 | 108 #define FRAME_X_DISPLAY_INFO(f) (&the_only_x_display.display_info) |
27957
5210a97b3ac7
(FRAME_INTERNAL_BORDER_WIDTH): Define to zero.
Eli Zaretskii <eliz@gnu.org>
parents:
27463
diff
changeset
|
109 |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
110 /* Prototypes. */ |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
111 |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
112 /* Forward declarations for prototypes. */ |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
113 struct frame; |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
114 struct window; |
25111
36169f5d88da
Remove redundant declarations (most of them are now in
Eli Zaretskii <eliz@gnu.org>
parents:
21784
diff
changeset
|
115 |
36169f5d88da
Remove redundant declarations (most of them are now in
Eli Zaretskii <eliz@gnu.org>
parents:
21784
diff
changeset
|
116 /* Defined in xfns.c; emulated on msdos.c */ |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
117 |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
118 extern int have_menus_p P_ ((void)); |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
119 extern void x_set_menu_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
120 extern int x_pixel_width P_ ((struct frame *)); |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
121 extern int x_pixel_height P_ ((struct frame *)); |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
122 |
9572 | 123 #define XFreeGC (void) |
124 #define x_destroy_bitmap(p1,p2) | |
125 #define load_pixmap(p1,p2,p3,p4) (0) | |
126 #define XGetGeometry(p1,p2,p3,p4,p5,p6,p7,p8,p9) | |
51202
62a7506ec831
(struct x_output): Remove members left_pos, top_pos,
Kim F. Storm <storm@cua.dk>
parents:
50247
diff
changeset
|
127 #define DisplayWidth(p1,p2) (SELECTED_FRAME()->text_cols) |
62a7506ec831
(struct x_output): Remove members left_pos, top_pos,
Kim F. Storm <storm@cua.dk>
parents:
50247
diff
changeset
|
128 #define DisplayHeight(p1,p2) (SELECTED_FRAME()->text_lines) |
9572 | 129 #define XMenuSetAEQ (void) |
130 #define XMenuSetFreeze (void) | |
131 #define XMenuRecompute (void) | |
132 #define FONT_WIDTH(foo) 1 | |
133 #define XM_FAILURE -1 | |
134 #define XM_SUCCESS 1 | |
135 #define XM_NO_SELECT 2 | |
136 #define XM_IA_SELECT 3 | |
137 #define ButtonReleaseMask 0 | |
138 | |
139 typedef struct x_menu_struct | |
140 { | |
141 int count; | |
142 char **text; | |
143 struct x_menu_struct **submenu; | |
144 int *panenumber; /* Also used as enable. */ | |
145 int allocated; | |
146 int panecount; | |
147 int width; | |
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
148 char **help_text; |
9572 | 149 } XMenu; |
150 | |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
151 XMenu *XMenuCreate (Display *, Window, char *); |
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
152 int XMenuAddPane (Display *, XMenu *, char *, int); |
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
153 int XMenuAddSelection (Display *, XMenu *, int, int, char *, int, char *); |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
154 void XMenuLocate (Display *, XMenu *, int, int, int, int, |
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
155 int *, int *, int *, int *); |
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
156 int XMenuActivate (Display *, XMenu *, int *, int *, int, int, unsigned, |
30340
be29e15ece0e
(XMenuActivate): Update prototype.
Eli Zaretskii <eliz@gnu.org>
parents:
29611
diff
changeset
|
157 char **, void (*callback)(char *, int, int)); |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
158 void XMenuDestroy (Display *, XMenu *); |
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
159 |
9572 | 160 #endif /* not HAVE_X_WINDOWS */ |
161 | |
29611
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
162 #endif /* not EMACS_MSDOS_H */ |
52401 | 163 |
164 /* arch-tag: ad21eeed-8fdb-4357-8007-36368a6bdbf3 | |
165 (do not change this comment) */ |