diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Makefile.in | 4 | ||||
| -rw-r--r-- | src/emacs.c | 7 | ||||
| -rw-r--r-- | src/eval.c | 22 | ||||
| -rw-r--r-- | src/lisp.h | 2 |
4 files changed, 1 insertions, 34 deletions
diff --git a/src/Makefile.in b/src/Makefile.in index ab319837249..1bc9a76cde5 100644 --- a/src/Makefile.in +++ b/src/Makefile.in @@ -761,10 +761,6 @@ endif @: Compile some files earlier to speed up further compilation. $(MAKE) -C ../lisp compile-first EMACS="$(bootstrap_exe)" - -generate-ldefs-boot: bootstrap-emacs$(EXEEXT) - $(RUN_TEMACS) --batch $(BUILD_DETAILS) --load loadup bootstrap - ifeq ($(AUTO_DEPEND),yes) -include $(ALLOBJS:%.o=${DEPDIR}/%.d) else diff --git a/src/emacs.c b/src/emacs.c index a72f1810d8a..1868961090d 100644 --- a/src/emacs.c +++ b/src/emacs.c @@ -129,8 +129,6 @@ Lisp_Object Vlibrary_cache; on subsequent starts. */ bool initialized; -bool generating_ldefs_boot; - #ifndef CANNOT_DUMP /* Set to true if this instance of Emacs might dump. */ # ifndef DOUG_LEA_MALLOC @@ -686,10 +684,7 @@ main (int argc, char **argv) stack_bottom = &stack_bottom_variable; dumping = !initialized && (strcmp (argv[argc - 1], "dump") == 0 - || strcmp (argv[argc - 1], "bootstrap") == 0 ); - - generating_ldefs_boot = !!getenv ("GENERATE_LDEFS_BOOT"); - + || strcmp (argv[argc - 1], "bootstrap") == 0); /* True if address randomization interferes with memory allocation. */ # ifdef __PPC64__ diff --git a/src/eval.c b/src/eval.c index 9b36ee04ed2..16d1cf810ea 100644 --- a/src/eval.c +++ b/src/eval.c @@ -1976,28 +1976,6 @@ it defines a macro. */) if (!CONSP (fundef) || !EQ (Qautoload, XCAR (fundef))) return fundef; - /* In the special case that we are generating ldefs-boot-auto.el, - then be noisy about the autoload. */ - if( generating_ldefs_boot ) - { - fprintf(stderr, "(autoload '"); - Fprin1(funname,Qexternal_debugging_output); - fprintf(stderr, " "); - Fprin1(Fcar (Fcdr (fundef)),Qexternal_debugging_output); - fprintf(stderr, " nil nil "); - - Lisp_Object kind = Fnth (make_number (4), fundef); - if (! (EQ (kind, Qt) || EQ (kind, Qmacro))) - { - fprintf(stderr, "nil"); - } - else - { - fprintf(stderr, "t"); - } - fprintf(stderr, ")\n"); - } - if (EQ (macro_only, Qmacro)) { Lisp_Object kind = Fnth (make_number (4), fundef); diff --git a/src/lisp.h b/src/lisp.h index 6d0b5283356..5cbb461a182 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -580,8 +580,6 @@ extern bool might_dump; Used during startup to detect startup of dumped Emacs. */ extern bool initialized; -extern bool generating_ldefs_boot; - /* Defined in floatfns.c. */ extern double extract_float (Lisp_Object); |