Commit | Line | Data |
---|---|---|
1b94449f RS |
1 | /* System description file for MS-DOS |
2 | ||
acaf905b | 3 | Copyright (C) 1993, 1996-1997, 2001-2012 Free Software Foundation, Inc. |
1b94449f RS |
4 | |
5 | This file is part of GNU Emacs. | |
6 | ||
4b158629 | 7 | GNU Emacs is free software: you can redistribute it and/or modify |
1b94449f | 8 | it under the terms of the GNU General Public License as published by |
4b158629 GM |
9 | the Free Software Foundation, either version 3 of the License, or |
10 | (at your option) any later version. | |
1b94449f RS |
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 | |
4b158629 | 18 | along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ |
1b94449f RS |
19 | |
20 | /* Note: lots of stuff here was taken from s-msdos.h in demacs. */ | |
21 | ||
22 | ||
e05aebe9 GM |
23 | /* Define symbols to identify the version of Unix this is. |
24 | Define all the symbols that apply correctly. */ | |
1b94449f RS |
25 | #ifndef MSDOS |
26 | #define MSDOS | |
27 | #endif | |
fcc182b3 | 28 | |
920b97ab | 29 | #ifndef __DJGPP__ |
920b97ab KS |
30 | You lose; /* Emacs for DOS must be compiled with DJGPP */ |
31 | #endif | |
32 | ||
fcc182b3 | 33 | #define DOS_NT /* MSDOS or WINDOWSNT */ |
6df54671 | 34 | #undef BSD_SYSTEM |
1b94449f RS |
35 | |
36 | /* SYSTEM_TYPE should indicate the kind of system you are using. | |
e05aebe9 | 37 | It sets the Lisp variable system-type. */ |
1b94449f RS |
38 | #define SYSTEM_TYPE "ms-dos" |
39 | ||
e05aebe9 GM |
40 | /* subprocesses should be defined if you want to have code for |
41 | asynchronous subprocesses (as used in M-x compile and M-x shell). | |
77ccee09 | 42 | This is the only system that needs this. */ |
1b94449f RS |
43 | #undef subprocesses |
44 | ||
e05aebe9 GM |
45 | /* Here, on a separate page, add any special hacks needed to make |
46 | Emacs work on this system. For example, you might define certain | |
47 | system call names that don't exist on your system, or that do | |
48 | different things on your system and must be used only through an | |
49 | encapsulation (which you should place, by convention, in sysdep.c). */ | |
1b94449f | 50 | \f |
7630a042 RS |
51 | /* Avoid incompatibilities between gmalloc.c and system header files |
52 | in how to declare valloc. */ | |
53 | #define GMALLOC_INHIBIT_VALLOC | |
54 | ||
7b4ded6d EZ |
55 | /* This overrides the default value on editfns.c, since DJGPP |
56 | does not have pw->pw_gecos. */ | |
57 | #define USER_FULL_NAME (getenv ("NAME")) | |
58 | ||
1b94449f RS |
59 | /* setjmp and longjmp can safely replace _setjmp and _longjmp, |
60 | but they will run slower. */ | |
1b94449f RS |
61 | #define _setjmp setjmp |
62 | #define _longjmp longjmp | |
63 | ||
7a05f3c7 | 64 | #define DATA_START (&etext + 1) |
7a05f3c7 RS |
65 | |
66 | #define _NAIVE_DOS_REGS | |
67 | ||
87485d6f | 68 | /* command.com does not understand `...` so we define this. */ |
1b94449f RS |
69 | #define SEPCHAR ';' |
70 | ||
71 | #define NULL_DEVICE "nul" | |
1b94449f | 72 | |
1b94449f RS |
73 | #define HAVE_INVERSE_HYPERBOLIC |
74 | #define FLOAT_CHECK_DOMAIN | |
75 | ||
9d9d12cd EZ |
76 | /* Start of gnulib-related stuff */ |
77 | ||
78 | /* lib/ftoastr.c wants strtold, but DJGPP only has _strtold. DJGPP > | |
79 | 2.03 has it, but it also has _strtold as a stub that jumps to | |
80 | strtold, so use _strtold in all versions. */ | |
81 | #define strtold _strtold | |
82 | ||
003fa8b6 EZ |
83 | #if __DJGPP__ > 2 || __DJGPP_MINOR__ > 3 |
84 | # define HAVE_LSTAT 1 | |
85 | #else | |
86 | # define lstat stat | |
87 | #endif | |
88 | ||
9d9d12cd EZ |
89 | /* End of gnulib-related stuff. */ |
90 | ||
1b94449f | 91 | /* When $TERM is "internal" then this is substituted: */ |
6772c8e1 | 92 | #define INTERNAL_TERMINAL "pc|bios|IBM PC with color display:\ |
89774ec3 | 93 | :co#80:li#25:Co#16:pa#256:km:ms:cm=<CM>:cl=<CL>:ce=<CE>:\ |
38fd211b | 94 | :se=</SO>:so=<SO>:us=<UL>:ue=</UL>:md=<BD>:mh=<DIM>:mb=<BL>:mr=<RV>:me=<NV>:\ |
89774ec3 | 95 | :AB=<BG %d>:AF=<FG %d>:op=<DefC>:" |
1b94449f | 96 | |
e05aebe9 | 97 | /* Define this to be the separator between devices and paths. */ |
29675256 RS |
98 | #define DEVICE_SEP ':' |
99 | ||
100 | /* We'll support either convention on MSDOG. */ | |
101 | #define IS_DIRECTORY_SEP(_c_) ((_c_) == '/' || (_c_) == '\\') | |
102 | #define IS_ANY_SEP(_c_) (IS_DIRECTORY_SEP (_c_) || IS_DEVICE_SEP (_c_)) | |
103 | ||
eb246adb | 104 | |
b77c5660 | 105 | /* Mode line description of a buffer's type. */ |
ef72f149 | 106 | #define MODE_LINE_BINARY_TEXT(buf) (NILP(B_(buf,buffer_file_type)) ? "T" : "B") |
b77c5660 | 107 | |
eb246adb RS |
108 | /* We have (the code to control) a mouse. */ |
109 | #define HAVE_MOUSE | |
87485d6f | 110 | |
9fdec8bc | 111 | /* We can use mouse menus. */ |
61c88d95 RS |
112 | #define HAVE_MENUS |
113 | ||
87485d6f MW |
114 | /* Define one of these for easier conditionals. */ |
115 | #ifdef HAVE_X_WINDOWS | |
0405f8d9 EZ |
116 | /* We need a little extra space, see ../../lisp/loadup.el and the |
117 | commentary below, in the non-X branch. The 140KB number was | |
8350f087 | 118 | measured on GNU/Linux and on MS-Windows. */ |
241c4680 | 119 | #define SYSTEM_PURESIZE_EXTRA (-170000+140000) |
87485d6f | 120 | #else |
0405f8d9 EZ |
121 | /* We need a little extra space, see ../../lisp/loadup.el. |
122 | As of 20091024, DOS-specific files use up 62KB of pure space. But | |
123 | overall, we end up wasting 130KB of pure space, because | |
124 | BASE_PURESIZE starts at 1.47MB, while we need only 1.3MB (including | |
125 | non-DOS specific files and load history; the latter is about 55K, | |
126 | but depends on the depth of the top-level Emacs directory in the | |
127 | directory tree). Given the unknown policy of different DPMI | |
128 | hosts regarding loading of untouched pages, I'm not going to risk | |
129 | enlarging Emacs footprint by another 100+ KBytes. */ | |
241c4680 | 130 | #define SYSTEM_PURESIZE_EXTRA (-170000+65000) |
87485d6f | 131 | #endif |
4b3fd719 | 132 | |
c3d0ee51 | 133 | /* Tell the garbage collector that setjmp is known to save all |
e05aebe9 | 134 | registers relevant for conservative garbage collection in the jmp_buf. */ |
4b3fd719 | 135 | #define GC_SETJMP_WORKS 1 |
2f169c38 | 136 | #define GC_MARK_STACK GC_MAKE_GCPROS_NOOPS |