Mercurial > hg > xemacs-beta
comparison src/emacs.c @ 4759:aa5ed11f473b
Remove support for obsolete systems. See xemacs-patches message with ID
<870180fe0911101613m6b8efa4bpf083fd9013950807@mail.gmail.com>.
author | Jerry James <james@xemacs.org> |
---|---|
date | Wed, 18 Nov 2009 08:49:14 -0700 |
parents | 80d74fed5399 |
children | 2fc0e2f18322 e0db3c197671 |
comparison
equal
deleted
inserted
replaced
4758:75975fd0b7fc | 4759:aa5ed11f473b |
---|---|
893 main_1 (int argc, Wexttext **argv, Wexttext **UNUSED (envp), int restart) | 893 main_1 (int argc, Wexttext **argv, Wexttext **UNUSED (envp), int restart) |
894 { | 894 { |
895 Rawbyte stack_bottom_variable; | 895 Rawbyte stack_bottom_variable; |
896 int skip_args = 0; | 896 int skip_args = 0; |
897 Lisp_Object load_me; | 897 Lisp_Object load_me; |
898 #ifdef NeXT | |
899 extern int malloc_cookie; | |
900 #endif | |
901 | 898 |
902 #if (!defined (SYSTEM_MALLOC) && !defined (HAVE_LIBMCHECK) \ | 899 #if (!defined (SYSTEM_MALLOC) && !defined (HAVE_LIBMCHECK) \ |
903 && !defined (DOUG_LEA_MALLOC)) | 900 && !defined (DOUG_LEA_MALLOC)) |
904 /* Make sure that any libraries we link against haven't installed a | 901 /* Make sure that any libraries we link against haven't installed a |
905 hook for a gmalloc of a potentially incompatible version. */ | 902 hook for a gmalloc of a potentially incompatible version. */ |
926 init_lrecord_stats (); | 923 init_lrecord_stats (); |
927 #endif /* ALLOC_TYPE_STATS */ | 924 #endif /* ALLOC_TYPE_STATS */ |
928 } | 925 } |
929 } | 926 } |
930 #endif /* NEW_GC */ | 927 #endif /* NEW_GC */ |
931 | |
932 #ifdef NeXT | |
933 /* 19-Jun-1995 -baw | |
934 * NeXT secret magic, ripped from Emacs-for-NS by Carl Edman | |
935 * <cedman@princeton.edu>. Note that even Carl doesn't know what this | |
936 * does; it was provided by NeXT, and it presumably makes NS's mallocator | |
937 * work with dumping. But malloc_jumpstart() and malloc_freezedry() in | |
938 * unexnext.c are both completely undocumented, even in NS header files! | |
939 * But hey, it solves all NS related memory problems, so who's | |
940 * complaining? */ | |
941 if (initialized && malloc_jumpstart (malloc_cookie) != 0) | |
942 stderr_out ("malloc jumpstart failed!\n"); | |
943 #endif /* NeXT */ | |
944 | 928 |
945 #if defined (LOSING_GCC_DESTRUCTOR_FREE_BUG) | 929 #if defined (LOSING_GCC_DESTRUCTOR_FREE_BUG) |
946 /* Prior to XEmacs 21, this was `#if 0'ed out. */ | 930 /* Prior to XEmacs 21, this was `#if 0'ed out. */ |
947 /* I'm enabling this because it is the only reliable way I've found to */ | 931 /* I'm enabling this because it is the only reliable way I've found to */ |
948 /* prevent a very annoying problem where GCC will attempt to free (3) */ | 932 /* prevent a very annoying problem where GCC will attempt to free (3) */ |
1026 #ifdef SET_EMACS_PRIORITY | 1010 #ifdef SET_EMACS_PRIORITY |
1027 if (emacs_priority != 0) | 1011 if (emacs_priority != 0) |
1028 nice (-emacs_priority); | 1012 nice (-emacs_priority); |
1029 setuid (getuid ()); | 1013 setuid (getuid ()); |
1030 #endif /* SET_EMACS_PRIORITY */ | 1014 #endif /* SET_EMACS_PRIORITY */ |
1031 | |
1032 #ifdef EXTRA_INITIALIZE | |
1033 EXTRA_INITIALIZE; | |
1034 #endif | |
1035 | 1015 |
1036 /* NOTE NOTE NOTE: Keep the following args in sync with the big list of | 1016 /* NOTE NOTE NOTE: Keep the following args in sync with the big list of |
1037 arguments below in standard_args[], with the help text in startup.el, | 1017 arguments below in standard_args[], with the help text in startup.el, |
1038 and with the list of non-clobbered variables near where pdump_load() | 1018 and with the list of non-clobbered variables near where pdump_load() |
1039 is called! */ | 1019 is called! */ |
1579 #ifdef WITH_NUMBER_TYPES | 1559 #ifdef WITH_NUMBER_TYPES |
1580 syms_of_number (); | 1560 syms_of_number (); |
1581 #endif | 1561 #endif |
1582 syms_of_objects (); | 1562 syms_of_objects (); |
1583 syms_of_print (); | 1563 syms_of_print (); |
1584 #if !defined (NO_SUBPROCESSES) | |
1585 syms_of_process (); | 1564 syms_of_process (); |
1586 #ifdef HAVE_WIN32_PROCESSES | 1565 #ifdef HAVE_WIN32_PROCESSES |
1587 syms_of_process_nt (); | 1566 syms_of_process_nt (); |
1588 #endif | |
1589 #endif | 1567 #endif |
1590 syms_of_profile (); | 1568 syms_of_profile (); |
1591 #if defined (HAVE_MMAP) && defined (REL_ALLOC) && !defined (DOUG_LEA_MALLOC) | 1569 #if defined (HAVE_MMAP) && defined (REL_ALLOC) && !defined (DOUG_LEA_MALLOC) |
1592 syms_of_ralloc (); | 1570 syms_of_ralloc (); |
1593 #endif /* HAVE_MMAP && REL_ALLOC */ | 1571 #endif /* HAVE_MMAP && REL_ALLOC */ |
2156 vars_of_number (); | 2134 vars_of_number (); |
2157 #endif | 2135 #endif |
2158 vars_of_objects (); | 2136 vars_of_objects (); |
2159 vars_of_print (); | 2137 vars_of_print (); |
2160 | 2138 |
2161 #ifndef NO_SUBPROCESSES | |
2162 vars_of_process (); | 2139 vars_of_process (); |
2163 #ifdef HAVE_UNIX_PROCESSES | 2140 #ifdef HAVE_UNIX_PROCESSES |
2164 vars_of_process_unix (); | 2141 vars_of_process_unix (); |
2165 #endif | 2142 #endif |
2166 #ifdef HAVE_WIN32_PROCESSES | 2143 #ifdef HAVE_WIN32_PROCESSES |
2167 vars_of_process_nt (); | 2144 vars_of_process_nt (); |
2168 #endif | |
2169 #endif | 2145 #endif |
2170 | 2146 |
2171 vars_of_profile (); | 2147 vars_of_profile (); |
2172 #if defined (HAVE_MMAP) && defined (REL_ALLOC) && !defined (DOUG_LEA_MALLOC) | 2148 #if defined (HAVE_MMAP) && defined (REL_ALLOC) && !defined (DOUG_LEA_MALLOC) |
2173 vars_of_ralloc (); | 2149 vars_of_ralloc (); |