annotate src/msdos.h @ 13469:5bda9e4d85eb

(sh-mode-map): Put sh-execute-region on C-M-x. Put executable-interpret on C-c C-x.
author Richard M. Stallman <rms@gnu.org>
date Fri, 10 Nov 1995 17:06:28 +0000
parents c18547cf191f
children ee40177f6c68
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5503
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1 /* MS-DOS specific C utilities, interface.
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2 Copyright (C) 1993 Free Software Foundation, Inc.
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
4 This file is part of GNU Emacs.
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
7 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
8 the Free Software Foundation; either version 2, or (at your option)
5503
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
9 any later version.
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
10
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
14 GNU General Public License for more details.
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
15
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
17 along with GNU Emacs; see the file COPYING. If not, write to
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
19
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
20 #ifndef _MSDOS_H_
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
21 #define _MSDOS_H_
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
22
5503
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
23 #include <dpmi.h>
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
24
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
25 int dos_ttraw ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
26 int dos_ttcooked ();
13178
74b4edb62cf0 (internal_flush): Removed
Kim F. Storm <storm@cua.dk>
parents: 13021
diff changeset
27 int dos_get_saved_screen (char **, int *, int *);
74b4edb62cf0 (internal_flush): Removed
Kim F. Storm <storm@cua.dk>
parents: 13021
diff changeset
28 int dos_set_keyboard (int, int);
74b4edb62cf0 (internal_flush): Removed
Kim F. Storm <storm@cua.dk>
parents: 13021
diff changeset
29
5503
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
30 int getdefdir (int, char*);
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
31 void unixtodos_filename (char *);
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
32 void dostounix_filename (char *);
7822
17b96e349369 Add template for rootrelativepath.
Richard M. Stallman <rms@gnu.org>
parents: 7604
diff changeset
33 char *rootrelativepath (char *);
5503
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
34 void init_environment ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
35 void internal_terminal_init ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
36 void ctrl_break_func (_go32_dpmi_registers *);
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
37 void install_ctrl_break_check ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
38
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
39 extern int have_mouse;
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
40 void mouse_init ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
41 void mouse_on ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
42 void mouse_off ();
003e84b91d21 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
43 void mouse_moveto (int, int);
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
44
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
45 #ifndef HAVE_X_WINDOWS
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
46 /* Dummy types. */
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
47 typedef int XFontStruct;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
48 typedef int GC;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
49 typedef int Pixmap;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
50 typedef int Display;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
51 typedef int Window;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
52 #define PIX_TYPE int
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
53 #define XDISPLAY
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
54
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
55 /* 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
56 struct x_output
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
57 {
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
58 int left_pos;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
59 int top_pos;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
60 int line_height;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
61 PIX_TYPE background_pixel;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
62 PIX_TYPE foreground_pixel;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
63 XFontStruct *font;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
64 struct face **param_faces;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
65 int n_param_faces;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
66 struct face **computed_faces;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
67 int n_computed_faces;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
68 int size_computed_faces;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
69 };
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
70
13395
c18547cf191f (struct x_output): Rename from struct x_display.
Karl Heuer <kwzh@gnu.org>
parents: 13178
diff changeset
71 extern struct x_output the_only_x_display;
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
72 extern Display *x_current_display;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
73
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
74 #define FRAME_PARAM_FACES(f) (the_only_x_display.param_faces)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
75 #define FRAME_N_PARAM_FACES(f) (the_only_x_display.n_param_faces)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
76 #define FRAME_DEFAULT_PARAM_FACE(f) (FRAME_PARAM_FACES (f)[0])
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
77 #define FRAME_MODE_LINE_PARAM_FACE(f) (FRAME_PARAM_FACES (f)[1])
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
78 #define FRAME_COMPUTED_FACES(f) (the_only_x_display.computed_faces)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
79 #define FRAME_N_COMPUTED_FACES(f) (the_only_x_display.n_computed_faces)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
80 #define FRAME_SIZE_COMPUTED_FACES(f) (the_only_x_display.size_computed_faces)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
81 #define FRAME_DEFAULT_FACE(f) (the_only_x_display.computed_faces[0])
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
82 #define FRAME_MODE_LINE_FACE(f) (the_only_x_display.computed_faces[1])
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
83 #define FRAME_X_DISPLAY(f) ((Display *) 0)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
84 #define FRAME_FOREGROUND_PIXEL(f) (the_only_x_display.foreground_pixel)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
85 #define FRAME_BACKGROUND_PIXEL(f) (the_only_x_display.background_pixel)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
86 #define FRAME_FONT(f) (the_only_x_display.font)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
87
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
88 #define XFreeGC (void)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
89 #define same_size_fonts(foo,bar) (1)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
90 #define unload_font(p1,p2)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
91 #define unload_color(p1,p2)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
92 #define x_destroy_bitmap(p1,p2)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
93 #define load_pixmap(p1,p2,p3,p4) (0)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
94 #define XGetGeometry(p1,p2,p3,p4,p5,p6,p7,p8,p9)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
95 #define DisplayWidth(p1,p2) (the_only_frame.width)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
96 #define DisplayHeight(p1,p2) (the_only_frame.height)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
97 #define XMenuSetAEQ (void)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
98 #define XMenuSetFreeze (void)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
99 #define XMenuRecompute (void)
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
100 #define FONT_WIDTH(foo) 1
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
101 /* Function `getcbrk' is the most harmless I can think of right now... */
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
102 #define check_x if (FRAME_TERMCAP_P (bar)) error ("Not running under a windows system."); else getcbrk
10503
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
103 #define x_mouse_leave getcbrk
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
104 #define XM_FAILURE -1
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
105 #define XM_SUCCESS 1
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
106 #define XM_NO_SELECT 2
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
107 #define XM_IA_SELECT 3
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
108 #define ButtonReleaseMask 0
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
109
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
110 typedef struct x_menu_struct
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
111 {
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
112 int count;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
113 char **text;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
114 struct x_menu_struct **submenu;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
115 int *panenumber; /* Also used as enable. */
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
116 int allocated;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
117 int panecount;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
118 int width;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
119 } XMenu;
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
120
10503
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
121 XMenu *XMenuCreate (Display *, Window, char *);
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
122 int XMenuAddPane (Display *, XMenu *, char *, int);
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
123 int XMenuAddSelection (Display *, XMenu *, int, int, char *, int);
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
124 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
125 int *, int *, int *, int *);
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
126 int XMenuActivate (Display *, XMenu *, int *, int *, int, int, unsigned, char **);
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
127 void XMenuDestroy (Display *, XMenu *);
4d94f31dc555 (x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents: 9572
diff changeset
128
9572
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
129 #endif /* not HAVE_X_WINDOWS */
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
130
b36d5e88cccc *** empty log message ***
Morten Welinder <terra@diku.dk>
parents: 7822
diff changeset
131 #endif /* not _MSDOS_H_ */