* lisp/loadup.el: Don't accidentally reduce `max-lisp-eval-depth`

diff --git a/lisp/loadup.el b/lisp/loadup.el
index 7044a6298487327e4efe88ec521be6635d5b9576..532d2ca176dcd7da8d28d280c708010baf40897c 100644 (file)
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -103,7 +103,7 @@
       ;; During bootstrapping the byte-compiler is run interpreted
       ;; when compiling itself, which uses a lot more stack
       ;; than usual.
-      (setq max-lisp-eval-depth 3400)))
+      (setq max-lisp-eval-depth (max max-lisp-eval-depth 3400))))
 
 (if (eq t purify-flag)
     ;; Hash consing saved around 11% of pure space in my tests.