diff options
| author | Dan Nicolaescu | 2010-03-19 17:46:01 -0700 |
|---|---|---|
| committer | Dan Nicolaescu | 2010-03-19 17:46:01 -0700 |
| commit | aed71cf417ed73a53e1931d94d109070b3ed1041 (patch) | |
| tree | bfd1b8e38bd3aa61fabd5d576f202e912d2617c2 /src | |
| parent | b0287b39f290209cfdc868775c1d90b8347aae47 (diff) | |
| download | emacs-aed71cf417ed73a53e1931d94d109070b3ed1041.tar.gz emacs-aed71cf417ed73a53e1931d94d109070b3ed1041.zip | |
Remove obsolete uses of HAVE_SHM.
* emacs.c (standard_args):
(Fdump_emacs):
(syms_of_emacs): Remove code depending on HAVE_SHM.
* alloc.c: Remove HAVE_SHM dependent definition.
* Makefile.in (RUN_TEMACS): Do not depend on HAVE_SHM.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 11 | ||||
| -rw-r--r-- | src/Makefile.in | 4 | ||||
| -rw-r--r-- | src/alloc.c | 9 | ||||
| -rw-r--r-- | src/emacs.c | 42 |
4 files changed, 11 insertions, 55 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index f15d91cbf91..799dab11529 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,14 @@ | |||
| 1 | 2010-03-20 Dan Nicolaescu <dann@ics.uci.edu> | ||
| 2 | |||
| 3 | Remove obsolete uses of HAVE_SHM. | ||
| 4 | * emacs.c (standard_args): | ||
| 5 | (Fdump_emacs): | ||
| 6 | (syms_of_emacs): Remove code depending on HAVE_SHM. | ||
| 7 | |||
| 8 | * alloc.c: Remove HAVE_SHM dependent definition. | ||
| 9 | |||
| 10 | * Makefile.in (RUN_TEMACS): Do not depend on HAVE_SHM. | ||
| 11 | |||
| 1 | 2010-03-18 Glenn Morris <rgm@gnu.org> | 12 | 2010-03-18 Glenn Morris <rgm@gnu.org> |
| 2 | 13 | ||
| 3 | * emacs.c (USAGE4): Hard-code bug address. | 14 | * emacs.c (USAGE4): Hard-code bug address. |
diff --git a/src/Makefile.in b/src/Makefile.in index 5ac83e71e95..30b8be1ba56 100644 --- a/src/Makefile.in +++ b/src/Makefile.in | |||
| @@ -853,11 +853,7 @@ LIBES = $(LOADLIBES) $(LIBS) $(LIBX) $(LIBSOUND) $(RSVG_LIBS) $(DBUS_LIBS) \ | |||
| 853 | @FREETYPE_LIBS@ @FONTCONFIG_LIBS@ @LIBOTF_LIBS@ @M17N_FLT_LIBS@ \ | 853 | @FREETYPE_LIBS@ @FONTCONFIG_LIBS@ @LIBOTF_LIBS@ @M17N_FLT_LIBS@ \ |
| 854 | $(GNULIB_VAR) LIB_MATH LIB_STANDARD $(GNULIB_VAR) | 854 | $(GNULIB_VAR) LIB_MATH LIB_STANDARD $(GNULIB_VAR) |
| 855 | 855 | ||
| 856 | #ifdef HAVE_SHM | ||
| 857 | RUN_TEMACS = `/bin/pwd`/temacs -nl | ||
| 858 | #else | ||
| 859 | RUN_TEMACS = `/bin/pwd`/temacs | 856 | RUN_TEMACS = `/bin/pwd`/temacs |
| 860 | #endif | ||
| 861 | 857 | ||
| 862 | all: emacs${EXEEXT} $(OTHER_FILES) | 858 | all: emacs${EXEEXT} $(OTHER_FILES) |
| 863 | 859 | ||
diff --git a/src/alloc.c b/src/alloc.c index 9a935cc8952..98d60067f9e 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -257,8 +257,6 @@ Lisp_Object Vpurify_flag; | |||
| 257 | 257 | ||
| 258 | Lisp_Object Vmemory_full; | 258 | Lisp_Object Vmemory_full; |
| 259 | 259 | ||
| 260 | #ifndef HAVE_SHM | ||
| 261 | |||
| 262 | /* Initialize it to a nonzero value to force it into data space | 260 | /* Initialize it to a nonzero value to force it into data space |
| 263 | (rather than bss space). That way unexec will remap it into text | 261 | (rather than bss space). That way unexec will remap it into text |
| 264 | space (pure), on some systems. We have not implemented the | 262 | space (pure), on some systems. We have not implemented the |
| @@ -268,13 +266,6 @@ Lisp_Object Vmemory_full; | |||
| 268 | EMACS_INT pure[(PURESIZE + sizeof (EMACS_INT) - 1) / sizeof (EMACS_INT)] = {1,}; | 266 | EMACS_INT pure[(PURESIZE + sizeof (EMACS_INT) - 1) / sizeof (EMACS_INT)] = {1,}; |
| 269 | #define PUREBEG (char *) pure | 267 | #define PUREBEG (char *) pure |
| 270 | 268 | ||
| 271 | #else /* HAVE_SHM */ | ||
| 272 | |||
| 273 | #define pure PURE_SEG_BITS /* Use shared memory segment */ | ||
| 274 | #define PUREBEG (char *)PURE_SEG_BITS | ||
| 275 | |||
| 276 | #endif /* HAVE_SHM */ | ||
| 277 | |||
| 278 | /* Pointer to the pure area, and its size. */ | 269 | /* Pointer to the pure area, and its size. */ |
| 279 | 270 | ||
| 280 | static char *purebeg; | 271 | static char *purebeg; |
diff --git a/src/emacs.c b/src/emacs.c index d7d01b8d3c1..dbaae9b040b 100644 --- a/src/emacs.c +++ b/src/emacs.c | |||
| @@ -1816,9 +1816,6 @@ struct standard_args | |||
| 1816 | const struct standard_args standard_args[] = | 1816 | const struct standard_args standard_args[] = |
| 1817 | { | 1817 | { |
| 1818 | { "-version", "--version", 150, 0 }, | 1818 | { "-version", "--version", 150, 0 }, |
| 1819 | #ifdef HAVE_SHM | ||
| 1820 | { "-nl", "--no-shared-memory", 140, 0 }, | ||
| 1821 | #endif | ||
| 1822 | { "-t", "--terminal", 120, 1 }, | 1819 | { "-t", "--terminal", 120, 1 }, |
| 1823 | { "-nw", "--no-window-system", 110, 0 }, | 1820 | { "-nw", "--no-window-system", 110, 0 }, |
| 1824 | { "-nw", "--no-windows", 110, 0 }, | 1821 | { "-nw", "--no-windows", 110, 0 }, |
| @@ -2210,39 +2207,6 @@ shut_down_emacs (sig, no_x, stuff) | |||
| 2210 | 2207 | ||
| 2211 | #ifndef CANNOT_DUMP | 2208 | #ifndef CANNOT_DUMP |
| 2212 | 2209 | ||
| 2213 | #ifdef HAVE_SHM | ||
| 2214 | |||
| 2215 | DEFUN ("dump-emacs-data", Fdump_emacs_data, Sdump_emacs_data, 1, 1, 0, | ||
| 2216 | doc: /* Dump current state of Emacs into data file FILENAME. | ||
| 2217 | This function exists on systems that use HAVE_SHM. */) | ||
| 2218 | (filename) | ||
| 2219 | Lisp_Object filename; | ||
| 2220 | { | ||
| 2221 | extern char my_edata[]; | ||
| 2222 | Lisp_Object tem; | ||
| 2223 | |||
| 2224 | check_pure_size (); | ||
| 2225 | CHECK_STRING (filename); | ||
| 2226 | filename = Fexpand_file_name (filename, Qnil); | ||
| 2227 | |||
| 2228 | tem = Vpurify_flag; | ||
| 2229 | Vpurify_flag = Qnil; | ||
| 2230 | |||
| 2231 | fflush (stdout); | ||
| 2232 | /* Tell malloc where start of impure now is. */ | ||
| 2233 | /* Also arrange for warnings when nearly out of space. */ | ||
| 2234 | #ifndef SYSTEM_MALLOC | ||
| 2235 | memory_warnings (my_edata, malloc_warning); | ||
| 2236 | #endif | ||
| 2237 | map_out_data (SDATA (filename)); | ||
| 2238 | |||
| 2239 | Vpurify_flag = tem; | ||
| 2240 | |||
| 2241 | return Qnil; | ||
| 2242 | } | ||
| 2243 | |||
| 2244 | #else /* not HAVE_SHM */ | ||
| 2245 | |||
| 2246 | DEFUN ("dump-emacs", Fdump_emacs, Sdump_emacs, 2, 2, 0, | 2210 | DEFUN ("dump-emacs", Fdump_emacs, Sdump_emacs, 2, 2, 0, |
| 2247 | doc: /* Dump current state of Emacs into executable file FILENAME. | 2211 | doc: /* Dump current state of Emacs into executable file FILENAME. |
| 2248 | Take symbols from SYMFILE (presumably the file you executed to run Emacs). | 2212 | Take symbols from SYMFILE (presumably the file you executed to run Emacs). |
| @@ -2339,8 +2303,6 @@ You must run Emacs in batch mode in order to dump it. */) | |||
| 2339 | return unbind_to (count, Qnil); | 2303 | return unbind_to (count, Qnil); |
| 2340 | } | 2304 | } |
| 2341 | 2305 | ||
| 2342 | #endif /* not HAVE_SHM */ | ||
| 2343 | |||
| 2344 | #endif /* not CANNOT_DUMP */ | 2306 | #endif /* not CANNOT_DUMP */ |
| 2345 | 2307 | ||
| 2346 | #if HAVE_SETLOCALE | 2308 | #if HAVE_SETLOCALE |
| @@ -2517,12 +2479,8 @@ syms_of_emacs () | |||
| 2517 | staticpro (&Qfile_name_handler_alist); | 2479 | staticpro (&Qfile_name_handler_alist); |
| 2518 | 2480 | ||
| 2519 | #ifndef CANNOT_DUMP | 2481 | #ifndef CANNOT_DUMP |
| 2520 | #ifdef HAVE_SHM | ||
| 2521 | defsubr (&Sdump_emacs_data); | ||
| 2522 | #else | ||
| 2523 | defsubr (&Sdump_emacs); | 2482 | defsubr (&Sdump_emacs); |
| 2524 | #endif | 2483 | #endif |
| 2525 | #endif | ||
| 2526 | 2484 | ||
| 2527 | defsubr (&Skill_emacs); | 2485 | defsubr (&Skill_emacs); |
| 2528 | 2486 | ||